5 REM RND(1)
6 REM ------
10 POKE53281,0:POKE53280,0:PRINT"[147]"
30 FORI=1024TO2022:POKEI,160:POKE54272+I,0:NEXT
40 POKE55296+INT(RND(1)*998)+1,INT(RND(1)*15)+1
45 IFPEEK(203)<>64THENEND
50 GOTO40