10 IFA=0THENA=1:LOAD"COMPUTESCREEN",8,1
20 IFA=1THENA=2:LOAD"COMPUTECOLOR",8,1
30 PRINT"";:POKE53280,15:POKE53281,15
40 GOTO40