image of READY prompt

Wang2200.org

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

# Sector 336, program filename = 'TRAN010A'
0010 REM TRAN010A,00-00(11/08/76),12003A - COPYRIGHT WANG LABS. INC., 1976
9700 DIM Q9$(8)32
9702 DEFFN'201
9705 Q9$(1)=HEX(00010203FF09FF7FFFFFFF0B0C0D0E0F10111213FFFF08FF1819FFFF1C1D1E
     1F)
   : Q9$(2)=HEX(FFFFFFFFFF0A171BFFFFFFFFFF050607FFFF16FFFFFFFFFFFFFFFFFF1415FF
     1A)
9715 Q9$(3)=HEX(20FFFFFFFFFFFFFFFFFF5B2E3C282BC726FFFFFFFFFFFFFFFFFF21242A293B
     5E)
   : Q9$(4)=HEX(2D2FFFFFFFFFFFFFFFFF7C2C255F3E3FFFFFFFFFFFFFFFFFFF603A2340273D
     22)
9725 Q9$(5)=HEX(FF616263646566676869FFFFFFFFFFFFFF6A6B6C6D6E6F707171FFFFFFFFFF
     FF)
   : Q9$(6)=HEX(FF7E737475767778797AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     FF)
9735 Q9$(7)=HEX(7B414243444546474849FFFFFFFFFFFF7D4A4B4C4D4E4F505152FFFFFFFFFF
     FF)
   : Q9$(8)=HEX(5CFF535455565758595AFFFFFFFFFFFF30313233343536373839FFFFFFFFFF
     FF)
   : RETURN