Listing of file='TAM.000B' on disk='vmedia/701-2216A.wvd.zip'
# Sector 50, program filename = 'TAM.000B' 0010 REM 'TAM.000B' (SELECT TERMINAL) 0040 DIM Q(7),Q6$64,Q$1,Q3$(2)40,Q1$(2)40,Q7$1 1000 % THIS STATEMENT FOR OVERLAYING TAM.000B 5000 DEFFN'240(S7) : BIN(STR(Q6$,2))=S7 : $GIO/006(40F44220,Q6$) : RETURN