1 dim x(10)
2 dim y(10)
3 cls
4 for i=0 to 9
9 d = RND % 3 -1
10 x(i) = x(i) + d
11 if x(i)<0 then x(i)=0
12 if x(i)>120 then x(i)=120
13 d = RND % 3 -1
14 Y(i) = Y(i) + d
15 if y(i)<0 then y(i)=0
16 if y(i)>31 then y(i)=31
17 locate x(i),y(i)
18 print "A"
19 next
80 goto 3
