Listing of file='START ' on disk='vmedia/701-2110C.wvd.zip'
# Sector 174, program filename = 'START' 0010 REM START, 02-01, (04/23/79) THIS PROGRAM IS A PRODUCT OF WANG LABORATORI ES, INC. UNAUTHORIZED REPRODUCTION OR USE IS PROHIBITED. 0040 COM S1,S,Q1$8,Q1,A$(9)3 : MAT REDIM A$(1)27 : A$(1)="310320330B10B20B30" : MAT REDIM A$(9)3 : GOTO 180 0100 PRINT HEX(030A0A0A0A0A0A) : PRINT TAB(15);"AVAILABLE ADDRESSES" : PRINT TAB(15);"1 - ";A$(1);" 4 - ";A$(4) : PRINT TAB(15);"2 - ";A$(2);" 5 - ";A$(5) : PRINT TAB(15);"3 - ";A$(3);" 6 - ";A$(6) : PRINT HEX(010A) : S1=1 0170 INPUT "ENTER ADDRESS OF SYSTEM DISK (DEFAULT = 1) ",S1 0180 IF S1<=0THEN 100 : IF S1<>INT(S1)THEN 100 : IF S1>6THEN 100 : ON S1GOTO 230,260,290,320,350,380 0230 SELECT #1310 : GOTO 400 0260 SELECT #1320 : GOTO 400 0290 SELECT #1330 : GOTO 400 0320 SELECT #1B10 : GOTO 400 0350 SELECT #1B20 : GOTO 400 0380 SELECT #1B30 0400 LOAD DC T#1,"MENU010A"10,6999