.; This file is included mainly as an example of how IND can make use of the
.; VT100 advanced video options to display fancy screens. Much more can be 
.; done...see your VT100 manual.
.; One note: to get an ESCAPE character using EDT V2, just hit ESCAPE twice
.; while you are in keypad edit mode.
.1:
.ENABLE QUIET
.ENABLE SUBSTITUTION
SET /VT100=TI:
SET /BUF=TI:132.
ASN '<SYDISK>''<SYUNIT>':=DL:
.2:
.OPEN TI:
.; Next line sets VT100 to ANSI mode
.ENABLE DATA
<
[2J
[1;1H[7m
'<TIME>'            L A Y O U T   8 0   S Y S T E M                  '<DATE>' 
[0m
Layout Options:
[1m  NEW[0m    Enter new ads with DEN.  [1m  ILP [0m   Interactive layout.
[1m  STORE[0m  Store ads into ADS.DAT.  [1m  FIN [0m   Produce final report.
[1m  ERR[0m    View errors in update.   [1m  CLEAN[0m  Delete obsolete ad files.
[1m  COR[0m    Correct last NEWADS file.[4m  DUM [0m   Background dummying run.
[1m  ADS [0m   Run ADS program.         [1m  DEN[0m    Run DEN program.         
[1m  EDF [0m   Modify existing EDF.     [1m  QUIT[0m   EXIT AND LOG OFF.
[1m  EXT [0m   Build edition data base. [1m  SHOEDF[0m Display Edition Design file names.
[1m  ADL[0m    List ad data base        [1m  NEWEDF[0m Create a new EDF.
[1m  ADD [0m   Ad Distribution Report.  [1m  REPEDF[0m Move an EDF to [77,76].
[1m  CNF [0m   Configure data base.     [1m  DOLIST[0m Print any listing again.
[1m  PGL [0m   Print page dummies.      [1m  OPT [0m   List layout options.
[1m  HLP [0m   Get help on layout cmds. 
[1;5mType in your option. [0m
.DISABLE DATA
.CLOSE TI:
