10 X = 1E39: X% = 32768
20 HCOLOR = 9
30 POKE 100000,300: X = PEEK(100000): CALL 99000
40 LOMEM: -40000: HIMEM: 80000
50 WAIT 75000,300,300
64000 REM