C64 Software  <  SCA: The C64 Software Collection / VIEW CONTINUESLY

  Run
1 POKE888,1:POKE2053,143
10 A$=CHR$(129)+""
20 I=PEEK(888):SYS49154
30 POKE888,I+1:GOSUB50
40 LOADA$+CHR$(I+64)+"",8,8
50 OPEN1,8,3,A$+CHR$(I+64)+""
60 OPEN8,8,15:INPUT#8,S:CLOSE1
70 CLOSE8:IFS>0THENPOKE2053,143:POKE888,1:RUN
80 RETURN
READY.