10 PRINT"[147]P[207]44,10:P[207]2560,0:NEW"
20 PRINT"LOAD"CHR$(34)"EDIT.R"CHR$(34)",8"
30 POKE198,6:POKE631,19:POKE632,13:POKE633,13:POKE634,82:POKE635,213:POKE636,13