¾¿—ô01DLÙLIÍÊÁÄÃX1¨Y1¨ÂX2¨Y2¨A1¨A2¨A¤F1¤F2¤B¤F3¤B1¨B2¨SMILÙFROWÎANIMAÌNUÍANIMAL²LOCÎTASËÒGRÐÎMAXTIMÅTIMEUÐCNÔMUÍRANÄSEQÎVB¤VBI¤VBÉHÉLÏSND1¤SND2¤SND3¤SND4¤MC¤CSPAGÅCÓDÌËTIMÅÐSMILEÙTYPÅØÙCHRS¨ÉANTIÃ@@@ @ @ @ € €€€€@@ !"#€$€%&'(€)€*€+€,€-./01234567@89:A€@%%*******************************›%%* OLD MACDONALD, a game for *›%%* children by *›%%* STAN OCKERS *›%%* from ACE NEWSLETTER *›%%* 3662 VINE MAPLE DR. EUGENE *›%%* OREGON, U.S.A. *›%%*******************************› ›d A € APnE#@@K:/6€-@;6-@E A0x[ +@-@@;(@ INITIALISING[(@ TAKES 15 SECONDS}<¹-@A ¹*6º-F:AY,<AY‚¤s†9@,‡9@,‰9@,Š9@,‹9@,Œ9@,;@,Ž;@@,;@@,;@,„67@,. •67@,. ¤67@,.ŒS #AP!‚-@+"ƒˆ…„46†8‚,-ƒ=6‡8‚,-ˆF6‰8‚,-…O6Š8‚,-„S ‚–bb3,6,22,6,8,6,27,6,13,6,32,6,5,9,24,9,12,9,31,9,4,12,23,12,10,12,29,12,6,15,25,15,12,15,31,15› i6Ž7@,.kmm'6Ž7@9,.M66Ž7@,.ŽI67@,.lnnZ67@9,.Mi67@,.ª>&‘;@,’9@,“9@,>6‘.xxxxjopjjopjjopjj´; A A)@A;B7tA¹AYº¾l6”-6•-((>:A%,J2@l2@È_-@(Ž,-@1(C-@H(ŽZ-@_(Ò]‚-@@#-@‚-(‘7‚<‚,9-@ ‚C(‘7‚<‚,O-@8‚Y(‘7‚<‚,] ‚Üq%6–-P:H:,$@,%@K6—-P:H:,$+&@,,%@Y6˜-–%@e˜"@q6˜-@æ9™"#‚-@,6‹8‚,-‚56Œ8‚,-‚9 ‚ð™"@ APúµ"6˜-– Ap A€A-@@ A(@ šA"* MATCH GROUPS *›, A61 A#‚-›&@- A01 ‚@6œ-6@J= A€6œ-œ%@)œ!&@3 AP= A T=‚-’8œ,&@& A* ‚36-’8œ,= AP^%6ž-@`$€ A % AhŸ"@A0r ’8œ,› AP A | Ap A †š@A* COUNT ANIMALS *›š'‚-—&@# A0' ‚¤'6 -6ž-@`$€' A ®! A!Ÿ"A`¸E 6‚-  A A0+6 - %@16- ; APE A   —) "—A0Ì  "— Ap A Ö AP A à* MATCH PATTERNS *›êI 6—- AP A0C6¢-P:H:,$+&@,,%@I6–-¢ô?‚-&@'6–-–%@3–!@?6–-@þ A0 ‚46£-6@$‚-@06Œ8‚,-‹8‚,4 ‚5 A€6£-£%@!£!+ AP5 A H 6˜-’8£,"‚-&@06˜-˜%@<˜!@H6˜-@& A ‚0%6ž-@`$€ A % A:Ÿ"@A0D ’8£,¢ AP A N Ap A X* RANDOM #, 2 TO LIM *›b,)6›-P:H:,$+&@,%@,,$l* RANDOM #, 1 TO LIM *›v"6›-P:H:,$%@,"$€* VBI ROUTINE *›ŠD¥;A(,#A`.‚-@A(2"ƒ@6¥7‚<‚,.>:ƒ,D ‚”dd162,3,189,128,6,240,115,222,132,6,48,39,189,132,6,205,160,6,176,102,189,152,6,240,97,189,148,6›žgg41,240,29,152,6,72,134,205,138,10,170,104,157,1,210,166,205,222,152,6,24,144,71,189,136,6,133,203›¨gg189,140,6,133,204,189,148,6,133,206,188,144,6,134,205,138,10,170,177,203,240,32,157,0,210,165,206›²dd157,1,210,166,205,200,177,203,240,23,157,132,6,200,152,157,144,6,189,156,6,157,152,6,24,144,12›¼CC157,0,210,24,144,223,157,144,6,222,128,6,202,16,133,76,98,228›Æ* INSERT VBI ROUTINE *›Ð/ #A@!‚-A6AE%"ƒ+‚ƒ/ ‚ÚE 6¦-C:¥,6§-P:¦'AV,-6¨-¦&§$AV9A8¨EA@§ä%%104,160,0,162,0,169,7,76,92,228›î* SOUND STRINGS *›øD©;A,#Ap.‚-@A2"ƒ@6©7‚<‚,.>:ƒ,D ‚hh81,20,81,20,81,20,108,20,96,20,96,20,108,40,64,20,64,20,72,20,72,20,81,60,108,20,81,20,81,20,81,20› ii108,20,96,20,96,20,108,40,64,20,64,20,72,20,72,20,81,60,108,20,81,20,81,20,81,20,108,20,81,20,81,20›jj81,20,108,20,81,20,108,20,81,20,108,20,81,20,81,20,96,20,108,20,81,20,81,20,81,20,108,20,96,20,96,20› ..108,40,64,20,64,20,72,20,72,20,81,60,0,0›*Dª;@˜,#A .‚-@@˜2"ƒ@6ª7‚<‚,.>:ƒ,D ‚4WW128,20,128,20,128,40,121,20,121,20,128,40,108,20,108,20,121,20,121,20,128,60,0,20›>ll128,20,128,20,128,40,121,20,121,20,128,40,108,20,108,20,121,20,121,20,128,60,0,20,128,20,128,20,128,20›Hjj0,20,128,20,128,20,128,20,0,20,128,40,128,40,128,20,128,20,121,40,128,20,128,20,128,40,121,20,121,20›R33128,40,108,20,108,20,121,20,121,20,128,60,0,0›\D«;@,#Ap.‚-@@2"ƒ@6«7‚<‚,.>:ƒ,D ‚f3396,20,81,20,72,20,81,20,96,20,81,20,60,60,0,0›pD¬;@,#A.‚-@@2"ƒ@6¬7‚<‚,.>:ƒ,D ‚z::102,20,108,20,102,20,121,20,162,20,128,20,121,60,0,0›„* PAGE 6 INIT. *›Ž/ #A !‚-AdA–%"ƒ+‚ƒ/ ‚˜VV1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0170,170,170,170,10,10,10,10,10,10,10,10,0›¢A–@¬B6§-P:C:©,'AV,#Av§66¨-C:©,&AV$§BAr¨¶B6§-P:C:ª,'AV,#Aw§66¨-C:ª,&AV$§BAs¨ÀB6§-P:C:«,'AV,#Ax§66¨-C:«,&AV$§BAt¨ÊB6§-P:C:¬,'AV,#Ay§66¨-C:¬,&AV$§BAu¨Ô6ƒ-?:A6,Þ$è* CHANGE CHARACTER SET *›òD­;@B,#A .‚-@@B2"ƒ@6­7‚<‚,.>:ƒ,D ‚üKK104,169,0,133,203,133,205,169,224,133,204,165,106,56,233,5,133,106,24›ZZ105,1,133,206,162,4,160,0,177,203,145,205,200,208,249,230,204,230,206,202,208,242,96›€6ƒ-?:C:­,,&6®-F:A,%@46¯-AV$®>+PAbAtA €AV®3 #A€%‚-¯%A¯%A)"ƒ/‚ƒ3 ‚$3 #A%‚-¯%Av¯%A ')"ƒ/‚ƒ3 ‚.$8OO0,165,41,10,2,0,0,0,0,85,85,85,149,170,195,243,2,66,106,104,160,128,0,192›BRR160,47,160,0,0,0,0,0,0,21,165,165,133,134,134,134,0,85,85,85,169,170,166,170›LWW0,90,90,90,86,86,86,85,253,21,145,149,147,159,175,169,127,84,68,84,196,244,240,96›VNN138,138,138,72,72,8,8,8,90,85,85,85,68,192,192,192,165,170,106,0,0,0,0,0›`TT90,90,154,19,19,19,19,19,32,152,152,152,152,152,168,42,8,38,38,38,38,38,38,168›jZZ162,162,171,43,62,61,60,255,138,138,234,233,189,125,60,255,8,42,234,251,127,95,15,63›tFF64,16,21,17,81,87,5,61,4,16,80,16,20,84,64,240,0,0,0,0,0,48,12,3›~RR63,63,63,58,58,50,48,240,240,244,245,185,186,186,48,60,3,3,67,87,85,165,5,85›ˆJJ0,0,0,0,2,9,25,38,0,0,0,170,106,153,157,111,0,0,0,128,96,152,153,102›’YY38,41,41,10,2,0,0,3,110,157,174,110,191,191,192,192,102,154,154,104,160,128,192,240›œAA0,0,0,255,40,40,248,56,0,0,0,0,0,5,21,84,9,42,43,10,0,0,0,0›¦UU90,248,255,168,12,60,0,0,137,42,170,170,170,42,58,58,90,106,169,165,169,170,3,3›°;;138,168,162,106,170,170,160,160,0,0,0,160,160,128,0,0›ºSS0,0,1,6,26,27,107,107,0,85,170,170,170,235,235,235,0,0,64,144,164,228,233,233›ÄSS106,106,27,26,6,1,0,0,170,170,170,235,190,170,85,0,169,169,228,164,144,64,0,0›ÎTT255,255,63,60,15,3,0,0,255,195,60,255,255,255,255,0,255,255,252,60,240,192,0,0›Ø60,60,60,60,60,60,60,60›âQQ12,56,40,40,235,235,235,40,40,235,235,235,40,40,40,40,0,0,0,0,255,255,255,0›ìOO0,255,255,255,0,0,0,0,60,60,60,60,60,60,149,149,149,170,60,60,60,60,60,60›öQQ0,0,3,15,63,63,252,252,0,255,255,255,255,60,60,60,0,0,192,240,252,252,63,63›* CHANGE DISPLAY LIST *› ‡%6°-F:A`,%F:Aa,$AV9°%@@hM‚-@@$[°%‚@_ ‚s°%@%@‡°%@&@@°%@'@+‚-@)@2@°%‚&@F:°%‚,/ #A !‚-AA%"ƒ+‚ƒ/ ‚(72,62,52,78,58›2AR@$<* SCRAMBLE ANIMAL POS. *›F‚-@PD6›-P:H:,$@ ,3±-‚&@D‹8±,"›A`ZA ±6‹8‚,-›6Œ8‚,-‹8‚,%–-Œ8‚,!@A6Œ8‚,-Œ8‚,&@ d  ‚ $n* PRINT ANIMAL ON RIGHT *›x2#A@%@$˜"--‰8Œ8‚,,Š8Œ8‚,,2(‚("!-‰8Œ8‚,,Š8Œ8‚,,%@%(($Œ* PRINT ANIMAL ON LEFT *›–2#A@%@$–"--†8‹8‚,,‡8‹8‚,,2( )"!-†8‹8‚,,‡8‹8‚,,%@&()$ª, :;<=, ,›´>?@AB,CDEF ,›¾ GH,IJK,›ÈLMN,OPQ,›ÒRST,UVW,›Ü XY,Z[,›æ ,\]^_,›ðNAdAU'@9@K@ N$ú1%6²-F:@ ,%AV$F:@,+²!ž16ž-²$^6³-@$.‚-@6?`:-³@ R(@>:%AD,^-³@ N(@ .2@@@@‚2 ‚>-³@ K(@N$"/‚-@@#-@‚((, ‚/$,/‚-@@#-@!‚((, ‚/$6!6Ÿ-!AdAU@:%6²-F:@ ,%AV$F:@,+²!ž76Ÿ-@:$JOF:B2y,"@'% A0/+9 AEAV®O AT33F:Ad,"AU*T:,"@A^$h* FROWN *›rAg@|#6³-@$+@&•,%@/-³@@(@qrsL-³@](@ghik6•-•%@•"@ A†”%•!@ 6”-´&@$š* SCRAMBLE ARRAY *›¤‚-&@®4 A#±-‚&@4’8±,"›A¸ ±6’8‚,-› ‚$‚-&@Ì4 A0#±-‚&@4’8±,"›A@Ö ±6’8‚,-› ‚$à* SMILY *›êAf@ôa6³-@$”%@%-³@6(@abcB-³@S(@defa6”-”%@þU”"@ #‚-@A' ‚9Ad@KAe@U A”%•!@ 6•-•&@$* MENU *›&e +@-@@=(@SETUP CONDITIONSO-@@e(@choose #0e-@@1(@(1) locations:C-@@ O™"e(@ ORDERED:$™"@$(@ RANDOMD`-@@/(@ (2) animals:A-@@Mµ"`(@ SAMEN'µ"@'(@ DIFFERENTXd-@@+(@(3) task=-@@Iš"d(@ MATCH GROUPSb+š"@+(@ COUNT ANIMALSl+š"@+(@ MATCH PATTERNv^-@@2(@ (4) dly time €D-@@^(@ (5) limit €1-@@!1(@(6) start pgrmŠ.)@ƒ.ƒ @I)ƒ!@TA ”ƒ"@T$ž+! AP%@$+ƒ&@H,+ A0¨6™-O:™&@,$²6µ-O:µ&@,$¼v(@>:A%,+-@@F(@ choose a taskX-@@v(@(1) MATCH GROUPS¾F-@@4(@(2) COUNT ANIMALSF-@@ÀM"(@(3) MATCH PATTERN/)@ƒMƒ @I)ƒ!@QA€Â6š-ƒ&@I$Æ”(@>:A%,+-@@D(@ ENTER DELAYV-@@n(@ TIME (SEC)€-@@”(@(1-9)È<)@€6€-€&@H<€ @)€!@ A Ê$Й(@>:A%,+-@@C(@ ENTER MAX.U-@@l(@ NUMBER OF~-@@™(@ ANIMALS (3-9)Ú<)@6-&@H< @)!@ A Pä$î<)@€6€-€&@H<€ @)€!@ A ø$™(@>:A%,+-@@C(@ ENTER MAX.U-@@l(@ NUMBER OF~-@@™(@ ANIMALS (3-9) <)@6-&@H< @)!@ A P$ P +@#A +‚-@@3"¶·ƒ9-¶·I(@>:ƒ,M ‚P$*gg7,3,111,9,2,76,11,3,196,1,8,205,3,7,65,5,8,99,8,8,228,10,7,239,12,8,110,14,7,193,16,8,236,18,9,68›€D:OLDMAC