100 DIM LCT$(256),TR$(4),VL$(5),M$(1024),P$(40),L$(1)105 OPEN #3,4,0,"S:"185 POSITION 2,16:? "Do you want a printout ";:INPUT L$740 IF ADRS=EA THEN POSITION 6,22:? "Requested Address Reached ":IF L$="Y" THEN GOSUB 2000:END 750 IF CYC=20 THEN POSITION 7,22:? " Hit Any Key To Continue ":GET #1,A:IF L$="Y" THEN GOSUB 2000:? "}":GOTO 200755 IF CYC=20 THEN ? "}":GOTO 2001999 REM Ԡś2000 P$="":FOR Y=1 TO 20:FOR X=0 TO 39:POSITION X,Y:GET #3,N2010 P$(X+1,X+1)=CHR$(N):NEXT X:LPRINT P$:P$=""2020 NEXT Y2030 RETURN 