image of READY prompt

Wang2200.org

Listing of file='START035' on disk='vmedia/701-2047D.wvd.zip'

# Sector 154, program filename = 'START035'
0010 REM START035,00-00(02/18/76),12003A - COPYRIGHT WANG LABS. INC., 1976
0060 GOTO 9930
9905 DEFFN'0"PRINT HEX(010A):LOAD DC T#0,";HEX(22);"TRAN010A";HEX(220D)
9910 DEFFN'1"PRINT HEX(010A):LOAD DC T#0,";HEX(22);"TRAN020A";HEX(220D)
9915 DEFFN'2"PRINT HEX(010A):LOAD DC T#0,";HEX(22);"TRAN030A";HEX(220D)
9920 DEFFN'3"PRINT HEX(010A):LOAD DC T#0,";HEX(22);"TRAN040A";HEX(220D)
9925 DEFFN'15
   : LOAD DC T#0,"START"
9930 SELECT PRINT 005(64)
   : PRINT HEX(030A0A0A);TAB(18);"TRANSLATION TABLES"
   : PRINT TAB(10);"TABLE NAME           SPECIAL FUNCTION KEY"
9945 %          ########################       ##
9950 PRINT HEX(0A)
   : PRINTUSING 9945,"EBCDIC TO   ASCII","00"
   : PRINTUSING 9945,"ASCII  TO   EBCDIC","01"
   : PRINTUSING 9945,"2200   TO   1200","02"
   : PRINTUSING 9945,"1200   TO   2200","03"
   : PRINTUSING 9945,"SYSTEM START-UP","15";
   : PRINT HEX(01);