Listing of file='TAM.004B' on disk='vmedia/701-2216A.wvd.zip'
# Sector 24, program filename = 'TAM.004B' 0010 REM 'TAM.004B' (GET MESSAGE) 0040 DIM Q(7),Q6$64,Q$1,Q7$1,Q3$(2)40,Q1$(2)40 1000 % THIS STATEMENT FOR OVERLAYING TAM.004B 5400 DEFFN'242 : INIT(20)Q3$() : $GIO/003(0620010DC630022016200222,Q6$)Q3$() : Q9=VAL(STR(Q6$,10)) : Q$=STR(Q6$,2) : Q7$=STR(Q6$,6) 5475 RETURN