10 d(0)=2 : d(1)=-44 : d(2)=-2 : d(3)=44
20 w=160 : h=32 : s=7680 : a=s+45
30 print "{clear}" : for i=1 to 21
40 print "{rvson}" : next : poke a,4 : print "{home}"
50 j=int(rnd(1)*4) : c=j
60 b=a+d(j) : if peek(b)=w then poke b,j : poke a+d(j)/2,h : a=b : goto 50
70 j=(j+1)*-(j<3) : if j<>c then 60
80 j=peek(a) : poke a,h : if j<4 then a=a-d(j) : goto 50