10 IF A=0 THEN A=1:LOAD"SPRITE 1.TRON",8,1 20 IF A=1 THEN A=2:LOAD"SPRITE 2.TRON",8,1 30 PRINT"[147]P[207]44,40:P[207]10240,0:NEW" 40 PRINT"LOAD"CHR$(34)"CODE.TRON"CHR$(34)",8,1" 50 PRINT"LOAD"CHR$(34)"BASIC.TRON"CHR$(34)",8" 60 PRINT"RUN" 70 PRINT"" 80 POKE198,5 90 FOR Q=0 TO 4:POKE 631+Q,13:NEXT