10 IFA=0THENA=3:POKE53281,0:POKE56576,151:POKE53272,21:POKE648,4:POKE53269,0:LOAD"04",8,1
20 IFA=3THENA=4:PRINT"[144][147]":LOAD"05",8,1
23 IFA=4THENA=5:LOAD"03",8,1
30 FORT=0TO15:POKE53248+T,0:NEXTT:FORT=0TO20:POKE1024+T,160:POKE1064+T,160:NEXT:POKE53280,0
40 POKE56322,255:POKE633,139:SYS49152:WAIT789,234:PRINT"[144][147]L[207]"CHR$(34)"06";:POKE53281,0
50 PRINTCHR$(34)",8,1":PRINT"R[213]":POKE198,10:POKE631,19:POKE632,13:POKE633,13:POKE139,10:POKE56322,2