100 I=0: CLS: PRINT " n = ";: INPUT N

110 U=1:D=0:R=0:L=0:X=320:Y=100:CLS

120 CURSOR 0: POINT 14,X,Y

130 IF U=1 Y=Y-1

140 IF D=1 Y=Y+1

150 IF R=1 X=X+2

160 IF L=1 X=X-2

170 IF X>639 X=0

180 IF X<0 X=638

190 IF Y>199 Y=0

200 IF Y<0 Y=199

210 C=15-GET(X,Y)

220 IF C=1 POINT 15,X,Y:POINT 15,X+1,Y

230 IF C=0 POINT 14,X,Y:POINT 14,X+1,Y

240 IF C=1 IF U=1 U=0:R=1:GOTO 280

250 IF C=1 IF R=1 R=0:D=1:GOTO 280

260 IF C=1 IF D=1 D=0:L=1:GOTO 280

270 IF C=1 IF L=1 L=0:U=1:GOTO 280

280 IF C=0 IF U=1 U=0:L=1:GOTO 320

290 IF C=0 IF R=1 R=0:U=1:GOTO 320

300 IF C=0 IF D=1 D=0:R=1:GOTO 320

310 IF C=0 IF L=1 L=0:D=1:GOTO 320

320 I=I+1: IF I<N GOTO 130

330 COLOR 14,15: CURSOR 1: END