#zxspectrumbot
5 CLEAR 61999
10 FOR x=62000 TO 62011
20 READ a: POKE x,a
30 NEXT x
40 DATA 33,0,20,17,0,64,1,0,24,237,176,201
50 FOR z=0 TO 254
60 POKE 62001,z
70 RANDOMIZE USR 62000
80 NEXT z
90 GO TO 50