O p@   @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` @ ` @ ` @ ` @ ` ǀ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-/1!3A5a9;=?A!CAEaGIKMO/SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa!Aa/AaAa!Ooɡ!Aaׁ١!Aa!Aa " B b  !"!B!b!!!!"!#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$$I$K$M$%Q"%SB%Ub%%Y%[%]%&a"&cB&eb&&i&k&mo'q"'sB'ub'w'y'{'}'("(B(b(((()/)B)b)))))*"*B*b*****+/+B+b+++++,",B,b,ǂ,ɢ,,,-/-B-b-  @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` @ ` @ ` @ ` @ ` ǀ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-/1!3A5a9;=?A!CAEaGIKMO/SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa!Aa/AaAa!Ooɡ!Aaׁ١!Aa!Aa " B b  !"!B!b!!!!"!#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$$I$K$M$%Q"%SB%Ub%%Y%[%]%&a"&cB&eb&&i&k&mo'q"'sB'ub'w'y'{'}'("(B(b(((()/)B)b)))))*"*B*b*****+/+B+b+++++,",B,b,ǂ,ɢ,,,-/-B-b-DOMINOESGFA V5HANGMAN  V5HI_Q  V5PUZZLE  V5VALGUS  V5WOODLICE  V5SHAPE1  N iB}SHAPE2  S i(B}STUMBACK X iHB}STUMBLE  ] ihB}STUMBLE LST ; i@STUMBLE PRG 1 i1STUMGRID d iB}HIGH MSG k iMASK1  E iB}MASK2  I iB}MED MSG i i .  V5..  V5DOMINOESBAS S 7DOMINOESPRG  S >4H.  V5..  V5HANGMAN PRG fQ[SPELLER DIC fh.  V5..  V5HI-Q C n =HI-Q DEF n rHI-Q O n HI-Q PRG n HI-Q RSC n f".  V5..  V5PUZZLE DAT c KPUZZLE DOC e K@PUZZLE PI1 g KB}PUZZLE PRG l KcB.  V5..  V5VALGS O fVALGUS11DOC  VALGUS11PRG |"b.  V5..  V5MADLOUSESCR hRGMAZES SCR hROOBUSLICESCR iRWSILLY SCR iR_WOODLICEDOC jRgxWOODLICEPRG jRntwpp7wfD@A@W??????????*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*( ( ? 0 0?``? (( ? ?00` ` ?*??????????+? ?_@@???_@@?+??????????)? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )? ?  00``?( ( ? ?00`(`(?  )??????????)? ?_@@???_@@?+???? ???? ????????+? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +? ?   ? 8 8?   ? ?? ?8 8  +???? ???? ????????**???? ?( 0?? (?  `(? " 0?? (?  `(? ( 0?? (?  `(? ( 0?? (?  `(? ( 0?? (?  `(? ( 0?? (?  `(? ( 0?? (?  `(? (???? ?(?@@@ __@?(?????????(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?? 0? ?? ?8` ?(?????????(  __@?@@@* ????@@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@*  ( ?? (?8 @@@* ????@@@** ????@@@????*  ?? 8 (  @@@?? ( (  *  ?? 8 (  @@@?? ( (  *  ?? 8 (  @@@?? ( (  "  ?? 8 (  @@@?? ( (  *  ?? 8 (  @@@?? ( (  *  ?? 8 (  @@@?? ( (  *  ?? 8 (  @@@?? ( (  * ????@@@????+   @@@ __@ +??????????)??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??   0 ` ( ( ?? 0 `( (  )??????????)  __@    @@@)????????@@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)?? ((   ?? 8 ( @@@)????????@@@(*???? ?(  0 ? (? (  `( (  (  0 ? (? (  `( (  (  0 ? (? (  `( (  (  0 ? (? (  `( (  (  0 ? (? (  `( (  "  0 ? (? (  `( (  (  0 ? (? (  `( (  (???? ?(__ __Р @@@ ( _@_ ()?????)  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()  0 ((? (? ( 8 ( `( ()?????) _@_(__( @@@* @@@* ( (  8 ( @@@* ( (  8 ( @@@* ( (  8 ( @@@* ( (  8 ( @@@* ( (  8 ( @@@* ( (  8 ( @@@* ( (  8 ( @@@* @@@**@@@)88(   @@@ ((()88(   @@@ ((()88(   @@@ ((()88(   @@@ ((()88(   @@@ ((()88(   @@@ ((()88(   @@@ ((("@@@-@@@ @@@)????@@@(       ( (? (    @@@   (       ( (? (    @@@   (       ( (? (    @@@   (       ( (? (    @@@   (       ( (? (    @@@   (       ( (? (    @@@   (       ( (? (    @@@   (????@@@-   @@@ @@@)???? @@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@) ? (((  ((( 88(@@@)???? @@@(*(88(       (((   (88(       (((   (88(       (((   (88(       (((   (88(       (((   (88(       (((   (88(       (((   (* @@@ @@@" @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@( @@@* @@@ @@@( @@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@((((  ( ( ( ((( 88(@@@( @@@( %  T*wpp7wfD@A@W????@@@????@@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!????@@@????@@@!  @@@ @@@  ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((    ((( 88(   ( ( ( ((( 8 8 ( (((      @@@ @@@!????@@@????@@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!?    @@@? @@@!????@@@????@@@   ????@@@?????   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?   0? 0?@@@ (? (? ` ` ?  ????@@@?????#? ?@@@?@_@?!?????! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  ! ? ?((88  ``?( (  00((  !?????#?@_@???@@@*????????????@@@' ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@* ? ?    ? ? ? ?8 8 @@@*????????????@@@)    (     ( (     ( (     ( (     ( (     ( (     ( (     (     ?    ????    ? ??      ? ??      ? ??      ? ??      ? ??      ? ??      ? ??      ????             ????      ? ??      ? ??      ? ??      ? ??      ? ??      ? ??      ? ??    ????    ?       (  (    (  (    (  (    (  (    (  (    (  (    (  (         ((        ((  ((        ((  ((        ((  ((        ((  ((        ((  ((        ((  ((        ((                                 G                                                                               ((    ((      ((    ((      ((    ((      ((    ((      ((    ((      ((    ((      ((    ((      ????    ???? ??? (     (???  ??? (     (???  ??? (     (???  ??? (     (???  ??? (     (???  ??? (     (???  ??? (     (??? ????    ?????    ?                                                                                                                                        ? ?   ???? ????    (???  ( ???     (???  ( ???     (???  ( ???     (???  ( ???     (???  ( ???     (???  ( ???     (???  ( ???    ???? ???? R*( ( ( ( ( ( ( ( ( ( ( ( ( ( d  T*wpp7wfD@A@WBi b""" " 0 " """#"#@@@b(((08888@@@b(0ɚAẢ̉LL@@@b(((0TTTT@@@b>">"b&b&@@"("((0 " "33f#f#dd@@@b88888(8(8(80____8888@@@bĞDD@D@D|(|0@@@bDDDDGGGG@(@(@(@0 @@@b3:3:88####:(:(8(80@@@b(((0@@@b(0d(((0"""("((0  " """#"#@@@````xxxx@@@Ϊ΢FFȉȉ@@@@@b!!!!xxxx@@@b 0 # #&#&#@@@b(((0"B"B"B"Bxxxx@@@b"""("((0@@@b(((0 @@@b||ȈȈ(0@@@b@@@@CCCC(((0@@@b"z"zxxc1c1AA"("((0d@@@@AAAA(((0Ȉ@@㞈(0 (((0"""("((0(((0(0c o " """#"#@@@ixxxx@@@ FF@@@8888@@@ " "b#b#@@@@@BBBB||||@@@@@@b @@@b 0@@@b(0@@@b(((0d"""("((0@(@(@(@0̈DD̜̜LL(0EEEED0D0D0D0@(@(@(@0"g"gEEf.f.D D b(b(@(@0FFFF8888 ( ( ( 0(0i(((0 b"""("((0 " """#"#@@@b(((08888@@@bΊFF̉̉LL@@@oTTTT@@@i # #33f#f#dd@@@BBBB8888@@@@@@ @@@@@@@@@c 0(0(((0"""("((0i    (((0 b''<< ( 0 " """#"#@@@bࢊ ( ( ( 0@@@b"/"///(((0̚DDȉȉ@@@@@b'''' ( ( ( 0Ⴠ@@@b ȨȨ(0 # #33b#b#@@@@@b(((0CCCC@@@b"""("((0@@@b(((0 @@@b@@@o@@@i @@UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@  @@UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ @ @@ UU@UUPT UUUTUU**UUUUU UJ@ q  T*wpp7wfD@A@W@`@ ??? ???8???  @@j ???  ??? j ???0??? ??? jA@AqACAxx@ xA xAx"  q" p D @pPD@p ???( ???p  ???( ???p????????????<<<<zd|||zL|||z~~~~q H @???q ???H@@q%???1q& Hq(/qz0?? ? **B ?;?**F????;?? $?**F8??;8?? ?'!'80!0p ?`'003`!f` 8f~2'f?@`8@~"A!<3 =0003  =0 00>' "k } 03 } "  8!@`fy1```fy`fa<'@@D!@@`f@DA`o1!?13̌3c ??03??0303 <` g'? ?B@"x?!p!|`|9?ϙ0f8< ca'>>s>~3~x90!'|!)!%#B+b-<,@@@  (//@@ppP,PP//P88((__P88(@@@,@ @ __X(??(@ ppP,? ? 44??(@88(!@ ((???,<<4j@@, pP ?? !%P@(P@ !%@xx<@!` xx<p% ??@ 74pp(  /,pp4xj@@% oh< <'oh $<$xo_X  ?<8(xO$xxX ?$???P @ @ ??$?x  xO8  x8'<  _|<7 O</,O>00??OH>>@o <<@xxX??'@j@@xx>>@xxX??' @$@H@ ? |L@66>>|l `xH00??>?>><?$ 0|d |?>> <?$ <4?|| <?$ @@|| >?&` >|| >?&@ | >?6`l x `f@|l?????  ??<<>? @@||~? xH |  |d`? `>2 ? `? |\pl00??>?? |L0 ?6|? ~N?7?   &`@  &`@ ?**  -UUUUUUUUPUP4= -UUUUUUUUPUP4????;;;;8888  -a?!n..__oUU//q11__??[[____0.??.$?$$.?..-a?!j**߾UU` [_S_0?.?.?...?... -a?!n**հn..n**񪱪__]] _Q0???!???!;;;;;;;;;;;;  -UU??UUUUUUUPUP4= 4''''~(~(~(~8wwww0888(8ݪݪ]ggEw8w8u**ljljD`-   KKK JJJ~FFF&&&b0b0b00**("""F~ڪڪppP,,,*""++!- 6p6p6pp||||aaa0pp####8888xxxx    099N0N0ddQDQD^^88êEE0u0uxxEEEEIIIIDDDD####<<<<DDDDyyyyDDDDDEDEDEDE!EEDD QQQQDDAADD44D9999H8H8H8H8BBBB####8888QQQQ@@@@8888NDNDNDND!  T*Dim Shape$(12,8),Mask$(12,8) Dim Flip(8),Twist(8),Rotate_right(8),Rotate_left(8) Clean_up=Fre(Dummy) ' ' <> ' << 0>> ' << PENTA-SQUARES Begun on the 26th September 1987 >> ' << 0>> ' << Changed to Stumbling Blocks 28th November 1987 >> ' << 0>> ' << 512k version finished 5th December 1987 >> ' << 0>> ' << By Mark Annetts >> ' << Copyright 1989 Antic Publishing >> ' << 0>> ' << Deprotected version 3rd March 1989 >> ' << 0>> ' <> ' @Start_up_1 ! Set up alternate screens ' Rez=Xbios(4) ! Make sure we are If Rez<>0 ! in low @Not_low ! resolution Endif #! only ' If Exist("*.*") Endif @Check_for_files @Save_pal @Title_loader ! Put pretty piccy on screen @Start_up_2 ! Get everything off the disk @Initialise_arrays ! set up flip, twist & rotate arrays @Initialise_squares ! Set all shapes to No 1 ' @Put_squares_on_screen ! Put all shapes in their boxes ' Bmove Screen0%,Screen1%,32000 ! Show screen Void Xbios(5,L:Screen1%,L:Screen1%,-1) ! at last Defmouse 0 ' _ Do ! -===< | START OF MAIN LOOP | >===- '  @Check_completed ' Do Pause 5  Key$=Inkey$ Mouse A,B,C Exit If C=1 Or C=2 Exit If Key$="Q" Or Key$="q" Loop ' If Key$="q" Or Key$="Q" Alert 2," | Are you sure| you want to go?",1," Quit | Stay ",What If What=1 Void Xbios(5,L:Oscreen%,L:Oscreen%,-1) @Restore_pal End Else Endif Endif ' ' * READ BUTTONS *! ' If (A>271 And B>68) And (A<314 And B<84) If Square_lit=True Put 271,70,Happy$,3 Pause 5 Square_lit=False Gosub Replace_square(Squarea,Squareb) Put 271,70,Happy1$,3 Endif Endif ' If (A>271 And B>45) And (A<314 And B<60) If Square_lit=True Put 271,45,Twist$,3 Pause 5 Y=Twist(Y) Gosub Determine_present_twist Gosub Replace_square(Squarea,Squareb) Put 271,45,Twist1$,3 Endif Endif ' If (A>271 And B>24) And (A<314 And B<38) If Square_lit=True Put 271,24,Flip$,3 Pause 5 Y=Flip(Y) Gosub Determine_present_flip Gosub Replace_square(Squarea,Squareb) Put 271,24,Flip1$,3 Endif Endif ' If (A>271 And B>2) And (A<314 And B<16) If Square_lit=True Put 271,2,Rotate$,3 Pause 5 Gosub Determine_present_rotation Gosub Replace_square(Squarea,Squareb) Put 271,2,Rotate1$,3 Endif Endif ' ' * READ GRID BUTTONS * ' If (A>4 And B>2) And (A<47 And B<12) Put 4,2,B320$,3 Pause 5 Put 4,2,B3201$,3 Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=1 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 73,0,Title_horiz$,3 Put 58,41,Grid320$,3 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif ' If (A>4 And B>20) And (A<47 And B<30) Put 4,20,B415$,3 Pause 5 Put 4,20,B4151$,3 Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=2 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 73,0,Title_horiz$,3 Put 84,36,Grid415$,3 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif ' If (A>4 And B>38) And (A<47 And B<48) Put 4,38,B512$,3 Pause 5 Put 4,38,B5121$,3 Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=3 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 73,0,Title_horiz$,3 Put 98,30,Grid512$,3 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif ' If (A>4 And B>57) And (A<47 And B<67) Put 4,57,B610$,3 Pause 5 Put 4,57,B6101$,3 Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=4 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 73,0,Title_horiz$,3 Put 108,25,Grid610$,3 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif ' If (A>4 And B>75) And (A<47 And B<85) Put 4,75,B88$,3 Pause 5 Put 4,75,B881$,3 Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=5 Black_bits=0 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 220,0,Title_virt$,3 Put 75,6,Which_88$,3 Put 118,4,Grid88$,3 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif ' If Grid=5 If (A>75 And B>6) And (A<91 And B<22) Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=5 Black_bits=1 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 220,0,Title_virt$,3 Put 75,6,Which_88$,3 Put 118,4,Grid88$,3 Deffill 1,2,8 Fill 121,7 Fill 191,7 Fill 121,77 Fill 191,77 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif Endif ' If Grid=5 If (A>75 And B>27) And (A<91 And B<43) Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=5 Black_bits=2 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 220,0,Title_virt$,3 Put 75,6,Which_88$,3 Put 118,4,Grid88$,3 Deffill 1,2,8 Fill 131,17 Fill 181,17 Fill 131,67 Fill 181,67 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif Endif ' If Grid=5 If (A>75 And B>48) And (A<91 And B<64) Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=5 Black_bits=3 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 220,0,Title_virt$,3 Put 75,6,Which_88$,3 Put 118,4,Grid88$,3 Deffill 1,2,8 Fill 141,27 Fill 171,27 Fill 141,57 Fill 171,57 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif Endif ' If Grid=5 If (A>75 And B>69) And (A<91 And B<85) Alert 2," Are you sure ?| | This will reset the| present game !!",1," Do it | Cancel ",Z If Z=1 Grid=5 Black_bits=4 Void Xbios(5,L:Screen0%,L:-1,-1) Sput Blank$ Put 220,0,Title_virt$,3 Put 75,6,Which_88$,3 Put 118,4,Grid88$,3 Deffill 1,2,8 Fill 151,37 Fill 161,37 Fill 151,47 Fill 161,47 Gosub Put_squares_on_screen Gosub Initialise_squares Gosub Make_false Endif Endif Endif ' ' * READ SQUARES * ' If (A>0 And B>92) And (A<53 And B<145) If Square_lit=False Tempza=0 Tempzb=92 Squarea=0 Squareb=92 X=3 Y=Present_z If Used_z=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 0,92,53,145 Gosub Replace_square(Tempza,Tempzb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_z=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 0,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_z) Endif Endif Endif Endif ' If (A>53 And B>92) And (A<106 And B<145) If Square_lit=False Tempua=53 Tempub=92 Squarea=53 Squareb=92 X=2 Y=Present_u If Used_u=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 53,92,106,145 Gosub Replace_square(Tempua,Tempub) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_u=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 53,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_u) Endif Endif Endif Endif ' If (A>106 And B>92) And (A<159 And B<145) If Square_lit=False Temppa=106 Temppb=92 Squarea=106 Squareb=92 X=4 Y=Present_p If Used_p=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 106,92,159,145 Gosub Replace_square(Temppa,Temppb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_p=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 106,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_p) Endif Endif Endif Endif ' If (A>159 And B>92) And (A<212 And B<145) If Square_lit=False Tempwa=159 Tempwb=92 Squarea=159 Squareb=92 X=5 Y=Present_w If Used_w=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 159,92,212,145 Gosub Replace_square(Tempwa,Tempwb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_w=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 159,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_w) Endif Endif Endif Endif ' If (A>212 And B>92) And (A<265 And B<145) If Square_lit=False Tempxa=212 Tempxb=92 Squarea=212 Squareb=92 X=7 Y=Present_x If Used_x=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 212,92,265,145 Gosub Replace_square(Tempxa,Tempxb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_x=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 212,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5:,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_x) Endif Endif Endif Endif ' If (A>265 And B>92) And (A<318 And B<145) If Square_lit=False Tempta=265 Temptb=92 Squarea=265 Squareb=92 X=1 Y=Present_t If Used_t=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 265,92,318,145 Gosub Replace_square(Tempta,Temptb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_t=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 265,92,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_t) Endif Endif Endif Endif ' If (A>0 And B>145) And (A<53 And B<198) If Square_lit=False Tempva=0 Tempvb=145 Squarea=0 Squareb=145 X=6 Y=Present_v If Used_v=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 0,145,53,198 Gosub Replace_square(Tempva,Tempvb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_v=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 0,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_v) Endif Endif Endif Endif ' If (A>53 And B>145) And (A<106 And B<198) If Square_lit=False Templa=53 Templb=145 Squarea=53 Squareb=145 X=10 Y=Present_l If Used_l=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 53,145,106,198 Gosub Replace_square(Templa,Templb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_l=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 53,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_l) Endif Endif Endif Endif ' If (A>106 And B>145) And (A<159 And B<198) If Square_lit=False Tempia=106 Tempib=145 Squarea=106 Squareb=145 X=12 Y=Present_i If Used_i=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 106,145,159,198 Gosub Replace_square(Tempia,Tempib) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_i=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 106,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_i) Endif Endif Endif Endif ' If (A>159 And B>145) And (A<212 And B<198) If Square_lit=False Tempya=159 Tempyb=145 Squarea=159 Squareb=145 X=9 Y=Present_y If Used_y=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 159,145,212,198 Gosub Replace_square(Tempya,Tempyb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_y=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 159,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_y) Endif Endif Endif Endif ' If (A>212 And B>145) And (A<265 And B<198) If Square_lit=False Tempsa=212 Tempsb=145 Squarea=212 Squareb=145 X=11 Y=Present_s If Used_s=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 212,145,265,198 Gosub Replace_square(Tempsa,Tempsb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_s=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 212,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_s) Endif Endif Endif Endif ' If (A>265 And B>145) And (A<318 And B<198) If Square_lit=False Tempfa=265 Tempfb=145 Squarea=265 Squareb=145 X=8 Y=Present_f If Used_f=False If C=2 Square_lit=True Void Xbios(5,L:Screen0%,L:-1,-1) Deffill 1,0,0 Pbox 265,145,318,198 Gosub Replace_square(Tempfa,Tempfb) Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Endif If C=1 Pause 5 Used_f=True Void Xbios(5,L:Screen0%,L:-1,-1) Put 265,145,Blanksquare$,3 Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Gosub Make_it_move(X,Present_f) Endif Endif Endif Endif ' If Grid<>5 If C=2 And (A>55 And A<265) And (B>24 And B<92) If Square_lit=False ' Present_colour=Point(A,B) Gosub Which_shape(Present_colour) ' Endif Endif Endif ' If Grid=5 If C=2 And (A>100 And A<210) And (B>0 And B<92) If Square_lit=False ' Present_colour=Point(A,B) Gosub Which_shape(Present_colour) ' Endif Endif Endif ' _ Loop ! -===< | END OF MAIN LOOP | >===- '  ' *L ' Procedure Make_it_move(X,Y) Hidem Do ' Bmove Screen0%,Screen2%,32000 Void Xbios(5,L:Screen2%,L:-1,-1) Mouse A1,B1,C1 Put A1-10,B1-10,Mask$(X,Y),4 Vsync Put A1-10,B1-10,Shape$(X,Y),6 Void Xbios(5,L:Screen2%,L:Screen2%,-1) ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:-1,-1) Mouse A,B,C Put A-10,B-10,Mask$(X,Y),4 Vsync Put A-10,B-10,Shape$(X,Y),6 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Exit If C=1 Loop Gosub Where_is_it(Squarea,Squareb) Showm Return ' -M Procedure Initialise_squares ' Present_t=1 Present_u=1 Present_z=1 Present_p=1 Present_w=1 Present_v=1 Present_x=1 Present_f=1 Present_y=1 Present_l=1 Present_s=1 Present_i=1 ' Return ' -M Procedure Put_squares_on_screen ' Void Xbios(5,L:Screen0%,L:-1,-1) Put 13,105,Mask$(3,1),4 Put 13,105,Shape$(3,1),6 ' Put 71,105,Mask$(2,1),4 Put 71,105,Shape$(2,1),6 ' Put 124,105,Mask$(4,1),4 Put 124,105,Shape$(4,1),6 ' Put 172,105,Mask$(5,1),4 Put 172,105,Shape$(5,1),6 ' Put 225,105,Mask$(7,1),4 Put 225,105,Shape$(7,1),6 ' Put 279,105,Mask$(1,1),4 Put 279,105,Shape$(1,1),6 ' Put 13,159,Mask$(6,1),4 Put 13,159,Shape$(6,1),6 ' Put 72,154,Mask$(10,1),4 Put 72,154,Shape$(10,1),6 ' Put 109,167,Mask$(12,1),4 Put 109,167,Shape$(12,1),6 ' Put 178,154,Mask$(9,1),4 Put 178,154,Shape$(9,1),6 ' Put 230,154,Mask$(11,1),4 Put 230,154,Shape$(11,1),6 ' Put 279,160,Mask$(8,1),4 Put 279,160,Shape$(8,1),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Replace_square(Tempa,Tempb) ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If Square_lit=True Put Tempa+1,Tempb+1,Hole$,3 Endif ' If Square_lit=False Put Tempa,Tempb,Blanksquare$,3 Endif ' If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 Put Tempa+13,Tempb+12,Mask$(X,Y),4 Put Tempa+13,Tempb+12,Shape$(X,Y),6 Endif ' If (X=4 Or X=2) And Odd(Y) Put Tempa+18,Tempb+13,Mask$(X,Y),4 Put Tempa+18,Tempb+13,Shape$(X,Y),6 Endif ' If (X=4 Or X=2) And Even(Y) Put Tempa+13,Tempb+18,Mask$(X,Y),4 Put Tempa+13,Tempb+18,Shape$(X,Y),6 Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) Put Tempa+18,Tempb+8,Mask$(X,Y),4 Put Tempa+18,Tempb+8,Shape$(X,Y),6 Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) Put Tempa+8,Tempb+18,Mask$(X,Y),4 Put Tempa+8,Tempb+18,Shape$(X,Y),6 Endif ' If X=12 And Even(Y) Put Tempa+24,Tempb+3,Mask$(X,Y),4 Put Tempa+24,Tempb+3,Shape$(X,Y),6 Endif ' If X=12 And Odd(Y) Put Tempa+3,Tempb+24,Mask$(X,Y),4 Put Tempa+3,Tempb+24,Shape$(X,Y),6 Endif ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Determine_present_rotation ' If C=2 If X=1 Present_t=Rotate_right(Present_t) Y=Present_t Endif ' If X=2 Present_u=Rotate_right(Present_u) Y=Present_u Endif ' If X=3 Present_z=Rotate_right(Present_z) Y=Present_z Endif ' If X=4 Present_p=Rotate_right(Present_p) Y=Present_p Endif ' If X=5 Present_w=Ro'tate_right(Present_w) Y=Present_w Endif ' If X=6 Present_v=Rotate_right(Present_v) Y=Present_v Endif ' If X=7 Present_x=Rotate_right(Present_x) Y=Present_x Endif ' If X=8 Present_f=Rotate_right(Present_f) Y=Present_f Endif ' If X=9 Present_y=Rotate_right(Present_y) Y=Present_y Endif ' If X=10 Present_l=Rotate_right(Present_l) Y=Present_l Endif ' If X=11 Present_s=Rotate_right(Present_s) Y=Present_s Endif ' If X=12 Present_i=Rotate_right(Present_i) Y=Present_i Endif Endif ' If C=1 If X=1 Present_t=Rotate_left(Present_t) Y=Present_t Endif ' If X=2 Present_u=Rotate_left(Present_u) Y=Present_u Endif ' If X=3 Present_z=Rotate_left(Present_z) Y=Present_z Endif ' If X=4 Present_p=Rotate_left(Present_p) Y=Present_p Endif ' If X=5 Present_w=Rotate_left(Present_w) Y=Present_w Endif ' If X=6 Present_v=Rotate_left(Present_v) Y=Present_v Endif ' If X=7 Present_x=Rotate_left(Present_x) Y=Present_x Endif ' If X=8 Present_f=Rotate_left(Present_f) Y=Present_f Endif ' If X=9 Present_y=Rotate_left(Present_y) Y=Present_y Endif ' If X=10 Present_l=Rotate_left(Present_l) Y=Present_l Endif ' If X=11 Present_s=Rotate_left(Present_s) Y=Present_s Endif ' If X=12 Present_i=Rotate_left(Present_i) Y=Present_i Endif Endif Return ' -M Procedure Make_false ' Y=1 Square_lit=False Used_t=False Used_u=False Used_z=False Used_p=False Used_w=False Used_v=False Used_x=False Used_f=False Used_y=False Used_l=False Used_s=False Used_i=False ' Return ' -M Procedure Initialise_arrays ' Restore Arraydata For I%=1 To 8 Read Flip(I%) Next I% For I%=1 To 8 Read Twist(I%) Next I% For I%=1 To 8 Read Rotate_right(I%) Next I% For I%=1 To 8 Read Rotate_left(I%) Next I% Arraydata: Data 7,6,5,8,3,2,1,4 Data 5,8,7,6,1,4,3,2 Data 2,3,4,1,6,7,8,5 Data 4,1,2,3,8,5,6,7 ' Return ' ' -M ' Procedure Determine_present_flip ' If X=1 Present_t=Flip(Present_t) Y=Present_t Endif ' If X=2 Present_u=Flip(Present_u) Y=Present_u Endif ' If X=3 Present_z=Flip(Present_z) Y=Present_z Endif ' If X=4 Present_p=Flip(Present_p) Y=Present_p Endif ' If X=5 Present_w=Flip(Present_w) Y=Present_w Endif ' If X=6 Present_v=Flip(Present_v) Y=Present_v Endif ' If X=7 Present_x=Flip(Present_x) Y=Present_x Endif ' If X=8 Present_f=Flip(Present_f) Y=Present_f Endif ' If X=9 Present_y=Flip(Present_y) Y=Present_y Endif ' If X=10 Present_l=Flip(Present_l) Y=Present_l Endif ' If X=11 Present_s=Flip(Present_s) Y=Present_s Endif ' If X=12 Present_i=Flip(Present_i) Y=Present_i Endif ' Return ' -M Procedure Determine_present_twist ' If X=1 Present_t=Twist(Present_t) Y=Present_t Endif ' If X=2 Present_u=Twist(Present_u) Y=Present_u Endif ' If X=3 Present_z=Twist(Present_z) Y=Present_z Endif ' If X=4 Present_p=Twist(Present_p) Y=Present_p Endif ' If X=5 Present_w=Twist(Present_w) Y=Present_w Endif ' If X=6 Present_v=Twist(Present_v) Y=Present_v Endif ' If X=7 Present_x=Twist(Present_x) Y=Present_x Endif ' If X=8 Present_f=Twist(Present_f) Y=Present_f Endif ' If X=9 Present_y=Twist(Present_y) Y=Present_y Endif ' If X=10 Present_l=Twist(Present_l) Y=Present_l Endif ' If X=11 Present_s=Twist(Present_s) Y=Present_s Endif ' If X=12 Present_i=Twist(Present_i) Y=Present_i Endif ' Return ' -M Procedure Where_is_it(Squarea,Squareb) ' If Grid=1 If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 If (A>64 And B>48) And (A<246 And B<59) Gosub Snap_320 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Odd(Y) If (A>64 And B>48) And (A<256 And B<59) Gosub Snap_320 Else Gosub Replace_square~(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Even(Y) If (A>64 And B>48) And (A<246 And B<69) Gosub Snap_320 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) If (A>64 And B>48) And (A<236 And B<69) Gosub Snap_320 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif ' If X=12 And Odd(Y) If (A>64 And B>48) And (A<226 And B<79) Gosub Snap_320 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Even(Y) Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif ' Endif ' If Grid=2 If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 If (A>90 And B>42) And (A<222 And B<64) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Odd(Y) If (A>90 And B>42) And (A<232 And B<64) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Even(Y) If (A>90 And B>42) And (A<222 And B<74) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) If (A>90 And B>42) And (A<212 And B<74) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) If (A>90 And B>42) And (A<232 And B<54) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Odd(Y) If (A>90 And B>42) And (A<202 And B<84) Gosub Snap_415 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Even(Y) Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif ' Endif ' If Grid=3 If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 If (A>104 And B>36) And (A<206 And B<68) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Odd(Y) If (A>104 And B>36) And (A<217 And B<68) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Even(Y) If (A>104 And B>36) And (A<206 And B<78) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) If (A>104 And B>36) And (A<196 And B<78) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) If (A>104 And B>36) And (A<216 And B<58) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Odd(Y) If (A>104 And B>36) And (A<186 And B<88) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Even(Y) If (A>104 And B>36) And (A<226 And B<48) Gosub Snap_512 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' Endif ' If Grid=4 If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 If (A>114 And B>31) And (A<196 And B<73) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Odd(Y) If (A>114 And B>31) And (A<206 And B<73) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Even(Y) If (A>114 And B>31) And (A<196 And B<83) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) If (A>114 And B>31) And (A<186 And B<83) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) If (A>114 And B>31) And (A<206 And B<63) Gosub Snap_610 Eylse Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Odd(Y) If (A>114 And B>31) And (A<176 And B<93) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Even(Y) If (A>114 And B>31) And (A<216 And B<53) Gosub Snap_610 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' Endif ' If Grid=5 If X=3 Or X=5 Or X=7 Or X=1 Or X=8 Or X=6 If (A>124 And B>10) And (A<186 And B<72) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Odd(Y) If (A>124 And B>10) And (A<196 And B<72) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=4 Or X=2) And Even(Y) If (A>124 And B>10) And (A<186 And B<82) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Even(Y) If (A>124 And B>10) And (A<176 And B<82) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If (X=10 Or X=9 Or X=11) And Odd(Y) If (A>124 And B>10) And (A<196 And B<62) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Odd(Y) If (A>124 And B>10) And (A<166 And B<92) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' If X=12 And Even(Y) If (A>124 And B>10) And (A<206 And B<52) Gosub Snap_88 Else Gosub Replace_square(Squarea,Squareb) Gosub Which_false Endif Endif ' Endif ' Return ' ' -M ' Procedure Snap_320 ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If A=>65 And A=<75 A=70 Endif ' If A=>75 And A=<85 A=80 Endif ' If A=>85 And A=<95 A=90 Endif ' If A=>95 And A=<105 A=100 Endif ' If A=>105 And A=<115 A=110 Endif ' If A=>115 And A=<125 A=120 Endif ' If A=>125 And A=<135 A=130 Endif ' If A=>135 And A=<145 A=140 Endif ' If A=>145 And A=<155 A=150 Endif ' If A=>155 And A=<165 A=160 Endif ' If A=>165 And A=<175 A=170 Endif ' If A=>175 And A=<185 A=180 Endif ' If A=>185 And A=<195 A=190 Endif ' If A=>195 And A=<205 A=200 Endif ' If A=>205 And A=<215 A=210 Endif ' If A=>215 And A=<225 A=220 Endif ' If A=>225 And A=<235 A=230 Endif ' If A=>235 And A=<245 A=240 Endif ' If A=>245 And A=<255 A=250 Endif ' If A=>255 And A=<265 A=260 Endif ' If B=>48 And B=<58 B=53 Endif ' If B=>58 And B=<68 B=63 Endif ' If B=>68 And B=<78 B=73 Endif ' Gosub Set_square ' Put A-10,B-10,Mask$(X,Y),4 Put A-10,B-10,Shape$(X,Y),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Snap_415 ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If A=>91 And A=<101 A=96 Endif ' If A=>101 And A=<111 A=106 Endif ' If A=>111 And A=<121 A=116 Endif ' If A=>121 And A=<131 A=126 Endif ' If A=>131 And A=<141 A=136 Endif ' If A=>141 And A=<151 A=146 Endif ' If A=>151 And A=<161 A=156 Endif ' If A=>161 And A=<171 A=166 Endif ' If A=>171 And A=<181 A=176 Endif ' If A=>181 And A=<191 A=186 Endif ' If A=>191 And A=<201 A=196 Endif ' If A=>201 And A=<211 A=206 Endif ' If A=>211 And A=<221 A=216 Endif ' If A=>221 And A=<231 A=226 Endif ' If A=>231 And A=<241 A=236 Endif ' If B=>43 And B=<53 B=48 Endif ' If B=>53 And B=<63 B=58 Endif ' If B=>63 And B=<73 B=68 Endif ' If B=>73 And B=<83 B=78 Endif ' Gosub Set_square ' Put A-10,B-10,Mask$(X,Y),4 Put A-10,B-10,Shape$(X,Y),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Snap_512 ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If A=>105 And A=<115 A=110 Endif ' If A=>115 And A=<125 A=120 Endif ' If A=>125 And A=<135 A=130 Endif ' If A=>135 And A=<145 A=140 Endif ' If A=>145 And A=<155 A=150 Endif ' If A=>155 And A=<165 A=160 Endif ' If A=>165 And A=<175 A=170 Endif ' If A=>175 And A=<185 A=180 Endif ' If A=>185 And A=<195 A=190 Endif ' If A=>195 And A=<205 A=200 Endif ' If A=>205 And A=<215 A=210 Endif ' If A=>215 And A=<225 A=220 Endif ' If B=>37 And B=<47 B=42 Endif ' If B=>47 And B=<57 B=52 Endif ' If B=>57 And B=<67 B=62 Endif ' If B=>67 And B=<77 B=72 Endif ' If B=>77 And B=<87 B=82 Endif ' Gosub Set_square ' Put A-10,B-10,Mask$(X,Y),4 Put A-10,B-10,Shape$(X,Y),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Snap_610 ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If A=>115 And A=<125 A=120 Endif ' If A=>125 And A=<135 A=130 Endif ' If A=>135 And A=<145 A=140 Endif ' If A=>145 And A=<155 A=150 Endif ' If A=>155 And A=<165 A=160 Endif ' If A=>165 And A=<175 A=170 Endif ' If A=>175 And A=<185 A=180 Endif ' If A=>185 And A=<195 A=190 Endif ' If A=>195 And A=<205 A=200 Endif ' If A=>205 And A=<215 A=210 Endif ' If B=>32 And B=<42 B=37 Endif ' If B=>42 And B=<52 B=47 Endif ' If B=>52 And B=<62 B=57 Endif ' If B=>62 And B=<72 B=67 Endif ' If B=>72 And B=<82 B=77 Endif ' If B=>82 And B=<92 B=87 Endif ' Gosub Set_square ' Put A-10,B-10,Mask$(X,Y),4 Put A-10,B-10,Shape$(X,Y),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Snap_88 ' Void Xbios(5,L:Screen0%,L:-1,-1) ' If A=>125 And A=<135 A=130 Endif ' If A=>135 And A=<145 A=140 Endif ' If A=>145 And A=<155 A=150 Endif ' If A=>155 And A=<165 A=160 Endif ' If A=>165 And A=<175 A=170 Endif ' If A=>175 And A=<185 A=180 Endif ' If A=>185 And A=<195 A=190 Endif ' If A=>195 And A=<205 A=200 Endif ' If B=>3 And B=<13 B=16 Endif ' If B=>13 And B=<23 B=16 Endif ' If B=>23 And B=<33 B=26 Endif ' If B=>33 And B=<43 B=36 Endif ' If B=>43 And B=<53 B=46 Endif ' If B=>53 And B=<63 B=56 Endif ' If B=>63 And B=<73 B=66 Endif ' If B=>73 And B=<83 B=76 Endif ' If B=>83 And B=<93 B=86 Endif ' Gosub Set_square ' Put A-10,B-10,Mask$(X,Y),4 Put A-10,B-10,Shape$(X,Y),6 ' Bmove Screen0%,Screen1%,32000 Void Xbios(5,L:Screen1%,L:Screen1%,-1) ' Return ' -M Procedure Which_false ' If X=1 Used_t=False Else If X=2 Used_u=False Else If X=3 Used_z=False Else If X=4 Used_p=False Else If X=5 Used_w=False Else If X=6 Used_v=False Else If X=7 Used_x=False Else If X=8 Used_f=False Else If X=9 Used_y=False Else If X=10 Used_l=False Else If X=11 Used_s=False Else If X=12 Used_i=False Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif ' Return ' -M Procedure Start_up_1 ' Defmouse 2 Amt%=32767 Let Screen0$=String$(Amt%,0) Let Screen1$=String$(Amt%,0) Let Screen2$=String$(Amt%,0) Oscreen%=Xbios(2) ' Screen0%=(Lpeek(Arrptr(Screen0$)) And &HF00)+256 ! original screen Screen1%=(Lpeek(Arrptr(Screen1$)) And &HF00)+256 ! screens 1&2 switch in Screen2%=(Lpeek(Arrptr(Screen2$)) And &HF00)+256 ! and out of the display ' Return ' -L Procedure Start_up_2 ' If Exist("*.*") Endif Bload "STUMGRID",Screen0%-34 Void Xbios(5,L:Screen0%,L:-1,-1) Get 0,0,202,32,Grid320$ Get 0,32,122,84,Grid512$ Get 0,84,102,146,Grid610$ Get 0,146,152,188,Grid415$ Get 152,106,234,188,Grid88$ Get 129,61,145,140,Which_88$ Get 242,65,275,154,Title_virt$ Get 125,35,298,56,Title_horiz$ ' Bload "MASK1",Screen0%-34 ' Get 0,0,28,28,Mask$(1,1) Get 30,0,58,28,Mask$(1,2) Get 60,0,88,28,Mask$(1,3) Get 90,0,118,28,Mask$(1,4) Get 120,0,148,28,Mask$(1,5) Get 150,0,178,28,Mask$(1,6) Get 180,0,208,28,Mask$(1,7) Get 210,0,238,28,Mask$(1,8) ' Get 0,30,18,58,Mask$(2,1) Get 30,30,58,48,Mask$(2,2) Get 70,30,88,58,Mask$(2,3) Get 90,40,118,58,Mask$(2,4) Get 130,30,148,58,Mask$(2,5) Get 150,40,178,58,Mask$(2,6) Get 180,30,198,58,Mask$(2,7) Get 210,30,238,48,Mask$(2,8) ' Get 0,60,28,88,Mask$(3,1) Get 30,60,58,88,Mask$(3,2) Get 60,60,88,88,Mask$(3,3) Get 90,60,118,88,Mask$(3,4) Get 120,60,148,88,Mask$(3,5) Get 150,60,178,88,Mask$(3,6) Get 180,60,208,88,Mask$(3,7) Get 210,60,238,88,Mask$(3,8) ' Get 0,90,18,118,Mask$(4,1) Get 30,90,58,108,Mask$(4,2) Get 70,90,88,118,Mask$(4,3) Get 90,100,118,118,Mask$(4,4) Get 130,90,148,118,Mask$(4,5) Get 150,100,178,118,Mask$(4,6) Get 180,90,198,118,Mask$(4,7) Get 210,90,238,108,Mask$(4,8) ' Get 0,120,28,148,Mask$(5,1) Get 30,120,58,148,Mask$(5,2) Get 60,120,88,148,Mask$(5,3) Get 90,120,118,148,Mask$(5,4) Get 120,120,148,148,Mask$(5,5) Get 150,120,178,148,Mask$(5,6) Get 180,120,208,148,Mask$(5,7) Get 210,120,238,148,Mask$(5,8) ' Get 0,150,28,178,Mask$(6,1) Get 30,150,58,178,Mask$(6,2) Get 60,150,88,178,Mask$(6,3) Get 90,150,118,178,Mask$(6,4) Get 120,150,148,178,Mask$(6,5) Get 150,150,178,178,Mask$(6,6) Get 180,150,208,178,Mask$(6,7) Get 210,150,238,178,Mask$(6,8) ' Bload "MASK2",Screen0%-34 ' Get 0,0,28,28,Mask$(7,1) Get 30,0,58,28,Mask$(7,2) Get 60,0,88,28,Mask$(7,3) Get 90,0,118,28,Mask$(7,4) Get 120,0,148,28,Mask$(7,5) Get 150,0,178,28,Mask$(7,6) Get 180,0,208,28,Mask$(7,7) Get 210,0,238,28,Mask$(7,8) ' Get 0,30,28,58,Mask$(8,1) Get 30,30,58,58,Mask$(8,2) Get 60,30,88,58,Mask$(8,3) Get 90,30,118,58,Mask$(8,4) Get 120,30,148,58,Mask$(8,5) Get 150,30,178,58,Mask$(8,6) Get 180,30,208,58,Mask$(8,7) Get 210,30,238,58,Mask$(8,8) ' Get 0,60,18,98,Mask$(9,1) Get 40,60,78,78,Mask$(9,2) Get 100,60,118,98,Mask$(9,3) Get 120,80,158,98,Mask$(9,4) Get 180,60,198,98,Mask$(9,5) Get 200,80,238,98,Mask$(9,6) Get 240,60,258,98,Mask$(9,7) Get 280,60,318,78,Mask$(9,8) ' Get 0,100,18,138,Mask$(10,1) Get 40,100,78,118,Mask$(10,2) Get 100,100,118,138,Mask$(10,3) Get 120,120,158,138,Mask$(10,4) Get 180,100,198,138,Mask$(10,5) Get 200,120,238,138,Mask$(10,6) Get 240,100,258,138,Mask$(10,7) Get 280,100,318,118,Mask$(10,8) ' Get 0,140,18,178,Mask$(11,1) Get 40,140,78,158,Mask$(11,2) Get 100,140,118,178,Mask$(11,3) Get 120,160,158,178,Mask$(11,4) Get 180,140,198,178,Mask$(11,5) Get 200,160,238,178,Mask$(11,6) Get 240,140,258,178,Mask$(11,7) Get 280,140,318,158,Mask$(11,8) ' Get 0,180,48,188,Mask$(12,1) Get 240,0,248,48,Mask$(12,2) Mask$(12,3)=Mask$(12,1) Mask$(12,5)=Mask$(12,1) Mask$(12,7)=Mask$(12,1) Mask$(12,4)=Mask$(12,2) Mask$(12,6)=Mask$(12,2) Mask$(12,8)=Mask$(12,2) ' Bload "SHAPE1",Screen0%-34 ' Get 0,0,28,28,Shape$(1,1) Get 30,0,58,28,Shape$(1,2) Get 60,0,88,28,Shape$(1,3) Get 90,0,118,28,Shape$(1,4) Get 120,0,148,28,Shape$(1,5) Get 150,0,178,28,Shape$(1,6) Get 180,0,208,28,Shape$(1,7) Get 210,0,238,28,Shape$(1,8) ' Get 0,30,18,58,Shape$(2,1) Get 30,30,58,48,Shape$(2,2) Get 70,30,88,58,Shape$(2,3) Get 90,40,118,58,Shape$(2,4) Get 130,30,148,58,Shape$(2,5) Get 150,40,178,58,Shape$(2,6) Get 180,30,198,58,Shape$(2,7) Get 210,30,238,48,Shape$(2,8) ' Get 0,60,28,88,Shape$(3,1) Get 30,60,58,88,Shape$(3,2) Get 60,60,88,88,Shape$(3,3) Get 90,60,118,88,Shape$(3,4) Get 120,60,148,88,Shape$(3,5) Get 150,60,178,88,Shape$(3,6) Get 180,60,208,88,Shape$(3,7) Get 210,60,238,88,Shape$(3,8) ' Get 0,90,18,118,Shape$(4,1) Get 30,90,58,108,Shape$(4,2) Get 70,90,88,118,Shape$(4,3) Get 90,100,118,118,Shape$(4,4) Get 130,90,148,118,Shape$(4,5) Get 150,100,178,118,Shape$(4,6) Get 180,90,198,118,Shape$(4,7) Get 210,90,238,108,Shape$(4,8) ' Get 0,120,28,148,Shape$(5,1) Get 30,120,58,148,Shape$(5,2) Get 60,120,88,148,Shape$(5,3) Get 90,120,118,148,Shape$(5,4) Get 120,120,148,148,Shape$(5,5) Get 150,120,178,148,Shape$(5,6) Get 180,120,208,148,Shape$(5,7) Get 210,120,238,148,Shape$(5,8) ' Get 0,150,28,178,Shape$(6,1) Get 30,150,58,178,Shape$(6,2) Get 60,150,88,178,Shape$(6,3) Get 90,150,118,178,Shape$(6,4) Get 120,150,148,178,Shape$(6,5) Get 150,150,178,178,Shape$(6,6) Get 180,150,208,178,Shape$(6,7) Get 210,150,238,178,Shape$(6,8) ' Bload "SHAPE2",Screen0%-34 ' Get 0,0,28,28,Shape$(7,1) Get 30,0,58,28,Shape$(7,2) Get 60,0,88,28,Shape$(7,3) Get 90,0,118,28,Shape$(7,4) Get 120,0,148,28,Shape$(7,5) Get 150,0,178,28,Shape$(7,6) Get 180,0,208,28,Shape$(7,7) Get 210,0,238,28,Shape$(7,8) ' Get 0,30,28,58,Shape$(8,1) Get 30,30,58,58,Shape$(8,2) Get 60,30,88,58,Shape$(8,3) Get 90,30,118,58,Shape$(8,4) Get 120,30,148,58,Shape$(8,5) Get 150,30,178,58,Shape$(8,6) Get 180,30,208,58,Shape$(8,7) Get 210,30,238,58,Shape$(8,8) ' Get 0,60,18,98,Shape$(9,1) Get 40,60,78,78,Shape$(9,2) Get 100,60,118,98,Shape$(9,3) Get 120,80,158,98,Shape$(9,4) Get 180,60,198,98,Shape$(9,5) Get 200,80,238,98,Shape$(9,6) Get 240,60,258,98,Shape$(9,7) Get 280,60,318,78,Shape$(9,8) ' Get 0,100,18,138,Shape$(10,1) Get 40,100,78,118,Shape$(10,2) Get 100,100,118,138,Shape$(10,3) Get 120,120,158,138,Shape$(10,4) Get 180,100,198,138,Shape$(10,5) Get 200,120,238,138,Shape$(10,6) Get 240,100,258,138,Shape$(10,7) Get 280,100,318,118,Shape$(10,8) ' Get 0,140,18,178,Shape$(11,1) Get 40,140,78,158,Shape$(11,2) Get 100,140,118,178,Shape$(11,3) Get 120,160,158,178,Shape$(11,4) Get 180,140,198,178,Shape$(11,5) Get 200,160,238,178,Shape$(11,6) Get 240,140,258,178,Shape$(11,7) Get 280,140,318,158,Shape$(11,8) ' Get 0,180,48,188,Shape$(12,1) Get 240,0,248,48,Shape$(12,2) Shape$(12,3)=Shape$(12,1) Shape$(12,5)=Shape$(12,1) Shape$(12,7)=Shape$(12,1) Shape$(12,4)=Shape$(12,2) Shape$(12,6)=Shape$(12,2) Shape$(12,8)=Shape$(12,2) ' ' Bload "STUMBACK",Screen0%-34 Sget Blank$ Get 54,39,105,90,Hole$ Get 0,92,53,145,Blanksquare$ Get 269,0,314,16,Rotate$ Get 271,2,316,18,Rotate1$ Get 269,22,314,38,Flip$ Get 271,24,316,40,Flip1$ Get 269,43,314,60,Twist$ Get 271,45,316,62,Twist1$ Get 269,68,314,84,Happy$ Get 271,70,316,86,Happy1$ ' Get 2,0,47,12,B320$ Get 4,2,49,14,B3201$ Get 2,18,47,30,B415$ Get 4,20,49,32,B4151$ Get 2,36,47,48,B512$ Get 4,38,49,50,B5121$ Get 2,55,47,67,B610$ Get 4,57,49,69,B6101$ Get 2,73,47,85,B88$ Get 4,75,49,87,B881$ ' Put 73,0,Title_horiz$ Put 98,30,Grid512$,3 ! Initialise game with Grid=3 ! 5x12 grid ' Return ' -M Procedure Which_shape(Pc) ' If Pc<>0 Or Pc<>1 Or Pc<>8 Or Pc<>9 ' If Pc=2 X=7 Used_x=False Squarea=212 Squareb=92 Gosub Re_map_grid Used_x=True Gosub Make_it_move(7,Present_x) Endif ' If Pc=3 X=6 Used_v=False Squarea=0 Squareb=145 Gosub Re_map_grid Used_v=True Gosub Make_it_move(6,Present_v) Endif ' If Pc=4 X=5 Used_w=False Squarea=159 Squareb=92 Gosub Re_map_grid Used_w=True Gosub Make_it_move(5,Present_w) Endif ' If Pc=5 X=12 Used_i=False Squarea=106 Squareb=145 Gosub Re_map_grid Used_i=True Gosub Make_it_move(12,Present_i) Endif ' If Pc=6 X=3 Used_z=False Squarea=0 Squareb=92 Gosub Re_map_grid Used_z=True Gosub Make_it_move(3,Present_z) Endif ' If Pc=7 X=4 Used_p=False Squarea=106 Squareb=92 Gosub Re_map_grid Used_p=True Gosub Make_it_move(4,Present_p) Endif ' If Pc=10 X=1 Used_t=False Squarea=265 Squareb=92 Gosub Re_map_grid Used_t=True Gosub Make_it_move(1,Present_t) Endif ' If Pc=11 X=8 Used_f=False Squarea=265 Squareb=145 Gosub Re_map_grid Used_f=True Gosub Make_it_move(8,Present_f) Endif ' If Pc=12 X=10 Used_l=False Squarea=53 Squareb=145 Gosub Re_map_grid Used_l=True Gosub Make_it_move(10,Present_l) Endif ' If Pc=13 X=11 Used_s=False Squarea=212 Squareb=145 Gosub Re_map_grid Used_s=True Gosub Make_it_move(11,Present_s) Endif ' If Pc=14 X=2 Used_u=False Squarea=53 Squareb=92 Gosub Re_map_grid Used_u=True Gosub Make_it_move(2,Present_u) Endif ' If Pc=15 X=9 Used_y=False Squarea=159 Squareb=145 Gosub Re_map_grid Used_y=True Gosub Make_it_move(9,Present_y) Endif ' Endif ' Return ' Procedure Replace_square_on_grid(X,Y,Am,Bm) ' Put Am-10,Bm-10,Mask$(X,Y),4 Put Am-10,Bm-10,Shape$(X,Y),6 ' Return ' Procedure Set_square ' If X=1 At=A Bt=B Endif ' If X=2 Au=A Bu=B Endif ' If X=3 Az=A Bz=B Endif ' If X=4 Ap=A Bp=B Endif ' If X=5 Aw=A Bw=B Endif ' If X=6 Av=A Bv=B Endif ' If X=7 Ax=A Bx=B Endif ' If X=8 Af=A Bf=B Endif ' If X=9 Ay=A By=B Endif ' If X=10 Al=A Bl=B Endif ' If X=11 As=A Bs=B Endif ' If X=12 Ai=A Bi=B Endif ' Return ' Procedure Re_map_grid ' Void Xbios(5,L:Screen0%,L:-1,-1) If Grid=1 Put 58,41,Grid320$,3 Endif ' If Grid=2 Put 84,36,Grid415$,3 Endif ' If Grid=3 Put 98,30,Grid512$,3 Endif ' If Grid=4 Put 108,25,Grid610$,3 Endif ' If Grid=5 Put 118,4,Grid88$,3 Endif ' If Grid=5 If Black_bits=1 Deffill 1,2,8 Fill 121,7 Fill 191,7 Fill 121,77 Fill 191,77 Endif ' If Black_bits=2 Deffill 1,2,8 Fill 131,17 Fill 181,17 Fill 131,67 Fill 181,67 Endif ' If Black_bits=3 Deffill 1,2,8 Fill 141,27 Fill 171,27 Fill 141,57 Fill 171,57 Endif ' If Black_bits=4 Deffill 1,2,8 Fill 151,37 Fill 161,37 Fill 151,47 Fill 161,47 Endif Endif ' If Used_t=True Gosub Replace_square_on_grid(1,Present_t,At,Bt) Endif ' If Used_u=True Gosub Replace_square_on_grid(2,Present_u,Au,Bu) Endif ' If Used_z=True Gosub Replace_square_on_grid(3,Present_z,Az,Bz) Endif ' If Used_p=True Gosub Replace_square_on_grid(4,Present_p,Ap,Bp) Endif ' If Used_w=True Gosub Replace_square_on_grid(5,Present_w,Aw,Bw) Endif ' If Used_v=True Gosub Replace_square_on_grid(6,Present_v,Av,Bv) Endif ' If Used_x=True Gosub Replace_square_on_grid(7,Present_x,Ax,Bx) Endif ' If Used_f=True Gosub Replace_square_on_grid(8,Present_f,Af,Bf) Endif ' If Used_y=True Gosub Replace_square_on_grid(9,Present_y,Ay,By) Endif ' If Used_l=True Gosub Replace_square_on_grid(10,Present_l,Al,Bl) Endif ' If Used_s=True Gosub Replace_square_on_grid(11,Present_s,As,Bs) Endif ' If Used_i=True Gosub Replace_square_on_grid(12,Present_i,Ai,Bi) Endif ' Bmove Screen0%,Screen2%,32000 Void Xbios(5,L:Screen2%,L:Screen2%,-1) ' Return ' Procedure Not_low ' If Rez=1 If Exist("MED.MSG") Open "I",#1,"MED.MSG" Med_splat$=Input$(5630,#1) Close #1 A=0 B=0 Repeat Void Xbios(5,L:Screen1%,L:-1,-1) If A>(650-310) Let Direction_x=True Endif If A<1 Let Direction_x=False Endif If B>(200-80) Let Direction_y=True Endif If B<1 Let Direction_y=False Endif If Direction_x=True A=A-5 Endif If Direction_x=False A=A+5 Endif If Direction_y=True B=B-5 Endif If Direction_y=False B=B+5 Endif Put A,B,Med_splat$,3 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Bmove Screen1%,Screen2%,32000 ' Void Xbios(5,L:Screen2%,L:-1,-1) If A>(650-310) Let Direction_x=True Endif If A<1 Let Direction_x=False Endif If B>(200-80) Let Direction_y=True Endif If B<1 Let Direction_y=False Endif If Direction_x=True A=A-5 Endif If Direction_x=False A=A+5 Endif If Direction_y=True B=B-5 Endif If Direction_y=False B=B+5 Endif Put A,B,Med_splat$,3 Void Xbios(5,L:Screen2%,L:Screen2%,-1) Bmove Screen2%,Screen1%,32000 Until Inkey$<>"" Void Xbios(5,L:Oscreen%,L:Oscreen%,-1) Else Alert 1,"This program only runs|in low resolution.",1," Darn ",D Endif End ' Endif ' If Rez=2 If Exist("HIGH.MSG") Open "I",#1,"HIGH.MSG" High_splat$=Input$(4518,#1) Close #1 A=0 B=0 Repeat Pause 1.5 Void Xbios(5,L:Screen1%,L:-1,-1) If A>390 Let Direction_x=True Endif If A<1 Let Direction_x=False Endif If B>(400-150) Let Direction_y=True Endif If B<1 Let Direction_y=False Endif If Direction_x=True A=A-10 Endif If Direction_x=False A=A+10 Endif If Direction_y=True B=B-10 Endif If Direction_y=False B=B+10 Endif Put A,B,High_splat$,3 Void Xbios(5,L:Screen1%,L:Screen1%,-1) Bmove Screen1%,Screen2%,32000 ' Pause 1.5 Void Xbios(5,L:Screen2%,L:-1,-1) If A>390 Let Direction_x=True Endif If A<1 Let Direction_x=False Endif If B>(400-150) Let Direction_y=True Endif If B<1 Let Direction_y=False Endif If Direction_x=True A=A-10 Endif If Direction_x=False A=A+10 Endif If Direction_y=True B=B-10 Endif If Direction_y=False B=B+10 Endif Put A,B,High_splat$,3 Void Xbios(5,L:Screen2%,L:Screen2%,-1) Bmove Screen2%,Screen1%,32000 Until Inkey$<>"" Void Xbios(5,L:Oscreen%,L:Oscreen%,-1) Else Alert 1,"This program only runs in|low resolution.",1," Darn ",D Endif End ' Endif ' Return ' ' Procedure Title_loader ' Setcolor 0,7,7,7 Setcolor 1,7,0,0 Setcolor 2,0,7,0 Setcolor 3,7,7,0 Setcolor 4,3,3,7 Setcolor 5,7,0,7 Setcolor 6,0,7,7 Setcolor 7,6,6,6 Setcolor 8,4,4,4 Setcolor 9,7,4,0 Setcolor 10,4,0,4 Setcolor 11,5,1,0 Setcolor 12,0,4,1 Setcolor 13,5,4,0 Setcolor 14,3,5,7 Setcolor 15,0,0,0 ' Bload "STUMBLE",Screen2%-34 Void Xbios(5,L:Screen2%,L:Screen2%,-1) ' Return ' Procedure Check_completed ' If Used_t=True If Used_u=True If Used_z=True If Used_p=True If Used_w=True If Used_v=True If Used_x=True If Used_f=True If Used_y=True If Used_l=True If Used_s=True If Used_i=True Gosub Check_true_colours Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif ' Return ' Procedure Check_true_colours ' If Grid=1 Found_one=False For J=45 To 65 Step 10 For I=65 To 255 Step 10 Colour_found=Point(I,J) If Colour_found=0 Found_one=True Endif Next I Next J If Found_one=True Alert 1,"| |Better luck|next time...",1," Ho-Hum ",Z Endif ' If Found_one=False Alert 1," Well Done !!| Would you like a| printed record| of it ?",1," Yes | No ",Z If Z=1 Gosub Hard_copy Endif Endif ' Endif ' ' If Grid=2 Found_one=False For J=42 To 72 Step 10 For I=90 To 230 Step 10 Colour_found=Point(I,J) If Colour_found=0 Found_one=True Endif Next I Next J If Found_one=True Alert 1,"| |Better luck|next time...",1," Ho-Hum ",Z Endif ' If Found_one=False Alert 1," Well Done !!| Would you like a| printed record| of it ?",1," Yes | No ",Z If Z=1 Gosub Hard_copy Endif Endif ' Endif ' If Grid=3 Found_one=False For J=36 To 76 Step 10 For I=104 To 214 Step 10 Colour_found=Point(I,J) If Colour_found=0 Found_one=True Endif Next I Next J If Found_one=True Alert 1,"| |Better luck|next time...",1," Ho-Hum ",Z Endif ' If Found_one=False Alert 1," Well Done !!| Would you like a| printed record| of it ?",1," Yes | No ",Z If Z=1 Gosub Hard_copy Endif Endif ' Endif ' If Grid=4 Found_one=False For J=30 To 80 Step 10 For I=114 To 204 Step 10 Colour_found=Point(I,J) If Colour_found=0 Found_one=True Endif Next I Next J If Found_one=True Alert 1,"| |Better luck|next time...",1," Ho-Hum ",Z Endif ' If Found_one=False Alert 1," Well Done !!| Would you like a| printed record| of it ?",1," Yes | No ",Z If Z=1 Gosub Hard_copy Endif Endif ' Endif ' If Grid=5 Found_one=False For J=10 To 80 Step 10 For I=125 To 195 Step 10 Colour_found=Point(I,J) If Colour_found=0 Found_one=True Endif Next I Next J If Found_one=True Alert 1,"| |Better luck|next time...",1," Ho-Hum ",Z Endif ' If Found_one=False Alert 1," Well Done !!| Would you like a| printed record| of it ?",1," Yes | No ",Z If Z=1 Gosub Hard_copy Endif Endif ' Endif ' Return ' Procedure Hard_copy ' Alert 3," WARNING| If your printer is not| ON LINE there will be| a 30 second delay.",1,"Print|Cancel",Z ' If Z=1 If Grid=1 ' Lprint "Stumbling Blocks (3x20)" Lprint For J=46 To 66 Step 10 For I=64 To 254 Step 10 Colour_found=Point(I,J) Gosub Sort_colour Lprint K$;" "; If I=254 Lprint Lprint Endif Next I Next J ' Endif ' If Grid=2 ' Lprint "Stumbling Blocks (4x15)" Lprint For J=40 To 70 Step 10 For I=90 To 230 Step 10 Colour_found=Point(I,J) Gosub Sort_colour Lprint K$;" "; If I=230 Lprint Lprint Endif Next I Next J ' Endif ] ' ' If Grid=3 ' Lprint "Stumbling Blocks (5x12)" Lprint For J=36 To 76 Step 10 For I=104 To 214 Step 10 Colour_found=Point(I,J) Gosub Sort_colour Lprint K$;" "; If I=214 Lprint Lprint Endif Next I Next J ' Endif ' If Grid=4 ' Lprint "Stumbling Blocks (6x10)" Lprint For J=30 To 80 Step 10 For I=114 To 204 Step 10 Colour_found=Point(I,J) Gosub Sort_colour Lprint K$;" "; If I=204 Lprint Lprint Endif Next I Next J ' Endif ' If Grid=5 ' Lprint "Stumbling Blocks (8x8)" Lprint For J=10 To 80 Step 10 For I=125 To 195 Step 10 Colour_found=Point(I,J) Gosub Sort_colour Lprint K$;" "; If I=195 Lprint Lprint Endif Next I Next J ' Endif ' Endif ' Return ' Procedure Sort_colour ' If Colour_found=1 K$="*" Else If Colour_found=2 K$="X" Else If Colour_found=3 K$="V" Else If Colour_found=4 K$="W" Else If Colour_found=5 K$="I" Else If Colour_found=6 K$="Z" Else If Colour_found=7 K$="P" Else If Colour_found=10 K$="T" Else If Colour_found=11 K$="F" Else If Colour_found=12 K$="L" Else If Colour_found=13 K$="S" Else If Colour_found=14 K$="U" Else If Colour_found=15 K$="Y" Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif Endif ' Return Procedure Check_for_files Restore Stumble_files For I=1 To 7 Read X$ If Not Exist(X$) Alert 1,"The file "+X$+" must|be in the same directory as|STUMBLE.PRG.",1,"Abort",D End Endif Next I Stumble_files: Data STUMBLE,STUMGRID,STUMBACK,MASK1,MASK2,SHAPE1,SHAPE2 Restore Return ' ' - SAVE ORIGINAL COLOR PALETTE - Procedure Save_pal ' Dim Spalette%(16,3) ' For Z%=0 To 15 Dpoke Contrl,26 Dpoke Contrl+2,0 Dpoke Contrl+6,2 Dpoke Intin,Z% Dpoke Intin+2,0 Vdisys Spalette%(Z%,0)=Dpeek(Intout+2) Spalette%(Z%,1)=Dpeek(Intout+4) Spalette%(Z%,2)=Dpeek(Intout+6) Next Z% Return ' Procedure Restore_pal ' - RESTORES PALETTE - ' Dimensions: Spalette%(16,3) ' For Z%=0 To 15 Dpoke Contrl,14 Dpoke Contrl+2,0 Dpoke Contrl+6,4 Dpoke Intin,Z% Dpoke Intin+2,Spalette%(Z%,0) Dpoke Intin+4,Spalette%(Z%,1) Dpoke Intin+6,Spalette%(Z%,2) Vdisys Next Z% Return ' ' -K ' ' and you thought you'd never make it to the end... ' `. tT` Efv*oM m HPHUBg?<JNA(m)m -:gS)@ -OK1PC#HNNHx?<HNA@)@l/?<HNA)@h&@)@XЬl)@d)@`ARCpr Ѝ"QHNFALNHz2?< NA\pdAxr0XQ)K\NN6jHdd|Nr ,`NuJrBjNuHz?<&NN\CAp$L Qp NBlJpNNpMN9@pdAr 0Q0tr N9lNupealp`NuaNJHz?<&NNBWNANC2A@p222NrҌ0<NB0,rNurA9Ar`v C9Cr`rt9@9A9BNrrҌpsNB0,Nu9@N`rDҌpsNBNuC2 @ e @}bA@p222Nr,Ҍ0<NBNu    -&8*:EENuHn8 2$4BBNuAd RdQRB BbABJk 0NuJBjBBXNu 0Nu 2$NuE`B<gJEgEjCDEDF Fe( F dF8BCHC` F0bFHC8v` HD8HDkDуdQRBNuDdBDA@kgAр[SBk0NuJlJBk&Nu0g H@rB JkЀ[` BbNuJBj prtNuHPAJgPpr$< _Nup _NpNNuCDEJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@N?<,>CEdGH@0r`?<`JBgVB&8TTDуdQRBNuDAр&AdRAрAрDуNuprt|=|  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dajSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`HJjDDDS4</NJFkSFk&aQN`Ha"FFaQL8NB6.JgtBnNupr$<NuJBk4<rpAC v JBgJjv-| Bb BkH>aaNRFBdL8?NB<JBga2SF Be BgQRB`ApdR e <rRF&0xafEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`2:HQ A dGe GbFGNu G0dFGHANu~NuHnr$g4jDk( b4<J@`@[H@0Nu4<Ѐ[Nu4<NuNuAd RdQRBBkBjDBJjDNupNufJj fJAkNupNdRdRrxaAffBWHNuJjDBDA@JBfprJjDEDD@JEfvxNuaغBffAVHNuCDEaEf fDUHNu]HNuCDEaEffDftNu"l`Qd&&|-KNuNr"l`Qep[N c R nPNu _\-KNE`$@Hz ?<&NN\Nu NuNNp `p ap C$pln<,(AL$I"vz x `gfURf~QjJFj4\Fk.aPHS&I.N``p???<NM\Qj&_Nu|HQ/g ??<@NAXXfNuJkp%NNu09?<%NNTNuJBfNu <r$<Nux&k@FC Be& B dЄeNu B0dHDDdRdQRBNu&<x*<NbFC Be B djNu B0dDdSkfJAftNuAр[SBNu"l`d&6JBft&&| NuNr"l`ep NCDE"l`d"JBftJEfz&6&&6&&|NuNr"l`ep N c 2$F4BBNFJBgB*#E8#&#Jjh`,J]o6\`6 c 2$4BBNF*#8#&#Jk:JkִEffDbAeABJk0!NuRdQRB`JjҺBf̶fȸA` c 2$4BB*#[8#&#NbJBg*#8#&#JjEJjL`TJ]o\`Jk:JkEffDbAeABJk0!NuRdQRB`JjҺBf̶fȸA`p`pN @ddAgH`p`p9@(9@*BlNuC #I3| \ErcJ2W=AN0:N0:JkNdNup`pN0<9@:, INJ@g@8 FN EdbAJfE @e4r$Wf"FANuPRN:LST:AUX:CON:MID:IKB:VID:,J@fC E& B Og& Rgl Ag@ Ug2 Ig $CpNp=`pNAXJ@jNNuNJ@g,A,BBgHQ?<=NAP FJ@k??<>NAXtNutNu ::/rI IN<,(k$/<??<?N`NA Jj ?a0NNHrO INLA NNN` A$ HJo d*b` QjNuQjNubNrNvN)@p `H@)@prtNAHplrtNB 2pNpNpapaprapalpalpalpaTpaTpaTBp'a?<NNT@B){L9|0<rtNpapap9@p`pvNv`v`vj`v `v`v`v`?Aa*` Al 2l 4)lVH)lRprtNAl 2l 4HVNu9Cp rtNAv` Av `Avl 2l 4)lVHNAl 2l 4HPrtpgNaBp0,l 2Nua40,HNua*p0,l 4Nuaprt0,l 22,l 44,NuN9||BlBlrҌpsNBNuAl 2l 4HpirtNp0,Nu0<}N& ?<NNC`&?<NNT"@ C <}N`N@((?<NN.?<NNX@LvA HA HNuNup9@HA)A,N FN @e024E$ Bb5B5A6CC5CK5CAB008:Dk`Ek\00<,>,SFSGFnHGnDDDk9DBlDEk9EBlFcllGcll0,lb 0,lcNupmrtA)HA)HNpNHHPN4 _:8><DbFEbGCHP@dʾAdBD2ƞE29|C???FF22N23BRG0@\@N"2)IN(* 9AJA)H@@[000][ˈN Evz`* [g" ]g |g QSz` zQSpQ][ɈN Dvx`* [g" ]g |g QSx` xQSpQ]Bp4NHNu@9@JpNN2(g"P@g2RADAH""l`r2oZAe 1@#)I`Nuk1@Nup NNr"l`dpNAtrdJhk\QpaNH ld$l`"Hg: k&@0+R`g k#&@0+S@H3 Q&f)I`LNu?<?<NAXJgJgNAH@B pNA NuApNN$NZ$BS@kH2QNupC ұd"X0Pg"RA$D#Nu"X0Nu _0HpN _0HpNp"_0HqNp"_0HqNE ұeHHQ0)N$_$ZR@H`2QNu$Y0gHR@@"D%$X0P2g# R@%NupE $ $X0dP.gRG,D%pr Y2dP.gRG,D!p4Ae4v`VfANuNWHNuNVHNu(* 0(iNZ$E 4R`Q$D 4R`QˈN DN ENua NuN IHPg"B  g &gNZJBjt BNut`Rptr ae OgT Xgj HgSRB ae Fb$0k  c_  c b退`tSJBkNRB0 b b瀀`RB0 fрd`2p <0NZ`QNuH&NVրNVjNuNq Y Qf*d ЀЀ 2$4BBNuHRp` HRpJQfpN$_& Y Qf d փփABJk 0NNN~,Nq8DRzXEEg"7PNqR$HBJBgpNJgJigp`eetЂ`"ЀeЁdp`ЀeЀe"Ѕe$W.H@@NJf`CfSHj-D@Hd0H@H 0H@0`fSC\fS , @a"C\fApNNNHP?< NA\NuH@aa/a a Nu@0 9c^Nu| PC>$Error # ][Abort]\f.B &lX)K\)ld` lp ,BQjNup(NV"l`Yd&-KNNr"l`YepN&#k"C-KN"Cփk փk2##`փk"`2`$Y8gHRDD*D%H8#$c2g# HRDD%H`pr`&AdRd QJBgRBBABJk"l` d&6&|0!NuNr"l` epZNHx pC|~NHx pC탂~NpCdNpCjNpCpNpCvNNANAԼNX?<NNTA NA NzNfN A BNXNN*.*NN0JBfN A+NXA,NXANXAhNXAsNXA]dNXA^NX/-H <}"-L"_N(?A*N&<x*<NfN$>?<?<FHmpp _"NpNfBm.A0NHA6NHAaNX?<?<FHmvp _"NAN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN%xA*N&<x*<NfN%x?<?<-Hm|p _"NpNfApryNp"<NpMryNpM"<NA^NXA]dNXArNXAHN&<x*<NfN5lAN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN5lHxNN7 Are you sure ?| | This will reset the| present game !!HPNB Do it | Cancel r"_ Np"<Np"<NpC"<NpC"<NA^NXA]dNXArNXAHN&<x*<NfN7AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN7HxNN7 Are you sure ?| | This will reset the| present game !!HPNB Do it | Cancel r"_ Np"<Np"<Np9"<Np9"<NA^NXA]dNXArNXAHN&<x*<NfN9AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN9HxNN7 Are you sure ?| | This will reset the| present game !!HPNB Do it | Cancel r"_ Np%"<Np%"<Np/"<Np/"<NA^NXA]dNXArNXANzNpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN<(A*NzNfN<(BmXAZ 80Bm4A6 80A` @0CfA< 0AlNzNfN<(AN&<x*<NfN;|A* 0?p\rNz <r5NATNHAZNHAaNX/-H <}"-L"_N(?A*NzNfN>Ar T0Ax 80A0 T0A6 80A` 0C~A< 0A퀄NzNfN>AN&<x*<NfN>A* 0?p\r5Nz <rjNArNHAxNHAaNX/-H <}"-L"_N(?pNfA퀄 0?p\rjNz <"<NA퀊NHA퀐NHAaNX/-H <}"-L"_N(?p\"<Nz <"<NA퀢NHA퀨NHAaNX/-H <}"-L"_N(?p\"<Nz <"< NA퀺NHANHAaNX/-H <}"-L"_N(?p\"< Nz <"<>NANHANHAaNX/-H <}"-L"_N(? <rNz <r5NANHANHAaNX/-H <}"-L"_N(? <r5Nz <rjNANHANHAaNX/-H <}"-L"_N(? <rjNz <"<NANHA NHAaNX/-H <}"-L"_N(?A< 0ADNzNfNRAN&<x*<NfNRFA* 0? <"<Nz <"<NA2NHA8NHAaNX/-H <}"-L"_N(?NHAZNXAN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNUA*NzNfNUAJ T0AP 0A0 T0A6 0A` 00CVA< 0A\NzNfNUAN&<x*<NfNTA* 0? <"<Nz <"< NAJNHAPNHAaNX/-H <}"-L"_N(? <"< Nz <"<>NAbNHAhNHAaNX/-H <}"-L"_N(? 0A 0AV 0A& 0N~N?NCpN~A>NC>A< 0A`N&<x*<NfNnANCpN~ANCA< 0A`N&<x*<NfNoAVNCpN~AVNCVA< 0A`N&<x*<NfNo`A&NCpN~A&NC&A< 0AN&<x*<NfNrA`N&<x*<NfNoANCvN~ANCA< 0A`N&<x*<NfNpA~NCvN~A~NC~A< 0A`N&<x*<NfNpTAfNCvN~AfNCfA< 0A`N&<x*<NfNpA퀖NCvN~A퀖NC퀖A< 0A`N&<x*<NfNpA퀮NCvN~A퀮NC퀮A< 0A`N&<x*<NfNq&ANCvN~ANCA< 0A`N&<x*<NfNqlANCvN~ANCA< 0A`N&<x*<NfNqAnNCvN~AnNCnA< 0A`N&<x*<NfNqA>NCvN~A>NC>A< 0A`N&<x*<NfNr>ANCvN~ANCA< 0A`N&<x*<NfNrAVNCvN~AVNCVA< 0A`N&<x*<NfNrA&NCvN~A&NC&A< 0N~NA< 0Bm.BmBmBmpBmBmBmBmBmxBmHBmBm`Bm0N~NB +|XpAXN/-XNCdNN<`NqNq+|XpAXN/-XNCjNN<`NqNq+|XpAXN/-XNCpNN<`NqNq+|XpAXN/-XNCvNN<`NqNqN~NA`N&<x*<NfNtANCdN~ANCA< 0A`N&<x*<NfNtdA~NCdN~A~NC~A< 0A`N&<x*<NfNtAfNCdN~AfNCfA< 0A`N&<x*<NfNtA퀖NCdN~A퀖NC퀖A< 0A`N&<x*<NfNu6A퀮NCdN~A퀮NC퀮A< 0A`N&<x*<NfNu|ANCdN~ANCA< 0A`N&<x*<NfNuANCdN~ANCA< 0A`N&<x*<NfNvAnNCdN~AnNCnA< 0A`N&<x*<NfNvNA>NCdN~A>NC>A< 0A`N&<x*<NfNvANCdN~ANCA< 0A`N&<x*<NfNvAVNCdN~AVNCVA< 0A`N&<x*<NfNw A&NCdN~A&NC&A< 0N~NA`N&<x*<NfNwnANCjN~ANCA< 0A`N&<x*<NfNwA~NCjN~A~NC~A< 0A`N&<x*<NfNwAfNCjN~AfNCfA< 0A`N&<x*<NfNx@A퀖NCjN~A퀖NC퀖A< 0A`N&<x*<NfNxA퀮NCjN~A퀮NC퀮A< 0A`N&<x*<NfNxANCjN~ANCA< 0A`N&<x*<NfNyANCjN~ANCA< 0A`N&<x*<NfNyXAnNCjN~AnNCnA< 0A`N&<x*<NfNyA>NCjN~A>NC>A< 0A`N&<x*<NfNyANCjN~ANCA< 0A`N&<x*<NfNz*AVNCjN~AVNCVA< 0A`N&<x*<NfNzpA&NCjN~A&NC&A< 0N~NLA6NLA0NAHN&<x*<NfNA`N&<x*<NpJBgp/A`N&<x*<NpJBgp/A`N&<x*<NpJBgp/A`N&<x*<NpJBgp/A`N&<x*<NpJBgp/A`N&<x*<NpJBgp$VHfN|~AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN|RANXN|~A0NHA6NHAaNXAҪNXA`N&<x*<NpJBgp/A`N&<x*<NpJBgp/A0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA H0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA R0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNfA \0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA f0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN.A p0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA z0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNZA T0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA |0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN"A 0ANX <r$<ANN^N8? <r$<ANN^N8?A`N/A0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA H0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA R0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA \0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA (0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNJA P0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA x0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNvA $0ANX <r$<ANN^N8? <r$<ANN^N8?A`N/A0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA H0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNǀA R0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNHA <0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNȬA d0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNtA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA .0ANX <r$<ANN^N8? <r$<ANN^N8?A`N/A0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA H0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN~A 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNFA P0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNϪA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 80AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNrA `0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNA 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfN:A 0AN&<x*<NpJBgp/AN&<x*<NpJBgp$VHfNўA ,0ANX <r$<ANN^N8? <r$<ANN^N8?A`N/A?<NHx pC탂~N" NBg?<d?<?<Hx pC탂~N" N?<(?<d?<N?<vHx pC탂~N" N?<d?<d?<v?<Hx pC탂~N" N?<x?<x?<?<Hx pC탂~N" N?<?<d?<?<Hx pC탂~N" N?<?<x?<?<Hx pC탂~N" N?<?<d?<?<Hx pC탂~N" N?<?<d?<>?<vHx pC탂~N" NBg?<?<?<Hx pC탂~N" N?<(?<?<N?<Hx pC탂~N" N?<d?<?<v?<Hx pC탂~N" N?<x?<?<?<Hx pC탂~N" N?<?<?<?<Hx pC탂~N" N?<?<?<?<Hx pC탂~N" N?<?<?<?<Hx pC탂~N" N?<?<?<>?<Hx pC탂~N" NBg?<?<0?<Hx pC탂~N" N?<Bg?<?<0Hx pC탂~N" NHx HxHx pC탂~NC탂~NHx HxHx pC탂~NC탂~NHx HxHx pC탂~NC탂~NHx HxHx pC탂~NC탂~NHx HxHx pC탂~NC탂~NHx HxHx pC탂~NC탂~NNBSHAPE1HP -HNH <r$<L8N^N8"_NBgBg?<?<HxpC|~N" N?<Bg?<:?<HxpC|~N" N?<?<NHx pC|~N" NBg?<d?<?<Hx pC|~N" N?<(?<d?<N?<vHx pC|~N" N?<d?<d?<v?<Hx pC|~N" N?<x?<x?<?<Hx pC|~N" N?<?<d?<?<Hx pC|~N" N?<?<x?<?<Hx pC|~N" N?<?<d?<?<Hx pC|~N" N?<?<d?<>?<vHx pC|~N" NBg?<?<?<Hx pC|~N" N?<(?<?<N?<Hx pC|~N" N?<d?<?<v?<Hx pC|~N" N?<x?<?<?<Hx pC|~N" N?<?<?<?<Hx pC|~N" N?<?<?<?<Hx pC|~N" N?<?<?<?<Hx pC|~N" N?<?<?<>?<Hx pC|~N" NBg?<?<0?<Hx pC|~N" N?<Bg?<?<0Hx pC|~N" NHx HxHx pC|~NC|~NHx HxHx pC|~NC|~NHx HxHx pC|~NC|~NHx HxHx pC|~NC|~NHx HxHx pC|~NC|~NHx HxHx pC|~NC|~NNBSTUMBACKHP -HNH <r$<L8N^N8"_NA킬Nb?<6?<'?<i?<ZA" NBg?<\?<5?<A" N?< Bg?<:?<A킔" N?<?<?<A킂" N?< ?<D?<:?<TAp" N?<?<F?<NHAZNXN~NLA큪NLA큤NLApryNp"<NpMryNpM"<NANN&<x*<NfNpN6pN:pN>p"<Np"<NpC"<NpC"<NANN&<x*<NfNpN6pN:pN>p"<Np"<Np9"<Np9"<NANN&<x*<NfNxpN6pN:pN>p%"<Np%"<Np/"<Np/"<NAN&<x*<NfN <r$<HANHA큰NHA큶NHANXA퀄N&<x*<NfN< <r$<HA~NHA큼NHANHANXAlN&<x*<NfN <r$<HAfNHANHANHANXA퀜N&<x*<NfN <r$<HA퀖NHANHANHANXA퀴N&<x*<NfNb <r$<HA퀮NHANHANHANXAN&<x*<NfN <r$<HANHANHANHANXAN&<x*<NfN& <r$<HANHANHANHANXAtN&<x*<NfN <r$<HAnNHANHA NHANXADN&<x*<NfN <r$<HA>NHANHANHANXAN&<x*<NfN L <r$<HANHANHA"NHANXA\N&<x*<NfN <r$<HAVNHA(NHA.NHANXA,N&<x*<NfN  <r$<HA&NHA4NHA:NHANX/-H <}"-T"_N(?":"":""""\ \ \ \ v & & & & T"hPh"hPh"lPh"pPh"pPh"pPT"lPh"lPh"pPh"tPh"tPh"tP&2&2"d@@ff&"FFFFFFFFFFFF"FFFFFFFFFFFVFFFFFFFFFFFNFFFFFFFFFFFf  r  r     L  L &  r  r      L  L &  r  r     #  L  L  &  r  r      L  L  &  r  r      L  L  xdtdtdtdtd* " " " " " " " " " " """46&*6&46&46&*6&46&46&46&46&46&46&468: X8"\ddd<&<&<&<&<&<&<&<&<&<&<&0 >c?`3?x?10s 888( 888( 888( 䀤9?f?<| 888( 888( 888( 䀤| > $  888( 888( 888(  888( 888( 888( ဠ 888( 888( 888(  `888( 888( 888( `888( 888( 888( `888( 888( 888( `888( 888( 888( Q uUQ QUU@Q888( 888( 888( -??888( 888( 888( UU@+ @`888( 888( 888( + P`888( 888( 888( UU@+ P`888( 888( 888( *< P`888( 888( 888( UU@* 2P`888( 888( 888( * .P`UU@* P` * dP`UU@)0 P`888( 888( 888( ) "P`888( 888( 888(  uU+ !P`888( 888( 888( + P`888( 888( 888( : P`888( 888( 888( 90 P`888( 888( 888( 9 P`888( 888( 888( 9` P`*` P` UU@* 8|P`9*p 2P` ]W@+ 8"P`+ P`888( 888( 888( UU@+ dP`888( 888( 888( + 03P`888( 888( 888(  UU@* P`888( 888( 888( ) fP`888( 888( 888( UU@) DP`888( 888( 888( )03 8P`888( 888( 888( UU@) 0 P`+ !0P` ]W@+ `P`+ `P`888( 888( 888( UU@+ 0P`888( 888( 888( ) P`888( 888( 888( A P`888( 888( 888( AX[ P`888( 888( 888( A03 !P`888( 888( 888( A0 !P`888( 888( 888( + #xP`UU@+ dP`*` DP`UU@" 003P`888( 888( 888(   P`888( 888( 888( W]@ dP`888( 888( 888( 888( 888(  DP`888( 888( 888( UU@888( 888( 03 P`888( 888( 888( 888( 888(  P`888( 888( 888( UU@888( 888(  !xP`888( 888( 888( 888( 888(  |P` W]@888( 888( 8 @P`888( 888( 0 ?P`UU@0 P`888( 888( 888(  ` P`888( 888( 888( UU@` P`888( 888( 888( 888( 888(  0`P`888( 888( 888( 888( 888(  0P`888( 888( 888(  888( 888(  P`888( 888( 888( 888( 888(  NP`888( 888( 888( 888( 888(  P`888( 888(  `gP`UU@888( 888( p 0wP`` gP`888( 888( 888( UU@ ` P`888( 888( 888(  0P`888( 888( 888( UU@888( 888(  P`888( 888( 888( 888( 888(  |P`888( 888( 888( U@888( 888(  ~P`888( 888( 888( 888( 888(  P`888( 888( 888( U@888( 888(  0HP`888( 888(  P`UU@888( 888(  dP` DP`888( 888( 888( UU@ 03 P`888( 888( 888( 0w P`888( 888( 888( UU@888( 888( g !P`888( 888( 888( 888( 888(  P`888( 888( 888( 888( 888(  P`888( 888( 888( 888( 888( | P`888( 888( 888( 888( 888(  fP`888( 888(  DP`888( 888(  P`O07 P`  8P` #P`888( 888( 888( 888( 888( 888(  P`888( 888( 888( 888( 888( 888(  P`888( 888( 888( 888( 888( 888(  P`888( 888( 888( 888( 888( 888( ??888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( 888( (( ((888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (( ((888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (( ((888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( 888( 888( 888( (888( 888( 888( ׀888( 888( 888( (( (q   T*GfABASICrlllSCALE TIME_GONEKEYENDDONEXNO_MOVESROTATEFXPOSYPOSNYTIMEMOVESSCOREXARRYARREMPTYFITXCOORDYCOORDBADXTILEYTILESTORECBOARDCONTENDGET_REZMESSAGESET_UP DRAW_BOARDGET_TILEPUT_TILEMOVESSET_PAL KEY_PRESSED ROTATE_TILE CLEAR_TILECHECK&Dominoes by Gareth Pople 17,7,1988 $Works in high and low resolutions  MFsMFsMFMFsMFsMFsM!pp FoMFE9F|FFMFg~XF|F gF$Yx!  " You can'tF"Yx!(( " move.F F h|F&Yx!  " Well done.F$Yx!(( " PerfectF.$Yx!00 " Score.F. F4Y!@ ""(Q)uit, (R)estart, or (C)ontinue ?FEa F hd$$FrpF F ib""FrF F iF-F FY!@ "  FEFEFEF-F * "+F*E F iF Low or High resolution onlyFa FF F iFiEF iFEF F.F* g+F*(!!!Fe'4!p!DOMINOESF(!!!PF2'(!H!(c) Gareth Pople August 1988F8Y! "&You must cover the board with colouredFt(#tiles, the colour of each tile mustF,&match all of its neighbours. The movesFt,'possible will be displayed at all timesFF*% Cursor keys. Position tile. F*$ Space.Rotate tile.FF*$ Return.Place tile.FF*$ Escape.Quit Game.FFF*% It is not as easy as you may think!F(# This is public domain software.FF$ Press a key to continueFta FYF.F* e+F*6p!!!Fa$6!`!!Fa 4 tile colours t6!!`!Fa6!!!`Fa6!`!`!Fl@6 !!!Ft 4 grey empty tile colours 6@!!!F6`!!!F$6! ! ! Ft.F* +F* *pp F.mEGpF Get around setcol bugs eQ F mFG(0,2,3,6,4,7,5,8,9,10,11,14,12,15,13,1  F EppF, EF,*@@@@@ F 4nEG F put border colour into array tn EGF@@ EF@@@ EFt@@ EFt@@@ EF nv F@ nhF@ .F* @+F*,qE GHHH F,q~ E GHppFD#  ! #` !#0 ! # F( qt #44  #  FD#  ! #` !#0 ! # FD#00 ! #` !#  ! # F(%  !##  !##  F$&#HH ! # F(%@@ !##  !##  F$&#HH ! # F(%`` !##  !##  F$&#pp ! #0 F(% !##  !##  F$&#  ! #0 F F oL F o F 2`!!WW!''F !!e!55F !!`!F2W!''!ee!55F(!5!``!''F,W!!ee!F (% !##  !##  F&@! F"% !##  !##  F &\!@@F"% !##  !##  F &a!**F"% !##  !##  F &@!//F "Yx!@@ "Score: F"Yx!`` "Time: FF"Yx! "Moves: F .F* !+F*#F0 ! !#  !# h F# F E%#9 H F,Y!`` "###! yy F"Y! "###!F"Y!@@ "###!FE%#     FE%#   p F u$@FEFEF Ft@a FEa F  #F0 ! !#  !# h F#  uF4F uFEFEF FM FMFM FM!pp F F  vPF M ! F 6 vF If empty and fit then put tile down vtEGF@@ E@@ Fd vRFM !  FMF M F M!pp FiEFMF4F F F  w.M **Fi w \ Fi0 ! F F0 ! F F  wK  Fi w  Fi1 ! F F1 ! F F  wP Fi w > <<Fi0 !pF F0 !pF F  xZH ppFi xH > VVFi1 !pF F1 !pF F .F* +F*EFxEG FVx EG FV M ! F xF4F F x F xF M ! F yF Remember the hole 5F F yDF4F y@FbEF F F.F* + ! FEFEF , z8@@ @@ @@ Fo, z4@@ @@ @@ Fo, z0@@ @@ @@ Fo, z,@@ @@ @@ FoEF F F F F zrEGF zh@@ FEF F zJF@.F* @+F*zEGF@@ EF zFE {JEGF E%U F{ EGF {@@ F@EF F z F {.F EFEF {@F@@ EF F zFE.F* F+ F* {F {EG`F@*Y! "@@ FF {F F.F* ! +! F2!pp!!ppF2!pp!!ppF2!pp!!ppF .%@@ !##  !## @@ Fw$&#  !#  F@.%@@ !##  !## @@ Fw$&#pp !#p F@.%@@ !##  !## @@ Fw$&#  !#H F@.%@@ !##  !## @@ Fw$&#  !#p F@.F* + F*E@@ F@@ E@@ F@@ E@@ F@@ E@@ F@@ EF@.F* @qgzgibimznz{xvlbt}{byVjC`G&Q` Efv*oM m HPHUBg?<JNA(m)m -:gS)@ -OK1PC#HNHx?<HNA@)@l/?<HNA)@h&@)@XЬl)@d)@`ARCpr Ѝ"QHNFALNHz2?< NA\pdAxr0XQ)K\NNhhhhttJrBjNuHz?<&NN\CAp$L Qp N"BlJpNN"pMN"9@pdAr 0Q0tr Np9lNupealp`NuaNJHz?<&NNBWNANC2A@p222NrҌ0<NB0,rNurA9Ar`v C9Cr`rt9@9A9BNrrҌpsNB0,Nu9@N`rDҌpsNBNuC2 @ e @}bA@p222Nr,Ҍ0<NBNu    -Hn: 2$4BBNuAd RdQRB BbABJk 0NuJBjBBXNu 0Nu 2$NuE`B<gJEgEjCDEDF Fe( F dF8BCHC` F0bFHC8v` HD8HDkDуdQRBNuDdBDA@kgAр[SBk0NuJlJBk&Nu0g H@rB JkЀ[` BbNuJBj prtNuHPAJgPpr$< _Nup _NtNu&8*JEgJBgJjBEB:HC҅H@:|ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB BbNuN@pNNuCDEJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@N ?<,>CEdGH@0r`?<`JBgVB&8TTDуdQRBNuDAр&AdRAрAрDуNuprt|=|T  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dajSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`HJjDDDS4</NJFkSFk&aQN`Ha"FFaQL8N6.TJgtBnTNupr$<NuJBk4<rpAC v JBgJjv-| Bb BkH>aaNRFBdL8?N<JBga2SF Be BgQRB`ApdR e <rRF&0xafEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`2:HQ A dJf`CfSHj-D@Hd0H@H 0H@0`fSC\fS , @a"C\fApNNN HP?< NA\NuH@aa/a a Nu@0 9c^Nu| PC>$Error # ][Abort]\f.B &lX)K\)ld` lp ,BQjNup(NV"l`Yd&-KNN"l`YepN&#k"C-KN"Cփk փk2##`փk"`2`$Y8gHRDD*D%H8#$c2g# HRDD%H`p"l`Qd&&| NuN"l`QepZN)H,Bl0NuE+000 l,N 0l0oNtNuaNfHP l,"X42,0Rl0Bd1 _g !g &g, \g2Nl`Rl01` _N J@fp Nl0Nl _N NtpR@RABd 1\fRA9A0 _/N "@cԒ@H/Nt N$p?Nl _Np?NlLNH l,"X42,0Rl0Bd1 _g,vxz| +g. -g( *g $g" #g Nl`Rl01`` `RCRABd1 _fRA` #g $g *g ,g ^gB +gZ -gT .fRxRDRABdH1 #g ^g +g. -g( _f&RA`RERABd1 ^g +g -f2ALH@ք/NP"N2C " Lx2DE A,b -fEt1BQt1$0QE[JEft Q0JgE\J"f0J"ff JFj-Sg$E[JEgRE\JEg vJ*g RCJ*f~ g~*Jf`9I0p%NlLNNuE[JEg*ÒEA, gSAR`Ô l,HQ?HjSl0 l,"X0Rl0gL _g0 ,g .g +g( -g $_HRNl`$W "0d`Rl0`p Jojp-`Sl0NuA:NXANXA"NXA#NXA$NXA?|NX -N&<x*<NN:/ -N&<x*<NN:/AANXA;NXN+@A2NX -N&<x*<NpJBgp/ - N&<x*<NpJBgp$VHg - N&<x*<NpJBgp/ -NzNpJBgp$VHfNN2 -N&<x*<NN:/p"NN\ You can't4NfN2 -N&<x*<NN:/p"NN\ move.4Nf - N&<x*<NpJBgp/ -N&<x*<NpJBgp$VHfNN2 -N&<x*<NN:/p"NNN Well done.NfN2 -N&<x*<NN:/p"NNN PerfectNfN2 -N&<x*<NN:/p"NNN Score.NfN2prNNN"(Q)uit, (R)estart, or (C)ontinue ?NfpNt+@ -N&<x*<NpJBgp/ -N&<x*<NpJBgp$VHfNN -N&<x*<NpJBgp/ -N&<x*<NpJBgp$VHfNN - RWHfNN&N2prNp#N$NfBBB NN ?<NNT+@ -SWHfNN2N\Low or High resolution only4NfpNtN -JWHfN+|N+|N~N pN pNpNp@N^prZNZN6DOMINOESNpN pNpNp N^p2r*NZN6(c) Gareth Pople August 1988NN2p rNNN&You must cover the board with colouredNfN2N\#tiles, the colour of each tile mustaNfN2NN&match all of its neighbours. The movesNfN2N\'possible will be displayed at all times!NfN2NfN2N\% Cursor keys. Position tile. eNfN2NN$ Space.Rotate tile.NfN2NN$ Return.Place tile.NfN2NN$ Escape.Quit Game.NfN2NfN2N\% It is not as easy as you may think!!NfN2N\# This is public domain software.kNfN2NfN2NN Press a key to continueNfpNtNBN~N pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\pp@pW?<?<NN\N~N pChNB pA NJ/- N>ChNxN`NqNqN\+|$+|(HxHxpCn~N+| pA NJB,pA,NJ/- B/-,pCn~Nx/- Hx/-,pCn~NxB/- /-,pCn~NxHx/- /-,pCn~NxN`NqNqN`NqNqN~N -N&<x*<NN:+@ -N&<x*<NN:/ -N&<x*<NN:"ANx -N&<x*<NN:+@0 -N&<x*<NN:/ -N&<x*<NN:"A0Nx -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NZ -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"Nl -NH -N&<x*<NL8NpJBgp/ -0NH -N&<x*<NL8NpJBgp$VHfN,6 -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NZ -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"N4 -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NZ -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"N4pChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NzN&<x*<NN:N -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NzN&<x*<NN:N -NH -N&<x*<NL8NN:/ -0NH -NvN>L8NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NzN&<x*<NN:N -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NzN&<x*<NN:N -NH -N&<x*<NL8NN:/ -0NH -N&<x*<NL8NN:"NN` NqN`Nq -N&<x*<NN:/ -NvN>N:"NZ -N&<x*<NN:/ -N&<x*<NN:"Nl -ЀrNZ -N&<x*<NN:/ -N&<x*<NN:"Nl -ЀrNZ -N&<x*<NN:/ -NvN>N:"N4 -N&<x*<NN:/ -N&<x*<NN:"NZ -N&<x*<NN:/ -N&<x*<NN:"N4 -N&<x*<NN:rNZ -N&<x*<NN:/ -N&<x*<NN:"N4 -N&<x*<NN:/ -NvN>N:"NZ -N&<x*<NN:/ -Ѐ"N4pChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8N&<x*<N&<x*<NN:N -N&<x*<NN:/ -N&<x*<NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NzN&<x*<NN:N -N&<x*<NN:/ -N&<x*<NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8N&<x*<NN:N -N&<x*<NN:/ -N&<x*<NN:"NpChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NN6&<x*<NN:N -N&<x*<NN:/ -N&<x*<NN:"NN2 -N&<x*<NN:/p "NN\Score: 4NfN2 -N&<x*<NN:/p"NNNTime: NfN2 -N&<x*<NN:/p"NN\Moves: 4NfN~N pNT -$NH -NL8NN:/ -(NH -NL8NN:"NZ -$N&<x*<NH -NL8NN:/ -(N&<x*<NH -NL8NN:"NlNNH -NL8N&<x*<NNN:+@4N2 -N&<x*<NN:/p"NNB###N -4N&<x*< NNN,N2 -N&<x*<NN:/p"NNB###N -8NNN,N2 -N&<x*<NN:/p "NNB###N -N&<x*<NN:+@B, - A,NJBB -,Cn~N:WHfN@+|XN`NqNq -XRWHfN@h - NH <r$<L8NN:+@ BXN@~BB/- -Cn~NxN`2NqN~N -UWHfNAB pA NJN2 -N&<x*<NN:/ - X"N -N&<x*<NN:N$NfN`NqNqN~N A`N A\N -N&<x*<NN:/ -N&<x*<NN:"NZ -N&<x*<NN:/ -N&<x*<NN:"Nl -N&<x*<NN:/ -N&<x*<NN:"NZ -N&<x*<NN:/ -N&<x*<NN:"N4 -N&<x*<NN:/ -N&<x*<NN:"NZ -N&<x*<NN:/ -N&<x*<NN:"N4BBpCn~N:ChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NHBBpCn~N:NL8NN:N -\NH -N&<x*<NL8NN:/ -`NH -N&<x*<NL8NN:"NBBpCn~N:ChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NHBBpCn~N:NL8NN:N -\NH -N&<x*<NL8NN:/ -`NH -N&<x*<NL8NN:"NBBpCn~N:ChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NHBBpCn~N:NL8NN:N -\NH -N&<x*<NL8NN:/ -`NH -N&<x*<NL8NN:"NBBpCn~N:ChNVN -NH <r$<L8N&<x*<NN:N -NH <r$<L8NHBBpCn~N:NL8NN:N -\NH -N&<x*<NL8NN:/ -`NH -N&<x*<NL8NN:"NN~N BBpCn~N:+@dBBBBBpCn~N:Cn~NxBBHxBBpCn~N:Cn~NxBBHxBBpCn~N:Cn~NxBBHx -dCn~NxN~N 02364758910111412151316 J VZ("F JZ J^VvVvVvV^Z&:$4:`[LR` Efv*oM$0 m HPHUBg?<JNA(m)m -:gS)@ -OK1PC#HN Hx?<HNA@)@l/?<HNA)@h&@)@XЬl)@d)@`ARCpr Ѝ"QHNFALN|Hz2?< NA\pdAxr0XQ)K\NN2jjpvvvJrBjNuHz?<&NN\NCAp$L Qp Nެ9lrBlJpNNެpMNެ9@pdAr 0Q0tr N9lNupealp`NuaNJHz?<&NNBWNANC2A@p222NrҌ0<NB0,rNurA9Ar`v C9Cr`rt9@9A9BNrrҌpsNB0,Nu9@N`rDҌpsNBNuC2 @ e @}bA@p222Nr,Ҍ0<NBNu    -pa4|a@:>< |a6RGk0Gg`a(0GVfA1G<ap??<?<NM\Nu??< NMXNu&8*:EENuHn, 2$4BBNuAd RdQRB BbABJk 0NuJBjBBXNu 0Nu 2$NuE`B<gJEgEjCDEDF Fe( F dF8BCHC` F0bFHC8v` HD8HDkDуdQRBNuDdBDA@kgAр[SBk0NuJlJBk&Nu0g H@rB JkЀ[` BbNuJBj prtNuHPAJgPpr$< _Nup _NtNu&8*JEgJBgJjBEB:HC҅H@:|ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB BbNuN2pNNuCDEJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@N?<,>CEdGH@0r`?<`JBgVB&8TTDуdQRBNuDAр&AdRAрAрDуNuprt|=|F  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dajSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`HJjDDDS4</NJFkSFk&aQN`Ha"FFaQL8N6.FJgtBnFNupr$<NuJBk4<rpAC v JBgJjv-| Bb BkH>aaNRFBdL8?N<JBga2SF Be BgQRB`ApdR e <rRF&0xafEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`2:HQ A dNAXJ@jNNu~c0NQNuaHQ` @gS@@CNu   aH@@`"aH@@`a0) 4a3B HA2;i`0^ M / hawAnFNuAXr%eee%NuAMNuA.A&HP 0 0 &0&?< NN\Nu p6`p5`p4`p3` p2`p`pN @ddAg(g@A `1||9XgBX)HJPfNu"lJQf2")IBQlk0N` QNu2p~?`2p~@`~?`~@St4f9G/0N(g^AA `.j>(1GRhgbHhBg?,(/?<BNA Jk@$_>g8 Z"XPf, HQH/?,(?,NA gJk p x?gp%NNu @fp7`&(*NNtNPvN)@p `H@)@prtNAHplrtNB 2pNpNpapaprapalpalpalpaTpaTpaTBp'a?<NNT@B){L9|0<rtNpapap9@p`pvNv`v`vj`v `v`v`v`?Aa*` Al 2l 4)lVH)lRprtNAl 2l 4HVNuAl 2l 4L VA0000000000prtNA)lVHvN9Cp rtNAv` Av `Avl 2l 4)lVHNA)lVH)|vNA VB0BP9|p tNAl 2l 4HPrtpgNaBp0,l 2Nua40,HNua*p0,l 4Nuaprt0,l 22,l 44,NuN9||BlBlrҌpsNBNu?<NNT$g4<rЀ[Nu@((?<NN.?<NNX@LvA HA HNuNup9@HA)A,N FN @e024E$ Bb5B5A6CC5CK5CAB008:Dk`Ek\00<,>,SFSGFnHGnDDDk9DBlDEk9EBlFcllGcll0,lb 0,lcNupmrtA)HA)HNpNHHPN4 _:8><DbFEbGCHP@dʾAdBD2ƞE29|C???FF22N23BRG0@\@N"2)IN(* 9AJA)H@@[000][ˈN Evz`* [g" ]g |g QSz` zQSpQ][ɈN Dvx`* [g" ]g |g QSx` xQSpQ]Bp4NެHNur|<N @xepw2A$JBjDFHB t`0QBl9F)lVTAtp 9| NA R4RB`A Gf //o~4$_<F"OSG !H@Ь 2 Q)@RHRprN2(g"P@g2RADAH""l`r2oZAe 1@#)I`Nuk1@Nup NN"l`dpNAtrdJhk\QpaNH ld$l`"Hg0 k&@ S`g k#&@0+S@H3 Q&f)I`LNu?<?<NAXJgJgNAH@B pNA NuApNNl$N$BS@kH2QNupC ұd"X0Pg"RA$D#Nu"X0NuNJ@gpNu _0HpN _0HpNp"_0HqNp"_0HqNE ұeHHQ0)N$_$ZR@H`2QNu$Y0gHR@@"D%$X0P2g# R@%NupE $ $X0dP.gRG,D%pr Y2dP.gRG,D!p4Ae4v`VfANuNxWHNuNxVHNu Ihd*N$E$RR@H`2QˈN ENu Ihd"*N$E8*$R`"QˈN ENu2)A IJAfr4(Ae*RBBc0*SA?N$E$R`QˈN ENup`(* 0(iN$E 4R`Q$D 4R`QˈN DN ENu2p <0N`QNupC 0(gFd"P$I` *N$E$R(S@jv A(Wf( ae zb Q DNur ,* N& ( EN C"Sj|AcRGFc8>`4A g6 g0 g` gTlfelhgFf2pRGRFa`a,` `?~ap ap a 0NuCpE`bf`FgRGJGgRSGSFFgCpE`Yf`Nua@Jf gH@ fa(@ fza0 b @ Ee0Nu?<?<NMXNur9A(HNLNu0,^2,`NzEfpaRppaNAEg0PaľEfa4RE`p a2a*Efp a(NlldeS@f lbfSl`9Ab9FdNupapqr`p`ak NupNuakfpNupNtddA0oH?<?B?<BNA Jk.,?<?B?<BNA *kBg?/?<BNA JkNuN<(`|HP?N<pg2JFg W"X2@e2<A`QNCpR@ 1 fA 0! "_N"p`pNu)H9@Jp4NެP'J&f H LNu P&NuQ'` J,'fJ,&gHA#ȇeC! B,&LNu-W)K20, 8k8@ gJl&f"Nu , 8g"P 8 @/, 8Nf  8fQ 8J,'gNupB <``L@ H)l26)z @W , Jf`CfSHj-D@Hd0H@H 0H@0`fSC\fS , @a"C\fApNNNޖHP?< NA\NuH@aa/a a Nu@0 9c^Nu| PC>$Error # ][Abort]\f.B &lX)K\)ld` lp ,BQjNup(NVYp-KNu"l`Yd&-KNN"l`YepN&#k"C-KN"Cփk փk2##`փk"`2`& $Y8gHRDD*D%H8#$c2g# HRDD%H`"X0gBPHR@@"D#Nu?<NNTSfN%HxN# | MEDIUM RESOLUTION | ONLY. HPN QUIT r"_ NX+@^NޖN,lNޖpNA0NfpN pNpNA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"NpNA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`pNA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"N"A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"N"A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(pNNBmNN\pNBm4BmLA1NfBgBg?<?<A&" NNpN pNpNpNpNpNp NRp"<NNNHANGMAN4NpNp "<NNp("<,N(p#"<NNp"<'N(pNpNpNp NRpU"<NNNGUILLOTINE MANNpNpNpNp NR <"<NNN HP <N"_N~HPN JULY 1989"_N~NpNpNpNpNRpn"<NNNGOREY GRAPHICS BY MAGNUS COOPERNA0 z0AH >0A%NfA0 H0A%NfpNpNpNNbCN"HmA "_NJBgNA0 H0AH H0A%NfNNNNNND This game was origionally meant to be hangman, but as the NNNM executioner couldn't find a gallows he had to get a guillotine instead.4NNNNN: The rules are as for hangman. You start with 7 livesNNNNNC This program is copyright. It may not be sold commecially.eNNN= It may be sold as public domain software or given away.iNNNNNNN! ENTER YOUR NAME >mNArNBVBm BmNpNA0 D0AH @0A0NfN?*NޖA0N(?AHN(?A&"NNA0N,&<x*<NN,/AHN("NNA0N,&<x*<NN,/AHN("N(A0N,&<x*<NN,/AHN("NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"N"A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N`A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?A0N,&<x*<NN,?AHN,&<x*<NN,?~NbA0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(A0N,&<x*<NN,/AHN,&<x*<NN,"NNA0N,&<x*<NN,/AHN,&<x*<NN,"N(N?<j?<?<`?<?<`?<?<?<?<?<?<?<?<?<$?<j?<$?<j?<~ NbpN pNp N <"<aNpNp["<kNNpu"<N`pN pNpNp`"<N?<L?<B?<?<B?<?<d~NbpNpd"<NNpv"<N`p)"<kNNp)"<N(p8"<kNNp8"<N(p="<LNNpL"<_N`pN pNpNp"<`NNprNp"<NNprNpN pNpNp."<NpNpD"<VNNprNp("<NNp%"<N(p"<NNp"<aN(p"<]NNp<"<VN(pNpNpNp2NR -VJnNA\pd"<NN -VNNNNArpd"<NNpONN+|(6pRNHPN speller.dic4HP -6 _r"_N(pN$A"-6NZpNtN&<x*<NN&<x*<NN,+@: -:NN:&<x*<NN,+@R -RrNpNRgNBPNN eof reachedNNKAN+@6+|> -6A>NHmp"->"_N@HPp N"_Ng NXNBNr`NqNq ->NH -6N&<x*<NL8NJBfNBAKNfNKHm -6NH ->NL8NH <r$<L8NN,"_NCN"AN+@6+|> -6A>NHmp"->"_N@HPp N"_Ng NXNCNr`NqNq ->NH -6N&<x*<NL8NJBfNCAKNfNKHm ->NH <r$<L8NN,"_NCN"+|BAN+@FNprNN The word has 4 -FNN letters.4N.4HP -F"_NCN"pNpNpNp NRp2rdNN -FN&<x*<NtN,/A"NpNpNpNp NRps"<NN -BNNpNpNpNp NRNpr NN6Guess a letter. 'Npr@NNNNCN"Hmp"_NCN"ANCN"ANN&<x*<NpJBgp/ANN&<x*<NpJBgp$fNFNEpAN NCN"BN+|> -FA>NHmHmp"->"_N@"_NJBfNG2+|N ->SfNFHm ->NH <r$<L8NN,"_NHPA"_N~CN"HmHm -F>"_N"_N~CN"NG2HmHm -FNH <r$<L8NN,r"_N@"_N~CN"Nr`Nq -NSgNI$Hmp.N"_rNFJgNHZA퀖 0 <r$<A퀖N`N&<x*<Nt&<x*<NN,Np2rdNN -FN&<x*<NtN,/A"N?<?<N&<x*<NtN,/NvNN," _N0pNN`XNq?<Bgpr _N0pNBBRVNINprNN9You have guessed one or more letters correctly. 4?<?<pr _N0pN?<Bgpr _N0pNpNpNpNp NRp2rdNN -FN&<x*<NtN,/A"NNKP -BNH <r$<L8NN,+@B -BJgNJpNpNpNp NRps"<NN -BNNpNpNpNp NRNpr NN 4NprNN9Sorry, you have no more lives left. 4NprNN THE WORD WASNpNp2rdNN -FN&<x*<NtN,/A"N?<?<pr _N0p2N?<Bgpr _N0pNA퀜 0NKPNprNNYou have not guessed correctly.4p2rdNN -FN&<x*<NtN,/A"N?<?<pr _N0pN?<Bgpr _N0pNNprNpNNNNA퀜N,&<x*<NJBfNKBmNL: -BJf:NHmp.N"_rNFJgNKN0NNNNNNVpNNޖNޖNNno full word found ANNNNNERRORlNNޖNAf 0 <r$<AfN`?<?<pr _N0pN?<?<pr _N0pNN`NqNq?<Bgpr _N0pNAT f0pNAf H0 <r$<AfN`AfN("<N"?<?<ATN( _NpNATNN`NqNqAfN,ATNNAZN@Af H0 <r$<AfN`AfN(rBN$?<?<AZN( _NpNAZNN`NqNqpN pNpNpB"<VN?<Bgpr _N0pN?<Bgpr _N0pNAf $0 <r$<AfN`pNAfN("<kNNAfN("<N(pNAfN("<N"pNAfN,&<x*<NN,"<kNNAfN,&<x*<NN,"<N(AfN,&<x*<N&<x*<NJBfNPpN+|fpAfN <r$<A0NNHN&<x*<NtL8NN,/ <r$<AHNNHN&<x*<NtL8NN,"N"Nr`rNq+|fpAfN <r$<A0NNHN&<x*<NtL8NN,/ <r$<AHNNHN&<x*<NtL8NN,"N"Nr`rNq <r$<A0NNHN&<x*<NtL8NN,/ <r$<AHNNHN&<x*<NtL8NN,"N"pNA1Nf?<?< AfN( _NpNN`*NqAHN(+@2 <A2NpN -2N&<x*<NpJBgp/ -2N&<x*<NpJBgp$fNR"pN -2NH <r$<L8NN,"<NN -2NH <r$<L8NN,"<N( -2NH <r$<L8NN,"<NN -2NH <r$<L8NN,"<N( -2N&<x*<NpJBgp/ -2N&<x*<NpJBgp$fNS:pN -2NH <r$<L8NN,"<NN -2NH <r$<L8NN,"<N( -2NH <r$<L8NN,"<NN -2NH <r$<L8NN,"<N( -2 xgNSdpN pd"<NNpNpNpN pNpNA0N,&<x*<NN,/AHN("NNA0N,&<x*<NN,/AHN,&<x*<NN,"NpNAHNAHNA0Nf?<?< -2 _NpNpN+|fpAfN <r$<&<x*<NHN&<x*<NtL8NN,/ <r$<&<x*<NHN&<x*<NtL8NN,"N"Nr`fNq+|fpAfN <r$<&<x*<NHN&<x*<NtL8NN,/ <r$<&<x*<NHN&<x*<NtL8NN,"N"Nr`fNq+|fpAfN <r$<A0NNHN&<x*<NtL8NN,/ <r$<AHNNHN&<x*<NtL8NN,"N"Nr`rNq+|fpAfN <r$<A0NNHN&<x*<NtL8NN,/ <r$<AHNNHN&<x*<NtL8NN,"N"Nr`rNqNr`*Nq?<Bgpr _N0p2NNpNpN pNpNprNNpd"<N <rNN <"<NAH \0+|bp "<bAbN< -bA0NA%NfN`NqNq -VNArNNJBfNW -VArNACN"pNpNpNpNRpN <"<^NN <"<N(pN <rNN <"<@N( <"<NNN2HIT A KEY TO PLAY AGAIN OR CLICK MOUSE TO QUIT >>>NpN pNpNpN <"<N"p"<NNpP"<NpN pNpN <"<NNprNNYOUR SCORE IS -VNN !!4Npr%NNHI-SCORENpr#NN A NHmA "_NJBfNYAND+@Z+|> -ZA>NHm p.N"_N~C N"Nr`NqNqNp rNANA NArNNYNp r&NArNNNbCN"HmA "_NpJBgp/N@NzNpJBgp$gHmA "_NJBfNZ"<NNNBYE BYE4"<N?<Bgpr _N0 <NNNޖ%BTZ> j" JB B >Vn\8d *ؾt,tp2=a abacus abandon abandoned abandonment abate abated abates abating abbreviate abbreviated abbreviates abbreviating abbreviation abbreviations abdicate abdicated abdication ability able abnormal abnormally abort abortive aborts about above abrupt abruptly absence absent absolute absolutely absolve accede acceded accedes acceding accept acceptable acceptance accepted accepting accepts access accessed accessible accession accessions accessories accessory accident accidental accidentally accidents accommodated accommodation accompanied accompany accompanying accord accordance accorded according accordingly account accounted accounting accounts accredit accredited accretion accretions accuracy accurate accurately accusation accuse accused accuses accusing achieve achieved achievement achievements achieves achieving across act acted acting action actions active activities activity acts actual actually ad adapt adaptation adapted add added adding addition additional additionally additions address addressed addresses addressing adds adduced adequate adequately adjacent adjectival adjective adjust adjusted adjusting adjustment adjustments adjutant administer administered administrative admission admit admits admitted admittedly admitting adopt adopted adopting adoption adopts advance advanced advancing advantage adversary advice advisable advocacy advocate advocated advocates advocating affair affairs affect affected affecting affinities affront afraid after aftermath afterwards again against age ages ago agree agreed agreeing agreement agrees agricultural agriculture ahead aided aim aimed aims air al alarm alarmed albeit alert alias align aligned alive all allegation allege alleged allegedly allegiance allegorical alleviate alleviates alliance allied allocate allocated allocates allocation allot allotted allow allowance allowed allowing allows allude alluded alludes alluding allusion allusions ally almost alone along alongside alphabet alphabetic alphabetical alphabetically alphabets already also altar altars alter alteration alterations altered altering alternate alternately alternation alternative alternatively alternatives although altogether always am amalgamate amalgamated ambiguity american amid among amount amounting amounts amulets an anachronistic analogies analogous analogy anarchy ancestor ancestors ancient and angel angels anger angered angers animal animals annals annexation anniversary announced annual anomalies anomalous anomaly another answer answered answers ant ante antedate antedated antedating antediluvian antediluvians anti anticipate anticipated anticipates anticipation antiquities antiquity antithetical anxiety any anyone anything anyway anywhere apart apologetic apostasy apostate apostle apostrophe apparent apparently appeal appealed appeals appear appearance appeared appearing appears appease appeased append appended appendix apple apples application applications applied applies apply applying appoint appointed appointment appositional appreciate appreciated approach approached approaches appropriate appropriately appropriation approximate approximately approximation april aquainted arbitrarily arbitrary arch archaeology archaizing archbishop archeological are area areas arguably argue argued argues arguing argument arguments arise arises arithmetic ark arm armed armies army arose around arrange arranged arrangement arrangements arranging array arrays arrest arrested arrival arrive arrived arrives arriving arrow arrows art article articles artificial artificiality artificially artisan artisans arts as ascend ascended ascent ascii ascribe ascribed ascribes ascribing ash aside ask asked asking asks aspect aspects ass assassin assassinated assassination assembled assembler assemblers assembly assert asserted asserting assertion assertions asserts asses assess assessment assign assigned assigning assigns assimilate assimilated assimilation assistant assistants associate associated associates associating association associations assume assumed assumes assuming assumption assumptions assured asterisk asterisks astonish astonishing astronomer astronomers astronomical astronomically asymmetrical asymmetry at atonement attach attached attaches attack attacked attacks attain attained attempt attempted attempting attempts attend attendant attention attest attestation attested attests attitude attitudes attract attractive attributable attribute attributed audience audio authentic authenticity author authority authorization authorized authors authorship auto automatic automatically autumn availability available average avoid avoided avoids awake aware awareness away awful awkward awkwardly b back background backing backspace backspaces backup backward backwards bad badly balance balanced balances balancing bald baldly band bank bar barley barn barred bars base based bases basic basing basis bat batch bath bathe bathed bathing battle bay bc be bear bearing bears beautiful became because become becomes becoming bed been befell before beforehand beg began beget begetting begin beginner beginners beginning beginnings begins begs begun behalf behave behaved behaves behaviour behind being belated belied belief believe believed believes believing bell belong belonged belonging belongings belongs below beneath beneficial beside besides besiege besieged besieging best better between beware beyond bible bibles biblical bibliographies bibliography big bin binary biological birds birth birthday bit bits bizarre black blame blank blankpage blanks blankspace bleats block blocks blood bloodshed blow blue bodies body bold boldface bondage book books boot booths border borders bored born borrow borrowed borrowing borrows both bothers bottom boulders boundaries boundary bounded bounds box boxes bracket bracketed brackets brazier bread breadth break breaking breaks breeze brick bricks bridge brief briefly bright brightly bring bringing brings broad broadly broke broken brother brothers brought brown buffer buffering buffers bug build building built bulk bull burial buried burn burned burning bush busily busy but button buttons by bypass bypassed byte bytes c calculate calculated calculating calculation calculations calendar calendars calendrical calf call called calls came camp campaign campaigned campaigning campaigns camps can canaan canaanite cancel cancelled cancelling cancels candid candidate candidates cannibal cannibalism cannot canon canonical canonization cap capabilities capability capable capital capitulation caps captive capture captured capturing car carcass card cards care cared careful carefully careless carelessly carelessness carriage carried carries carry carrying case cases cat catalogue catalogued catchword categoric categorically category catered causal cause caused causes caution cautioned cautious caveat caveats cease ceases celebrate celebrated celebrates celebrating celebration celestial census cent central centre centred centring centuries century ceremony certain certainly certainty cf chain chained chair challenge champion championed chance change changed changeover changes changing channel channels chaos chapter chapters chaptertitle character characteristic characteristics characterize characterized characterizes characters charge charges chariotry charitable chars chart  check checked checker checking checks chemical chest chiastic chief chiefly child childless children choice chose chosen christian christianity chronicle chronicler chroniclers chronicles chronographic chronological chronologically chronologies chronologist chronologists chronology church circa circle circles circuit circulation circumcision circumstance circumstances circumstantial circumvent citation cite cited cites cities citizen city civil civilization claim claimed claiming claims clash clashed clashes class classes classic classical clause clay clean cleaning clear cleared clearer clearest clearly click clicking climactic climax climbed close closed closely closer closest closing clothe clothed clothes cloud clouds clue clumsy coalition coast code codes coexisting cognate coherent coincide coincided coincidence coincidences coincidental coinciding cold collapse collapsed collation collected collection colon colophon colophons colour coloured colourful colours column columns comb combination combinations combine combined combines combining come comes comfort comfortable coming comma command commanded commander commands commence commenced commencement comment commentaries commentary commentators commented comments commercial commission commissioning commit committed common commonest commonly communities community compact compacted compacting compaction companies company comparable comparative comparatively compare compared comparing comparison comparisons compatible compel compelling compensate compensated compensates compensating compensation compensatory competent compile compiled compiler compilers complacent complain complaint complaints complements complete completed completely completeness completes completion complex complexity complicated complicating complication comply components composed composition compositions compound compounded comprehensive comprise comprises comprising computer conceal conceded conceivable conceivably conceive conceived concentrate concentrated concentrates concentration concept conception concern concerned concerning concerns concert concise conclude concluded concludes concluding conclusion conclusions conclusive conclusively condense condenses condition conditional conditions conduct conducted confidence confident configuration configure configured confined confirm confirmation confirmed confirming confirms conflate conflated conflation conflations conflict conflicted conflicting conflicts conform conformity confronted confuse confused confuses confusing confusion conjecture conjunction connect connected connection conquered conquest consciously consecutive consecutively consensus consequence consequences consequent consequently conservative consider considerable considerably consideration considerations considered considering considers consist consisted consistency consistent consistently consisting consists consonant consonantal conspicuous conspicuously conspiracy constitute constitutes constraints construct constructed construction constructions construed consulted contact contacts contain contained containing contains contemporaneous contemporaries contemporary content contented contention contents context contexts contiguous contingents continuation continue continued continues continuing continuities continuity continuous continuously contra contracted contraction contradict contradicted contradiction contradictions contradictory contradicts contrary contrast contrasts contravene contravenes contribute contributed contribution contributions contrived control controlling controls convened convenience convenient conveniently convention conventional conventions converse conversely convert convertible convey convince convinced convincing convincingly cooling coordinate cope copied copies copy copying copyright core coregencies coregency coregent coregents corner cornerstone corollary corpse corpus correct corrected correction corrections correctly corrector correctors correlate correlated correlating correlation correspond corresponded correspondence corresponding correspondingly corresponds corroborate corroborated corrupt corrupted corruption corruptions cost could couldn council count counted counter countering counterpart counting countries country counts coup couple coupled couplet course court courts covenant covenants cover covered covering covers cow cows craft craftsmen cramped crannies crash create created creates creating creation creative creatress credibility credible credit credited credits criteria critical criticism criticize criticized criticism criticizes critics critique crops cross crossed crossing crown crucial crushed cry cryptic cubit cubits culminate culminated culminates cult cultic cultivated cultural culture cultures cumulative cumulatively cuneiform cure curious curiously current currently curse cursor curtains custody custom customary customization customize cut cuts cutting cycle cycles cylinder d daily daisy damage damaged danger dangerous dark dash dashed dashes data database databases datable date dated dates dating daughter daughters dawn dawns day days dead deal dealer dealing deals dear death deathbed deaths debt debts decade decades december decent decide decided decides deciding decipher decipherment decision decisive declared declares decline decrease decreased decreasing decree dedicate dedicated dedication deduced deduct deducted deeds deemed deeply default defaults defeat defeated defected defective defence defend defended defending defer deferred defers deficit deficits define defined defines defining definite definitely definition definitions degree degrees delay delayed delete deleted deletes deleting deletion deliberate deliberately deliver deliverance delivered deliverers demand demolish demolished demolishes demons demonstrably demonstrate demonstrated demonstrates demonstration den denied denies denote denotes deny depart department departure departures depend depended dependent depending depends depict depicted depicts depopulated deport deportation deportations deported deportees deporting depose deposed deposing depredations derive derived derives deriving descend descendant descendants descending descent describe described describes description descriptions descriptive desert deserve deserves design designated designation designed desirable desire desired desires desk despair despite destination destined destroy destroyed destroying destruction detach detachable detached detail detailed details detect detected detention deter determine determined determines develop developed developing development developments deviant device devices devote devoted devotes devoured diagnostic dialogue dictation dictionary did die died dies differ differed difference differences different differentiation differently differing differs difficult difficulties difficulty digit digital digits dilemma dimension dimensions diminish diminished direct directed direction directions directly directory dirty disable disabled disadvantage disagree disagreement disappear disappeared disappoint disappointment disaster disbelief discarded discarding discerned discernible disciple disciples disclaim disclaimer disclaims disconfirmation discontinued discontinuities discount discounted discouraging discover discovered discoveries discovers discovery discreetly discrepancies discrepancy discriminate discuss discussed discusses discussing discussion disembarks disguise disguised disguises disk disks dislike dismiss dismissed disobeyed disparate dispatched displacement display displayed displaying displays disposal disproof disproportionate disprove disproves dispute disputed disregard disregarded disregarding disregards disrepair disruption dissimilarities dissociated dissociating distance distant distinct distinction distinctive distinctively distinctly distinguish distinguished distinguishes distributed distribution distributions district districts dittography diverge divergences divergent diverges diverse diversities diversity divested divide divided divides divine division divorce do doc doctoral doctrine document documentary documents doe does dog dogs doing domain dominant dominated domination dominion don donate done door doors dot double doubt doubted doubtful doubting doubtless doubts dove down draft drag dragged dragging dragon drags dramatically drastic drastically draw drawn draws drew dried drink drive driven driver drivers drives driving drop dropped drown dry dual dubious due dull dumb duplicate duplication duration durations during duties dwell dwelt dynastic dynasty e each eagle ear earlier earliest early earned ears earth easier easily east easter eastern easy eat eaten eating eats ecclesiastical echo echoed echoes eclectic eclipse economic ed edge edit editable edited editing edition editions editor editorial editors edits effect effected effective effectively effectiveness effects efficiency effort eight eighteenth eighth either elaborate elaborations elapse elapsed elder elders eldest electronic elegance element elementary elements eleven eleventh eliminate eliminated eliminating elimination else elsewhere embark embarked embarrass embarrassment embrace embraces emend emended emending emerge emerges emperor emphasis emphasize emphasized emphasizing empire employ employed empty enable enabled enabling encamped enclose enclosed encode encoded encoding encounter encountered encouraging encyclopaedia encyclopaedic end ended ending endorse endorsed endorsement ends enemies enemy engineering england english enhance enhancements enjoy enjoyable enjoyed enough ensue ensues ensure ensured ensures ensuring entail entailed enter entered entering enterprise enters entertain entertained entire entirely entitled entries entrusted entry enumerate enumerated environment envisage envisaged epic epics epigraphic epochs eponym eponyms eponymy equal equalling equally equals equate equated equivalent equivalents era eradicate eradicated eras erase erasing erect erected erection err erroneous erroneously error errors escape escaped escapes esoteric especial especially espouse espoused essential essentially establish established establishing estimate estimated estimates et etc eternal etymological european evade evaded evaluating evaluation eve even evening event events ever every everyone evidence evidenced evidences evident evidential evidently evil evolution evolutionary ex exacerbate exact exactly exaggerate exaggerated exaggeration examination examine example examples excavation excavations exceed exceeded exceedingly exceeds excellent except exception exceptional exceptionally exceptions excerpt excess excessive excising excited exclude excluded excludes excluding exclusive execute executed executes executing execution exegesis exegetes exegetical exercise exercised exerted exhausted exile exiled exiles exilic exist existed existence existing exists exit exited exiting exodus exonerate expand expanded expanding expansion expect expectation expectations expected expects expedient expedition expeditions expense experience experienced experiment experimentation expert expiate explain explained explains explanation explanations explanatory explicable explicit explicitly exploits exponents express expressed expresses expressing expression expressions expressly extant extend extended extending extends extension extensions extensive extent external extra extracted extraordinarily extraordinary extremely eye eyes f fabrication face faced facie facilitated facilities facility fact factors facts factual factually faded fail failed failing fails failure fairly fairness faith fall fallen fallow falls false falsified familiar families family famine famous fanciful far farm farmer farming fascination fashion fashioned fast fat fatal fate father fathered fathering fathers fault faulty favour favourable favoured favours fear fearful feast feature features fed feed feedback feeds feel feeling fell felt festal festival festivals fetched few fewer ff fiction fictional fictitious field fields fifth fifty fight fighting figure figures file filename filenames files fill filled filling fin final finally find finding finds fine finer fingers finish finished fire firmly first firstborn firstly fit fitness fits fitted fitting five fix fixed flavour fled fleece flexibility flimsier flip flock flocks flood floor flower flowered flowers flowing fluorescent flushed flying foe fold folder folio folk folktale follow followed following follows fond font fonts food foot footnote for force forced forces forcing forefathers foreign forever forget forgot forgotten form formal format formation formats formatted formatter formatting formed former formerly forms formula formulae forth fortuitous fortuitously fortunate fortunately fortunes forty forward forwards fought found foundation foundations founded founder four fourth fraction fractionally fractions fragment fragmentary fragments framework free french frenzy frequency frequent frequently fresh freshly friend friendly friendship fringe fringes from front frost fruit frustrate frustrating fulfil fulfilled fulfilment full fully fun function functions fundamental fundamentalist fundamentally further furtherance furthermore future g gain gained gains gap gaps garden gate gatekeeper gatekeepers gates gauged gave gem genealogical genealogies genealogy general generally generate generated generates generation generations generic genesis genre gentilic genuine genuinely geographical geography geological german germanic get getting giants give given gives giving glad glance glaring glass global globally gloomy gloss glossaries glossary glosses gnawing go god goddess goddesses gods goes going golden gone good got govern governed governing government governor governorship grab grammar grand grandfather grandson grant granted granting graphic grass grateful gratitude gratuitously graze grazed great greater greatest greatly green greeted grew grey grid ground grounds groundwork group groupings groups grow grown guaranteed guard guarded guess guesswork guide guided guidelines guise guises gurgles h had half halfway halt halted halve halved halving hand handbook handful handle handled handling hands handwritten hang hanging haplography happen happened happens happily happy harass harassment hard hardly hardware harm harmonious harmonistic harmonization harmonizations harmonize harmonized harmonizer harmonizes harmonizing harmony harvest harvested harvesting harvests has hash hat have having hay hazardous he head headed header heading headings headline heads hear heard hearing heart heat heaven heavily heavy height heir heirs held help helped helpful helps hence henceforth her here hereof heresy hero heroes hidden hide high higher highlight highlighted highly him himself hint hints his historian historians historical historically historicity histories historiographical historiography history hit hither hoc hold holding holds holiness holy home homes homework homily homoearchon hooked hope hopefully horizontal horizontally horn horse horses hospitality host hostile hostility house houses how however human humanity hundred hundreds hunger hungry hyphens hypocoristic hypotheses hypothesis hypothetical hypothetically i ibid idea idealized ideally identical identically identification identified identifies identify identifying identity ideological ideology idiosyncratic idols if ignorance ignorant ignore ignored ignores ignoring ii iii ill illegitimate illness illogical illogicality illogically illusory illustrate illustrated illustrates illustrious imaginary imagination imagine immediate immediately immense imminent immortal immortality impact imperative imperfect imperfectly impiety implausibility implement implementation implementations implemented implicate implicated implication implications implied implies imply implying import importance important importantly imported impose imposed imposing imposition impossible impossibly impractical impracticality impress impression impressive imprison imprisoned improbable impropriety improve improved impurities in inaccuracy inaccurate inactivity inadequate inadequately inadvertent inadvertently inapplicable inappropriate inappropriately inaugural inaugurated inauguration inbuilt incandescent inch inchoative incident incidentally include included includes including inclusion inclusive inclusively incompatible incompetence incompetent incomplete inconceivable inconclusive incongruously inconsistencies inconsistency inconsistent incontrovertible incorporate incorporated incorporates incorporating incorporation incorrect increase increased increases increasing incredulity increment incremented increments incur incurred incursions indeed indefinite indefinitely indent indentation indented indenting indents independence independent independently index indicate indicated indicates indicating indication indications indirect indirectly individual individuals induce induced induces inescapable inessential inevitable inevitably inexact inexactitude inexhaustible inexplicable infer inference inferences inferior inferred inferring infers infinite infinitive inflicted influence influenced influences influential information informing informs infrequency infrequent ingathering inhabit inhabitants inhabited inherent inherently inherit inheritance inherited inhibit inhospitality initial initialization initialize initialized initially initiated injustice inner innumerable input inscribed inscription inscriptions insecurity insensitive insert inserted inserting insertion inserts inside insights insignificant insignificantly insistence insomnia inspection inspired install installation installations installed installing instance instances instead institute instituted institution institutions instruct instructed instruction instructions insufficient intact integer integral intelligence intelligible intend intended intending intends intent intention intentional intentioned interchange interchanged interdependence interdependent interest interested interesting interestingly interests interface interference interlude intermediate internal internally international interpret interpretation interpretational interpretations interpreted interpreters interpreting interregna interregnum interrelated interrupts intersection interspersed interval intervene intervened intervening intervention into intrigue intrigues intrinsically introduce introduced introduces introducing introduction introductory intrusive inundation invade invaded invades invalid invalidate invalidated invariably invasion invent invented inventing invention inverted investigate invited invocation invoke invoked invokes involve involved involvement involves involving ironically irreconcilable irregular irrelevant irrespective irretrievable irretrievably is isolated isolation issue issued it italic item items itinerant its itself j jewels jewish jews join joining joins joint journey jubilee jubileen jubileens judge judged judgement judgements judges jumble jump jumped june just justice justification justifications justified justify justly juxtapose juxtaposed juxtaposition k keep keeping kept key keyboard keypad keys keystroke keystrokes kill killed kills kilometre kilometres kind kindly king kingdom kingdoms kinghip kinglist kinglists kings kingship kingships kits knew know knowing knowledge known knows l label labelled labour labours lack lacked lacking lacks laid lamb lambs lament lamented land landed lands language languages lapsed large largely larger last lasted lasting lasts late later latest latter lattice launch launching law lawbook lawless laws lay layout lead leader leadership leading leads leafy leans leap learn learned learning learnt least leave leaves leaving led leeway left legend legendary legends legislate legislation legislature legitimate lends length lengthen lengthened lengthening lengths lengthy leprosy less lesser lest let letter letters level liberate liberation library lie lies life lifespan lifespans lifetime lifetimes light like likelihood likely likewise limit limitation limitations limited line lines linguistic linguistically link linkable linked linker linking links list listed listen listened listing listings lists literal literally literary literature little live lived lives living ll load loaded loading loads loan loanword loanwords loc local locally located location lock log logical logically long longer longevity longing look looked looking looks loop loops loose loosely lord lose loses losing loss losses lost lot lots love loved low lower lowered lowering loyal ltd luck lunar lunch lunisolar m macro macros mad made magnetic magnitude mail main maintain maintained maintaining maintains major majority make makes making maltreat maltreated man managed manifest manifested manifestly manipulate manipulation mankind manner manual manually manuscript manuscripts many map mapped mar march marched marching margin margins mark marked marker markers marking marks marriage marriages married marrying mask masoretic mass massacre masts match matched matches matching material materialize materially materials matrix matter matters maximize maximum may me mean meaning meaningful meaningfully meaningless means meant measure measures meat mechanical mechanically media mediaeval medium meet meeting member members memo memoir memory men mend mention mentioned mentioning mentions menu menus mercy mere merely merge merging merits meritsn mess message messages messenger messengers met metaphor metaphors method methodological methodology methods mid middle midrash midrashic midway might mighty migrating migration mile miles military mill millennia millennium miller mind mine mingled mingling minimal minimizing minimum ministries ministry minor minority minus minuscule minuscules minute minutes miracle miraculous mirror mirrored mirroring miscalculate miscalculated miscalculation miscalculations mischance misfortune misguided mislead misleading misplaced misprint misread misreading miss missed misses missing mistake mistaken mistakenly mistakes mistranslation misunderstand misunderstanding mix mixed mixes mixture mnemonic mode modelled models modern modes modest modification modifications modified modifier modify modifying moment monarch monarchic monarchy money monitor mono monochrome month months monument monumental mood moon moons moral morals more morever morning morphosyntactic morphosyntactically mortal mortals mosaic most mostly mother motif motivated motivation motivations motive mount mountain mountains mouse mouth move moved movement movements moves moving mt much mud muddle multiple multiples multiplicity multiplied murder murdered must mustered mutilation mutually my myself mysterious mystical myth mythical mythicizing mythology myths n name named namely names namesake narrate narrated narrative narratives nation national nationalistic nationality nations natural naturally nature nd near nearby nearly neat neatly neatness necessarily necessary necessitate necessitated necessitates necropolis need needed needs needy negated negative neglectful negotiate neighbour neighbouring neighbours neither nested nesting neutral never nevertheless new newline newly newpage news newsletter next nice night nine nineteenth ninety ninth no noble nobles nobody noise noisy nomads nominal non none nonetheless nonsense nonsensical nor normal normally north northern not notable notably note noted notes noteworthy nothing notice noticeable noticed notices notify noting notion notorious nought noun now nuances nucleus null number numbered numbering numbers numeral numerals numeric numerical numerous o obedience obey object objection objections obligation obscure obscured observation observations observe observed observes observing obtain obtained obviated obvious obviously occasion occasionally occasioned occasions occupant occupants occupied occupies occupy occur occurred occurrence occurrences occurring occurs oceans odd oddly of off offer offered offering offers office official officially officials offset offspring oft often ok old older oldest omission omissions omit omits omitted omitting on once one ones ongoing only onto open opened opening openly operate operated operates operating operation operational operations opinion opinions opportunity opposed opposing opposite opposition oppress oppressed oppression oppressions oppressive oppressor optical optimal optimized option optional optionally options or oracle oracles oral orange order ordered ordering orders ordinal organization organize organized orient oriental origin original originality originally originated originating orthodox ostraca other others otherwise ought our out outline outlined outlining outlive outlived output outright outside over overall overcome overhead overlap overlapped overlapping overlaps overlooked overlooks overrides oversight overt overtaken overtly overwrite overwrites overwriting overwritten owe owes own owned owner owners ox p package pad pagan page pagefooting pageheading pages pagination paid paint painted pair palace palestine palestinian panel panic paper papyrus par paraded paradigm paradigms paradise paradox paradoxical paradoxically paragraph paragraphs parallel paralleled paralleling parallelism parallels parameter parameters paraphrase paraphrases pardon part partial partially participated participation participle particular particularly partly parts pass passage passages passed passes passim passing passover past paste pasted pat patch patched patently patriarch patriarchal patriarchs pattern patterns pause pay paying payment payments peace peaceful peak peasant peculiar pen penance penchant penetrate pentateuch people peoples per perceived perennial perfect perfectly perfects perform performed performs perhaps period periodic periodization periods permanent permanently permission permitted perpetrate perpetrator perpetrators perpetuity perplex perplexing persia persian person personal perspective persuade persuaded persuasions persuasive pertinent perverse perversity pest pharaoh phase phases phenomena phenomenon philological philology philosophers phrase phraseology phrases physical pica picture pictures piece piled pillar pins pious pitch pity place placed places placing plainly plan planned plans plant platform plausibility plausible plausibly play played playing pleading pleasant please pleased plenty plunder plundered plural plus pluses poems point pointed pointer pointers pointless points poisoned polar polarized policies policy polish polished political politically politician poor pope popular population populations portability portable portion portions pose posed poses posit posited positing position positioned positioning positions positive posits possess possesses possession possessive possibilities possibility possible possibly post postage postdated postdating postdiluvian postdiluvians postexilic posting postpone postscript postulate postulating potential power pp practical practically practice practices practise practised practises pre preached preacher precariously precaution precautions precede preceded precedent precedes preceding precious precise precisely precision precluded predate predated predecessor predecessors predefined predefines predictable predicted prediction predictions predicts predilection predominate predominates preface prefacing prefer preferable preference preferred preferring prefers prefiguring prefix preformatted prehistory preliminary prepare prepared presence present presentation presented presenting presents preserve preserved preserves preserving press pressed pressing presumably presuppose presupposed presupposes presupposing presupposition presuppositions pretty prevent prevented preventing prevents previous previously price priest priesthood priestly priests prim prima primaeval primarily primary prince principal principle principles print printable printed printer printers printing prior priori prism prison private prize pro probability probable probably problem problematic problematical problems procedure procedures proceed proceeded proceeding proceeds process processed processes processing processor processors proclaim proclaimed proclamation produce produced produces producing product products profession professional professor profound program programme programmer programmers programs progress progression progressively prohibited prominence prominent promise promised promises prompt prompted promptly prompts promulgate promulgated proof proper properly property prophecies prophecy prophet prophetess prophetic prophets proponent proponents proportion proportional proportions proposal proposals propose proposed proposes prostitute protect protecting protection proto protracted proud prove proven proves provide provided provides providing province provinces proving provision proximity prudent psalm pseudo public publication publications publicly publish published publishing pulled punctuation punish punished punishment pure purely purge purges purification purified purportedly purporting purpose purposes push pushed put putative puts putting puzzle puzzlement q qua qualifications qualified qualifier quality quarry quarrying quarter quarters queen quem question questionable questioned questions quick quickly quiet quit quite qumran quotation quote quoted quoting r rabbi race radiate radiating radical radically raids rain raise raised raises raising ram ran randomly range ranges ranks rare rarely rate rates rather rational rationalization rationalizing rd re reach reached reaching react reacted reaction read readable reader readers readership readily reading readings readjust readopt readoption reads ready real realise reality realization realize realized realizing really realms reappear reappears rearrange reason reasonable reasonably reasoning reasons reassign reassigned rebel rebelled rebellion rebellious rebels rebuild rebuilding rebuilt recall recalls recapture recaptured recapturing receipt receive received recension recensional recensions recent recently recipient recipients reckon reckoned reckoning recognition recognize recognized recognizes recommend recommended recompile recompiling reconcile reconciled reconciling reconsider reconstruct reconstructed reconstructing reconstruction reconstructions reconstructs record recorded records recount recounted recounts recover recovering recovery recreate recreated rectangle rectify recur recurrence recurs redaction redactional redactor redactors redated redefine redefined redifferentiate rediscover rediscovered redisplayed reduce reduced reduces reducible reducing reduction reductions reexamine refer reference references referred referring refers refitting reflect reflected reflecting reflection reflects reform reformat reformatting reformed reforms refoundation refresh refuge refusal refuse refused refuses refutation refute refuted regain regard regarded regarding regency regent region registers regnal regular regularly regulating reign reigned reigns reinforce reinstated reinterpretation reinterpreted reinterpretion reintroduced reintroduction reiterated reject rejected rejecting rejection rejects rejoice rejoicing rejuvenation relate related relates relating relation relations relationship relative relatively release released releasing relevance relevant reliability reliable relied relief relieve religion religions religious reluctance reluctant rely remain remainder remained remaining remains remark remarkable remarkably remarked remarks remarried remedy remember remembered remembering remembers reminder reminiscent remitted remnant remote removal remove removed removes removing rename renamed renaming rend render rendezvous renew renewal renewed renews renumber renumbered reopening reorganize reorganizing repair repaired repairs repeat repeated repeatedly repeats repetition repetitive replace replaced replacement reply report reported reporter reporting reports represent representation representations representative represented representing represents reprisals reproduce reproduced repulse repulsed reputation request requests require required requirement requires requiring rescued research resemble resemblence resembles resembling resenting reservations reserve reserved reserves reset reshape reshaped resident resist resistance resisting resists resizing resolution resolve resolved resolves resolving resort resorts resource resources respecified respect respective respectively respects respond responded response responsibility responsible rest restart restated rested resting restoration restore restored restores restraint restraints restrict restricted restrictions restricts rests restyle result resultant resulted resulting results resume resumed resumes resuscitated retain retained retaining retains reticent retreated retrieval retrieve retrospective retrospectively return returned returning returns retyping reveal revealed reveals revelation revelations reverse reversed reverses reversing revert reverted reverts review revise revised revisers revising revision revisions revocalized revolt revolted revolts reward rewarded rewarding rewards rework reworking rewrite rewriting rewritten rhetorical rich right rightly rights rigid ripe ripen ripening rise rising risk ritual rituals rival river rivers road rock rod rode role roman room root rose rough roughly round rounded roundly route routine routines row rows royal rubber rule ruled ruler rulers rules run running runs rush s sabbath sabbatical sacrifice sacrifices sacrificing sadly safe safely safer safety said sailing saint salt same sample satisfactorily satisfactory satisfy save saved saving say saying says scale scaled scaling scanning scant scarcely scathing scene scenes sceptical schematic schematism schematization schematized schematizing scheme schemes scholar scholarly scholars scholarship school science sciences scientific scope scorpion scrambled screen screens scribal scribe scribes scriptural scripture scriptures scroll scrolled scrolling scrolls scruples sea seal seals search searched searches searching season seasonal seasons second secondarily secondary secondly seconds secret secrets section sections secure securely security seduced see seed seeing seeks seem seemed seemingly seems seen seer sees seize seized select selected selecting selection selective selector self semantic semantics semi semicolon seminar semitic send sending sends sense sent sentence sentiments separate separated separates separation separator september sequence sequences sequential sequentially series serious seriously seriousness serpent serpents servant servants serve served serves service servitude session sessions set sets setting settings settle settled settlement seven seventeenth seventh seventy several severed sewn shabby shade shaded shaky shall shameful shape shaped shapes share shared shares shatter shattered she shear shed shedding sheds sheep sheet shells shepherd shift shifts shines ship shone shop short shortcomings shorten shortened shortening shorter shortly should show showed showing shown shows shrine shrines shrink shun shut shutting sic sick side sided sides siege sieges sight siglum sign significance significant significantly signs silence silent similar similarities similarity similarly simple simpler simplest simplicity simplified simplify simply simulated simultaneous simultaneously sin since sincerely sinful singing single singled singular sins sisters sit sitting situation situations six sixteenth sixth sixty size sizing skills skin skins skip skipped sky slab slabs slash slaughter slaughtered slay sleep slept slight slightly slot slots slow slower slowly small smaller smith smiths smoke smooth smoothly snake snatch snatched snow so social societies society sociological sociologist sociology soft software solar sole solely solid solution solutions solve some somehow someone something sometimes somewhat somewhere son sons soon sorry sort sorts sought sound sour source sources south southerly southern sow sowing sown space spaces spacing span spanned spanning spans spare sparing sparingly speak speaking speaks special specialized specially specific specifically specification specified specifies specify specifying spectrum speculate speculates speculations speech speed speeds spell spelling spellings spelt spend spent split spoke spring sprint square st stable stack stacked stage staged stages stamp stamps stand standard standards standing stands star stark starred start started starting starts state stated statement statements states stating status statutory stay steadily steady stealing stelae stele stem step steppe stereotyped stick still stimulating stole stomach stone stones stops storage store stored stories storm storming story straight straightforward strange strangely strangers strata stratum stream streaming streams street strength strengthened strengthens stress stresses stretch stretched stretching strict strictly strife striking strikingly string strings stripped strong strongest strongly struck structurally structure structures struggle studies study stuff stunning style styles stylistic stylistically subdivided subheading subject subjected subjects subjugate subjugated submerge submerged submerging submission submit submitted subscript subsection subsequent subsequently subset substantial substantially substitute substituted substituting subsumed subtract subtracted subtracting subtraction subtracts succeed succeeded succeeds success successes successful successfully succession successions successive successor successors such suckled suddenly sufficient suffix suffixes suggest suggested suggesting suggestion suggestions suggests suicide suitable suitably suitcases suited sum sumer sumerian summaries summarize summarized summarizes summarizing summary summer summoned sun sunlight sunny sunrise super superficial superficially superimposed superior supernatural superscript superscription superstition supplement supplementary supplemented supplementing supplied supply support supported supporters supports suppose supposed supposedly supposes supposing supposition suppress suppressed suppression sure surely surfaced surplus surprise surprising surprisingly surrender surrendered survey survival survive survived surviving survivor susceptible suspect suspected suspects suspension suspicion suspicious suzerainty swap switch switched switches switching sword sychronistic symbol symbolic symbolically symbolism symbols symmetrical symmetrically symmetry sympathy synchronism synchronisms synchronistic synchronize synchronized synchronizing synonym synonyms syntactic syntax synthesizing system systematic systems t tab tabernacle table tables tablets tabs tabulated tacitly tacked tail take taken takes taking tale talents talk talking target targum task tasks teach teaching technical technique techniques telephone telescope telescopes tell tells template templates temple temporal temporary tempting ten tend tended tendency tends tens tension tensions tent tenth tenuous term terminal terminals terminate terminated terminates terminating terminator terminus terms terrify terrifying territories territory tertiary test testament tested testing text texts textual textually th than thank thanks that the their them thematic themselves then theological theophoric theoretical theoretically theories theory there thereabouts thereafter thereby therefore thereof thereupon therewith these thesis they thick thin thing things think thinking third thirds thirty this thither thorough thoroughly those though thought thoughts thousand thousands threat threatened threats three throne through throughout thrown thrust thus tick ticked ticks tidiness tidy tied ties till time times tiny tips title titled to together toggle toggles token told tolerable tolerated tongue tongues too took top topic topics topple toppled tore torrents total totalled totalling totally totals touched towards tower towns trace traced traces track tractate tractor trademark trademarks tradition traditional traditionally traditions trailing training tranquil tranquillity transcribe transcribed transcribing transcriptions transfer transform transformations transformed transition transitional transitory transjordanian translate translated translates translation translations translator transmission transmitted transparent transparently transpose transposed trap trappings travel travelled travelling treason treated treats tree trees trial tribe tribes tributaries tributary tribute trick tricks tricky tried tries trip triplets triumph triumphal trivial troops trouble true truer truly trumpet trumpeter truth truthful truthfulness try trying tuning turn turned turns tutorial twelve twentieth twenty twice twin two type typed types typesetting typewriter typewriters typical typically typing typographical u ultimate ultimately unabbreviated unable unaccounted unadjusted unaffected unaltered unambiguous unambiguously unanimity unattested unavailable unaware unbroken unburied uncertain uncertainties uncertainty unchanged uncharacteristic uncharacteristically uncharitable unchecked unclean unclear unclouded uncommon unconcerned unconvincing unconvincingly uncritical undated under underestimate underestimated underestimates undergone underlie underlies underline underlined underlines underlining underlying undermine undermines underneath underscore understand understandable understandably understanding understate understates understood undertaken undertaking undertook underway undiminished undisputed undo undoubted undoubtedly unequivocal uneven unfamiliar unfinished unfortunate unfortunately unfulfilled ungrammatical ungrammatically unhampered unhappy unidentified uniform uniformly unimportant unintended unintentional unions unique unit united units universal universally universe university unjustified unknown unlamented unlawfully unleavened unless unlike unlikely unmentioned unmistakable unnecessary unnoticed unobvious unoriginal unpalatable unparalleled unpleasantly unpublished unreasonable unreasonably unrecognized unrelated unreliable unrevised unsigned unspecific unspecified unspoken unstated unsuccessful unsuccessfully unsuitability unsupported untenable until untouched untrue untypical unused unusual unusually unwilling up update updated updates updating upkeep upon upper urged us usage use used useful usefully useless user users uses using usual usually usurpation utilities utility utilized utopian ux v vacated vague vagueness vaguer valid validating validity valley valuable value values variable variables variance variant variants variation variations varies variety various variously vary varying vassal vassals vassalship vengeance verb verbatim verbs verify versa verse verses version versions versus vertical vertically very vestige vestiges vi vice vicinity victor victory video view viewed viewpoint views village villages vindicate vindicated vindication violate violence violent virgin virtual virtually virtue visible vision visit visiting visitors visits visual vitiate vitiated vitiates viva vocabulary vols volume volumes vulnerable w wail wait waited walks wall walls wander wandered wandering wanders want wanted war warm warmth warn warned warning warns warranties warranty wary was washed wasteful watch watched watching water waters watery way ways we weak weaken weakened weakness wealth weather weathered week weeks weight weights welcome welcomed well went were west western what whatever wheel when whenever where whereas whereby wherever whether which whichever while white who whoever whole wholly whom whose why wickedness wide widely wider widespread width wife wild wilderness wilful wilfully will win wind window windows winds windy wings winter wipe wired wisdom wise wisest wish wished wishes wishing with withdrew withhold withholding within without witness witnesses wives wolves woman women wonder wondrous wood woodlands woolly word wordplay wordprocessor wordprocessors words work worked workers working works world worrying worse worsened worship worst worth worthless would wound wounded wrap wrapped wrapping wraps wrath wrinkled write writer writers writes writing writings written wrong wrongly wrote x y year yearly years yellow yes yet yield yoke you young younger your yours yourself youth z zero andover hampshire winchester basingstoke sir sofas model contour upholster allergy causing sales retailer trading delivery sore runny nose pain factory warehouse dust fluff cleaned particles sofa float unsuitable subsided spreads symptoms doctor moth inhibitor spray furnishings uncovering blisters red rash clogged protected prolonged itchy mr fabric polyester viscose cotton swatch dralon certificate disappointed visited unfit sold collect refund defect yourselves manufacturer satisfied customers furniture cooper mrs /*N Hi-Q -- by Tom Bajoras, written in Megamax C *N/ /*. define things .*/ /* alert strings */ #define BADRSRC "[1][Unable to load the|resource file.][Sorry]" #define CHEKQUIT "[3][Are you SURE you|want to quit?][Cancel|Quit]" #define RSRCNAME "HI-Q.RSC" /* name of resource file */ #define NROWS 7 /* # rows and # columns on playing board */ #define NCOLS 7 #define NROWS3 2 /* # rows and # columns /3 */ #define NCOLS3 2 #define PEGPHASE 0 /* waiting for click on peg */ #define HOLEPHASE 1 /* waiting for click on hole */ #define MAXCOUNT 32 /* starting # of pegs */ #define ROOT 0 /* starting level for AES object draw */ #define MAX_DEPTH 8 /* max depth for AES object draw */ #define SELECTED 0x1 /* object state bits */ #define OUTLINED 0x10 /* object numbers from resource file */ #define MAINDIAL 0 #define HIQ_0_4 6 #define HIQ_1_4 7 #define HIQ_0_3 9 #define HIQ_0_2 8 #define HIQ_1_3 10 #define HIQ_1_2 11 #define HIQ_HELP 12 #define HIQ_2_0 14 #define HIQ_2_1 15 #define HIQ_4_0 17 #define HIQ_3_0 16 #define HIQ_3_1 18 #define HIQ_4_1 19 #define HIQ_2_2 21 #define HIQ_3_2 22 #define HIQ_4_2 23 #define HIQ_3_3 25 #define HIQ_2_3 24 #define HIQ_4_3 26 #define HIQ_2_4 27 #define HIQ_4_4 29 #define HIQ_3_4 28 #define HIQ_4_5 31 #define HIQ_3_5 33 #define HIQ_4_6 32 #define HIQ_2_5 34 #define HIQ_3_6 35 #define HIQ_2_6 36 #define HIQ_5_2 38 #define HIQ_5_3 39 #define HIQ_6_2 41 #define HIQ_5_4 40 #define HIQ_6_3 42 #define HIQ_6_4 43 #define HIQ_QUIT 46 #define HIQRESET 45 #define HIQCOUNT 44 #define HELPDIAL 1 /*. global variables .!*/ int dummy; /* throw-away integer */ int gl_hand; /* VDI handle */ int *mainaddr,*helpaddr; /* pointers to dialog box trees */ int dial_x,dial_y; /* coordinates of centered dialog boxes */ int dial_w,dial_h; int curr_r,curr_c; /* currently selected peg (row #, column #) */ int count; /* current population (1-32) */ int lowest=MAXCOUNT; /* best (lowest) score since boot-up */ int pegs[NROWS][NCOLS]; /* the population: 1 peg, 0 hole */ int exist[NROWS][NCOLS]; /* whether each peg is on the playing board */ int objects[NROWS][NCOLS] = /* map gameboard to GEM objects, -1 for any !that aren't on the playing board */ { -1, -1, HIQ_0_2,HIQ_0_3,HIQ_0_4, -1, -1, -1, -1, HIQ_1_2,HIQ_1_3,HIQ_1_4, -1, -1, HIQ_2_0,HIQ_2_1, HIQ_2_2,HIQ_2_3,HIQ_2_4, HIQ_2_5,HIQ_2_6, HIQ_3_0,HIQ_3_1, HIQ_3_2,HIQ_3_3,HIQ_3_4, HIQ_3_5,HIQ_3_6, HIQ_4_0,HIQ_4_1, HIQ_4_2,HIQ_4_3,HIQ_4_4, HIQ_4_5,HIQ_4_6, -1, -1, HIQ_5_2,HIQ_5_3,HIQ_5_4, -1, -1, -1, -1, HIQ_6_2,HIQ_6_3,HIQ_6_4, -1, -1, }; /* communication with GEM */ int contrl[12], intin[128], ptsin[128], intout[128], ptsout[128]; /*. get pointer to an object's state .*/ int *ob_state(obj) register int obj; /* object number within main dialog tree */ { return( mainaddr + 12*obj + 5 ); } /*. get pointer to an object's width .*/ int *ob_width(obj) register int obj; /* object number within main dialog tree */ { return( mainaddr + 12*obj + 10 ); } /*. get pointer to an object's height .*/ int *ob_height(obj) register int obj; /* object number within tree */ { return( mainaddr + 12*obj + 11 ); } /*. set bit in object's state word .*/ set_obj(r,c,bit) register int r,c,bit; { *(ob_state(objects[r][c])) |= bit; } /*. clear bit in object's state word .*/ clr_obj(r,c,bit) register int r,c,bit; { *(ob_state(objects[r][c])) &= ~bit; } /*. main entry point .*/ main() { if (startup()) exec(); /* if init'n succeeded, do body of program */ finishup(); /* clean up before exiting */ } /*. initialize . */ /* return 1 for success, 0 for failure */ startup()  { register int i,r,c; int loc_in[11],loc_out[57]; /* initialize AES */ appl_init(); /* get VDI handle */ gl_hand= graf_handle(&dummy,&dummy,&dummy,&dummy); /* open VDI virtual workstation */ for (i=0; i<10; i++) loc_in[i]=1; loc_in[10]= 2; v_opnvwk(loc_in,&gl_hand,loc_out); /* arrow mouse */ graf_mouse(0); /* load resource file, abort if it can't be loaded */ if ( !rsrc_load(RSRCNAME) ) { form_alert(1,BADRSRC); return(0); } /* get pointers to dialog box trees */ rsrc_gaddr(0,MAINDIAL,&mainaddr); rsrc_gaddr(0,HELPDIAL,&helpaddr); /* set up existence array: each cell exists only if it is within the middle horizontal third or middle vertical third */ for (r=0; r(2*NROWS3)) ) if ( (c(2*NCOLS3)) ) exist[r][c]=0; } /* get coordinates for centered dialog boxes (they are assumed to be exactly the same size) */ form_center(mainaddr,&dial_x,&dial_y,&dial_w,&dial_h); form_center(helpaddr,&dummy,&dummy,&dummy,&dummy); /* successfully initialized */ return(1); } /*. clean up and terminate .*/ finishup() { /* close VDI workstation */ v_clsvwk(gl_hand); /* clean up AES */ appl_exit(); } /*. body of program .*/ exec() { register int exitobj=HIQRESET; /* reset game before first turn */ register int phase; /* alternates PEGPHASE/HOLEPHASE/... */ register int r,c; int done; int mid_r,mid_c,mbuttons; do { done=0; /* default: don't quit */ switch (exitobj) { /* Quit button was clicked on */ case HIQ_QUIT: done= form_alert(1,CHEKQUIT)-1; break; /* Reset button was clicked on */ case HIQRESET: if (count=NROWS3) { jumped= pegs[r-1][c] && exist[r-1][c]; jumped_to= !pegs[r-2][c] && exist[r-2][c]; if (jumped && jumped_to) return(1); } /* jump down? */ if (r<=2*NROWS3) { jumped= pegs[r+1][c] && exist[r+1][c]; jumped_to= !pegs[r+2][c] && exist[r+2][c]; if (jumped && jumped_to) return(1); }  /* jump left? */ if (c>=NCOLS3) { jumped= pegs[r][c-1] && exist[r][c-1]; jumped_to= !pegs[r][c-2] && exist[r][c-2]; if (jumped && jumped_to) return(1); } /* jump down? */ if (c<=2*NCOLS3) { jumped= pegs[r][c+1] && exist[r][c+1]; jumped_to= !pegs[r][c+2] && exist[r][c+2]; if (jumped && jumped_to) return(1); }  return(0); } /*. (re)init pegs .*/ resetpegs() { register int c,r; /* all existing cells have pegs -- */ for (r=0; r. ,mainaddr 2< HЁм `1 1 >N^Nu$0 ob_width NV$2 ?>. ,mainaddr 2< HЁм`3 3 >N^Nu$2 ob_height NV$4 ?>. ,mainaddr 2< HЁм`5 5 >N^Nu$4 set_obj NV$6 H>.<. :. /02Aobjects ҈ A?Nob_state T" @0E07 LN^Nu$6 clr_obj NV$8 H>.<. :. 2FA/02Aobjects ҈ A?Nob_state T" @0A09 LN^Nu$8 main NV$10 Nstartup J@g12 Nexec 12 Nfinishup 11 N^Nu$10 _initargcv Nustartup NV$13 HNappl_init Hldummy Hldummy Hldummy Hldummy Ngraf_handl 9@gl_hand BG`15 16 0A017 RG15  G m16 18 =|HnxHlgl_hand HnNv_opnvwk  BgNgraf_mouse Ts! s! HI-Q.RSCmain Hls! Nrsrc_load XJ@f19 s! .[1][Unable to load the|resource file.][Sorry]main Hls! ?<Nform_alert \0<`14 19 Hlmainaddr BgBgNrsrc_gaddr PHlhelpaddr ?<BgNrsrc_gaddr PBF`20 21 BE`24 25 02Aexist ҈ A0 Fm29  Fo28 29  Em31  Eo30 31 02Aexist ҈ ABP30 28 26 RE24  Em25 27 22 RF20  Fm21 23 Hldial_h Hldial_w Hldial_y Hldial_x /,mainaddr Nform_cente Hldummy Hldummy Hldummy Hldummy /,helpaddr Nform_cente 0<`14 14 LN^Nu$13 xfinishup NV$32 ?,gl_hand Nv_clsvwk TNappl_exit 33 N^Nu$32 exec NV$34 H><-36 Bn0`39 39 |.g40 `42 40 s! 2[3][Are you SURE you|want to quit?][Cancel|Quit]main Hls! 8?<Nform_alert \S@=@`41 `43 42 |-g43 `44 43  l count l46 Nresetpegs 0<9@curr_c 9@curr_r BF9| count Nresetobjs Ninitscreen 46 `41 `45 44 | g45 `47 45 ?,dial_h ?,dial_w ?,dial_y ?,dial_x ?<Bg/,helpaddr Nobjc_draw ?73 Hldummy HnHldummy Hldummy Ngraf_mksta 74 0.f73 75 72 37 0.g36 38 35 LN^Nu$34 can_it_jum NV$76 H>.<. Gm78 :2Apegs ҈ A:g79 :2Aexist ҈ A:79 V|82Apegs ҈ A8WJg80 82Aexist ҈ A880 V|0g81 0g81 0<`77 81 78  Gn82 :2Apegs  ҈ A:g83 :2Aexist  ҈ A:83 V|82Apegs ҈ A8WJg84 82Aexist  ҈ A884 V|0g85 0g85 0<`77 85 82  Fm86 :2Apegs ҈ A:g87 :2Aexist ҈ A:87 V|82Apegs ҈ A8WJg88 82Aexist ҈ A888 V|0g89 0g89 0<`77 89 86  Fn90 :2Apegs  ҈ A:g91 :2Aexist  ҈ A:91 V|82Apegs ҈ A8WJg92 82Aexist  ҈ A892 V|0g93 0g93 0<`77 93 90 0<`77 77 LN^Nu$76 resetpegs NV$94 HBF`96 97 BG`100 101 02Aexist ҈ A0g104 02Apegs ҈ A0`105 104 02Apegs ҈ ABP105 102 RG100  Gm101 103 98 RF96  Fm97 99 Blpegs 095 LN^Nu$94 resetobjs NV$106 HBG`108 109 BF`112 113 02Aexist ҈ A0g116 02Apegs ҈ A0g117 ?<??Nset_obj \`118 117 ?<??Nclr_obj \118 0lcurr_r f119 0lcurr_r f119 ?<??Nset_obj \`120 119 ?<??Nclr_obj \120 116 114 RF112  Fm113 115 110 RG108  Gm109 111 107 LN^Nu$106 initscreen NV$121 ?,dial_h ?,dial_w ?,dial_y ?,dial_x ?<Bg/,mainaddr Nobjc_draw Nshowcount 122 N^Nu$121 showcount NV$123 s! Count: main Hls! jHnNstrcpy PHn?,count Nencode \HnHnNstrcat PHnHn?<,/,mainaddr Nobjc_offse Hn?.?.?,gl_hand Nv_gtext  s! Lowest: main Hls! tHnNstrcpy PHn?,lowest Nencode \HnHnNstrcat PHn0.|??.?,gl_hand Nv_gtext  124 N^Nu$123 encode NV$125 4H>.&n 0<02H A0<02H HAA@B+126 LN^Nu$125 draw_peg NV$127 H>.<. :2Aobjects ҈ A:HnHn?/,mainaddr Nobjc_offse ?Nob_width T @=P?Nob_height 0T @=P0.P@?0.P@?0.Y@?0.Y@??<Bg/,mainaddr Nobjc_draw 128 LN^Nu$127 A` DN N*O*m - ЭЭм!"ҍ¼.A// Bg?<JNA m"m -So Q m -SBQ(m)M*mN lHhNLX/,?,N$\?<N?<A?<NAXNuNV?>. ,2< HЁм `>N^NuNV?>. ,2< HЁм`>N^NuNV?>. ,2< HЁм`>N^NuNVH>.<. :. /02A҈ A?NTT" @0E0LN^NuNVH>.<. :. 2FA/02A҈ A?N T" @0A0LN^NuNVNJ@gNNjN^NuNuNVxHN HlHlHlHlN 9@BG`0A0RG G m=|HnxHlHnN BgN THlN NXJ@fHl ?<N Z\0<`HlBgBgN <-Bn0`|.g`Hl8?<N 8\S@=@``|-g`4 l l"NX0<9@9@BF9| NNt``| g`?,?,?,?,?<Bg/,N 4?HlHnHlHlN0.f0.gLN^NuNVH>.<. Gm:2Aj҈ A:g:2A҈ A:V|82A\҈ A8WJg82A҈ A8V|0g0g 0<` Gn:2A҈ A:g:2A$҈ A:V|82A҈ A8WJg82A2҈ A8V|0g0g 0<`" Fm:2NAv҈ A:g:2A҈ A:V|82At҈ A8WJg82A҈ A8V|0g0g 0<` Fn:2Az҈ A:g:2A҈ A:V|82A|҈ A8WJg82A҈ A8V|0g0g 0<` 0<`LN^NuNVHBF``BG`P02A҈ A0g02Ax҈ A0`02Ax҈ ABPRG GmRF FmBlLN^NuNVHBG`BF`02A҈ A0gp02Ax҈ A0g?<??N`\`?<??N\0lf0lf?<??N,\`?<??N^\RF FmpRG Gm`LN^NuNV?,?,?,?,?<Bg/,NNN^NuNVHljHnN PHn?,N\HnHnNPHnHn?<,/,NHn?.?.?,N ~ HltHnNPHn?,N4\HnHnNRPHn0.|??.?,N 6 N^NuNVH>.&n 0<02H A0<02H HAA@B+LN^NuNVH>.<. :2A҈ A:HnHn?/,N?NNT @=P?NjT @=P0.P@?0.P@?0.Y@?0.Y@??<Bg/,NVLN^Nu)I)J"/0<NB"l$lNu    'NV9n0.| A" AA-H=|` nR2.AH0Rn nm/,N.X0,@N^NuNVA)HAr)HAP)HA@)H A4)H$A,)H(A)H?< NXT9l@0,N^NuNV?<NNX9@ g0<`0<N^NuNV?.?<LNXN^NuNV/ AZ&H`0+ |g/ N*X AZ"Ҽm?.NT&_N^NuNV/ &n/ NDXJ@g0<`00+ |g /+NXBk ?+ N,TJ@g0<`0<&_N^NuNVH&n0+ |f0<`.0+ |gV0+ |f0<`v0+ |g?<B?+ NhP?/+?+ N P @f0<`@k 0Hѫ`$ k o?<0+D@H/?+ NP'@&Bk0<LN^NuNV nl <`?.?./. ?<BNn -@ m .`?<?.B?<BND -@?<?.B?<BN* -@ nf .Ю -@ `$ nf .Ю -@ `0.g <`b . oHn . /?.?<@N Bg?./. ?<BN ]|9@ g <` `Bl . N^NuNV/.?<INr\N^NuNVBn`&0.A0nf0.ABPRn nLmN^NuNV?>.=|0A"HPgXHf0(>N^Nu)I)J)_NA"l$l/,NuNVH0&n$n -K`fS`f .`L N^NuNV n "n fN^Nu)I)JHl)_Hl" <sNB"l$lNuNV)n)n .мZ)@9|dBl9| n 9PN n 0A)HA)HA)HA)HN^NuNV9|eBlBl9nNXN^NuNV9n 9n Bn nR2.RnA|0f9|9|Sn0.9@9nNN^NuNV`4 nH| f?< ?<NjX nRH??<NRX0. Sn J@fN^NuNV` nRH??<N$X0. Sn J@fN^NuNV` nRH??<NX0. Sn J@fN^NuNVH0&n $KA-H nf?./ N4\=n`L nf?./ N`\=n`. nf?./ Np\=n`-KBn?.N6TJ@f`H| f |o@ H-@/./.?.?<@N 9@ Hg0<`0, n/./<?.?<@N 9@ @g0<`tRnR -@`R ned` 6.ƼЃ$@ H-@/./.?.?<@N 9@ Hg0<`0, nBl 0.L N^Nu9| C2222 222222 2 222222222"2$222222!2#2222222 222&2'2(22222)2*2+22CZ"2"2 2"2"2"22"2"2"22"2x9|XNuHI-Q.RSC[1][Unable to load the|resource file.][Sorry][3][Are you SURE you|want to quit?][Cancel|Quit] Count: Lowest: CON:AUX:PRT: A ::::$::^>f"HI-Q"BYTOM BAJORASHelpResetQuit HOW TO PLAY HI-QThe object of the game is to leaveas few pegs as possible. You removea peg from the board by "jumping" itwith another peg. Jumps are orthogonal,not diagonal as in checkers.To make a jump: Click with the mouse'sleft button on the peg that is tojump. (You can change your mind byclicking on it again.) Then clickon the hole to which the peg willjump. Note that the program preventsattempted illegal jumps.Good Luck!$+,/0< ,/ :Vr   @= @>  @? @@ @A@B @C" @H@I@J@K@L @M@N@O@P@Q@R@S@T @U @V %$  @W!@X"@Y#@Z$@[@\-&+ '@](@^)@_ *@`+@a%@b  n .@c",@i"@/@x@"@$@$@(@$@<' @d ! @ # @ # @ # @ %@'`.  13 5 2 11 7 14 6 3 10 12 1 15 9 4 8 16 5 8 11 3 13 9 15 14 1 2 6 7 10 12 4 16 9 5 10 6 4 1 3 8 2 14 13 12 7 11 15 16 6 11 8 12 10 13 15 7 3 4 2 9 1 5 14 16 8 6 10 15 11 13 14 2 4 1 3 12 5 9 7 16 4 8 15 12 5 6 10 7 11 1 3 14 9 13 2 16 15 6 1 14 4 9 13 10 5 11 2 12 3 8 7 16 7 5 4 14 15 9 6 12 2 1 11 8 3 10 13 16 2 9 12 5 11 7 6 14 1 13 8 10 15 3 4 16 14 2 12 9 11 13 1 5 3 10 8 4 7 15 6 16 15 14 13 12 11 10 9 8 7 6 5 4 2 3 1 16 14 9 12 4 15 8 13 6 11 3 10 1 7 2 5 16 15 14 12 9 4 5 6 7 13 10 11 1 3 8 2 16 4 14 12 9 6 1 5 11 10 15 2 8 13 3 7 16 4 5 11 9 1 14 2 8 3 12 10 7 6 15 13 16 3 6 2 11 5 12 14 7 4 8 15 9 1 10 13 16 2 14 11 7 3 10 12 9 5 1 8 13 4 15 6 16 7 5 8 14 2 11 15 9 10 13 6 12 3 1 4 16 5 13 1 9 2 8 4 6 3 7 12 14 11 10 15 16 13 2 6 1 3 5 9 14 7 15 12 4 8 11 10 16 t P i c t u r e P u z z l e - Written by Mark Wickham Using STOS Basic Picture Puzzle is based on the classic number square game where you have to arrange the numbers in the correct order. Picture puzzle is a little different as in you have to arrange a picture in the correct order. DEGAS PI1 and NEOCHROME pictures can be used in the puzzle so you can load your favourite picture into the puzzle. Everything is controlled via the mouse. To move a piece simply point and click on the piece you want to move. If at any time your not sure what the finished picture looks like then press the HELP key to display the picture, press any key to return to the puzzle. To quit the puzzle simply press the ESCAPE key. Picture puzzle should provide hours of fun trying to solve the puzzle in the quickest time with the least moves and help. NOTE : - Some pictures may not be suitable due to the palette obscuring the mouse pointer and the empty slot on the screen. 4wE0@p 0@P`p```````````````````````````?@?@ ``````````````````?@|????????????????????????<~ gggggggggggggggggggggggg?????????????????????@<~{{{{{{{{{{{{{{{{{{{{{{{{????????????????????? ?<?????????????????????????xxx=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=x=xppppppppppppppppppwpx|9@??8?@@~?@@?? @~{@`````````````````````??}@ ?} p<@} p```````````````@~ `???????????????????7 ~ ~gggggggggggggggggg???????????????30? > @>;;{{{{{{{{{{{{{{{???????????????/? ?A |???????????????~|?@@ uxxx=x=x=x=x=x=x=x=x=x=x=x=x=x=x=xpppppppppppppppy~ @ 9 @ ????? ?@ ? ?@ `???~~?  ~<  >~xq???{?```````````````??~~?>A?>x?@?ẇgggggggggggg????????????9@;{{{{{{{{{{{{????????????s @?????????????? ppxxx=x=x=x=x=x=x=x=x=xxxxpppppppppqpsπ?8q o`??8p?> o`??? ?o` P~~??o` Pp??q0H<@0?À~p9~>( 0??8??@3@ _|~?@w???P????```````cxd <??{?Ppp ?xq? d(~<8 ?  ````````` ?<???x???????{?8??~?}<?ǁ''gggffg ,?????????7>0?~>?~@~?{{{zz{4?????????6|1?||~N |p??||~~?|x xx=x=x=x<<= 8ppppppppp???q8 |x????>?q ???@1 9Ï<? ?xp;À߀? @s<|p@|0?@@c8>>>?8?@@?q<||?@@ǀ?|? ?   ??0??~!??`` ``Ǟ~~qǃ?=>AÃ?@@``````c`xg~?c?{?8????<=>!>??~?~ gggdef!?????????<?`?<<8X xp`><?x Ǐxpp?8< y?? ?<`x80>A?9< y?<`|80~99|sÏ?p|8~3qx? 0?@?  ?8`>??"@?1??`$@``````s?1>??` !???w$gq>??~`2?xggg6I???????g??c>~~pz?<{{{6???????g??c~~|p?<2 ???????g??π>c|<?`<8s|?=x={=| @ ppppppgπ>c|88??s|? @π>?|88?<s|x@??>?<<8p??y~x?>?8<xq??9>x?>?8<qq ?p9>x?`?>?8qq89>3x@?>?8<q`9>x0@pp?|ǁ?8<q  ~|?  >>=~<<ǁ?py~?@?<? | ?`}~ ?ǁ?py??<?|!`p~~}~ǁ?py ?`<?|?>||}~ǀ?p 0w?<?| ???=~ǁ?xf?0p<?|,@??=?8?<xc`0?@?9><?|~?l???<??9>x???<? 89>x ???? 8>>??  9>x?0??'0}}?  9>x8????<$ y~߀x}}~8?@8s|x? g@~ ?@?8s|0g@>@>>g?' 2~~p???s?/ ```~~~??||3@oOp??????`!<???g``??   񀏇}?8????  ??0???0??@ ?π0@??@x@<`| p??? `8? 8|?@p` ??!>p>`?@0q0~A8?>>?~?  ~????||#ߞ> ?|<0x```~~~ 1@ǃ??@|||0??? ?X?????? ? >?l???PwVwVxp >??lX{[{[{{ A x???<<${{ > >A @8A'@|~ 8????! 33r @@?Ï<??~?@?p;33> `` c?y?@0?133>A18?@??>?p 33`}8?@8>?|10 |~?@?p??||ppp20 >?|?@~?ÀL>>>;30?~#0?@s<?ǁ8????{30>?< x`0```~~~{10π` `|||{ qp pp? <<???????7yqp 0?~  px???7yqp ?9@ ????yqp ? ~????qqp ~ ?8????ted ??  ?À~pted ~> ????vff ?? ?vff ?@????vff ϟ?@????8vff ϟ ?pvff s?pppwff IG@??;>>>7wff ( >?>?v?????wwFF r{x?|`````~~~wvDD g=`|` ??f|???wn6L6LɳgGG8p;n:L:Lų[[[?@???????l@@X>~x??9A@@[NA@_?y22;c;`;`ğ08???????ۻۻۻ$D`hD08? ۻ˻˻4Dx? 09>??<`?`>pr|?ppq>Ё~(@>>>><<0  ??x??????||<q  ``````~~~<<< ~` x|||`g@@ ?????????__ߠ {ss`?#  ????? sssnj ?p  lqwww`|  ??????62..=u #< $?????. ߍ?r?  0  8???????wwwC  wwwC  ?@wwwx01@?@|w8?@ w8>pppppp>>>>>><????????|````````~~~~~~| |||||~  ??????????????>?   T*`@H> |@"|R0<2<5# QQ3 N`NZC=2`Stos basic compiler V 1.0 by Francois Lionet00@|rq*7wD>Pc21 d k_4Vxawpp 0PU33ss777M,K Ugݝ`*n ]JC0<BYQC PE &Jf( Hz?< NA\@ f B KNNT+@A@Cp2"9PAz# $09.B#rXg QEp$dIu;@G k p,8p (*y. , MI < kBoA+|#EhD+HH+O 0.Md+K.+S2+k6 :BAp ( B(D+LA+H@r .+@3 .+@ m$H"m`# # # # b+I+ICp"$, n$N(n*-BG&.$(.(gP<f ~`Afݒ`ݒ&Rd~gJGffkfB`&`&&`+N ,+n <+L T  T P X E+J hZ+L&LpI0lI$`$ \%LId @IL8 L+H j@ AH `  C+I tC |C,C;i$ &DBm +n$ +( dBe L"m$na$n&n(n"/, N,_J@fGN ;n" g HNLtNb6DA  Ad pARNE~NCpNG m6;hT+ !M,m LA;| &m ,Et m DgH >$RB@N" L|:L%AhEQ.?<%NNO/-  0<BB`09``p` p `NupR`p.~h)*~P#!fLF listbank`fload"*.bas"saverun`dir$=  + "\`previous`off ull`multi 234ode 0 1`accnew:"efa `env`key Z1: f2345678910:1234567892NU>FbG*=IPEU8-< prtACp+O Th5np8.,|t >Nr!-@vx8Jg ¢:Ŏ?wp3 Ep2.zHTxT64̸Φ --Exhh--P70 і,-D<VG"$D ȸ<ߠߠ`D<Ůߒߒ̒ȪU~҃```` 8JgT\†-U㠟^2bާ-T؀і6F@∐|rI㜣 ^ & HF6鶯R(R|b('Rr,Č֣9-¨ Df X:fp-Ppz-V2ppff .FFf`f$\〧:8D<-<`ͼ߼׼\߼.R߼߼߼ڼĘӼ̼-ͼ׼߼ռ-6߼߼ϼPƼӼ4߼Ҽ4ݼZ߼߼߼ڼĐμT --´zE"=n@2Ґ-8@PG"<$tŔ 6%ŶU~+O Tjd||~TN2b;6nN<7(7=(- THb|J B+LIb9<f  %&È$.֎xprONHfI,E6&N&H22HDD0 Ђ˺`NX2U~ǘ --(2Pv0-dD<UDG"<$2^FP˒nTpp|擰}L rZi}ڗ)쟘Zi}v(vvvv,vä ¼N>N Tⶨ `Dh[#M@}4"<\ \d|rż.r` ~ pJV hT0„lh8}ld1SԂ#@,HG|r+O T%|H ˜}&Ur ~ ( 2Ld#2pržOx<Kn,X"J҂h&&&@&甥*IPE&^Hd9 #V&B>.\x\\<\Kt|~ ~l+O T(h~Ј2,Ɣ?  n 4>2 +hh,hhhhh䬄¨.ž`1TPX --ꁊ5=tR9 l0ڇG"<$؋j@D¬Z>..6.6;|,p¤[.&^ D<=<-pL@ Ud Jn 8⊂z<%p&^$^<gD>gDv6GeB|d!<-0TXFNSF QSGQ0 *gR+INu- NuU- Nup m Bo: "_2fNuf>< CNu/ &H6< ` ,Bg?<NMXT>ZQp úB@g?NM\&_Nu%NNT j-D` JkD( C:"<RdЁ jf7Jg`S`B0QNu;B@'d  ^"Cfg|epS@B EpVC, $. g<.g;g EgRR` R`HgP"#-g&+g&`f< `!0e9b &F`&FLB .f8nb#~^g,jfJBg`0`JBkf,A@p BJfp TO 0g p+H TV$V+^\BJ-Rkv -Rg4-RgJm0fpmgHpNELfk&/x2(fZ _p_g<H, 0-ne80BAJPgPeTRAfL.NNgjN??#N0;@Jg(m+L"@ f"Jgg¬ muNU>AP~NC|<d0@0~NCHF &NF@PB Error #, press any key.0-hg. h??<>NAXg".dPP*g dp(g0.Bm&p|-Nu$^v6g4 SC<ae zb Q<$m2<4-6-8-&m 8ZJgg Jf gQ`f`nZBA"fup=J$4.j>&JTBAg gRA`S2L0& f h/?,J6BF$N<,_:&&fBCgmf$fJf gJg pNF&&`,$"p ` JmfC.PP SFg ,gJJpj BGCp r! ?? Please redo from start. Recommencer au dbut S.V.P. /BDg: g$NS-fFD` +gSg$%.g`0e 9b NBCgjc fJm gzfDeg Ef8|eZx-f n*SB,H J0< NF4<@`8Rh``B XJAfJDgD"BBXvBr,_vpDgJfNu>$H&N&*dRS@k(R zQ,gnn m0HUQ"m$00 R@02SGk0Qk - "- SfH p 02Xvz(:d &Jքe TA8H*- 8,.- D"G|$Xtx& C gvk&@`" @ g(~0T( EAdf$&`&"Ce C$)` P#|#a%d! !Jfg&E"G~dN SGg<. f" p00 R`$k$" 0g2S@H2`H$``zJx$:$$ghg&g. `+ILL - ,g+@FgBJmfINi6Jg 4H@;@v0B- m-- H>0-4NfN>ZNu,G^fC IpNEzNF~&mXv<- f JEf$F`f  I~NC|dRFXRCfRNCNu I$ )Щ3$I!HJgB` g<gՒ``L H&- 2< gրQ !CL؁/Jg&<dX2UAk g" p2@|f $&<`&$(H jHJgBDC( $m&J+K )N*|bNu&H2u/g:ff6Bv.&B@0Q-- j+C?< NCz@F~Bm;|OgDB@ NC fp `p PBGNCTfpBp `.X(B@~pppdb+h f HAB606SC;C<rr$m."j p,2Qp  - $!@( rA#$m `&m \4d5|  67  ps"- hNB0* \ #M-JML BBN>OFpBXLNu oHgI/:0 :NsBNs @ , ?Rt      ( xXtt&dv>ABBBS@g jTAC^`xRA0H>1B@g0V TR@Ac;G(6lNup Bd:"m d23C3B3A`Rfb5m Zq6hBj2ZlB6A7AJgDd<6Jk BQ :Šd@g(%dd h6hHps"- hNBLNu ƴŰLdZ@dTLd@dHRC* 3D j\k\Jmf mg p'NEN(Sp`Arp(NEp~NCNu(000,2)(224455667724674433511300001tX¢Hn262>(A02HA2468:<HF<~NCLNuX( P P ( Pʀ ((^p^L((HT^Pl(P6ʧ锡 mA}b(SJ&NS@kBBg(#Dw6K10RBQNuf "H$mE}p4/?<NN\NuNj CC} H dA@H60!w-Nup m e:g8:MpmmPHx@&<-$H4Lp3NEYgR+@h/$j Ye p4NEJ@fWp'TNkPpk~"k kNCd ;@~NCNI(&<60*&g$ g*H|L>p2hpBGNh2JBgZPd ~8l/- p0NA0>|gg f\*,HVlXg& mDLJ@gcggVWXp ̠BA"g f"H- Hp r,k;@hL0f, K@| <@ K r`2p`Ơ N> ?f0JEf,ׄ⁄0ہ؂B:,pNEplH8vBJg2A, f" YNJJm / -&@cšR N H瀀pi JBLgBBZp? 0g k |gf ?*?<>NAXfՀn jQNu>g~g8SG ffH`??fNMXJ@f>Z`LNu/[d*Hz$/<?NA Jk: _Nup@h< ;/BB _Ð/- ;NA\^ BmJ@g ;0 6 +J~ ^0g PepPS@B \0Bm$^t4p RJf;@z @Ap?B*a0- Ap 2-~HA2468:<-HF~NC4 ~pNCpmfC~NC`~NCEv02~NC240~'NCQB@BAa|R@0eBxp anj;|nF@vEBB& Pehe h  ePRB| ePlf`^gmngRBA4-n ;Bnr;Al d0aFV`" e0@hmhd "P2` i6ga H@<HgP` f tvpffpx f(JAgSAl x1 H < g`. 0| d p ~NCRA`8ae 0e:e_<A[ |RfzjDDzDDVDzBDAJ*g0@g*?g$nt:ett|4m|h<nj nkpNEnppHnf"jfpp d|"B m hcd2A c h p>H:CPg$ \fB(/- ?<;NA\aЇ`p ~ NCH-- HNuv QA??< NMT2BBBCgBgRBRC`??<NAX&\B6 Ad 0a *.G?JfSg@eaH`BxV BABBBCRA 4fRCfB;BxrNN0  m"JAfH灀~pNCLNu NC~NC+@r -r2H@~pJb @E"H4 0~#NC40~$ I\lfP@P@4LaL4HC4AـdC02NuBpBA A:0(2(tNmXHA:Bg/*GNAP"H\|\BRzvgR ,NAT:BDBBBCgBgne`XE0H0*2*dj~rt~'NCrCfrNR@RA4BCAj@ RD|elP¾ 2a`4VApJ jt R@QHAРfŲvJf S;H|C0)HmzBA| er@ i;|tp NEp NENut"FILE SELECTOREUR DE FICHIER UPHAUTDOWNBAS PREVIOUSARREDIR.QUITERRETURNOK M     #=WOi{    Jmg`vG^fN/ Bmp r( >-|fJGgIEGp BZB[QGE BEp J)g6BD 1@fzRBPCAd gJ1 46` mfzmgf,0<;@mmgl;EXNIp$ o0-~NC ~NCpB 8p'JmgHR@ 2BpBGNCgpr~&_BCAJXgBB pRC| e3Nu+m mBX+H,m ,Etg jhH &NLdE@1, n$Ng$<f~`Af`ޝR` Xg`J A PA #ؠ Nu gR+@U2- &$^4"J0S@k|e0<BNuBBBC NNi< d$2 H@"J@f ЁeЂkRC`,HrNuSJCgBANurBBe eBd鈀” f dRe!fg gae 0<hH?NMX4 LBNuNu/b<JmF >< NC?<NC @2-b$ fB@BA`22<&m |G"m tCX4<2v $IBR  KfS BmlBlA(|mf` fB@L0D_ Bp NEp NErpNG<-A~0NCRF4f~NC,e"H0g'"SfJg"SfL Nu&Nu&<d G^& g fJfbpp,` p `p*`p+*/jNNAPpРhJ@=NA//?-h? J$^4g4|?d2SB2HQB I .g \gQ IRpp5p p|gg |gp4`p0@3@12Cj/lfPB,( _ ,k2;@h        { ? g $" z x  & Y @<_o (P(& W> -    kmj&&&D.B^ %(6JB$ P""1Y< *$x (&,V<.42d@<^((>Jt <* "Z(H   "(p   7 ^b* (($*& XlL0(:F*N.0&(  "&-&*T0$ " ,<F&Dr^"nF0 jVlF@xJ*l$40 MF "Z4 :2H<VAd !R S",R`r  TdLM` t*y~ :Dhr^(X3lR F l  & Zl|hr|X 0X *t 0:DNnXb c *lHRb!$n!! ""j"" "# $r$%.%|Pu%dpuz&&*`8'H'RY'bgll~v {($r((~(V[x (e)f$j4oD`)TX)z}Z)*2B+F+n+4+++#B+#-/#+#0+#6,<#6,z#G #H-#K@#-J#-p#O#-#Q#d. #d.0#Ud#.r#.'|.'$')'.'.'5'|.'= '>/'?4'@D'Aj'B'C0V'Z0'E'F0'F14'L1D'1'L1'X1'X1'X 2'T3'R4*.4.5.5Currein MemorPleasea 9WrittQby M. Wickham - 1990ProgrammtS% BasicLeft1uButton" eceHELPShow ESCAPE6XĈ:X: p.datȖb Termina¹`/*`WindK102*С* %$%pbR)F&zV!*'(-8@<:Xp!!Dx) ɢ(HP P(P (#|"#&X#nnBHN*l:$$^%&.Jvb^*.CR" |H ~#3K  cf2* (* -*3ֱd/a _pL~Nup`/<?<# NMPNu3By NV#u t!|xNuJxg!tu>OJ,up(Jupg8aHpNELN./gfp)`pNE <sNp$p@BC:,2JEg2,RCl6m.( BNu?? AXJ@fXNM\xÒp<NTAV33BgBgNN\ BQB~2B@29I2HA2468:<HF<  0Nu@.f@:JIHLJAgH AbSAIC.J."Q)I09@29A9B@89CB:9D4 HAA2*l:8:l4e6HAD bE Bl0alHF*6 :C dx3$ )JH#̡š<AZa tFv04< X<Ģ#V`H /a Nupnfq02?,0&0 a (PEhS@Ha22,4SA&& R@86,6SC:6V<ؠN >,? 2:F$H:<CBB g 8B( HD fDlG,^>aDRBEeRCFl8n 02aRNu/~,¶, 0< 4l<h  6l>b8l@:lB@89ABC:aB@NuH9D LL:LE :LD0 t0: 4LtҦ䫰P`$lH&J">ā•6^>HP6)JH8 LSD4Q a)HL)IDRC C|^20B(Jl0&>&ڃ$B@  R@ @mNufg @`^0<2*d"4F (ᖠb Nu9Xp"9|P .,@*U@HR3t yX²NDHHJl.l^9l @B 4"tLjH*"lDN<,,l*SF: SE6KGRSD0@Jkj.j2$I4 0*N^xTJTMQBSJQª.^80ZLNu<>2b RFRG tp8tp:> <NVF"NuMV*>H@jHP hNuaJ,l HB8.0t0 2DSDvSD:lSM,0ASC< >,4SG4 :&I0$NVKSKJD6Q QQH0VHS@"<HF<., ,."" LNuSCSBSPJl0\l>0ڀt6"꡶ ,vRBl\3/< 9|B yZ/a . )N XV > GOOl ll OOl?OJ^BF ppP0~Z8l@8B@8D d Nu(HD 00rNZfbg`6txazZ8hlxBN:<LH&4SBB6SCC606H@dRA0L(NutSASCF\24S@ϔĤ H<Jk20mH:&A[a {B@$H&H4UBR26ᶡR.*"a &JQ$ ᆠB@B Nu8:WDWEE4S@Ha*6Q6zvfQfbVrQL2H 030/L _ByVBNup$H"HBAeRA$J<AeHpJ J NuHB,9N(@ᖠ\h ~f(4HAPJg"P H~N`a( lLFB0HABA   l@A"lD*l ,l8 M,Q>,SG68lSL yƠ l$I: FJ .UVh<Q gZlBG  Uh $I4 : vF]^TJz YMYNRHSEj||| SJBfUJn]ph"n xxQMQxNx]xhxx~hR@t4n9@PB ѬDLDf  SAI ,D4SBugAR@Q)@DLNuȀnhBz ( `F#Nu.2 ~0X` p : <Nu>zJ⬠S@ zX*?, :aa 20abFTBhl@^lBnFJl2R@RAH€E: 6,C1B1C ,Gt)6 G tSXJ H L/zN# #È><"BN""""""""""""""""""""""""""""""""ؠZNuu( h&  $ "     @$4 8 HL B:  6,Xf B  +f6 d 8 8d"N8 dJ ":z<$0L ( `8>FL @ &N ,c.  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`a}bcdefghijklmnopqrstuvwxyz{|}~ޠjlll"6666(>h<&|(fl0fF8l8tv00`0 <<| ~  0`||8<:00 |f~fff|``fff|`x``~`nf><¿<xxpxlf```~||vf<0~fff<<< l88lxw>~` 608000>DlvP  8lAl®ffPxl<|66Oxff$<Tl-~00p008  8`$$Bm<``<B;vp5<~;ȡN$/<< f~@|@x ~~?XȢ(ffffXpHB8@@:`f(@ @3`0`4XPbRJF fq70> |)B*R$HH$ $Hc~Ɵ|~~c>d X< UUUU33335*@\z:Lft &lPZHNYMXTXMULENCREc!  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ fffllll>`<|fl0fF8l8pvp88p<<~006 ~  0`@ 80 `qjn`>~ff|```xllx`|``h`>``nf<¿<pxlf```~fv~~Pfff<vl6<fffff<f¡f|i0>Df?8pl)<␠W|ᠡ8|lpr p `` |44bmf<¾f>vp<~&| 6kÆn֟6ll66lovf<@~ 0$8zz ~ý~~ý~[_UQ ?~~~~?*~~0c  ƃfc8gONNNOxNN? ?9ac ` ca9Ɔ ` 'OO 0OO ΞcƟ| c>tUUUU33335 )fc  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~Ūsff >~``|>~|l-68|ll88ppv  `0880<<<|~~0 ````<~!nv~<88~~I <>zf<1fff=PРff"<<  +R l-` 0î@p<!~<<`8 088 b $fB0 8@ 0)N%OLHO. u : J|>v|  !!& d&!!d  #'0&# 8``00```00  `8~ߧL@~=2rL߻~82=~Į &, UUUUUUUU33333333 ( `=2`Sprite 101 "@+d!|Xbn6Z6 4(5 3L9-V#J001*/+,FV#p01-;|<052-l )*  DFV YeyE Mgw+5Ckw)/u >1u=.1+yN' N)N! 1c u1>!a}' a' EqXhq uluiuuukG|qzvZ>SpBuff 4mouse.spr@PH~#'# f^# ,H#b^3\Hfj @d,SFBQ/aP _pL~Nup`6:A(BABHBBBHBNuxAvCNBGRESEgJPfBQQNu<h dBi` h l3F<( Ad3`DF< l Cl3F@"DBfi2RG`>ByVA:0ANu?a2BJP >8(:BdBDB>hFCBBPAgRB Bf3VNuhbe8b־etrBB0 @2(HAAJF >0:2:4:6:zaJJG7"E0HCAJQfJGfNuSGH>:$h&J(z @@:f "@0)DU@:@T@2)ifSA6:(<<E\ P@A3D JEg̲fS@J|gaL :0:S@k> 0z2z2:ࢀ> fxp` 8*0+JGk80T\Q g8 8T0vRvP4:Nv|vvr`t2pn2Tb bBA`ttXޠ^2C\ \tv`XQ46R2pxT::BBBC` \SIH 2z<:: vQNu$N6"zv>:SG2:4a`FCSF04Qj:\\$z&. PBCSB DSA&z06zorz l l`zo89zoNzl6:l> o::3 333 <>B3C3BLNu3 H@H`(JgV,` BBD A@# (J@jLJP`BP ga4( 6( 8:hha´,f~ 1Bhh6gRCJ@Z @xlREmL B D3    " &  $1@  d1D1EJPf0`Đ H aL04:̴h m~02:z@l8`86:h mZ ::aJHzn(<(V6GcaaHa`RdPtzza@p`B@:VLNud@` Nu4HA62AB&J@fh*F (C<0:v2:t4:r6:pGa$z">jB@Bj zTBPp@zbrj㨀jj"h$IbH&Jzz?(zfSB6Qp#BxC::SEUASB<>MTB0,QB 6Q8hSLSG:z:6j0 2Q y g6< zBA&J$KB0 g RDff Q2Cg&I0 6><H:@H0@|zan PH46GRCNc6GRBH4Gd|z22 REBe:RFCꀼ`HN"a>B@Nu0 8LD&I(J8D NurgBf5Xj?<%NNTNuKEI.BB|64<"MBAxJQgil g m &LBE4)6RERAQ  SE4SF `JFkr4\ HANu3pB6 Ap0pVa aVУfCDJAk`Ac.azFd >e32,e(d Cc$zd ze \܀ڱf zNu#<h g* @g ( `"X 309@(0<Xf6t a@a Ap2<BQvBAa\~@BCa pH PBPF8<0a8žDOˀ~ RSESF0:S@.>04PǠ6` $$~0S@@L5#ǗJ %6%# f0AzFef4:J(CSFxGg:ESMgSM0:\T! K"J50H@B@:|6<3VpNuBy1CvBB<:~B@g2TSGgR@FedJCf$ :J" 4< Qp:<ABIM$Ha"EK<LSFF :">:g& G >4QR` >$$$0Nu$DU5(C44K:Ixa|.|DSE0:"*@<2<"" Nu f`!A:<Qi680:HKMJAjrUdJBjtVJxUe:J Ve<AޜBDCADDB0HVH:@KCDLXIa,K0\"^28AFDT\T646BCTΡlph f #aB /?<&NN\Nu <+`#-l3N X 9.#ޱ fAbPBP V# 7j0:HA20SA3bd,bNuJg Ӹ zԔNu???/  p?"zv@d)Ag3@@((f`H0 HA2)HBJ@l ` zچo0:ڀJAlBA:1 zto2:n23A"_420NuH?~HM,VNL~NsÐJAP Ŝy^X@<Z3h` Xd0<ažhj z:0z٠2 zٚ&0(Nga `AC~|JQJPf|0g14)g h|1B6gV$zܲJ P8:ܮL 2@'B&@Lr@ b41CKE0!KBD1DC` JhfBP|BQACRG GfZ0:PgJFga:۲$h&J@0:ۺh 2:۶ AH:@UM2AK3 b |EJEgV hzpfS@^g@I !6:DSCaBL`zC(xBABBBC  f0~ RD f歘lJC,6<8< y  KLSCSD0^3`ABb3dK0LP\zIJ0zָZ 0< zޜBBR"ގJAg AdSAICdEd 0000ł<Nu daRJPg6"zH2JQf PQBBNuQei dieDAA g& g 0m 9b><ae><ag.j-f&4gk 0@@`JBgDNut l0<_AզBNu<:՘BE$ *EՆpRAIJRP&(6R@ @c`BRp3NuFczp5"JB BJg4|vxVH(TR d&B BBdr bJBAHA x50,jab(\T@)H`vJ>EB: NuDBb A^B`FTB#ҡ^ ֡R Aؠ;BXABYA#MSA4 BVI*z(MBn-M 6<aļOMˌ>,K̬ INup¢ aKH@ NuJUgr2- 0HHAAB~BVNu h VNuVDC trvn,L,x Q`v@,M?22BC` V b<jxB t=BC v=C=D0Jf(zv`80 Bf ?ad4Nu F::~y r3Ӵn A^"BNC}x g> 0@w2Aw@g,vH@HAtJB@BA陰AgbR@`S@@0 UUQ3>:g^ l<SGAE@0f6Q3`6(Vf2(0fBA$BI5IRA AeBA1A`0:g(f3 z20UHQ00:.g*k hVh0:ȸNACEȞ~JPg ^,VG638BF B[BBRFFB:ôEg64`"H&K:: :<4|(K <,(KpB><޹#,GREElĴh4G I:G*H>RGG MB4vHBvBHBpB4 4< ANu0<uH0l .EFf a$I A= 2a٢&J24$H:H=:ESMM8EL<>=I# 46.8. J"K2: H0g0 `2QFe Qx`GSDjSBg Qv` 0.n d SnfBNuV͝J PbERI:rJHIf>4(A< N08LSE$H&I 2H@6C H402`6Qͽeg`3"VNuh     0fL&p@b&  $ (h0 "  @    8 Ɯ0   : ApJgS fQ3FGI4:gDdyDzgB<:tf QH`,f2PAtY2IR>`MRw|$zzJVgVg MQ`vK6.:20kJn g@ gJ@`@BDgz0 D`eBDLA0@0@4J  RBA0HAb<=CTC 0g(~f"z00@p@gHfp;@ mB@a g4K 4` `Mf  g n p =n BV`E?420H JXhJfH;|8R f=|fa fBA20=ApBzxgr0xn En2VArB `H~ `2 $@?*(Ff`f2BUfvBm fA``KjE|g-eKj30 : zN-0f0 DgZ24YmY9HghHtR@`TH4 jBA` 2c0P$,  AcrARfP-ka<gx.B(+HL p;X@BNua ci@b#4JX3BByDBA.0H =D <f|MRA>#>ŠNu:NFHBCp5BQ\pSp .I$|8Gt B 0~ t hQNu,t?zNuT( &SA0:3nFAPAB(B0"GKp)up)upl(9C*9D,l&l*>GK:)up)up9C&9C*9D(9D,l&l(l*l,Nu    VALGUS v1.0 Released into the Public Domain September 29,1989. Copyright (c) 1989 James R. Glenn. This program may be freely distributed, must must not be sold for profit. (It would also be nice if this documentation file were included.) PLAYING THE GAME = To begin play, double click on the VALGUS.PRG icon (as if you'd never done this before). When the title screen is displayed, you have the option of starting a game or exiting to the desktop. Press F1 to start at level 1 (the easiest), F2 to start at level 2, and so on up to F10 to start at level 10 (let me know if you manage to complete this round). Shapes will start falling down the screen. The object of the game is to maneuver the shapes down to the bottom of the screen in such a way that lines of the screen are completely filled from right to left. (Does this sound vaguely familiar?) You can control the shapes with a joystick plugged into the second joystick port. Pushing right or left m)oves the shape in that direction, provided no obstacles (other shapes or walls) are in the way. Pulling down moves the shape down the screen faster than if you simply let it fall. This is useful since you are awarded points for placing shapes based on the level and how fast you get it in position. Pushing the joystick button will rotate the shape counter-clockwise. When you have completed a certain number of lines (10 in the first round, 12 in the second, then 14, 16 and so on), you will be awarded a bonus and advanced to the next round with a clear screen. The shapes fall faster in each successive round until round nine, and the chance of getting Candy (the straight line) or Bosco (the square) get lower until round eleven (which you should never see). The game ends when a shape prevents a new shape from being placed at the normal starting position (the middle of the top row). VERSION 1.1 (5/31/90) - Removed: background pictures Added: keyboard control--4 for left, 6 for right, space for rotate and 5 for down (the piece will move as far down as it can). pause--press escape. Press any key to continue Challenge Rounds: every other round (starting with 2) has a special feature. Rounds 2,10,18,etc have solid blocks added at the edges. 4,12,20.. have patterns you have to maneuver around. 6,14,22.. have rows of random blocks. During rounds 8,16,24.. blocks are added randomly to the puzzle. Changed: The speed and the number of lines to complete to continue to the next round now changes only after every other round. Public Domain and Shareware programs represent a considerable amount of work on the part of the programmer. Please do not let this work go unrewarded! If you like this game, please please send a disk full of your favorite Public Domain games and utilities along with any other gifts (baseball cards, dice, money, etc..) to: James R. Glenn Jr. 8252 The Midway Annandale VA 22003 Thank you! PLAY VALGUS SQUARED!!! E`&|`Nq,oHz$Hz$Hz$?<?<KNA @ h/Nvalgs.o                 z8<d6<><4<| (o*lN~N+| <~=~=A .v"N.~=~=A .v"N.~=A .v!N.~=A .v!N.~ =~=A .v"N.~=A .v!N.><}=A .v!N.~=A .v!N.~=~=A .v"N.~=~=A .v"N.~=~=A .v"N.~=~=A .v"N.~=A.v!N.~=A .v!N.~=A.v!N.~=A.6<N.~=A$.vAN.~=~ =~=A<.v#N.Nf~DGNNB~=~N~=><wN~ =><3NNT`NqNTpNn~=A.vAN.~=A.vAN.~=A.vAN+G;|A.-NH ^0.-->-GHޞ->- ^0Rm mo.--~=A.vAN-~N~=A.vAN G.+GNN\Nu;|;|>-=>-=A .v"N-NH ^0>-=>-=A .v"N-NH ^0Rm moRm mo;|>-"m . -NH ^0Rm mo;|>-"m . -NH ^0Rm mo;|>-"m . -NH ^0Rm mo;|>-"m. -NH ^0>-"m. -NH ^0>-"m. -NH ^0Rm mo;|;|;|>-=>-=>-=A<.v#N-NH ^0Rm m oRm moRm mo~=N-~=~ =><@=><=~N ~NN ;G>-JGf`RNqN$NSorry--Low resolution only!N>N.<B/A./N2PO~DGNǮ~HN><HN;G><H-~NdN scores.valN0FJGf` NqN'hN(`NqNT~=~=~=~=~N~=~2=~f=~"N~ =~s=~2=~(N~s=><=~Z=~ N~=~=~=~=~N~?~2?~f?~"?NPO~?~3?~d?~ ?NPO~ ?~s?~2?~(?NPO~ ?~t?~0?~&?NPO~s?><?~Z?~ ?NPO;|;|>-=>-=A .v"N2Rm moRm m o~=~=~=~=~N~x=~=~O=><N;|~=>-=A .v"N2~ =>-=A .v"N2~?>-?~?N\O~ ?>-?~?N\ORm mo;|>-=~=A .v"N2>-?~?~?N\ORm m oNhpNnN Score: 0rN~ ?~-hN0NA.-A.-N/N -~ =>-j=~DG^=~NnG^N0-~NlN N~9?~F?A./N|PONN\Nu`VNqNTpNnA.-N NA.->-jN0N~Q?~P?A./N|PONN\Nu`^NqNTA.-~ ^0>, =>, =A .v"N>JGf`NqA.-~ ^0~=~=~ANl`NqA.->, =>,=>,=A .v"N>^ ^0A.->, =>,=>,=A .v"N>^ ^0>,=~NT=>,=~ N6^=>,=~NT^=>,=~N6^JGf`NqA.-~ ^0`6Nq>,=>,=A .v"N>JGf`NqA.-~ ^0AN`Nq>,N\Nu`dNqNT., G>GGp;G., G>GG;G.-->-H->-H-., G>H-., G>H-~NN\Nu`nNqNT>,=~DG^;G>,JGg`NqBm>, Gg` Nq;|A ./A ./A./A./NlON\Nu`>NqNT~?~?A ./A./A ./A ./NlON\Nu`PNqNTpNn~ =A.v!N.~=A.N->, ^0~=A.N->, ^0~=A.N->,=>, ^ ^0~=A.N->, ^0~=A.N-~=A.N> ^0~=A.N->, =>,^ ^0~=A.N->, ^0~=A.N-~=A.N> ^0~=A.N->, ^0~ =A.N->, ^0~?A./N\ONN\Nu`NqNTA.->,"m . G> ^0>, ?>, ?>,?N\O;|>, =>,=>-=A .v"N>^?>, =>,=>-=A .v"N>^?>,?N\ORm moN\Nu` NqNTpNnA.-.<AN4-.<FNRNX-.<DNN& ^0A.-.<AN4-.<ENRNX-.<ANN& ^0A.-.<AN4-.<ENRNX-.<ANN& ^0>,?>,?>,?N\OA.-NNA.-NNFJGf` Nq` Nq`NqNN\Nu`NqNT>, ?>, ?NBXO;|>, =>,=>-=A .v"N>^?>, =>,=>-=A .v"N>^?NBXORm moN\Nu`NqNT., G>=>,^?>, ?>, ?N \OJGg` Nq`^Nq., G>?>, ?>, ?N\O.,-., G>=>,^ ^0., G>?>, ?>, ?N\OBmrN\Nu`"NqNTA.-N-.,N ^ N>,=>,=A .v"N2;|>,=>, =>-=A .v"N>^=>,=>, =>-=A .v"N>^=A .v"N2Rm mo.-d-~ Hޞ-~=.,/>N-.N-.<BNR->-jNNRN4H.NVHLN~N+GdN NN\Nu`dNqNT~ =~=~DGANl`,Nq~=>,TG=~=~=~NAN`Nq~=~=~=~=~NN\Nu`zNqNT~=~=~DGANl`BNq~=>,=~=~=~N~=>,=~=~=~NAN`Nq~=~=~=~=~NN\Nu`NqNT~=~ =~=~=~N~=~ =~=~=~N~=~ =~=~=~N~=~ =~=~=~N~=~ =~=~=~N~=~ =~=~=~N~=~=~=~=~NN\Nu`zNqNT~=~=~=~=~N~=~=~=~=~N ~=~=~=~=~N~=~=~=~=~N ~=~=~=~=~NN\Nu`:NqNTpNnA.-~ ^0~=~=~ANl`NqA.-~ ^0~=~ =~ANl`JNq>,=>,=A .v"N>JGg`NqA.-~ ^0`NqAN`Nq>, Gg`2NqA.->,G2G ^0Rmh>,?NTON AN`LNq.-d->,Hޞ+Gd>,JGf`NqA.->,N0NA.-A.-A.N6-~HDޞNnN><=A.N6-~H"N/>H-.Dޞ?><?A./N|PO>, Gg`NqN` NqNdpNn~H-~ NrN><?><?A ./N|NON >,=~NF=>-h=~ =>-j=~DG^=~NnG^N.^JGf` NqNNN\Nu`NqNT~x=~=><=~=>,G^=A .N~x=~#=A .-~NH>,=~=~DGANl`xNq~=~ =~ANl`RNq>,=>,=A .v"N->,=>,=~DG^=A .v"N> ^0AN`NqAN`NqN\Nu`NqNTA.-., G>"m . G> ^0>,?>, ?>,?N \OJGg` Nq`RNq>,?>, ?., G>?N\O.,->, ^0>,?>, ?., G>?N\OBmpN\Nu`NqNT>,?., G>RG?., G>?N \OJGg`Nq;|t`RNq>,?., G>?., G>?N6\O., -., G>RG ^0.< , =>,=>,=A .v"N>^?>, =>,=>,=A .v"N>^?~?~?A./A./A ./A ./NlOAN`|Nq>, ?>, RG?>,?N\ON\Nu`^NqNTA.-N ^ N-.,N-., G.N=N-., G.N^JGf` Nq`NqN\Nu`NqNTN!RmjN ;|;|>-?>-?NBXO>-=>-=A .v"N2Rm m oRm moNh.-v-.<-j=~DG^=~Nn=.<;/>N-.NRN+Gl.-l-.<=NJGf`Nq.<=+Gl>-j=~Nx Gg`Nq~ =>-j=~DG^=~NnGDG^;G>-=~NTJGf` Nq;|>-;G Go`rNq~=>-=A .v"N2~?>-?~ ?N\O~ =>-=A .v"N2~ ?>-?~ ?N\ORm mo>-j=~Nx Gg`Nq>-j=~DG^=~Nn=~NxRG;G;| ;|>-=>-=A .v"N->-=>-=>-=~ DG^=A<.v#N> ^0>-?>-?~ =>-=>-=A .v"N>?N\ORm m oxRm mod>-j=~Nx Gg`Nq~ =>-j=~DG^=~NnGDG^;G>-=~NTJGf` Nq;|>-;G Go`Nq;|~?N-TTO Gg`ZNq~?N-TTO"m . G>;G>-=>-=A .v"N2>-?>-?>-?N\ORm m oRm mor>-j=~NxJGg` Nq;|N\Nu`>NqNTA.-~ ^0A.-~ ^0~=~=~ANl`Nq~=~ =~ANl`FNq>,=>,=A .v"N> Gg`NqA.-~ ^0AN`Nq>, Gg` Nq`NqAN`NqA.->,=~DG^ ^0~=>,=~ANl`Nq~=~ =~ANl`RNq>,?>,?.<AN4-.<ENRNX-.<ANN&?N\OAN`NqA.->,=>-j2^ ^0pNnNBonus->,N0N rN~z?><?A ./N|NON.<>/A./N2POAN`Nq.-d->,Hޞ+GdN@N pNn~ H-N NNrN~z?><?A ./N|NON\Nu`NqNTpNn~=~=~=~=~N~?~?><??><?N؜PO~?N2TO~?N&TOpNnNVALGUSrN~d?~(?A ./N|NO~?N&TO~?N2TOpNn><NF-N4 1989, 1990 James R. Glenn Public DomainN rN~?~7?A ./N|NO~ ?N&TO~=~=~ANl`\Nq>,"m. G>?>,"m. G>?>,"m. G>?N\OAN`Nq~?N2TOpNnNBosco Candy BathshebarN~4?~v?A ./N|NOpNnN#Fennis Ziggy Iggy TyronerN~?><?A ./N|NO~ ?N2TOpNnN(F1-F10: Start at level 1-10 Undo: QuitrN~?><?A ./N|NON2<LNAL.-NNFJGf`FNqA.-AL.N ^0>,JGg`"NqA.-AL.-~NlN ^0>,=~:N6=>,=~ENT^=>,=~aN>^JGf` Nq` Nq`XNq>, Gag`"NqN(><H->-Nd~DGNǮ>,=~:DG^;GjNN\Nu`NqNTNr-~=N scores.val-~Nn~Nx~=A,.NŞ~=A4.NŞA,.-~H-~ NNA4.-~NN;|~=>-NRm mo~NN\Nu`NqNTNr-~=N scores.val-~Nn~Nx~=A,.NŞ~=A4.NŞ~=~=~ANl``Nq~=>,N>,=A.6<N-A,.N>,=A$.vAN-A4.NR ^ AN`Nq~NN\Nu`NqNTNr-~=N scores.val-~Nn~Nx~=A,.NŞ~=A4.NŞ~=~=~ANl`dNqA,.->,=A.6<NNA4.->,=A$.vAN G.NN~=>,NAN`Nq~NN\Nu`NqNTpNnA.-~DG ^0~=~=~DGANl`LNq>,=A$.vAN G.-.-dN~JGf`NqA.->, ^0AN`Nq>,=~DGNFJGf`DNqNN$N Great score!N>NN$NNEnter your name>NA.-NNN~=>,RG=~DGANl`~Nq>,=A.6<N->,=~DG^=A.6<NN>,=A$.vAN->,=~DG^=A$.vAN G. ^ AN`Nq>,=A$.vAN-.-d ^ ~H-~ N2<TN>,=A.6<N-A.NN~?N2TOpNnN HIGH SCORESrN~t?~?A ./N|NO~=~=~ANl`0NqA.-N NA.->,N0NA.-A.-N.N N~?N2TO>,=>,N>JGf`Nq~?N2TO~0?>,GG?A./N|PO~X?>,GG?>,=A.6<N/N|POA.-N NA.->,=A$.vAN G.N2N><?>,GG?A./N|POAN`NqN2<\NA\.-NNFJGf` Nq` Nq`NqNN\Nu`HNqNTA.-.<AN4->,NNRNX-.<ANN& ^0>,N\Nu`JNqNT~?N-TTORG;G;|>-=~NT=>-=>-=A .v"N>=~N>^JGf`Nq>-RG;G`Nq>-=~DG^;G mg` Nq`Nq>-=>-=A .v"N2;|>-=>-=A .v"N>=~N>=>-=~ NT^JGf`Nq>-RG;G`Nq m g`&Nq>-=>-=A .v"N2`Nq>-?>-?~ ?N\ON\Nu`NqNT.,-~NFNJGf`$NqN-NNJGf` Nq`Nq.,-N4NJGf`.Nq.,/., G>?., G>?~DG?NO .,-N6NJGf`,Nq.,/., G>?., G>?~?NO .,-N NJGf`&Nq., G>?., G>?.,/NPO.,-N5NJGf`Nq., G>;G., G>?>-RG?., G>?N \O=~N>=>-=~NT^JGf`Nq>-RG;G`Nq>-=., G>NFJGf`dNq., G>?., G>?., G>?N\O., ->- ^0., G>?., G>?., G>?N\O;|tN\NuNNN#.<<->-j=~DG^NNR+Gv.<>+Gz>-j=~N6JGf`Nq.<=+Gz~H+GdBmhNN N .<AN4-.<CNRNXN&"m . G>;G;m~ DG?~?>-?N\O.<AN4-.<CNRNXN&"m . G>;G>-=~NT=.<AN4-.-vN^JGf`6Nq.<AN4-.<CNRNXN&"m . G>;G~ DG?~?>-?N\O>-=~ ?>=N-TTO=~NT^JGf` NqN-N+G;|;|Bmt;|p>-?>-?>-?N\O>-?>-?>-?N \OJGg` Nq`NqN+G.-+GN-.-N-.-lN=N-.-N^=>-t=~N>^JGf`NqN2<DNAD.-NNFJGf`.NqAD./A./A./A./N.O~N;G>- =>-NFJGf` Nq;|rN-.-N-.-zNJGf` Nq;|r>-=~NF=>-r=~N>^JGf`6Nq;m N+GA./>-?>-?>-?NO ~N;G>-=~DGN>JGf`$Nq>-?A./A./NO ~N;G mg` Nq;|p>-=~DGN>=>-p=~N>^JGf` Nq>-?>-?A./NPO`Nq>-?>-RG?>-?N \O=~N>=>-t=~N>^JGf`,Nq>-?>-?>-?.-/NO `4Nq>-?>-?>-?N6\O>-RG;G;|r`vNq`NqpNnN GAME OVERrN~|?~d?A ./N|NONN)`&Nq~NǮ O/0C0<HЈ",Іd䒆 Ь `H`// Bg?<JNAO JfLENA@,A0,Hp!!!.HA 0D"MBQ;@+F +LfSE;ED;D CaHNHz+_>?F?F"/FN<+g <-fPN<.g<0e <:dBo?|Bo <:d<0eaG0ajNRo`Jf /k WeR<.f6Bo N<:d<0eanG0a$RoSo ` ooR߰<Dg <EfZ`N<+g <-f?|N<:d"<0e2/A0AA@GA0?AN` g oo8/o gadAC$IaQr`ھ<&fN߰<HfBN<:d <0e2G0`"<Gd <Ae G7`<gd<aeGWaa&``H<BfN<2d:<0e4G0aaN`<OfN<8d<0eG0azaN`Jf0 /k eRdS|"` |"Ag ggfN/"g,Sf f" /H/@` e /aLHPz./gLJ/gv?aE$:p`J/"f Jj aK`J/gDJ$Nu%&!#HJf߯eNua aKAC$IHaO`Ov / aK~H PNuJf /Ѐe"ЀeЀe Ёe/@NuaAC$I`OJf /ЀeЀeЀe Ѐe/@NuaXoNuJf /ЀeЀe Ѐe/@Nua|VoNuJf /Ѐe/@Nua`RoNuJfaR HGJD[jDD<AB!zVB.T/zTBNd A"O$HaNJFg O"O$OaN` JgCA$IaO8HGPNu A ,0-JgPQagBNu?a0@`  Nu !INu("hNu _x8a(Sr//Q/-+O/N m( SrPf Ha LQ m((+P`H+H+HY+I(+I$` - A䐈∓+I c+@LNuJk*"mg ɉRɉAH d+HNua`a$Ha JaNu/-BHa a`G^pv.<"m AF"A$m $ QN m*g $ N E P`A"+I, U+@0NuNuSBeg"‡gf"`f$P(*SJg "‡g"`Qd`Nu$m X&m,Qd,m$(/ / / K R,I` (*X"Tbf(f"eef)fe$*ICʹd o( o- Y- XE` o oX- Y- E`d&^$^`|*_& _"X$"X b(f)fG(H$S) $cef*f) $dNu m X.-0S,-"F*<& $X,ReV(*gȅe2؎e,$`8ȅ e^&ր*gR"&F܄ge@$SQdQd+FL+_/ح d(Nuara>zString space corruptH/GpvaaF _a`SBe g"`Nu*<(I m ٭ ٭$$-0gRňX$`,Rdd`8<ae <{dNuafgSetHB Vfd`z`z Ga ^.`aJfgSetHB Vf֘d`ac`ad`a e`ab`aSe Se gNuJNu G&$P(<Ƅ VȐ"hNuaN/ I"Ja,gp SQd G`ba&"gSt Qd I"Ja G`: ^&$P(<Ƅ GȐ"he(Nu Ga("P~gNua Ga.Nuxa.Nu("hNu/ a _`t >HǏNu0HiH@>Nu H@g(Jg$HAJ@gJAfHA`JAgH@HAJAf ށeNu~NuDNu$JnDJnDai JkJjDNuJgF //JjDJjDp"~ҁU@D@އeRQ jD jDNuNu^_HNu^]HNu^WHNu^fNu^\HNu^^HNu~Nu_HNu]HNuWHNufNu\HNu^HNu~Nu Ga4)k2BHҁC. Nuv!`:FBH*6HÖk&n"UDk>HǞkn"aևQ"`L` GanJgH<fZxCiff4)C k2BCHUDk0BAҀQ8. NuHxCSDt =QaL`a 3a a a a  FBH*&k趙nUDk.k־n"aևQ"` GaJgV<fxCift4)C kJ^f2BCHUDkJ^fx0BAҀQ8. NuHxCSDt -QaL` GJf.4-4/ x$Nr6ASAHDJDfHD0BkR@Q/ pga*C2 AA ?H؁a222"8B2HR2 UAk0B22R@Q2prHASCd2`"Qd&_Nu2 4BSAA M BC p0 !Q&_ GJfb4-4/ H/~$Nz6ESE"kJRabQ( pgabC2 AA?H؁a(222FY"."R: UEk"""Ra Q(*`0 Ga<f()a0B` ?aJg0if$Ip0Nua < a 6,a@z_HNu,a@n]HNuWHNuVHNu,a@R\HNu,a@F^HNua'z.a?Ca?,`>,<@Jj<a=h?Nuai 0GgDNu,a G`=x&g aJjfNu,<`=rg @cre_c BNu~NuH?@.N"Op QLNu(j (u@#< k:9/6ɿ2_2/ ,*(ԥ%C@"k( $P@  =nѷYŬG7ֿwp_Aܯ ٌ .BҴ$5ϐ|敔ȸw2œJ~ePm%tѸv z Jgkzއ[ Fn| Fmn8DD/A p@<&0@ W.:BEHExHCڃHG6ڃdR:HEOޅkއSFdRFv 8fi FgNu~NuJDk~HFJ<Nu~|ag*e -WHFag .fagnS<NuafVafdRFa~g .fatg Eg<ef0adge -WaTf8aNf DbE`JjDDDSN .fa(faeSF`&eeeևe ևeօe.NuzgLSg< g< g< g< g` +g -g 0e 9bDNuDNuDNuO// ?<JH>f~A?|+."jT/"<HFvA`Pmn d \HSC`ARCPng`ASCPmg/|E+00,4jDBT/- B eR/.B //tC$JjJ(fB8X*x UeBޅ D0Q>HL|TNuHFo GbAp 5dSGfxA/|E+00|+ `d/ .gR :fR0`RR~1HGHG Ef (+VfR :f$ R ` h01f|+S /f S _ Eg0`LNuH.f 0tLNu,ap"OE` 5e / ".gR :f0`|1RG$_ Eg0`<-gr |RE "0V|ddJFgJGn0D@F|dP` |>|dD`(.0D@S@e0`0S@f$LNu0S@f0Gc.S@f`SFg .SFfSGE+00JGlDGT(| eR(G `Jgja` A:p0`0A60v=H@00vcH@00vsB@H@0.a9,<Oa8X$~> a9,<Oa8D,a7@$~> a9j,`a$ a a *(a*na6Aa(<"a(j`"_xza*NaaV>Ga(@`*(*`A"a(Jvg mvNJga'`A a'"a(JUgAa'r2a(NuSe<dAa'AJg'JfS`LIBRARYSTARTUPOPENPEEK/POKEBLOAD/SAVESOUNDLOCATEINKEY$GEMDOSDIMARRAYBLITREDIMCVsMID$==MID$RIGHT$ASCINSTRPALETTEMALLOCMENUSCREENSQRTWINDOWJOYSTICKTIMEDATEMOUSELOG Y8 Runtime error at line in module on #Apa+@0Apa+@(Apa+@,NuaHm|9|rPJ-6fr(A|aPraHrwaBQ"B,#`H Lpa#L (IL)HNu l p`&_|dVA`&FLLn0kN0SN0kNp*JgHP0SNL fS`NuzpgH P0SNL f < gR`"NupJgH P0kNL fS``<daT a@pNupDNu`aHz<dҰ<g a"ra`-5f -5fNuH?<?<NMXJ@gN/<NMX-5g<g,-5g*<f$/<NMX<g-5g<fa:M+@LNuJ,"gHrarfaLNuJ,"gHra~rf,"atLJNu<dA`TX.6TJTTTTpQ"aapNuP"pNuQ"rarfapNur,#pNupDNuB,B,#rarE`pNu|dp,@dAB#A B H`rarYaL8a`/ Jikrarba"W2)a2A a"WJikravrcap"_2)aA ``XpNu?AA,0-0|gS@gA 00Nu    H @ra reaLx*&I/ a~&_< gT< gN<g <g< eںgHR/ a&_`JgSJ,gS,/ rar ara&_`r ar aJ,"fah"p@Nu?,?<NMX<f lf -5frpNu?r aFr ax2< gp< g4R,,g,e lf< d<g<d<dp`0,<f< f ,#dR,#A???<NM\Jlg pNuB,`Rgp9Nu0,??<NMXrJfrpNuSgSgUg|SgpDNu&fvRBg/?<=NAJkb8>N?|NAJfPP0(<(؃Aa)mV)C)C$)C |||9@p)@@)@NuPH`t9+@8lAgf LNuF5LCKKBg/?<NAXapNu`8,<d$ gA @N.X@(e|dA`d|p<gJf",gaBf atrpNur)ApNuHl(/, ??<?NAO Jk)@gB$Nup>Nua ,$e agp>)@NuA(r0R<gR$pNua",g$S)AS$dBg?/?<BNAO JkavpNuapDNuax?(,$gA($e(٬٬$a8Jg*)l$/ /??<?NA"/O Jk ѬfHpNua$< g4< g2R,,g(,d"B O | ApB,aXNuB,I? OpaTNuJg&//??<@NA$/O "Jkpgp=Nup"Nua  IJ,f6,Sev H x ggRQdAL0`r`Jg, I,< g< gReSf C`Zv`SH @vapAaBLgNu fXp6Nufp6XNuaB$BSt QdBg?/?<BNA"/O f Hl(/,??<?NAO Jkgr)ApNuaB$Bg?/?<BNA"/O Jl |fZ/?<?B?<BNAO "Jk@g(*HEJEgpH@ @ajf(SE`HE  |aVf ,B$A(aDfNu` f(Jj", )A R $,Ga"GA( ,NuXp6Nu?<?B?<BNAO /?<?B?<BNAO "&Bg?/?<BNAff$, `$/`$,"O pNuad Tp6Nu< g,< gR,,g,e&,$d 8(R$pNuB,`?r ar a2`p2Nu",pNuPRT:AUX:MID:KBD:LST:H@b0HCAaټg (IpLNuLp4Nu8<0DaQNuH@af Hp0a L LJNu lN -f ?+mj+mnNuBm;| Ap 0Q0BmpNBT@g$pMa;@p-6T@;@0<da0-f:pMa;@;|0<da0-faCannot open workstation;@;@BX+m^\BmBmp&at;mTpm;@VBm;|Bm;|p'aJBm;|;|pa4Bm;|Bmpa NuQ7a -gBm+@paBBm;|pzaaBmBmpeapa` pD`p4ONu/ H0@az0/|bCHI o f"+|phaADC1111/HC2"X"\pda|k(<6A"a9@;@&|B,B,#9m "o B2B.Jo g& IavaF R/ a )H."_HaB"l.;l;|+IpiaRmA+HpiaL 8A0P0000pea;|phaL@ASBSCHHJJ-7fa|p0,lT@C$"V#zV3zTapNu;|;|A+H+H;|A"    A"Nu0,2,l4,6mVA`6420ll@AH";|Bm;|p aXpNup;|;|;@LCBllH" H@+@p apNup fpBm`0j 0,(RBg0,&/aLL a$0,(Bm;|;@papNuLCBBm;|llllH"papNu;|;|;|llH"pgatpNup,@d$ATRBV0lld HpNupNuA$C p2!k0TQC$/ (IBm;|;\pa ;\pa;\pa;\pa;\pa(_pNu;l;|A1111pia;|phaL@ASBSCHJ-7faNAX~Nu GE5Nu0<a>-^Nu^aA.` w` PU"wUPp Gvt0-0>H 2aLRCBfNu2a斾|gJGk???<NN\NuaVgR/?<HNA\Jgf @Nu/?<INA\Jga"3a|dpACgTTf`J[HNu|d@AUGdAg(f f~Nu~Nu~Nuff`aޠJf$A0aa>+PCH p??<?<NM\NuA afB0<apaa BNu?<"NNT @NuH"xC g fTRjLNu=M "N8!k6|dAaX/ Ga|aL. I"GaBNua.0|JgB0A4</va.`, Compiled with Power BASIC 0<rtva6f;H$;H.A0<rtvafNuaۜDLST: naSfXv<Igv<Ogv<Rgv<Af2HCt4>.ab6 VaĪ"0HC Iaݸf ^ajT ^`ba.6v`Fa.paf fpra`0|aSH0fNuJGo |d0GNu0Gp4`;m.$Nua;G$Nu;|$Nu Ga$0m$paL G`p0m$a0BfNuafaiJf.Nuafai.JfNuaxfaX`x"m ,fv< g8<"g< gAR<,g< f` I<"g < gR`RJg 0 HfSf/S+Ia. _`ƆC&t p0m$ahC!tp0m$aX.`?Overflow ?Redo from start C/ xR  fa`. _a$ m`n -gB`&x?<?<NMXJ@f xa,.Nu/<NMXJ@g$-5g <faM?xa.0NuxH@?a.0BNug./ m fAN _`??<?<NM\Nu/<NMXNuCHa$-r&ԇnC(p!(+Br`rp(a4`p(r2Se>`p)r`p)`p?`+GNu(-f"/Hz?<&NNO .Nu oHHNuބ/Hz` opNu G(-f/Hz` oB"O Nu(JfHz?<&NN\NuحHz` DNu D0HNu D/"OXNu(JfHz`pa"PNupaM NupaM NupaM Nu="N0m.`42p0m.`p aPNup0m.`42 -6fARmTa6SmTNupJGk gSGf(pa2g jpaHB2RAJVjTNNuSA4SBep`aժJzg6J-~f0|g*|Mg$|Ng|OgX;D;m/-zBzP~Nua6fNuX`B~`&~|f~`Aapa<f~a??<LNAq Y8 Program terminated - press a key to exitA$a _aJUgA&a r2a8`x pFATAL ERROR:  at line HF~Jg*]lDvUt QCt壌JgGNuF"&g.pC2DC|m|4n Q,JlDk.Nu~DNu~Nup"DjDG@AB|Ab DSGkUĆQ(k(j2xc 0D@`fc 0D@`D@@`D@@ԆӅdf UĆR@(fJk0<NuJkJkxAS@J[NuJkV`LHaLHav$OaO `HВR@,@L0 : 8 HB.ڄGHGH@EHE>߃8 < : HBކ,CޅCބC8HFHB: ؅C: ؅C: HA؅CHFHGDHGHDDHFCHF8*܄C8 ܄CHA8 ܄C86 HA؃vHECHEHFDHFHDDHECHE8ڄ"$&@H@@ JmS@|fJf JfS@LXNuLH,.ahLHa\v$OaO `LD@؀ D(*H8x8pJff f0`(e 0USjpRSfЎg0L JkS@|fJf JfS@Nua8 g0HGOGG,H@O@@HGBG p̀Nu|Nuއg HGNu gV H@H@@mH|lFJj@H@VHFNFr FJgdH@Ri H@.<H@Nu~NuDNu/ aJEk6|d WAPd"HpEah( "_Nupa\D+r2a6`DE" 4E|d" ICP$ISESA Q<0Q.`paD-| d0` oE c I`S@f.RNuvgv I0<0QJf JfzvRNuH(I??<HA~aVe*AaNeAnaVo`A`a8ezAa@Ro`Ada$dADaBo`A.adPAa,So`LfNuLLaPHNuLLHaLHNuGLLaap0JgaLaLaHQKA&a~eJjO:6"LLNu?@$@Y@@@È@jA.AcAׄAe B_B7HvBm@B0Bּ&4C k7CAyؠCv4WnUF؉<Ҳt"g pJk S@ҁ`0<vNuMC68341 FLOATING POINT FIRMWARE (C) COPYRIGHT 1981 BY MOTOROLA INC.,GgT klknf`@,k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu<oD&B<ރeNukgvgPk<<d&B꫞kBSbHGއ[kgNu~Nu<oD&.<`DgjD`.<ANuNu.<<Nuk~Nu,FfJfg(gvEDiBHGHFFkTiHGDL&:ƞHGHF6BŞd&BރSE&HCBGHEk:څS>:.gNu,gFg^EDviTE]B&HC(BHD؃BDHDHGHFHFބj gNuiex@ބއdRgNu~NujJ<Nuk gBAkjDNu<Nu~NuBkjDDNufDJjNuHz_Jg0jzDi&SbHGއ[Jj dRNuJj Jjf NufNuMC68343 FLOATING POINT FIRMWARE (C) COPYRIGHT 1981 BY MOTOROLA INC.rtvx2(4(6(8( |o864BA@`J@gHCv6BBHANuH0)hlH0)h|?ovx`J@ga`LL*jfcCD@` ԄӃdR@HLNuJfJgJk S@jHNu0<5@NuJfJg JfJfBBB|XONua/ 04R0(iR@5@&Oz////zL81P֣7CBCSHCԃ6BBHB҂ң7ABAQHAЁ'@\KUEjLJkSjjH&_NuaL/04R0(i5@LL xzJk SjjJk Rjj|?Eg҃тQJk SjjH0,Nu/paBBe"Nua<4/J orp;BBma/-+Ja+_Nu0;m`;oNu>-Nu?<NNT>NupNBT@VHNu ot%ro`0/;@& /H@+@";|"/HA o NTaTD;D0@ O/-+H UD;| r `2r o /H@+@";|NTa;D0@ O/-+HSDeBQa6+_N\Nur `r`r o4/Bm;BBa/-+Ja+_Nur%Bmt`r /H@+@;|tBma/-+Ja+_Nurd`r o;P o t a o0-0;@t9 oaT"< -`xrtBmt oa-^Nupx`ryA H@+@";|` rm;|A+X+X+h4< P`p"/ HA+A"pia o0` o0^Nu0<;|;oBmaNA`"HRfC`(S>-^ o`0<a" o0^ o0` o taAr4Q o0 otaAr4QNups;o;|a^`TDz@@\^VB.84 >F*.,68,>,v @Z 0ИJ(4D@Lt4`N6Bd"B"\g C#' '        +#     7  #3g c3   S     /#    / /3' g '     ' 7 gg7#'S '  #DF7' _{     c+#    /3_   c## 7  /#  _'#   3GC   7/C   SS# 3+/K  #70 T/[SKg?{++      #  3?  G  c;      k ' 3   ?' +KC S          #       C/g7 ? /   #G 3'   C'  #/ 3C7# 3 '+++  ;  o # K$ INSTRUCTIONS FOR WOODLOUSE GAME By Magnus Cooper : AIRFLEET SOFTWARE (TM) Woodlouse Game for Atari ST Written in GFA BASIC Make sure you are in MEDIUM RESOLUTION. Load file WOODLICE.PRG. To play the game select the GAME box on the first menu. Select one of the .SCR screen files. The chosen screen will appear. When the computer has finished displaying the screen a notice will appear asking you to choose a difficulty level. Do not do this until you have read how to play the game. PLAYING THE GAME On the screen there are lots of little symbols, each of which represents an object. You control the woodlouse, which is a small armoured creature with two red antenna on the front end and a stripy body. Find him on the screen so you know where to start. (He may be under the notice so you will have to wait until the game starts.) The following keys move the woodlouse: "Z" = Left "X"' = Right "'" = Up "/" = Down JOYSTICK CONTROL OPTIONAL  At the start the game may run quite slowly so don't keep your finger on the keys too long or you will put commands in the buffer and you will lose control of the woodlouse until the buffer emptys. The aim of the game is to eat up all of Farmer Browns little green seedlings. This is not as easy as it may look. The red bottles contain Farmer Browns Poisonous Pesticide,and if you eat one of those you will lose a life. You may have to eat poison in order to get some seedlings. Make sure you have enough lives before doing this. (Lives are displayed in the top-left hand corner of the screen, and you start with 3) If you eat a battery and your lives number less than 5 you will get an extra life. The batteries are green with a red label. DANGERS TO THE WOODLOUSE There are two types of creature which are dangerous to the woodlouse. The most dangerous are the red ANTS. These have black heads and will go after the woodlouse if nothing is in the way. If an ant catches the woodlouse it will take away one life and vanish into thin air. SPIDERS are not quite so dangerous. These are like black asterisks and wander aimlessly around eating up any woodlouse or ants in their path. Unlike ants, these do not dissapear if they get you and may strike again! At the start of the game you will be asked to select the ant difficulty level. This governs the way that the ants move and how intelligent they are. Ants and spiders will die if they eat poison. The black and white blocks with a diagonal cross on are solid and cannot be moved. WINNING AND LOSING If your lives go down to 0 you will lose the game and a notice will appear asking if you want to play the same screen again. If you successfully eat all the seedlings you will be applauded by a huge woodlouse firework. *"* USING THE SCREEN EDITOR The EDITOR enables you to design and create your own screens. Select EDIT on the main menu. You will then get a choice of LOADSAVE , EDIT or QUIT ED. If you don't want to edit click on QUIT ED. If you wish to load a screen and change it click on LOADSAVE, then click on LOAD and select a screen file. If you want to make a screen from scratch then click on EDIT, and then NEW. Type in a name for the screen ( not more than 8 letters ) and press [RETURN]. If you loaded up a screen you will see a lots of numbers appearing all over the screen. If you are starting from scratch, then nothing but a row of 3s will appear round the edge. Each number stands for a different object. Here follows a list telling you what each number stands for:  1 = WOODLOUSE STARTING POSITION 2 = ANT STARTING POSITION 3 = SOLID WALL 4 = SEEDLING 5 = POISON 6 = SPIDER STARTING POSITION 7 = BATTERY 0 = BLANK SPACE (or click right button) Press the number key which corresponds to the object you want.(If you want a seedling press 4, etc.) The object is now ready for positioning. To position the object, move the mouse to where you require it and click the left button. The number you chose will now appear where you clicked, unless it was 0, in which case a blank space will appear. It will overwrite anything that was there previously. If you hold down the mouse button and move the mouse you can make a line of objects. If you want to put a different type of object, simply press the corresponding number. NOTE: The edges of the screen are always wall(3). You cannot change this. RULES FOR MAKING SCREENS There are four main rules to keep in mind when designing a screen: 1. Always put one and only one woodlouse start. 2. Never put more than 20 ant starts. 3. Never put more than 20 spider starts. 4. Always make it possible to eat all the seedlings. If you surround a seedling with walls so that there is no way in, then the screen will be impossible.  The computer will check if you breach the first three rules but you have to check up on the fourth one yourself. FINISHING THE SCREEN When you think you have completed the screen, press the 0 key, move the mouse to a blank space and click both buttons simultaniously. You will be asked if you are sure. Say YES(YOP), then wait a couple of seconds while the computer checks the screen for rule infringements. You must now save your screen or else you will lose it. Click on LOADSAVE and then on SAVE. Use the standard GEM item selector to save the screen. Unless you want to do any more editing, then click on QUIT ED. You will now get back to the main menu. QUITTING To quit, click on QUIT in the main menu. I HOPE YOU ENJOY THE GAME THE END `sS` Efv*oM'\ m HPHUBg?<JNA(m)m -:gS)@ -OK1PC#HNHx?<HNA@)@l/?<HNA)@h&@)@XЬl)@d)@`ARCpr Ѝ"QHNFALNDHz2?< NA\pdAxr0XQ)K\NN 2nppvJrBjNuHz?<&NN\NݔCAp$L Qp Nۀ9lrBlJpNNۀpMNۀ9@pdAr 0Q0tr N9lNupealp`NuaNJHz?<&NNBWNANC2A@p222NrҌ0<NB0,rNurA9Ar`v C9Cr`rt9@9A9BNrrҌpsNB0,Nu9@N`rDҌpsNBNuC2 @ e @}bA@p222Nr,Ҍ0<NBNu    -pa4|a@:>< |a6RGk0Gg`a(0GVfA1G<ap??<?<NM\Nu??< NMXNu&8*:EENuHn 2$4BBNuAd RdQRB BbABJk 0NuJBjBBXNu 0Nu 2$NuE`B<gJEgEjCDEDF Fe( F dF8BCHC` F0bFHC8v` HD8HDkDуdQRBNuDdBDA@kgAр[SBk0NuJlJBk&Nu0g H@rB JkЀ[` BbNuJBj prtNuHPAJgPpr$< _Nup _NtNu&8*JEgJBgJjBEB:HC҅H@:|ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB BbNuNpNNuCDEJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@N?<,>CEdGH@0r`?<`JBgVB&8TTDуdQRBNuDAр&AdRAрAрDуNuprt|=|  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dajSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`HJjDDDS4</NJFkSFk&aQN`Ha"FFaQL8N߸6.JgtBnNupr$<NuJBk4<rpAC v JBgJjv-| Bb BkH>aaNRFBdL8?N߸<JBga2SF Be BgQRB`ApdR e <rRF&0xafEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`2:HQ A dNAXJ@jNNuNfJ@g,A,BBgHQ?<=NAP FJ@k??<>NAXtNutNuaHQ` @gS@@CNu   aH@@`"aH@@`a0) 4a3B HA2;i`0^ M / hawAnFNuAXr%eee%NuAMNuA.A&HP 0 0 &0&?< NN\Nu vN)@p `H@)@prtNAHplrtNB 2pN۾pN۲papaprapalpalpalpaTpaTpaTBp'a?<NNT@B){L9|0<rtNpapap9@p`pvNv`v`vj`v `v`v`v`?Aa*` Al 2l 4)lVH)lRprtNAl 2l 4HVNuAl 2l 4L VA0000000000prtN9Cp rtNAv` Av `Avl 2l 4)lVHNZA VB0BP9|p tNA~`9@Z0<rA~HA VBB0ZBP9Gp trNAl 2l 4HPrtpgNaBp0,l 2Nua40,HNua*p0,l 4Nuaprt0,l 22,l 44,NuN9||BlBlrҌpsNBNu?<NNT$g4<rЀ[Nu0<}N8& ?<NNC`&?<NNT"@ C <}N`N@((?<NN.?<NNX@LvA HA HNuNup9@HA)A,N FNf @e024E$ Bb5B5A6CC5CK5CAB008:Dk`Ek\00<,>,SFSGFnHGnDDDk9DBlDEk9EBlFcllGcll0,lb 0,lcNupmrtA)HA)HNpN8HHPN4 _:8><DbFEbGCHP@dʾAdBD2ƞE29|C???FF22N23BRG0@\@N8"2)IN(* 9AJA)H@@[000][ˈNf Evz`* [g" ]g |g QSz` zQSpQ][ɈNf Dvx`* [g" ]g |g QSx` xQSpQ]Bp4NۀHNu*( INfA)H @depd ae zb QB DNfA\)H @ e` ae zb \gQBA BhNpZNۀA BP"`#|}NA"H0,tg"Hg \f`A\fS A EN8AR@H`2QNu@9@JpNNۀr|<Nf @xepw2A$JBjDFHB t`0QBl9F)lVTAtp 9| N2(g"P@g2RADAH""l`r2oZAe 1@#)I`Nuk1@Nup NN"l`dpNAtrdJhk\QpaNH ld$l`"Hg0 k&@ S`g k#&@0+S@H3 Q&f)I`LNu?<?<NAXJgJgN(AH@B pNPA NuApNPA0pNPA pNPN@$N$BS@kH2QNupC ұd"X0Pg"RA$D#Nu"X0Nu _0HpNP _0HpNPp"_0HqNp"_0HqNE ұeHHQ0)N8$_$ZR@H`2QNu$Y0gHR@@"D%$X0P2g# R@%NupE $ $X0dP.gRG,D%pr Y2dP.gRG,D!p4Ae4v`VfANuNWHNuNVHNu Ihd*N$E$RR@H`2QˈNf ENu(* 0(iN$E 4R`Q$D 4R`QˈNf DNf ENua NuNf IHPg"B  g &gNJBjt BNut`Rptr ae OgT Xgj HgSRB ae Fb$0k  c_  c b退`tSJBkNRB0 b b瀀`RB0 fрd`pC 0(gFd"P$I` *N$E$R(S@jv A(Wf( ae zb Q DNur ,* Nf& ( ENf C"Sj|AcRGFc8>`4A g6 g0 g` gTlfelhgFf2pRGRFa`a,` `?~ap ap a 0NuCpE`bf`FgRGJGgRSGSFFgCpE`Yf`Nua@Jf gH@ fa(@ fza0 b @ Ee0Nu?<?<NMXNur9A(HNLNu0,^2,`NzEfpaRppaNAEg0PaľEfa4RE`p a2a*Efp a(NldeS@f lbfSl`9Ab9FdNupapqr`p`"p`tdbDA0Hg<<R@f|0HN*JFk*HQ/??<?NAXfX ENuJkpNp`p`\F( &I.` ??<NMXJ[j E&DNup`pNu)H9@Jp4NۀP'J&f H LNu P&NuQ'` J,'fJ,&gHA#ȇeC! B,&LNu-W)K20, 8k8@ gJl&f"Nu , 8g"P 8 @/, 8NX  8fQ 8J,'gNupB <``L@ H)l26)z @W , Jf`CfSHj-D@Hd0H@H 0H@0`fSC\fS , @a"C\fApNNNjHP?< NA\NuH@aa/a a Nu@0 9c^Nu| PC>$Error # ][Abort]\f.B &lX)K\)ld` lp ,BQjNup(NV"l`Yd&-KNN"l`YepN&#k"C-KN"Cփk փk2##`փk"`2`& $Y8gHRDD*D%H8#$c2g# HRDD%H`p"l`Qd&&| NuN"l`QepZN?<NNTSfN(HxN,PLAY WOODLICE GAME IN|MEDIUM RESOLUTION ONLYHPNENDr"_ NZANNjHxNpCv~NtHxNpC킠~Nt+|M+|+|+|N)pN۲Bm <r$<ANBm <r$<ANANvNN/ANvNN"NANvN&<x*<NfN/ANvN&<x*<NfN"N(N`~NqN`ZNqpNNd&<x*<NH&<x*<NfNNNd&<x*<NHNNprN <"<NtpNpNpNp Np#riNN AIRFLEET WOODLOUSE GAME 4"<NNprN <N(NN* MAGNUS COOPER : AIRFLEET SOFTWARE : 1989 NprNN$ LOADING AND SAVING BY ALAN COOPER Np rNN/ This program is copyright. It may not be sold 4NNp rNN/ commercially. It may be sold as public domain 4NNp rNN/ software or given away. 4NA 00 <r$<&<x*<A NA N+@+|/-/-AFxNXN `NqNqN _____ |/_4C\NN /||||o\/ 4CbNp N(HP <N("_NHP <N("_NHP <N("_NHP <N("_NHP <N("_NHP <N("_NHPN "_NChNA 0 <r$<ANNAN/p"NA\NNNAN/p"NAbNNNAN/p"NAhNNAN&<x*<NJBfN.lHm\A\NfNH <r$<L8NbN"_NC\NHmbA\NfNH <r$<L8NbN"_NCbNHmhA\NfNH <r$<L8NbN"_NChN?<?<Nd&<x*<NHN/NdvNN" _N>pNN`|Nq?<Bgpr _N>p2NNAHI THERE WOODLOUSE !!| ___ ___ |/o*o\ /o*o\| ^ ^ ^ ^4C2NHxHm2NEDITOR|GAME|QUITr"_ NZANAN&<x*<NVJBfN/vN@AN&<x*<NVJBfN1NDO YOU REALLY WANT|TO QUIT?UCPNHxHmPNYOP|NOPEr"_ NZANAN&<x*<NVJBfN0N.NN\pp@pWBg?<NN\pp@pW?<?<NN\NprNNGOODBYE WOODLOUSENA 0 <r$<ANBg?<?<?<Az" NBgBgAz"NN`NqNqNzpp@pWBg?<NN\pp@pW?<?<NN\NjNpNpNpNp Npd"<NN EDITOR...."<NpN?<Bgpr _N>pFNNNWHAT NOW ??? C2NHxHm2NLOADSAVE|EDIT|QUIT ED4r"_ NZANAN&<x*<NVJBfN3DN CVNHxHmVNLOAD|SAVE|CANCELr"_ NZA퀐NA퀐N&<x*<NVJBfN2zN1rA퀐N&<x*<NVJBfN3>N2YOU WILL LOSE YOUR SCREEN|IF YOU HAVEN'T SAVED IT!CPNHxHmPNTHATS OK|OH NO!!r"_ NZA퀜NA퀜N&<x*<NVJBfN38N1rN=N>AN&<x*<NVJBfN4N.YOU'LL LOSE YOUR|SCREEN IF YOU HAVEN'T|SAVED!!CPNHxHmPN OK|GO BACK!Vr"_ NZANAN&<x*<NVJBfN3N1rN.N3CONTINUE OLD SCREEN OR|MAKE NEW SCREEN|OR SAVE/LOAD4CPNHxHmPN OLD|NEW|S/L r"_ NZANAN&<x*<NVJBfN4N1rAN&<x*<NVJBfN4N7N6YOU WILL LOSE YOUR OLD|SCREEN IF YOU HAVN'T|SAVED IT !CPNHxHmPN OK|NO WAY!r"_ NZA퀊NA퀊N&<x*<NVJBfN5ZN4NNN TYPE IN A NAME FOR THIS SCREEN :NNN"C8N+|M+|+|+|pAvNA 0 <r$<&<x*<ANA* 0 <r$<A*NAN/A*N/pCv~N\N`NqNqN `NqNqA* 0 <r$<&<x*<A*NA 0 <r$<ANAN/A*N/pCv~N\N`NqNqN `NqNqNA* 0 <r$<A*NA 0 <r$<ANNAN/A*N"NAN/A*NCv~NN|NAN/A*NCv~NJgN7NAN/A*N"Np NN`rNqN`DNq+|M+|+|+|N*H +@ +@ +@ -NvN&<x*<NfN+@ -NvN&<x*<NfN+@ -^HpJBgp/ -]HpJBgp$fN8N7 -^HpJBgp/ -]HpJBgp$fN8N7NCDNADNfJfN8ADNN+@ -NzNpJBgp/ -N&<x*<NpJBgp$fN9>N7 -JgN9RN7 -WgN9fN: -JgN9N -"-Np NNN9N -"-N -N|N/-/- -Cv~N\ -UgN:N -"-Np NN/-/-pCv~N\N7N"ARE YOU SURE| YOU HAVE FINISHED ??CPNHxHmPN YOP|NOT YET4r"_ NZANAN&<x*<NVJBfN:N7B>BBBBBB+|pAN+|pNAN/- -Cv~N+@ -SgN: -R+@ -UgN; -R+@ -YgN;( -R+@ -]gN;@ -R+@N`NqNqN`hNq -SmN;NNO WOODLOUSE|START DEFINED!!CPNHxHmPN WHAT|A|FOOL!r"_ NZANN7 -SnN<8N,TOO MANY WOODLOUSE|STARTS!|ONLY 1 ALLOWED!CPNHxHmPN HO!|HO!|HO!!r"_ NZANN7 -N&<x*<NpJBgp/ -N&<x*<NpJBgp$fN=NJYOU MUST HAVE NO MORE THAN|20 ANT STARTS AND NO MORE|THAN 20 SPIDER STARTSCPNHxHmPNALTER ITr"_ NZANN7N1rNHm8N.SCR"_N6JgN=THm8N.SCR"_NC8NN\*.SCRHPHm8A8""_NHm8A "_NtJBfN=N1rA8NNJzNVJBfN>NFILE HPA8"_NHPN DOES |NOT EXIST !!!"_NCPNHxHmPNOOPS!Ir"_ NZA퀊NN=pAvNpNpNpNp Npd"<NN LOADING...NpIN(HPA8r"_NBpCv~NA퀨NpNA퀨N/ <r$<&<x*<NHvNN"NpNlN6NHm8N.SCR"_N6JgN?Hm8N.SCR"_NC8NN\*.SCRHPHm8A8""_NHm8A "_NtJBfN?LN1rA8NNJ&<x*<NVJBfN@NFILE HPA8"_NHPN" ALREADY |EXISTS !!!|OVERWRITE ???"_NCPNHxHmPNYES|NOr"_ NZANA퀊N&<x*<NVJBfN@N>pNpNpNp Npd"<NN SAVING...4NpON(HPA8r"_NBpCv~NA퀨NpNA퀨N/ <r$<&<x*<NHvNN"NpNlN1rNpNpNpNp Npd"<NNGAME...."<NpN?<Bgpr _N>pFNpNNHm8N.SCR"_N6JgNAbHm8N.SCR"_NC8NN\*.SCRHPHm8A8""_NHm8A "_NtJBfNAN.A8NNJzNVJBfNB(NFILE HPA8"_NHPN DOES |NOT EXIST !!!"_NCPNHxHmPNOOPS!Ir"_ NZA퀊NNA$NBmn+|+|/-/-AFxNXBgBg?<?<A큌" NN+|+|/-/-AL*NXBgBg?<?<A큒" Nt;BnNpIN(HPA8r"_NBpCv~NA퀨NpNA퀨N/ <r$<&<x*<NHvNN"NpNlpC|NrpA|NpC킂NrpA킂NpC킈NrpA킈NpC킎NrpA킎N+|2pA2N+|6pNA6N/-6/-2/-6 -2Cv~NC킠~N\N`NqNqN`NqNqBBB+|M+|+| -RAN+| -RAN/- -Cv~NA퀴NA퀴NzNVJBfND^N -"-Np NA퀴N&<x*<NVJBfND+mց+mځ/-/-AFxNXA퀴N&<x*<NVJBfNE /- -C|NP/- -C킂NP -R+@+mւ+mڂ/-/-AL*NXA퀴N&<x*<NVJBfNEB/-/-AONXA퀴N&<x*<NVJBfNE -R+@/-/-AR2NXA퀴N&<x*<NVJBfNE/-/-AUNXA퀴N&<x*<NVJBfNF$/- -C킈NP/- -C킎NP -R+@+mւ +mڂ/- /-AZBNXA퀴N&<x*<NVJBfNFZ/-/-AZpNXN`NqN`NqN\Nj AN AN4-nNJ&<x*<NVJBfNG -NvNH <r$<L8NbN? -NvNH <r$<L8NbN?A큌"NNL& -NvNAN -NvNANpN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NAN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NAN/ <r$<ANNbN"NAN/ <r$<ANNbN"NAN/ <r$<ANNbN"NpN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/AN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/AN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N(pN۲N~ AN AN -NvNAN -NvNAN4-nNJ&<x*<NVJBfNL <r$<ANNbN? <r$<ANNbN?A큒"NNO <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N(pN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N(pN۲N~ AN AN -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N( -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"NN~ AN ANpN۲ -NvNAN -NvNAN <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NpN۲N~ AN ANpN۲ -NvNAN -NvNAN <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NpN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NN~ AN A NN -"- Np*NN~ AN AN -NvNAN -NvNANpN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N( <r$<ANNbN/ <r$<ANNbN"NpN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"N(pN۲ <r$<ANNbN/ <r$<ANNbN"N <r$<ANNbN/ <r$<ANNbN"NN~HxNSET ANT DIFFICULTY LEVELHPN EASY|HARD+r"_ NZANAN&<x*<NVJBfN]$NeasyCtNN]6NhardCtNN| TO | START | HIT LCPNBHmPNRETURNr"_ NZANN\+| <#N4HP p N?<Bgpr _N>pN -NH <r$<L8NbN+@ -JgNcNod/- -Cv~N[gNdf?<?<pr _N>p N?<Bgpr _N>pN -NH <r$<L8NbN+@ -JgNdzNox/- -Cv~NN&<x*<NVpJBgp/ -N&<x*<NpJBgp$fNe?<?<pr _N>p N?<Bgpr _N>pN -R+@/-/-pCv~N\/- -Cv~NSfNeB+| -R+@ - nNelNj -C|N.JgNeNeJ -C|N.+@ -C킂N.+@/-/-pCv~N\/-/-pCv~N\N -"-Np N+m+mHmtNeasy"_NtJBfNg` -mNf* -R+@ -nNfd -NH <r$<L8NbN+@ -nNf -NH <r$<L8NbN+@ -mNf -R+@/- -Cv~NNzNVpJBgp//- -Cv~NN&<x*<NVpJBgp//- -Cv~NN&<x*<NVpJBgp$fNgZ+m+mNiL -mNgz -R+@ -nNg -NH <r$<L8NbN+@/- -Cv~NNzNVpJBgp//- -CUv~NN&<x*<NVpJBgp//- -Cv~NN&<x*<NVpJBgp$fNhV+m+m -nNh -NH <r$<L8NbN+@ -mNh -R+@/- -Cv~NNzNVpJBgp//- -Cv~NN&<x*<NVpJBgp//- -Cv~NN&<x*<NVpJBgp$fNiL+m+m -WHpJBgp/ -WHpJBgp$fNj?<?<pr _N>p N?<Bgpr _N>pN/-pC|NP/-/-pCv~N\ -NH <r$<L8NbN+@ -JgNjNoxNeJ/- -Cv~N[gNj/-pC|NP/-/-pCv~N\N -"-Np N?<?<pr _N>pN?<Bgpr _N>pNNjpN۲pN/-/-AL*NX/-/-pCv~N\/- -C|NP/- -C킂NPNeJ+| -R+@ - nNk N^4 -C킈N.JgNkp N?<Bgpr _N>pN -NH <r$<L8NbN+@ -JgNmNox/- -Cv~NUgNnBpAN -C|N. WHpJBgp/ -C킂N.WHpJBgp$fNn/-pC|NP?<?<pr _N>p N?<Bgpr _N>pNN`xNq/- -Cv~N[gNo/-pC킈NP/- /-pCv~N\N -"- Np N?<?<pr _N>pN?<Bgpr _N>pNNo^/- /-pCv~N\/- /-AZBNX/- - C킈NP/- -C킎NPNjAqNX <NNzNPLAY SCREEN AGAIN ?4CPNHxHmPNYES|NOr"_ NZANAN&<x*<NVJBfNppN۲ -NvNH <r$<L8NbN/ -NvNH <r$<L8NbN"N -NvNN/ -NvNN"N(pN۲+|2pA2N+|6pNA6N/-6/-2/-6 -2C킠~NCv~N\N`NqNqN`NqNqNNCNHxNpCv~NtHxNpC킠~NtN.NjNA 0+|ȂRpdARNAN&:(D((((D($8BfTbl"*~*hX0?c30<3 ?333?f3c??c?30>3 ?3?33??f3?c??c33073 33330 l33c c3303; 33330 l;3c c3303; 3338 x;3c k3303? 333 x?3k k3303? 333 l?3k 33037 333 l73 33037 3333 f73 w33073 3333 f33w c???>3 ????? c3?c? A?<3 > c3A?  3303033030030p6c3cp33003006c3c7p30À3006c3vc7330073w630303730pp303603s00030c36c603s0003pc36c6033333603313603 310  330  c330  c3ð  c3ð  3  3  3ppp  c3p0p  c3000  330  130  ~  B  pB  CB  BBB  BBB  BBC  BBCp  ~~?  XVVUU  BB@  XVVUՀ  C@  UXu^W  B  ~ ? @8@xB!@|xBHB!!@@HBHB!!@@HBxB!!@@HB@!!@@HB???a?!!@@HB uP55 @SP @P MC]PxB!!@@HB MC_5 _P @\ }CSPHB8C@ MCUP5P T U@P @ TUSP?? Zwpp7wfD@A@W ????? ?????* ????? ?????* ????? ?????* ????? ?????* ????? ?????* ????? ?????* ??? ?? ?????* ????? ?????* ????? ?????+???? ??????????????+???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ??????????????+???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? +???? ???????????? ** ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?(???? ?(?????????(?????????(?????????(?????????(?????????(?????????(?????????(?????????(?????????(  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@*  ????@@@** ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? * ????@@@???? +???? ????@@@?????+???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)???? ? ???? ?)?????????????@@@)????????@@@)????????@@@)????????@@@)????????@@@)????????@@@)????????@@@)????????@@@)????????@@@)????????@@@(* ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?( ???? ?(???? ?)?????)?????) ?????)?????)?????)?????)?????)?????)?????) @@@*  @@@*  @@@*  @@@*  @@@*  @@@*  @@@*  @@@*  @@@*  @@@**@@@)@@@)@@@)@@@)@@@)@@@)@@@)@@@)@@@)@@@@@@)????@@@(????@@@(????@@@(????@@@( ????@@@(????@@@(????@@@(????@@@(????@@@)???? ????@@@)????  @@@)????  @@@)????  @@@)????  @@@)????  @@@)????  @@@)????  @@@)????  @@@)????  @@@(* ( ( ( ( ( ( ( ( ( @@@( @@@( @@@( @@@( @@@( @@@( @@@( @@@( @@@( @@@( @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@(  @@@( %  T*wpp7wfD@A@W????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@         !????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@!????@@@ ????@@@!????@@@????@@@!????@@@????@@@!????@@@????@@@   ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????  ????@@@?????!???? ????@@@?????!????? !????? !????? !????? !????? !????? !????? !????? !????? !?????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@*????????????@@@)                                    ????    ????    ????    ????    ????    ????    ????    ????    ????    ????             ????    ????    ????    ????    ????    ????    ????    ????    ????     ????                                                                                                                               9                                                                      ????     ????????     ????????     ????????     ????????     ????????     ????????     ????????     ????????     ????????    ????                                                                                ???? ????   ????  ????   ????  ????   ????  ????   ????  ????   ????  ????   ????  ????   ????  ????   ????  ????   ????  ???? R*bd  T*%I@ ?&& <@@@@@5uٙY߀F@OYـAF@\_FF@@@@@<@ ?? <;?<1313<<G<< <@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@<@~f~f<<<~f~f|<|<>||8>`<`<>f f>f< 9< <@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@<@G<<<<G<<