Sheepdog Trials 235
780 IF CHECK <4 THEN LOCATE 3,19:PRINT"Y OU FAILED TO PEN THE SHEEP";:LOCATE 3,20 :PRINT"YOUR SCORE IS ZERO":P(T)=0:CHECK =0:FOR 0=1 TO 2000:NEXT
790 IF T<A THEN 220 ELSE CLS:GOTO 630
800 PEN 2:PRINT;CHR$(24);"	SH
EEPDOG TRIALS	";CHR$(24):PEN
1
810 PEN 3:LOCATE 1,5:PRINT"The object of
the game is to herd all 4 sheep into th e pen within a fixed time limit by movi ng the dog using the CURSORarrow keys.": PEN 1
820 PRINT:PRINT"When the sheep have been
penned,close the gate with the '0' ke y and the score will be displayed.Less t han four sheep in the pen, or running o ver time resultsin a zero score"
830 PEN 3:PRINT:PRINT:PRINT CHR$(24);" A ny number of players can play in turn "; CHR$(24);:PEN 1
840 PEN 2:LOCATE 10,23:PRINT CHR$(24);"P RESS ANY KEY TO START.";CHR$(24);:PEN 1 850 IF INKEYS<>"" THEN 850
860 IF INKEYS=""THEN 860 ELSE CLS
870 RETURN
880 SYMBOL AFTER 230
890 SYMBOL 231,0,0,2,135,126,124,230,149 900 SYMBOL 232,0,0,64,225,126,62,103,169 910 SYMBOL 233,0,0,0,6,127,254,126,37 920 SYMBOL 234,0,0,0,96,254,127,126,164 930 SYMBOL 235,1,1,1,1,1,1,1,1
940 SYMBOL 236,128,128,128,128,128,128,1 28,128
950 SYMBOL 237,255,0,0,0,0,0,0,0
960 SYMBOL 238,255,128,128,128,128,128,1 28,128
970 SYMBOL 239,255,1,1,1,1,1,1,1
980 SYMBOL 240,128,128,128,128,128,128,1
990 SYMBOL 241,1,1,1,1,1,1,1,255
1000 RETURN
1010 RESTORE 1020:FOR XX=360 TO 366:READ ZZ:POKE XX,ZZ:NEXT:RESTORE:RETURN
1020 DATA 205,96,187,50,111,1,201