Listing of file='TAM.008B' on disk='vmedia/701-2216A.wvd.zip'
# Sector 55, program filename = 'TAM.008B' 0010 REM 'TAM.008B' (POSITION CURSOR (R,C,E) ) 0040 DIM Q(7),Q6$64,Q$1,Q3$(2)40,Q1$(2)40,Q7$1 1000 % THIS STATEMENT FOR OVERLAYING TAM.008B 5700 DEFFN'248(Q(1),Q(2),Q(6)) : IF Q(6)=0THEN 5739 : GOSUB 5739 : IF Q(6)=9E99THEN 5754 : SELECT PRINT 207(80) : PRINT TAB(80-Q(2)) : IF Q(6)=1THEN 5733 : FOR Q9=2TO Q(6) : PRINT HEX(0A);TAB(80) : NEXT Q9 5733 SELECT PRINT 007(80) 5754 SELECT PRINT 007(80) : PRINT HEX(03) : GOTO 5739