Listing of file='TRAN030A' on disk='vmedia/701-2047D.wvd.zip'
# Sector 351, program filename = 'TRAN030A' 0010 REM TRAN030A,00-00(11/08/76),12003A - COPYRIGHT WANG LABS. INC., 1976 9700 DIM Q9$(8)32 9788 DEFFN'203 9790 INIT(FF)Q9$(1) : STR(Q9$(1),3,1)=HEX(AA) : Q9$(2)=HEX(031795BEB9B5BD15B0B1BC860C001609313F363E3935343D3C308D0DB406FF 89) 9805 Q9$(3)=HEX(B69CA0ACADA58E8FA19487A4A99FA69985849D91A7AE9E90AF81B7BFFF3F97 12) : Q9$(4)=HEX(021C202C2D250E0F21140724291F261905041D11272E1E102F0137FFFFFFFF FF) 9815 Q9$(5)=HEX(080A0B181A1B22233332383A3B72280212FFFFFFFFFFFFFFFFFFFFFFFFFFFF FF) : Q9$(6)=HEX(8057D5FEF9F5FD55F0F1FFC64C4056497169767E7975747D7C70CD4DF446FF C9) 9825 Q9$(7)=HEX(F6DCE0ECEDE5CECFE1D4C7E4E9DFE6D9C5C4DDD1E7EEDED0EFC1F7FFFF7FD7 FF) : Q9$(8)=HEX(FC5C606C6D654E4F61544764695F665945445D51676E5E506F4177FFFFFFFF FF) : RETURN