10 COLOR 1,15:SCREEN 2
20 GOSUB 60:LINE (X,Y)-(X+10,Y+10)
30 X1=X:Y1=Y:A$=INKEY$:IF A$="n" OR A$="N" THEN ELSE 20
40 GOSUB 60:LINE (X1,Y1)-(X1+10,Y1+10),15:LINE (X,Y)-(X+10,Y+10)
50 X1=X:Y1=Y:A$=INKEY$:IF A$="r" OR A$="R" THEN 20 ELSE 40
60 D=STICK(0)
70 IF D=1 OR D=2 OR D=8 THEN Y=Y-1
80 IF D=4 OR D=5 OR D=6 THEN Y=Y+1
90 IF D=2 OR D=3 OR D=4 THEN X=X+1
100 IF D=6 OR D=7 OR D=8 THEN X=X-1
110 RETURN'
W
W�