1 POKE53280,14:POKE646,14:POKE53281,6
10 CLR:POKE55,255:POKE56,159:POKE43,1:POKE44,128:POKE45,3:POKE46,128:CLR
20 POKE128*256,0:POKE128*256+1,0
100 POKE53280,2:POKE53281,0:F$="COMPACT 2":D$="RUN"
270 PRINT"[144][147]";
280 PRINT"LOAD"+CHR$(34)+F$+CHR$(34)+",8"
290 PRINT"";D$;"";
300 FORT=0TO2:POKE198,T:POKE631+T,13:NEXTT