SHEEPDOG Q pS  Sheepdog  S.Robert Speel 1982 8000@ f=172 :sy=(a(f)-y)ƽ(a(f+1)-x)<4ƽ(a(f)-y)<4 Bsx=(a(f+1)-x)ƽ(a(f)-y)<4ƽ(a(f+1)-x)<4 Jsx=sx+(*3)/2-.5:sy=sy+(*3)/2-.5 sx=sx+(a(f+1)<1)*2-(a(f+1)>29)*2-(a(f+1)>22a(f+1)<27(a(f)<9 a(f)>12 ))+(a(f+1)>25a(f+1)<27)*2 6sy=sy+(a(f)<2)*2-(a(f)>19)*2 $,a(f)=a(f)+sy:a(f+1)=a(f+1)+sx .a(f)-sy,a(f+1)-sx;" " 8'ٰa$(f);a(f),a(f+1);146 B]a(2)>25a(4)>25a(6)>25a(8)>254000 .y-y1,x-x1;" ";0;y,x;(144+di) fx1=(="8")-(="5")+(x<2)-(x>23):y1=(="6")-(="7")+(y<1)-(y>19):di=(="5") x=x+x1:y=y+y1 f go=go+1 ,0;0,27;(go*1.5@) (go/20=(go/20)8510>! 1000 Q0:10 ,2;"YOU HAVE PENNED ALL";11 ,2;"THE SHEEP." 7sc=c():13 ,2;"YOU TOOK ";sc;" SECONDS." C0:f=-2525:.1}L,f:.1}L,25-f:f =hs>schs=sc:15,1;"WELL DONE - A NEW RECORD!" %17,1;"HIGHSCORE = ";hs (20,3;"ANOTHER GAME?(y/n)" "="y"4200h ,="n"5:5:: 6 4130" h8100:1000 @Df=02:g=07:a:(144+f)+g,a:g:f Jhs=500 [a(8):a$(8):f=172:a(f)=10 +f:a(f+1)=5 !a$(f)="6":a$(f+1)="1":f "x=1:y=1:di=0 $x1=0:y1=0:go=0 a(mD.z,nDB\)=(m+n+(m-n))/2:b()=(23672x\+256*23673y\+65536*23674z\)/502:c()=a(b(),b()) ?23672x\,0:23673y\,0:23674z\,0 !44:6: !>2:f=14:200+f*2+(f>2)*2,0:0,72H:4;0,32 :0,71G:f !H #(0,2,134,125},124|,194,129,0,0,64@,97a,190,62>,67C,129,0 #2I0,7,255,252,252,68D,68D,0 @aDB\+0d(d L d 61616161xy DB\@