C64 Software  <  SCA: The C64 Software Collection / @

  Run
1 INPUTA
5 POKE54296,15:POKE780,A:SYS49167:FORI=0TO1E38:SYS49178:GOSUB6:NEXT
6 GETA$:IFA$=""THENRETURN
7 A=A+1:PRINT""A:GOTO5
READY.