image of READY prompt

Wang2200.org

Listing of file='START' on disk='vmedia/702-0079.wvd.zip'

# Sector 428, program filename = 'START'
0000 REM
0010 REM % PERIPHERAL DIAG (WPN 702-0079) G. CARRIER
   : SELECT PRINT 005(64)
   : PRINT HEX(03);"PERIPHERAL DIAG   DISK CATALOG (WPN 702-0079)"
0020 PRINT "TO LOAD AND RUN,  PRESS S.F. KEY CORRESPONDING TO CATEGORY.  "
0030 RESTORE
   : PRINT
   : I=0
0040 READ A$
   : IF A$=" " THEN 9000
0050 I=I+1
   : PRINTUSING 60,I,A$;
   : PRINT ,
   : GOTO 40
0055 DEFFN'31
   : LOAD DC T "START"
0060 %S.F. '## FOR ################
0100 DATA "OUTPUT WRITERS"
0150 DEFFN'01
   :  LOAD DC T "STARTOUT"
0200 DATA "TELCOM"
0250 DEFFN'02
   :  LOAD DC T "STARTTC "
0300 DATA "I/O DEVICES"
0350 DEFFN'03
   :  LOAD DC T "STARTI/O"
0400 DATA "PLOTTERS"
0450 DEFFN'04
   :   LOAD DC T "STARTPLT"
0500 DATA "2236DE TERMINAL"
0550 DEFFN'05
   :  LOAD DC T "36DEDIAG"
9000 DATA " "