GYBRLSQRLSQTESSTKNSQRTGOTTEREWHITBLUYELLOCXGUXTEMYGUYTEMSTATCGOXSTARYSTARCGUTFOUNCNOTGOMODBLACCHIDTXTXMAXSQRWIDSCLENSCCLS @ !"#$%& RED, WHITE AND BLUEBY HEIDI BRUMBAUGH (c) 1987, ANTIC PUBLISHING(6-+F:B2y,@,d BINITIALIZATIONn ApGET SKILL LEVELx! B!MAKE RANDOM BOARD A`DRAW BOARD A 6-P:'@, -&% ,+&,/+%, &$AdAUBBF:Ad,")+R:,"@*T:,",A A09T:,"" AP, A9FLIP BOARD6-F:A2,+"@ A # A+RIGHT("@ A!# A(UP*"@ A"# A*LEFT$*"@ A## A*DOWN),"@,T:,"A.& A&REPEAT TIL KEY PRESSED87'+%@,$+%@,A7CHECK FOR WINL +@V4-@4(@!!!!!!!!!!!!!!!!!`4-@@4(@!!! you win !!!j4-@@4(@!!!!!!!!!!!!!!!!!t1 A-@@1(@~0 A-@@0(@. A-@@.(@= A-@@ 3(@ҿ= A%-@A % A T:,"Ae +@A%A 1AC-e(@* * * * * * * +A!A@+#B W-@@"'-7(@>:,C-@S(@>:,W .-@@.(@ 4-@@4(@RED white & ſH-@@&(@yes8-@@H(@7-@ 7(@* * * * * * *HIGHLIGHT NOCHECK TRIGGER 1T:,"" A`, A1NO'-@@'(@-@@&(@No0 A B-@@S(@n] A o-@@(@O A  R:,@AHIGHLIGHT YES(&-@@&(@--@@'(@Ye1 A C-@@U(@Es_ A q-@@(@yS. A 2 T:,"A< R:,@A F Ax T:,"A Ar%2@E@@9-@@%= _2b$rSOUND ROUTINE.-@A $.DELAY ROUTINE-@@ $&@@w+@A=B7tA@$0$!  6-%@! A0 A$ +4'!6-&@' A0> A$'!6-&@' A0 A$!  6-%@! A0  A$ 1@w1P:8<,'@,A1 NOT HIDDEN 8<,A1`& NOT GOTTEN0 33,%+$,%P:'@,%+$,%P:'@,: ?6-%+$,%P:'@,56-%+$,%P:'@,? AD ; 6-6-,*68<,-@86-%@;$N ALREADY GOTTENX  A6-6-$b HIDDENl 768<,-8<,&@)6-%@76-%@q 8<,A2@v NOT GOTTEN C 6-%+$,%P:'@,96-%+$,%P:'@,C A 6-M:@#@@, 33,%+$,%P:'@,%+$,%P:'@, ; A6-!6-',868<,-@;$ GOTTEN, REVEAL SQUARE C 6-%+$,%P:'@,96-%+$,%P:'@,C A  A6-6-$2+AA+A 2FLIP--%P:8<,'@,% APp "*" APp68<,-O:8<,&@, 8<, APp!!-%+$,%+$,%&@ 6-%$6-%&@ ,/   33,%+$,%P:'@,%+$,%P:'@,6-&%@$p++AA+A z--%P:8<,'@,% A`P 8<, A`P?6-%+$,%P:'@,56-%+$,%P:'@,? A  33,%+$,%P:'@,%+$,%P:'@, 6-6-$X +@ A0bD @ skill level:/-@D(@%@ld-@@2(@USE JOYSTICK TOD-@@d(@CHANGE SKILL LEVELv8-@ @&(@8-@@ E!(@PRESS TRIGGER TO3-@@E(@PLAYJOYSTICK INPUTT:,"$>6-R:,0 @)!@Ap`>CHECK RANGE@&ApAp%!&@ A% Ap`6-%@ Aq# @ A# Ap`6-&@d-@%(@ 7-@L(@%@`-@Ad  Ap`'006-P:+'@,&+++%@,'@,$,,'006-P:+'@,&+++%@,'@,$,,'-'-$'**68<,-P:H:,%?P,%@.' 8' B'X6-P:H:,$%@,;6-P:H:,$%@,L68<,-@R6-X6-L'6-@6-@`'$*\6-@%@#6-@/6-@H;6-@P6-P:+',&@,\6-@+36-6-@'6-@36-@ +9<,;@,+Z6.>:A%,6-@(*6-@P66-@B6-AN6-@0Z6- +$. 170,10,42,170,10,42,170,10 D1:RWB.BAS