10 PRINT"LOAD"CHR$(34)"CASSETTE"CHR$(34)",8";"[145][145][145]":
20 A$="RUN"
30 A$=A$+CHR$(13)
40 POKE631,13:FORB=1TOLEN(A$):POKE631+B,ASC(MID$(A$,B,1)):NEXT:POKE198,10
50 NEW