10 SCREEN,0:CLS:CLEAR256,56000!:ONERRORGOTO300
20 IFPEEK(65215!)+PEEK(65216!)>0THEN40ELSEBLOAD"CHR100":POKE65215!,204:POKE65216!,239:GOTO40
30 GOSUB200:X=24188!:GOSUB100:IFPEEK(63911!)=67THENX=X+1:GOSUB100:IFPEEK(63911!)=72THENX=X+1:GOSUB100:IFPEEK(63911!)=82THENPOKE63911!,12:POKE63912!,145:POKE63913!,240:EXEC62394!
35 IF PEEK(65215!)<>145ANDPEEK(65216!)<>240 THENBEEP:PRINT"No M100 GRPH chars! Cannot play.":END
40 BLOAD"PLANET.CO":EXEC 56000!:MENU
100 POKE63913!,X\256:POKE63912!,X-(X\256)*256:EXEC64448!:RETURN
200 RESTORE210:FORA=0TO14:READB:POKE64448!+A,B:NEXT:RETURN
210 DATA 243,219,160,79,246,1,211,161,70,121,211,161,120,251,201
300 IFERL=20THENRESUME30
310 PRINT"Error"ERR"in"ERL:END