Listing of file='START055' on disk='vmedia/701-2048D.wvd.zip'
# Sector 664, program filename = 'START055'
0010 REM START055,00-00(02/18/76),12003A - COPYRIGHT WANG LABS. INC., 1976
0060 SELECT PRINT 005(64),CO 005(64)
: PRINT HEX(030A)
: DIM Q6$64
: GOTO 330
0110 DEFFN'33(Q6$)
: PRINT HEX(030A0A0A0A0A)
: PRINT TAB(10);"* * * * * * * * * * * * * * * * * * * * * * * *"
: PRINT TAB(10);"* *"
0150 PRINT TAB(10);"* SYSTEM NOW LOADING *"
: PRINT TAB(10);"*";TAB(35-INT(LEN(Q6$)/2));Q6$;TAB(56);"*"
: PRINT TAB(10);"* *"
0180 PRINT TAB(10);"* * * * * * * * * * * * * * * * * * * * * * * *"
: RETURN
0210 DEFFN'0
: GOSUB '33("DETERMINE WORK FILE SIZE")
: LOAD DC T#0,"SORTSP01"
0250 DEFFN'1
: GOSUB '33("GENERAL DISK SORT UTILITY")
: LOAD DC T#0,"SORT"
0290 DEFFN'15
: GOSUB '33("SYSTEM START-UP")
: LOAD DC T#0,"START"
0330 PRINT HEX(0A0A)
: PRINT TAB(25);"ISS DISK SORT"
: PRINT
: PRINT "----------------------------------------------------------------"
: PRINT " FN KEY PROGRAM NAME FN KEY PROGRAM NAME"
0380 PRINT "----------------------------------------------------------------"
: PRINT
: PRINT " 00 DETERMINE WORK FILE SIZE 01 ISS DISK SORT"
: PRINT ;TAB(38);"15 SYSTEM START-UP"