Listing of file='TRAN040A' on disk='vmedia/701-2047D.wvd.zip'
# Sector 359, program filename = 'TRAN040A'
0010 REM TRAN040A,00-00(11/08/76),12003A - COPYRIGHT WANG LABS. INC., 1976
9700 DIM Q9$(8)32
9838 DEFFN'204
9840 Q9$(1)=HEX(2D79602071703D6A802F81822C3B666777735FFF69272E21836F8485617276
6D)
: Q9$(2)=HEX(626886876B656E748E6CFFFF63647578393089883635327A8A348B8C383733
31)
9850 Q9$(3)=HEX(ADF9FFFFF1F0BDEAFFAFFFFFACBBE6E7F7F3FFFFE9A7AEA1FFEFFFFFE1F2F6
ED)
: Q9$(4)=HEX(E2E8FFFFEBE5EEF4FFB1FFFFE3E4F5F8B9B08DFFB6B5B2FAFFB4FFFFB8B7B3
DD)
9860 Q9$(5)=HEX(A059FFFF51502B4AFF3FFF922C3A46475753FFFF49222E5EFF4FFFFF415256
4D)
: Q9$(6)=HEX(4248FFFF4B454E54FF4C02FF434455582829FFFF3C25405AFF24FFFF2A2623
31)
9870 Q9$(7)=HEX(A0D9FFFFD1D0ABCAFFBFFF91ACBAC6C7D7D3FFFFC9A2AEDEFFCFFFFFC1D2D6
CD)
: Q9$(8)=HEX(C2C8FFFFCBC5CED4FFCCFFFFC3C4D5D8A8A9FFFFBCA5C0DAFFA4FFFFE0A6A3
DB)
: RETURN