2FORT=0TO10
3FORL=0TO24:POKES+0,0:NEXT
4FORT=0TOINT(RND(0)*800):NEXT
5POKES+1,INT(RND(1)*95)
6POKES+5,INT(RND(1)*95):POKES+6,INT(RND(1)*25)
7POKES+19,INT(RND(1)*50):POKES+20,INT(RND(1)*10)
8POKES+24,15
9POKES+4,37
10FORT=1TOINT(RND(1)*400):NEXT
11POKES+4,36
12FORT=1TO100:GOTO2
13POKES+24,0
2FORT=0TO10
3FORL=0TO24:POKES+0,0:NEXT
4FORT=0TOINT(RND(0)*800):NEXT
5POKES+1,INT(RND(1)*95)
6POKES+5,INT(RND(1)*95):POKES+6,INT(RND(1)*25)
7POKES+19,INT(RND(1)*50):POKES+20,INT(RND(1)*10)
8POKES+24,15
9POKES+4,37
10FORT=1TOINT(RND(1)*400):NEXT
11POKES+4,36
12FORT=1TO100:GOTO2
13POKES+24,0