ZXTape!Yacht f9p=1:23561 \,255:23562 \,255 4:1:0: c=144146 %n=07:r:c+n,r:n:c n=170F H(*20),1+(*30);7;144;144:n Kr2=19:c2=29:r3=2:c3=2:r4=19:c4=2 n=110 E1+(*20),1+(*30);7;146:n u=10 :v=2000 %r,c:c<99cr,c;" ":14 5r,c:c<99cr,c;7;144:16 &p2,29;6;145:r2,c2;5;145;7;r3,c3;125};r4,c4;145 (c=031 ),4;0,c;"";21,c;"":c *r=120 +,4;r,0;"";r,31;"":r ,+2;8,0;"";9 ,0;"";10 ,0;" ";11 ,0;"";12 ,0;"";13 ,0;" ";14,0;"";0;9 ,2;" ";12 ,2;" ";6;9 ,1;146;12 ,1;146 .u4;0,10 ;"YACHT RACE";21,9 ;"Get Set --- ";:3,8:4;1;"GO" _0,28,34",193,0,0,0,0,16,24,28,30,31,16,255,126~,568,16,16,16,568,124|,125},146 c3,28,4,27,5,26,5,25,6,24,7,23,7,22,8,21,7,20,6,19,7,18,6,17,6,16,7,15,8,14,7,13 ,8,12 ,9 ,11 ,9 ,10 ,10 ,9 ,10 ,8,11 ,7,10 ,6,10 ,5,9 ,4,9 ,3,9 ,2,99c,99c d9 ,21,9 ,20,8,18,8,17,8,13 ,9 ,13 ,9 ,9 ,9 ,8,9 ,7,99c,99c n 99c or=2:c=29 x&v=v-1:v0v=2000 yv/u-(v/u)>0127 z/r,c;7;"-":r,c:r=99c260 {&(r,c)=13 y=r:x=c:230 |r,c;6;145 y=r3:x=c3:5000 r3=y:c3=x y=r4:x=c4:5000 r4=y:c4=x k$=:k$=""p:120x k$="0"9999' k$<"1"k$>"8"k$=""120x -n=k$:x=c2:y=r2:sr=r2:sc=c2:6000p -x=1(y=9 y=12 )275 V(y,x)=8y,x;5;145:sr,sc;0;" ":r2=y:c2=x:120x sr,sc;" " -y,x;1;7;"*":3,5 Z4;21,1;"You've Lost. ";9 ,2;1;6;145 <4;21,14;"Another try? Y/N":9998' 74;21,1;"You've Won. ":270 0sr=y:sc=x:n=1+(*8):6000p A(y,x)=8y,x;7;145:sr,sc;0;" ": (y,x)=13 230 x=sc:y=sr: q%n=4y=y-1:x=x+1 s%n=2y=y+1:x=x+1 t%n=1y=y+1:x=x-1 u%n=3y=y-1:x=x-1 vn=5x=x-1 wn=6y=y+1 xn=8x=x+1 yn=7y=y-1 z '!1:0:="y"Ŧ="Y" 'O23561 \,35#:23562 \,5:0:7:7:0