' +JJJJ ?\>m0M='+l> /+L  P˵B̵CõDĵEµµBD ĵ ⵭µ ۰ µL`l렮 귭෍ᷩ췩緈JJJJx i L`֭Ƀ,JJJJ l9`i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y&ސ 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зސ꽌ɪ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&" ʎ L/  !"#$%&'()*+,-./0123456789:;<=>?`  *鷽DžHI))g Db- RD7.$HNOLM*Ѝ"LONNO OЅO뭁lJJJJ I췩LEB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`, HH`9`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   d@ŵLҦL [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<ԍ L}JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\8õ浍õĵBD` L[W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& $`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLLz L^ ۰L^  ȟ QlXJ̥KlV  ȟ QlV eօ3L׮ʊHLQ &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵLȿõ` F`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9 ߼V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ@跻~!Wo*9~~ɬƬ~~~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL ꝍ ŤL{ BH [ h`Lo õ ڬL ꝍ ŤL~H hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8DH ؿ E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭  ˤLª 뷰` Lk ݵܵߵ޵ ^`8ܵ i B8` 9L%ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵BֵO G굎뵎쵬 뵎쵌`` ַ յյ`@ +õm浍õĵL õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d֠֠z# 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`ݎP*تժժպ'I'Y7'''I'I'Y7'I' غ`0 """ꇀתժժժ>"ժՎغժժժՃx?x?x?x?x?x?x?x?x?x?x?쁀ժժժU ժՎx ! xq xH ()ժժժժժՏyppp pxxxpxXXߪժժժ U ժ@ՕՕՕՕՕP ժ@bpcaB`aQraՎ@*끀تժժպ'I'Y7'??I' Y7?y'@ غ@ժժ"ժժժՏ֪ՃժժժՃ끀ժժժժ ժՎ !  !()ժժժժժվP   ઝժժժ U ժ쇀@PՕՕՕՕՕT ժ@BbRbՎ ꁀتժժպ0I'Y40?<I! Y4< P*غժժ@ժժժվ֪ՃժժժՃꁀժժժժ ժՎ qxpx pp pxXXժժժժުժժժժժ ppժժժ U ժ@0ՕՕՕՕՕU ժ@rpBRՎՆ@ ꁀتժիժպ0I'Y40?<I!I'Y4< 0T*غժժ"@ުժժժ֪ՃժժժՃ"غՕՕՕՕՕ ժՎP   ժժժժתժժժժժꇀժժժՊ U ժ@>pՕՕՕՕՕU ժ@BRպՙꁀժժժՎ'I'0'??I? #0?I?T*֪Տꁀy?y?y?y?y?y?y?y?y?y?y?"תժժժꇀ x pp  qp ()ժՎժժժ"ՃֺՕՕՕՕՕ ժՃ  pժժժժժժժժժժժժժՊU ꁀ`0""ժժժժ U ժ@pa`asqpa`1qasꁀԆժժժժՎ'I'3'?'I'03'I'T*֪վꁀy?y?y?y?y?y?y?y?y?y?y?"ժժժժժ !   ()ժպժժժ"պՕՕՕՕՕ ժՃժժժժժժժժժժ쁀U ꁀ0o "Տ૝ժժժժ U ժ@@ժժժժՎ J' # > :8 # ?쁻4*֪ުꁀ 00 # 0 0I' # 0"ժժժժժx p   yH ()ժꁀժժժ*պՎ@ՕՕՕՕՕ ժՃժժժתժq!qxqx pp ()쁀T ꁀ0a<վժժժ U ժp`ՃժժժՎ 0L' # 0 > 0|< # 0纀*֪תꁀ # I' # "Tժժժժժ !   ! !()ժժժժժ6ժՎ@ՕՕՕՕՕ ժՃ``ժժժU تժպ ! !  ()쁀@P ꁀ0o"" ުժժժ U ժ                    ݎP*تժժպ'I'Y7'''I'I'Y7'I' غ`0 """ꇀתժժժ>"ժՎغժժժՃx?x?x?x?x?x?x?x?x?x?x?쁀ժժժU ժՎx ! xq xH ()ժժժժժՏyppp pxxxpxXXߪժժժ U ժ@ՕՕՕՕՕP ժ@bpcaB`aQraՎ@*끀تժժպ'I'Y7'??I' Y7?y'@ غ@ժժ' ժժժՏ֪ՃժժժՃ끀ժժժժ ժՎ !  !()ժժժժժվP   ઝժժժ U ժ쇀@PՕՕՕՕՕT ժ@BbRbՎ ꁀتժժպ0I'Y40?<I! Y4< P*غժժ ժժժվ֪ՃժժժՃꁀժժժժ ժՎ qxpx pp pxXXժժժժުժժժժժ ppժժժ U ժ@0ՕՕՕՕՕU ժ@rpBRՎՆ@ ꁀتժիժպ0I'Y40?<I!I'Y4< 0T*غժժ"|ުժժժ֪ՃժժժՃ"غՕՕՕՕՕ ժՎP   ժժժժתժժժժժꇀժժժՊ U ժ@>pՕՕՕՕՕU ժ@BRպՙꁀժժժՎ'I'0'??I? #0?I?T*֪Տꁀy?y?y?y?y?y?y?y?y?y?y?"$תժժժꇀ x pp  qp ()ժՎժժժ"ՃֺՕՕՕՕՕ ժՃ  pժժժժժժժժժժժժժՊU ꁀ`0""ժժժժ U ժ@pa`asqpa`1qasꁀԆժժժժՎ'I'3'?'I'03'I'T*֪վꁀy?y?y?y?y?y?y?y?y?y?y?"(ժժժժժ !   ()ժպժժժ"պՕՕՕՕՕ ժՃժժժժժժժժժժ쁀U ꁀ0o "Տ૝ժժժժ U ժ@@ժժժժՎ J' # > :8 # ?쁻4*֪ުꁀ 00 # 0 0I' # 0"0ժժժժժx p   yH ()ժꁀժժժ*պՎ@ՕՕՕՕՕ ժՃժժժתժq!qxqx pp ()쁀T ꁀ0a<վժժժ U ժp`ՃժժժՎ 0L' # 0 > 0|< # 0纀*֪תꁀ # I' # " ժժժժժ !   ! !()ժժժժժ6ժՎ@ՕՕՕՕՕ ժՃ``ժժժU تժպ ! !  ()쁀 P ꁀ0o"" ުժժժ U ժ                 LݎP*تժժպ'I'Y7'''I'I'Y7'I' غ`0 """ꇀתժժժժՎغժժժՃx?x?x?x?x?x?x?x?x?x?x?쁀ժժժU ժՎx ! xq xH ()ժժժժժՏyppp pxxxpxXXߪժժժ U ժՕՕՕՕՕP ժ@bpcaB`aQraՎ@*끀تժժպ'I'Y7'??I' Y7?y'@ غ@ժժժժժՏ֪ՃժժժՃ끀ժժժժ ժՎ !  !()ժժժժժվP   ઝժժժ U ժ쇀ՕՕՕՕՕT ժ@BbRbՎ ꁀتժժպ0I'Y40?<I! Y4< P*غժժժժժվ֪ՃժժժՃꁀժժժժ ժՎ qxpx pp pxXXժժժժުժժժժժ ppժժժ U ժՕՕՕՕՕU ժ@rpBRՎՆ@ ꁀتժիժպ0I'Y40?<I!I'Y4< 0T*غժժ">ުժժժ֪ՃժժժՃغՕՕՕՕՕ ժՎP   ժժժժתժժժժժꇀժժժՊ U ժ@>ՕՕՕՕՕU ժ@BRպՙꁀժժժՎ'I'0'??I? #0?I?T*֪Տꁀy?y?y?y?y?y?y?y?y?y?y?"תժժժꇀ x pp  qp ()ժՎժժժՃֺՕՕՕՕՕ ժՃ  pժժժժժժժժժժժժժՊU ꁀ`0""ժժժժ U ժ@pa`asqpa`1qasꁀԆժժժժՎ'I'3'?'I'03'I'T*֪վꁀy?y?y?y?y?y?y?y?y?y?y?"ժժժժժ !   ()ժպժժժպՕՕՕՕՕ ժՃժժժժժժժժժժ쁀U ꁀ0o "Տ૝ժժժժ U ժ@@ժժժժՎ J' # > :8 # ?쁻4*֪ުꁀ 00 # 0 0I' # 0" ժժժժժx p   yH ()ժꁀժժժպՎՕՕՕՕՕ ժՃժժժתժq!qxqx pp ()쁀T ꁀ0a<վժժժ U ժp`ՃժժժՎ 0L' # 0 > 0|< # 0纀*֪תꁀ # I' # "ժժժժժ !   ! !()ժժժժժժՎՕՕՕՕՕ ժՃ``ժժժU تժպ ! !  ()쁀 P ꁀ0o"" ުժժժ U ժ          Bcs pNgn````@p@ Ca0x@a Ca0La Ca0x~pgOOgsy   xx~ ` 9 cC{cxCc`Cc0` CCc0| Cc0 & Cc0c 2@o@0H0@0@0@9`0@}0 0@c0@A0@Ay0@A0@A0@A@@@paLgCx@a ?~Ca?@a 3Ca0@aCa0@pCa0@ Ca0~@ ~~~?x?x```||pp?p@@~~~x?|p@~x`|pxxxx~~~@?@?@@ppp||||````?<%@p@@|||p?p?p?@?@@~~~xxx`|p@~x2$x~@```p?|?|?``xx~~@@pp||pppp?pp@#p|`xx```||||pp?p?~x` ~x`|p@~x!|x~~@@p~~~@@@@@@@?~?x?` &`?x@@~~~~x?x?x```z #    îϠ! ŠӮʠŠՠ ŠӠ6àҮʰ îϮĠ"îϠ֠Ƞ͠!"Ϡ" ààà) ĠŠŠ ƠĠҠҠ Ԡ͠Š٠Ԡ @kL˔ZuABCDEFGHI' '*  0*$ U**Uժà̠٠寠Ƞ%@p|``xx~~?@?@pp||``xxx@]  @AAA"A+A @ 4ADAȽ TO CONTINUE::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:23:">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:⍢32,5:33,30:34,5:35,22:48,30:4,430:4,4339:"DO A DOT-TO-DOT WITH BUMBLE!"I::"JOIN THE DOTS BY NAMING THE NUMBER PAIR FOR E):PX35:PY48:250LDOTA(P)5,B(P)6:IA(P)1A(P)1:I,B(P)1I,B(P)1:RP1PNTDOTA(P)5,B(P)6:404ΌV730:B$B$(P):250XDOTA(P)5,B(P)6:300Y(16384)160ıZP\924:300)^(16384)160ı2`404=f710:ECTING DOTS WITH ME!"eJI12000:oT1500w:4:500:22:2:"NAME THE DOTS AND DRAW A PICTURE!"Ë6(16384)160ı >P0:B$(0)"5,4":B$(1)"8,7":B$(2)"8,9":B$(3)"6,8":B$(4)"5,4":920+H7:DOTA(P)5,B(P)6:4044I730RJB$B$(1$)2):"** ";NAME$;" **"az720|A((1)7):A0A41404~B0:A4B4A:100,100:62454B:PP1:300⊖A((1)5)1:A420,430,440,450,460710:1000 END:::791,2:(4);"RUN MENU"U@34,20:::" THANKS FOR CONN75,75176,75177,74178,74179,73180,73181,74182,74183,75184,75186,77188,78187,79,t171,80170,80170,79169,78169,77167,75166,75165,74164,74163,73162,73161,74160,74159,75158,75156,77155,78154,80:460:710:1000Xx::18((NAMEpkI4204:0,I20I,20:256I,0278,22I:l0,20278,20n7:J108:I116200:186,94I,J102,122:JJ.33333:pI80122:116,108102,I::I6680:74,66102,I130,52: r4:DOT178,115s7:171,96171,80172,80172,79173,78173,771:\1:I96109:95,108I,121::I94104:95,110I,101:95,94I,101:^85,8995,94109,87:94,9694,106LJ`0:99,101:99,100ۇb450:710:1000d16:"** WHALE **"f7:DOT180,115h720Aj5:51,50:62454:7:I02594:I,0I20,20:6,I2:II7,I3:II8,I3:II9,I3چVII10,I3:II11,I3:II12,I3:II13,I2:II14,I2:II15,I2:II16,I2:II17,I1:II18,I1:II19,I:II,IWPP1:4:300 X5:J88:K200:I122136:J,IK,I:JJ1:KK1:BZ6:I116172:172,24I,10950129,150129,95103,95103,150:M164,94164,136:144,115186,115:126,122126,126N440:710:1000ŅP14:"** SAILBOAT **"΅R710T3:50,50:62454dU6:I1301608:II027820:II,I:II1,I1:II2,I1:II3,I2:II4,I2:II5,I2:II,24I,66::I172201:I,24I,66:I4:202,67202,79:1:I77202:I,151I,151((1)5):ׄJ2:I102130:I,94I,150::I144186:I,94I,136:aL0:143,136187,136187,93143,93143,135186,135186,94144,94144,135:102,150102,94130,94130,1187,136187,93143,93143,135186,135186,94144,94144,135B102,150102,94130,94130,150129,150129,95103,95103,150ƃD720F5:51,50:62454:1:I80160:0,I279,I:bH7:I6779:90,I200,I::3:I80150:91,I200,I::5:I88200:14443:I88172:130,80I,108102,150::I102158:172,108I,150:60:DOT110,102:DOT138,102:102,122116,136144,136158,122:102,121116,135144,135158,12281:DOT195,46:430:710:1000%<16:"** HOUSE **"3>954:300|@143,13608266,137^&420:710:1000u(15:"** CLOWN **"*944:300,DOT110,102:DOT138,102:102,122116,136144,136158,122:102,121116,135144,135158,122.DOT195,46:72002:100,50:62454:3:300?21:I2480:88,108130,I172,108:I155:268,127268,155:267,128267,134:266,129266,133:267,137267,147:266,138267,146$265,139265,145:264,140264,144:264,155267,155:264,154267,154:264,153265,153:270,125274,121:268,125264,121J%3:268,130:7:171,51233,108:3:233,1I1:7:300:3:A(0)116:A(1)130:A(2)102:A(3)116:B(0)108:B(1)122:B(2)136:B(3)150:P3:3005:J38:I154188 145,94I,J:188,24I,J:"JJ.5:I#1:272,129272,133:271,128271,134:271,137271,146:270,127270,155:269,126269,"1"ė:1270^~IN$"2"1262p~:PIC6:1300~PIC6:PNP1:P0~:500~GAME1:1100~34,20:::PIC1302,1320,1340,1360,1380,1400~16:"** KITE **"~924:300:7206:100,50:62454EI1081582:0:0,I279,I:1:0,I1279,y}34,20:::"PLEASE CHOOSE A NAME (1 TO 10 LETTERS):"}:34,22:}6000}FLAG1Ĺ16304,0:1250}NAME$IN$~34,20::"1. HAVE A FRIEND DRAW YOUR PICTURE ":"2. COLOR YOUR PICTURE."::"CHOOSE 1 OR 2 ";6~800:FLAG1ī1260K~IN$(";PNP;" DOTS LEFT.) NAME DOT # ";P1|P1ĺ"(JUST PRESS IF DONE.)"|600:IN$"S"1250|A(P)X(N1):B(P)Y(N2):DOTA(P)5,B(P)6:404|P0İ300}P0āIA(P)1A(P)1:I,B(P)1I,B(P)1:,}PP1:PPN1250?}34,20::121034,20:Q{<500c{L34,20::700~{N:600:100:ER11102{VDOTA(P)5,B(P)6:P01120{X7:IA(P)1A(P)1:I,B(P)1I,B(P)1:{\PP1:PPN1300{^1100{`300 |bPP1:PPN1300|j1100%|34,20::5002|PN10:79|7f|"OAT";:M2:"(9 DOTS)"|z,:M1:"5. WHALE";:M2:"(10 DOTS)z.34,20::"TYPE A NUMBER OR PRESS TO STOP. ";z0IN$:IN$(27)1500z2IN$"?"İ4000:16304,0:1000 {4IN$"1"IN$"5"1072{6IN$;{8PIC(IN$):PIC920,940,950,910,970H{:0[yIN$"1"GAME1:1050nyIN$"2"1014yGAME2:1200y::4:M110:M225y"BUMBLE'S FAVORITE PICTURES:"y$::M1:"1. KITE";:M2:"(5 DOTS)"z&:M1:"2. CLOWN";:M2:"(5 DOTS)"/z(:M1:"3. HOUSE";:M2:"(7 DOTS)"Uz*:M1:"4. B)52:B(7)66:B(8)66:B(9)80:PN9:~xFLAG0:ER0:P0:X(0)xI015:A(I)0:B(I)0:Ix34,20:::"1. BUMBLE'S PICTURES 2. MAKE YOUR OWN"y:"PICK A NUMBER OR PRESS TO STOP. ";yIN$:IN$(27)1600AyIN$"?"İ4000:16304,0:10066:B(3)66:B(4)150:B(5)150:B(6)66:PN6:wA(7)200:A(8)172:A(9)172:B(7)24:B(8)24:B(9)42:P9:xA(0)102:A(1)116:A(2)186:A(3)200:A(4)102:A(5)102:A(6)130:A(7)102:A(8)74:A(9)102cxB(0)80:B(1)108:B(2)94:B(3)136:B(4)122:B(5)80:B(63)80:B(4)108:PN4:vA(5)102:A(6)158:A(7)172:A(8)130:A(9)158:A(10)172:A(11)200vB(5)150:B(6)150:B(7)108:B(8)24:B(9)38:B(10)24:B(11)52vP11:&wA(0)88:A(1)144:A(2)200:A(3)88:A(4)88:A(5)200:A(6)200kwB(0)66:B(1)24:B(2)(0)144:A(1)186:A(2)186:A(3)158:A(4)144uB(0)94:B(1)52:B(2)24:B(3)38:B(4)94:PN4:uA(5)116:A(6)130:A(7)102:A(8)116:B(5)108:B(6)122:B(7)136:B(8)150:P8:vA(0)88:A(1)130:A(2)172:A(3)130:A(4)88UvB(0)108:B(1)24:B(2)108:B(FLAG0:IN$:IN$(27)IN$"?"832htTtI022:A(I)0:B(I)0:I:tA(0)172:A(1)200:A(2)186:A(3)102:A(4)88:A(5)172:A(6)172:A(7)116:A(8)172/uB(0)122:B(1)122:B(2)136:B(3)136:B(4)122:B(5)122:B(6)24:B(7)108:B(8)108:uPN8:kuA:[s.IN$"1"IN$"3"812ts0(IN$)1600,818,820s2::1000s4IN$(13)::s>EFLAG0:IN$:IN$(13)IN$"X"IN$"Y"IN$","IN$(8)840s@IN$(27)EFLAG1:810tBIN$"?"İ4000:16304,0:EFLAG1:8404tFIN$"0"IN$"9"830:tHbtREI12000::arI13000::rrI1200::r FLAG0:60:(IN$)27FLAG1:810r"IN$"?"FLAG1:4000:16304,0::r$s*34,20:::"TYPE 1 TO STOP":" 2 TO CHANGE PICTURES":" 3 TO CONTINUE ";Bs,IN$:IN$"?"İ4000:16304,0:P)Y(N4):DOTA(P)5,B(P)6:qCH(36):CV(37):22:1:ER$:CV1:CH1:qCH(36):CV(37):22:1:" ":CV1:CH1:rN96:T10:400:DOTA(P)5,B(P)6%rI110:DOTA(P)5,B(P)64rJ140:J=rI:Or:670:630pIN$(13)ER$"PLEASE PRESS .":690:650p692pFLAG1ĕEXX(N1)5,Y(N2)6pN1N3:N2N4qPY48:PX33:B1$B$:B$" ":250:B$B1$:PY48:PX37(B$)2:250 q q34,23::E$;B$;:.qGAME1ı]qA(P)X(N3):B(:EFLAG1İ670:642qoIN$(13)N4(B1$):658oIN$(8)B$B2$:670:680:630oIN$"0"ER$"PRESS TO FINISH.":690:642o680 pB1$B1$IN$:IN$;:B$B$IN$:N4(B1$):692:680&p850:EFLAG1İ670:650JpIN$(8)B$B2$:680IN$;:B$B$IN$:692:B2$B$xnv830:EFLAG1İ670:630nxIN$(8)Ĺ34,20::600nzIN$"Y"ER$"TYPE A NUMBER FOR 'Y'.":690:630n|IN$"0"IN$"9"630o~B$B$IN$:IN$;:B1$IN$:692)oB1$"1"N4(B1$):692:680:6507oN41:680So850LAG1İ670:612zmfIN$"0"ĺIN$;:B$B$IN$:N3(B$):620mgIN$","N3(B$):628mhIN$(8)Ĺ34,20::600mj692:ER$"TYPE A COMMA.":690:612ml850:EFLAG1İ670:620nnIN$(8)Ĺ34,20::600 X":PX2:PY160::250:B$"^":PX3:PY84:250:B$(124):PX3:PY92:250:B$"Y":PX3:PY72:250Ul0B$" X ,Q4:400:N128:T(3Q)4:400:N114:TQ4:400:N102:T(3Q)4:400:N114:TQ4:400:N128:T(3Q)4:400:N144:TQ4:400jN152:T(3Q)4:400:N171:TQ4:400:N192:T170:400:400:400kk:6.kI7421414:I,10I,150:IOkI1501014:N96:TQ2:400:N72:T255:400fiiQ170:N128:TQ2:400:N96:T(3Q)2:400:TQ2:400:N128:T(3Q)2:400:TQ2:4003jN114:T(3Q)4:400:N121:TQ4:400:N114:T(3Q)4:400:N96:TQ4:400:N128:TQ:400:N152:T(3Q)4:400jN144:T96:T255:400hI13Q::N96:TQ2:400:N108:T(2Q)3:400:N114:400:N108:400:N96:T(3Q)2:400:N108:TQ2:400hN114:T(3Q)2:400:N96:TQ2:400:N72:T(3Q)2:400`iN76:TQ2:400:N85:T(2Q)3:400:400:400:N76:T(3Q)2:40000:N72:TQ2:400:400:N76:TQ:400:N85:400:N96:400:N102:400:N96:400:N85:400:N96:T255:400ghQ100:N96:T2Q:400:N72:400:N72:400:N96:400:N85:T(2Q)3:400:N90:400:N85:400NhN72:T2((2Q)3):400:N85:T(2Q)3:400:N28:TQ2:400:400:N96:T2Q:400:N96:TQ2:400:400:N95:TQ:400:N102:400:N96:400:N85:T3Q:400fI1200:.gN128:TQ:400:400:N96:400:N85:400:N76:T2Q:400:N96:TQ2:400:N102:400:N114:TQ:400:N72:400:400gN72:T2Q:4:TQ:400:N96:T3Q:400:N102:TQ:400:N96:TQ:400eN85:T2Q:400:N76:TQ:400:N85:T2Q:400:N128:TQ:400:N128:T255:400e)fQ85:N64:T3Q:400:N72:TQ:400:N76:T(3Q)2:400:N85:TQ2:400:N76:T3Q:4008fI1200:fN185:T3Q:400:N114:T3Q:400:N96:T3Q:400:N114:T3Q:400dN108:TQ:400:N96:TQ:400:N108:TQ:400:N114:T2Q:400:N128:TQ:4006eN171:T3Q:400:N192:T3Q:400:N144:T2Q:400:N152:TQ:400:N144:T2Q:400:N128:TQ:400veN114:T10:400:rcN152:T10:400:N228:T20:400:cQ80:N85:TQ:400:N76:400:N68:400:400:400:400cI1Q:cN68:400:N64:400:N57:400:400:400:400cI1Q:/dN57:T2Q:400:N51:400:N45:400:N42:T255:4005ddQ85:N(P)C2$"MAKE Y SMALLER"obC$C1$" AND "C2$~b34,20::bC$:34,23::bLINENUM,PY:COLUMN,PX:18176:b,P10:I1P:A(P1),B(P1)A(P11),B(P11)c.A(P1)1,B(P1)1A(P11)1,B(P11)1:P1P11c0I:5c768,N:769,T:770:LcNN(P)P)Y(N2)B(P)150faY(N2)B(P)140aC$"MAKE Y LARGER":Y(N2)B(P)C$"MAKE Y SMALLER"a160aC$"MAKE X LARGER":X(N1)A(P)C$"MAKE X SMALLER"a160bC1$"MAKE X LARGER":X(N1)A(P)C1$"MAKE X SMALLER"XbC2$"MAKE Y LARGER":Y(N2)B OR N) ?";i`*IN$:IN$"Y"IN$"N"42{`,IN$"Y"1500`.`2:1000`<IN$:(IN$)160`>`dFL0:ER0`fX(N1)A(P)Y(N2)B(P)ı`nEXX(N1)5,Y(N2)6:FLAG1:ER1:4101axX(N2)A(P)Y(N1)B(P)C$"SWITCH X AND Y":160RaX(N1)A(8)60:N(9)57:N(10)54:N(11)51:N(12)48{_:2000:34,20_::"WOULD YOU LIKE INSTRUCTIONS? (Y OR N) ";_ 60:IN$"Y"IN$"N"(IN$)2732_"IN$"N"50`$IN$"Y"İ4000:16304,0:50`%(IN$)27İ40:30J`(::"DO YOU WANT TO STOP (Y)88:X(2)102:X(3)116:X(4)130:X(5)144:X(6)158:X(7)172:X(8)(186):X(9)200:X(10)214^Y(0)150:Y(1)136:Y(2)122:Y(3)108:Y(4)94:Y(5)80:Y(6)66:Y(7)52:Y(8)38:Y(9)24:Y(10)10h_N(0)96:N(1)90:N(2)85:N(3)81:N(4)76:N(5)72:N(6)68:N(7)64:N(4M]10000Y]791,32] BUMBLE DOTS VER 1,3,COPYRIGHT 1982, THE LEARNING COMPANY]B$"FIRST VARIABLE"]E$"NUMBER PAIR IS: (X,Y ) "]LINENUM18563:COLUMN18564 ^1:0:EX1:DOT20^ N(13),A(16),B(16),X(11),Y(11)^ X(0)74:X(1               S, PRESS"::". ";2IN$:(IN$)11520F(IN$)271550[(IN$)131520:34,20:16302,0:16304,0:1020100:791,2:(4);"PR#";NS''18944: ERROR ROUTINEUTINEB::": ";NA$(IN)XV:2:" KEY STOPS A GAME;":2:"'?' RETURNS TO INSTRUCTIONS.";a`1:~j791,2:D$;"RUN";NA$(IN)::8"IF YOU ARE FINISHED, PUT IN ANOTHER ":"DISKETTE AND PRESS ."::::"TO GO BACK TO BUMBLE GAME0:IN$"8"ī1500(IN$"7"1050JIN(IN$):IN1INLNė:1020T1100h TOGGLE SOUNDMUSIC(SOUND):MUSICYESĹSOUND,NO:UFOSOUND,NOMUSIC(NO)ĹSOUND,YES:UFOSOUND,YES 560"640$1020L::16301,0:"LOADING";1N96:TT1:600:N85:TT1:630:N76:TT1:630JSF1SF0:SOUND,NOPN76:TT1:600:N85:TT1:630:N96:TT1:630SF1SF0:SOUND,NO ** MAIN PROGRAM:16302,0:300:50034,20:16368,0IN$:IN$""10202B$"ON":PC0:20054B$"/OFF":PC1:PX23:200;6R:B$"ON/":PC1:200o<B$"OFF":PC0:PX25:200u>X SOUNDS FOR SOUND ON/OFFbSF0: SOUND FLAGl(SOUND)(NO)ĹSOUND,YES:SF1v768,N:769,T:770:T110:MUSICYES6501,1911,0:3,1277,1277,1903,1903,1, @?  PRINT TITLESQ  PUT TITLE ?e PX2:PY32:PC3~ I16:B$B$(I):200 PYPY20 I PC1:PY156:B$B$(7):200 B$B$(8):PC6:PY180:200 560 &0PX19:PY156:(SOUND)(NO)5716368,0 21000% dNS0:I711> fSLOTADDR49153256Iy h(SLOTADDR)32ĭ(SL2)0ĭ(SL4)3ĭ(SL6)60NSI nI: ** PRINT CHARACTERS ** LINENUM,PY:COLUMN,PX:HUE,PC:LGEN: , DRAW BOX AROUND MENU& 61:1,0279,0279,191)"AC "(116)"OC":B$(6)"6 "(98)"UMBLE "(100)"OTS"^ &B$(8)"8 "(101)"ND": END (NA$(1)"FIND YOUR NUMBER":NA$(2)"FIND THE BUMBLE":NA$(3)"BUTTERFLY HUNT":NA$(4)"VISIT FROM SPACE":NA$(5)"TIC TAC TOC":NA$(6)"BUMBLE DOTS" *LN6 0 D$(4)' B$(7)"7 "(115)"OUND" B$(1)"1 "(102)"IND YOUR "(110)"UMBER":B$(2)"2 "(102)"IND THE "(98)"UMBLE" "B$(3)"3 "(98)"UTTERFLY "(104)"UNT":B$(4)"4 "(118)"ISIT FROM "(115)"PACE": $B$(5)"5 "(116)"IC "(116EN23040: LARGE CHARACTER GENERATOR 18699,234:18700,234: REPLACE "EOR WITH SCREEN" WITH "NOP" IN SMALL CHARACTER GENERATOR SOUND771:UFOSOUND17671:YES48:NO00: IN MUSICRESETMOVE AND UFO3 32,0:33,40:34,0:35,24: RESET TEXT WINDOW 10000-791,32: ENABLE RESET TRAPF BUMBLE GAMES MENU COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED PROGRAMMER/DESIGNER LESLIE M. GRIMM, MT. VIEW, CAL.$ B$"FIRST VARIABLE":LINENUM23427:COLUMN23428:HUE23429:LG     K00 L` LʝLԩB<CP=>S? ,`1[͍[ [[LE\`ZZ[[0Ί[[L ][LE\)\][$ [J U]*\LE\U\*]LE\[JL,\L\[[[8 [[ [[*[m[[Mm[[[\][\][i[[[ZZ[[0> &Ί[[L\΋[[[L ][[8[L\΋[[8[L ][((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPi[ȱiȱi[ꍰ\\\\]]]][LE\\]I\]LE\L[ \]\]?<L[ $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? @`@` PH`pp` @`@ `PH`p` @h0`@ @@`pp`@h0`@@@ `pp`@`0@` PH`pp` ~7?~~~ ~7?~~~||xpppppppppx8 8p``p8  8p`@@@@@@@|| @`p8 ||@@@`PH`p0   @@@`PH`0   @H`@ @@`p0  @H`@@@ `p0  @@@`PH`p0  ||0000pp0000||px  LL xp|| ||lL px xp xp||LL@@@@@@@@pp  xp 88pp``@@  LLL|x0 || pp@@@@@@@@@@pp@@ xp Ll||lL ||0000000000|| <|lL   <|lL px  xp@`p8  || ||0000pp0000||`p8  8p`||0000000000||||0000pp0000||||0000pp0000||px  xp 8p``p8  8p`@@p| ||@`p8||~?~?p8~?~8p?@@@@@@@@L\xp`@@`px\L@@@@@@@@||0000pp0000px  xpl|< pxxp |p00||00000p`@  xp 88pp`@ LLL|x0 l|< @@pp@@@@@@pp@@ xp || pp@@@@@@@@@@pp<|lLLLLLLLXxx8px  xppx LLLL xp||px |x ||  ||px  xppx  xppx || xp@`p000||000000px  xp||px xx xppx xp@pp`pp``pp``pp``pp`@`p@`p88p`@||||0p`@@`p0px @@@@@@`p8  8p`@`pp@@@@@@@@pppx @`p8 ||||@@ xp@`p8 |||| || xp@`p8|| xp||@`p00000@`p8  8p`@@@@@@@L\xppx\L@@@@@@||@@@@`pp`@`p||`pp`@`p8 pppppppppppp>><8>><8```||0 ??0~~px\\xp@@||``"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?0De,`De  E E0 De0De,`De ݅0De0De,`De  E E"0ee,e   E`LnE`0`T?C ,U`"0'-' (`` @E E0De0De,`De ee ee ee ee ݅0De0De,`De 㩙0De  """"""""""""""""""   """""""""""""""""" &""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""U*U1\ ;? ) - ;? ) - ;? - ?; - ) ?; - )  ?? ---- ;???? )---- ?????? ------;???? )---- ???? --  000000 .""""< <"""<">$ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U*U*"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>*I@2 66$>>< (&20 *,  **> > "2*&" " >>  ">> "8""> """"""<  >>?"          T120:P85:70:T60:P96:70:P102:70:P114:70:P128:70p!('T50:P114:70:P102:70:P96:70:T120:P171:70!*'P136:70:T255:P128:70:!(! N18944: ERROR ROUTINEE z!:I13000:I !15008 ' "MENUETT" BY A M BACHg 'T60:P128:70:P102:70:P85:70:P64:70 'P114:70:P68:70:T120:P64:70:P128:70:P128:70: 'T120:P228:70 ' $'T160:P76:70:T60:P85:70:P96:70:P102:70:P114:70:!&'U WANT TO HUNT AGAIN? (Y OR N) ";B>!IN$:IN$"Y"IN$"N"8510T\!IN$"N"8545}]!::7:"(THE BUTTERFLY IS HIDING.)"^!90::7000:16300,0:60a!p!5:"BUMBLE SAYS, "r!:10:"'THANK YOU FOR FINDING"t!10:" MY LOST BUTTERFLY!'";HE BUTTERFLY! **"D16368,0OJ:12:"IT TOOK ";CO;:CO1ĺ" TRY!";:8020_L" TRIES!";zT210: SMALL BUTTERFLYV660:660: PAUSEXFT0^(16384)1608500`500:16300,0: PAGE 1b(16384)1608500d10020!4!::"DO YO399: A?14,1635:14,1639:36,3814:36,3816:15,37: Be21,2335:21,2339:36,3821: C28,2935:28,2939:36,3828:36,3830:D35,3735:35,3739:36,3835:36,37:: E? ** GAME END **@34,20B::5:"** YOU FOUND TY2:X2,X2I:I:X:Y6 ** LETTERS AND NUMBER **_3:29,331:29,333:2,29:2,33: 0p22,262: 11,315:1,319:3,16:2,17:1,18: 21,38:1,312:2,310:9,113: 31,41:1,53:1,34: 47,935:7,937:36,397:36,HE RIGHT"-((MA)D$"IT'S IN THIS COLUMN"721130WFNBE$" AND IN THIS ROW."nPNBE$" AND UP."ZNBE$" AND DOWN."d1150 END:::791,2:(4);"RUN MENU"W ** INITIAL GRID **X:2bY3317:X8367:IY21300"0";:650+N1:Y31:110:1350:"1";:650RN2:Y24:110:1350a"2";:650yN3:Y17:110:1350"3";:650N4:Y10:110:1350 "4";:650 N5:Y3:110:1350(MA)D$"IT'S TO THE LEFT" (MA)D$"IT'S TO T ":212MANBī8000=D$;E$G1100U"A":650lM1:X8:100:1300z"B":650M2:X15:100:1300"C":650M3:X22:100:1300"D":650M4:X29:100:1300"E":650M5:X36:100:K511280:3 tK521290:4>xK63ī820: INSTRUCTIONS\zK27İ800:1130: ESCAPEp|16368,0:1131~I1200:I:CO0İ130:XOLDX:YOLDY:COCO1:1160120:XOLDX:YOLDY:COCO1I1200:I:200:300:21:" K661210:B ZK671220:C2\K681230:DD^K691240:EbdK27İ800:1105: ESCAPEfK63ī820: INSTRUCTIONSh16368,0:1108j16368,0:"WHICH NUMBER? ";k80:K(IN$)lK481250:0nK491260:1pK501270:2rZK\::10:"(BUTTERFLY IS HIDING)":90:7000:16300,0:MOVE0::1000b ** EXECUTIVE **A((1)5)1:B((1)5)1COUNTER034,21L ** INPUT LETTER **Q16368,0::"WHICH LETTER? ";T80:K(IN$)VK651200:AX." A:<B:"TYPE A LETTER FIRST; THEN TYPE A NUMBER."BCfD:"USE WORD CLUES TO HELP YOU"F"FIND BUMBLE'S LOST PET."PI11000:I:16368,0R21:"PRESS TO BEGIN. ";T80:(IN$)13(IN$)27852V(IN$)27İ800;4::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";r623:">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:832,4:33,31:34,5:35,22: WINDOW :48,30:4,430:4,4339:>"BUMBLE'S PET BUTTERFLY IS LOST!"@"PLEASE HELP BUMBLE FIND IT826,12:834,15:822,4:815::::"*** HUNT *** HUNT **** HUNT *** HUNT ***"::16300,0_&qI1200:I:I11000:I: ** ESCAPE ** :"DO YOU WANT TO STOP? (Y/N) ";"IN$:IN$"Y"IN$"N"802$IN$"Y"ī1500*IN$"N"ė:UTTERFLY IS FLYING AWAY!":907FT0(16384)160ıwYY1:400:YY1:410:90:400:420:90:400:YY1:410:90FT0(16384)160ı826,28:834,31:822,4:815::90FT0(16384)160ıI1200:I FT0(16384)160ıY 0:400:420:90)FT0(16384)160ıc400:YY1:410:90:826,20:834,23:822,4:815::90}FT0(16384)160ı400:YY1:410:90:400:YY1:420:90:400:410:90FT0(16384)160ı826,24:834,27:822,4:815:::6:"THE B11,Y1918:Y11,Y1921:: CLOSED WINGSE ** BUTTERFLY EXEC **r:Y11::90:826,16:834,19:822,4:815::6:"** HERE IS THE BUTTERFLY! **":90FT0(16384)160ı10000:FT0(16384)160ı400:410:90:400:YY1:420:95,Y624:Y8,Y923:Y8,Y921:23,Y6:24,Y82:Y12,Y1417:Y12,Y1318:Y12,Y1321:Y12,Y1422:: MEDIUM BUTTERFLY4:Y5,Y1519:Y5,Y1520:15:16,Y2:17,Y3:18,Y4:23,Y2:22,Y3:21,Y4*6:Y2,Y1018:Y2,Y1021:7:YY2:22,Y3:21,Y4f6:Y1Y2:J1418:Y1,Y10J:Y1Y11:J:Y1Y6:J2125:Y1,Y10J:Y1Y11:J7:Y11,Y1916:Y11,Y1717:Y11,Y1418:Y11,Y1421:Y11,Y1722:Y11,Y192303:Y5,Y615:Y8,Y916:Y8,Y918:16,Y6:15,Y8:YȎX2,X2I:I:JK @J8367:(J1),(Y1)):IJ2J2:Y2,Y2I:I:J:j  ** BUTTERFLY GRAPHICS ** 11:J1128:Y2,Y21J:J:2:J1113:29,32J:J:7,811:30,3114:: ERASE4:Y5,Y1519:Y5,Y1520:15:16,Y2:17,Y3:18,Y4:23,:IX2X2:Y2,Y2I:% Y3Y3\ 7:IX3X1:Y3,Y3I::IX1X3:Y3,Y3I:q 0:X3,Y:X3,Y 4:Y2,Y2X 3:X2,Y2:X2,Y2 2:X2,Y2:X2,Y2 + ** REDRAW SQUARES ** ,J3317:(X1),(J1)):IJ2J2: n15:6,38Y:? x6:IYOLD2YOLD2:XOLD2,XOLD2I:I 15:IY2Y2:X2,X2I:I:T60:P114:70:T90:P76:70: ** REDRAW BLACK LINES ** 0:I6277:6,38I:6,38I1:I:I11327:1,33I:1,33I1:I :REBLACKLINES 027İ800:52 :IN$"Y"8200 <:MOVE0:1000I F768,P:769,T:770:s HP64:T40:70:P96:T80:70:: UH-OH PIN$:(IN$)180 R Z16300,0:826,4:834,7:822,8:815:16299,0:: WAS CALL 3072 c ** DRAW WHITE LINE ** d15:1,33X:10000:(16384)160İ7000::52- "10020L ((16384)160İ7000::52T 290 37000:16300,0::"ENTER LETTERS AND NUMBERS TO FIND IT." 416368,0::"DO YOU WANT INSTRUCTIONS? (Y OR N) "; 680:IN$"Y"IN$"N"(IN$)2754 8(IN$) 20000791,32hBUTTERFLY HUNT, COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED PROGRAMMER/DESIGNER LESLIE M. GRIMM, MT. VIEW, CALIF. : FT0: FIRST TIME = FLAG FOR TITLE PAGE500:FT1(16384)16050"           R FINDING MY"nnt!11:"COUSIN'S SPACESHIP!'";nz!I12000:In!1500n'18944: ERROR ROUTINEOTINEOSHIPTmLI12000:mN(16384)1608030: SKIP SPACE SHIP mT17760:16300,0m^16368,0m4!::"DO YOU WANT TO PLAY AGAIN? (Y OR N) ";m6!IN$:IN$"Y"IN$"N"8502 n>!IN$"Y"ė:6000:50&np!:8:"BUMBLE SAYS,"Mnr!:10:"'THANK YOU FO29,37:28,3039:36,3830: 3 l35,3835:35,3937:35,3838: 4ll? ** GAME END **l@34,20:::" *** YOU FOUND BUMBLE'S COUSIN! ***" mB:12:"IT TOOK ";CO1;:CO11ĺ" TRY!":8010mD" TRIES!")mF16368,0DmJ130:210: SMALL 18: 2kk1,38:1,312:2,10:9,113: 3k1,31:1,43:2,3:4,3: 4 k7: LIGHT BLUE NUMBERS ON BOTTOMk7,935:7,939:36,387:36,389: 0k35,3915: 11l21,2335:21,2339:38,3921:23,36:22,37: 2`l28,3035:0Kj ENDmj:::791,2:(4);"RUN MENU"sjpzjz1jI8367:1,33I:IjI3317:7,37I:Ij7050jj6: MEDIUM BLUE NUMBERS ON SIDE k1,329:1,333:30,321:30,323: 0k22,252: 1Fk1,315:1,319:3,16:2,17:1,NB(MA)C$"GO LEFT."pi"MANBC$"GO UP."i$MANBC$"GO DOWN."i&NB(MA)C$"GO RIGHT AND UP."i(NB(MA)C$"GO LEFT AND UP."i*NB(MA)C$"GO RIGHT AND DOWN."!j,NB(MA)C$"GO LEFT AND DOWN."Aj234,20::C$:34,21::1150:1130Vh"0";:650nhN0:Y31:110:1300}h"1";:650hN1:Y24:110:1300h"2";:650hN2:Y17:110:1300h"3";:650hN3:Y10:110:1300h "4";:650 i N4:Y3:110:1300iMANBī8000:iNB(MA)C$"GO RIGHT."Wi T SQUARE ]g115:650:130|g650:XOLDX:YOLDY:COCO1g::1100g"0":650gM0:X8:100:1130g"1":650gM1:X15:100:1130g"2":650gM2:X22:100:1130 h"3":650!hM3:X29:100:1130/h"4":650GhM4:X36:10;Rfk60:K(IN$)dflK481250:0vfnK491260:1fpK501270:2frK511280:3ftK521290:4fvK63ī810: INSTRUCTIONSfxK27İ800:1130: ESCAPEfz16368,0:1131 g~650: DELAYgCO01156Jg120:650:130:1158: MARK LAS16368,0::"WHICH BOTTOM NUMBER? ";ueS60:K(IN$)eUK27İ800:1105: ESCAPE eVK481200:0eXK491210:1eZK501220:2e\K511230:3e^K521240:4 f`K63ī810:INSTRUCTIONS fb1107Afj16368,0:"WHICH SIDE NUMBER? "I:16368,0rdJ21:"PRESS TO BEGIN. ";dL60:(IN$)13(IN$)27844dN(IN$)27İ800dP:dR::6000:1000d ** EXECUTIVE **dA((1)5):B((1)5)eCOUNTER0e34,21+eK ** INPUT NUMBERS **:eL:34,21:deQ0:4,4339:c4"BUMBLE'S COUSIN FROM PLANET FURRIN IS COMING TO VISIT!"c6::"HELP BUMBLE FIND THE SPACE SHIP ON THE GALAXY GRID."1d8::"TYPE A NUMBER AT THE BOTTOM OFTHE TV SCREEN; THEN A NUMBER AT THE SIDE OF THE SCREEN."LdHI11000:TO STOP? (Y/N) ";qb"IN$:IN$"Y"IN$"N"802b$IN$"Y"1500b&IN$"N"ė:b*::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";c,23:">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:/c.32,5:33,30:34,5:35,22: WINDOW Mc048,30:4,43Ta9:X1,Y:X1,Yua0:X3,Y:X,Y3:Y3čX,Y3aX36čX3,Yaa,768,P:769,T:770:a60:IN$"?"(IN$)13(IN$)27400aIN$"?"ġ:810a(IN$)27İ800abI1200:I:+b ** ESCAPE OPTION **Qb :"DO YOU WANT 2Y2:X2,X2I:It`zT60:P114:300:P76:300:`1:1,33X:6,38Y: REDRAW GRID LINES``T90:I14:P76:300:P114:300:I:: SIREN `1:IY2Y2:X2,X2I:$a0:X2,Y2:X2,Y2:X2,Y2:X2,Y2?a13:X2,Y:X,Y:X2,Y(IN$)27İ800::42f_0IN$"Y"810y_2:MOVE0:1000_<IN$:(IN$)160_>_c ** DRAW WHITE LINE **_d15:1,33X:_n15:6,38Y:`s13:IYOLD2YOLD2:XOLD2,XOLD2I:I3`u1:1,33XOLD:6,38YOLD: REDRAW GRID LINEST`x15:IY:"NEWS BULLETIN";:^": BUMBLE'S COUSIN'S SPACE SHIP IS COMING!"^200^17760:I1500:I^ 6000:16300,0^(:"HELP BUMBLE FIND THE SPACESHIP."_*:"DO YOU WANT INSTRUCTIONS? (Y OR N) ";;_,60:IN$"Y"IN$"N"(IN$)2744U_.eM]10000Y]791,32k] VERSION 1.3]VISIT FROM SPACE, COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED] PROGRAMMER/DESIGNER LESLIE M GRIMM, MT. VIEW, CALIF.&^ (16384)16032: GO TO GAME IF SPACEBAR9^936::17728U^:     BER!"::250:140:XA:120:180:PP(X):T10:300:220{ (16384)160ė:{ ::::14:"IT'S A FOUR!":{ (16384)160ė:{ 160{ (16384)160ė:{ 220{ {'|'255:18944:ERROR ROUTINE OR ROUTINE Xz ** TITLE PAGE **jz :100:21:5z (16384)160ė:z C$"FIND":250:A4:X2:120:180:PP(X):T10:300:220z (16384)160ė:{ " ";:C$"YOUR":250:140:X5:120:180:PP(X):T10:300:220-{ (16384)160ė:t{ " ";:C$"NUME A SPECIAL NUMBER."y:"GOLDEN ARROWS WILL POINT TOWARD YOUR SPECIAL NUMBER!"yI11000:I:16368,0y21:"PRESS TO BEGIN. ";y80:(IN$)13(IN$)2720567z (IN$)27Ģ21:1:" ":210Az ::><<<<<<<<<<<<<<<<<<<<";:x32,6:33,30:34,5:35,20:WINDOW x48,30:4,430:4,4339:x7:"FIND YOUR NUMBER!"::y"BUMBLE HAS A SPECIAL NUMBER JUST FOR YOU! IT COULD BE 0, 1, 2, 3, 4, OR 5."Ty:"FOR TWO PLAYERS, EACH WILL HAVPw,IN$"Y"60w.::2:"GOODBYE! IT WAS FUN PLAYING WITH YOU!"w0I12000:Iww:::791,2:(4);"RUN MENU"w: TEMPORARYw ** INSTRUCTIONS **"x::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";Yx23:">>>>>>>>>>>>>>>>>>>OU";P$;"!"uv:"YOU GOT IT IN ";TT;:TT1ĺ" TRY!"vTT1ĺ" TRIES!"v400:340v::"PLAY AGAIN? (Y OR N) ";v IN$:IN$"Y"IN$"N"1312v"IN$"Y"1054w(::"DOES ANYONE ELSE WANT TO PLAY? (Y/N) ";@w*IN$:IN$"Y"IN$"N"13220ju150:YIN:130:190:PP(Y):T20:300uYBP$P2$:TTT21::170:CB:1300uC$"IT'S LESS THAN ":YBC$"IT'S GREATER THAN "uC2$C$:X2Yu:C$;Y;"."uT2T21vPL2İ220:220: WAITvPL11210)v1100Jv22:"HOORAY FOR Y":AXC$"IT'S GREATER THAN "ntlC1$C$:X1X~tt:C$;X;"."tvPL2İ220:220: WAITt~T1T11:PL11110t ** VERTICAL LINE **t:110:T201210t130:190 uPL2Ģ21:C2$;X2;"."Au23:"FIND YOUR NUMBER";P2$;". ";:600:FLAG1121060`sK ** HORIZONTAL LINE **vsL:100:T101110sN120:180sPPL2Ģ21:C1$;X1;"."sV23:"FIND YOUR NUMBER";P1$;". ";:600:FLAG11110sX140:XIN:120:180:PP(X):T20:300(t`AXP$P1$:TTT11::160:CA:1300^tjC$"IT'S LESS THAN E":P2$P2$" TWO"crPL1P2$P1$rPL2P1$", "P1$:P2$", "P2$r500::r A((1)6):B((1)6):WIN0:T10:T20:X(0):G10:G20r$NLSIDEWAYSNLVERT:1200s&NLVERTNLSIDEWAYS:11009s(NLSIDEWAYS:K((1)10):K5NLVERTCs*11000bqIN$"?"İ2000:100:1000qPL2:IN$"1"PL1:P1$"":1050q::"TYPE ONE NAME ";:700qFLAG1ė:34,20:1010qP1$IN$r::"TYPE ANOTHER NAME ";:700rFLAG1ė:34,20:1020QrP2$IN$:P2$P1$P1$P1$" ONMpIN0720wp(37)1:(36):".";:(37)1:(36)pININ1:IN0NAME$(NAME$,IN)pIN0NAME$""p720p ** GAME EXEC **p::"HOW MANY PLAYERS? (1 OR 2) ";*qIN$:IN$"1"IN$"2"IN$"?"IN$(27)1002DqIN$(27)İ210:.....";"]":CV1:CH2~oIN$:IN0IN$(13)IN$"PLAYER":oIN$(13)IN$NAME$:oIN$(27)FLAG1:210:oIN$"?"FLAG1:2000:100:oIN$(8)740pIN$(65)IN$(90)720pIN87206pIN$;:ININ1:NAME$NAME$IN$?p720SnbIN(IN$):IN$;onl16368,0:I1200:I:nv24:1:"DO YOU WANT TO STOP? (Y OR N) ";nxIN$:IN$"Y"IN$"N"632nzIN$"Y"1500n|24:1:868n~FLAG1:o ** INPUT NAME **/oCH(36):CV(37):IN0:FLAG0:NAME$""Vo(91);"....291:13,27I:I:wm ** DECIDE WHO IS VERTICAL **mP3$P1$:P4$P2$mK(1)5:K5P2$P3$:P1$P4$mmW ** GUESS INPUT **mXFLAG0:16368,0mZ80:IN$""602n\(IN$)27630"n^IN$"?"İ2000::1056?n`(IN$)48(IN$)53602131:13,17I:23,27I:I:12:I1291:13,17I:23,27I:I:l:7:I32291:13,27I:I:3:I28251:23,27I:Im1:23,2724:23,2723:13,2722:13,2721:9:13,2720:13,2719:13,1718:13,1717Tm13:I16131:13,17I:I:12:I17~k13:I16131:23,27I:I:12:I1291:13,27I:I:k:7:I32291:23,27I:I:3:I28271:23,27I:I:13,3126:13,31252l1:I24231:13,31I:I:I22211:13,17I:23,27I:I:9:I20171:13,17I:23,27I:Il13:I1618,22I:I:9:I20171:23,27I:Ij13:I16131:23,27I:13,17I:I:12:I1291:18,22I:I:j:7:I32291:13,27I:I:3:I28251:23,27I:IAk1:23,2724:23,2723:18,2722:18,2721:9:18,2720:18,2719:23,2718:23,271Ii1:I24211:18,22I:I:9:I20171:18,22I:I:13:I16151:18,22I:I:I14131:17,22IiI:12:17,2212:18,2211:19,2210:20,229:21,228:22,7:+j:7:I32291:13,27I:I:3:I28251:13,17I:Iej1:I24211:I:I:3:I28251:13,17I:23,27I:Ih1:I24211:13,17I:23,27I:I:9:I20171:13,17I:23,27I:Ih13:I16131:13,17I:23,27I:I:12:I1291:13,27I:I:Ai:7:I32301:16,24I:I:18,2229:3:I28251:18,22I:02:300:P128:300:P114:300:P171:T200:300:T100:300:P114:300:P102:300:P128:T200:300gVCC1:C0ıgXI1400:IgZT255:P128:I1C:300:J1100:J,I:hCC1:C410,420,430,440,450,460$hI1200:I:ih:7:I32291:13,2700:I:Zf10:I1(C$)jf(C$,I,1);}fP114:T5:300f" ";fI:255:f,768,P:769,T:770:f6P152:T50:300:P228:T100:300:2g@P228:T10:300:P203:300:P181:300:P203:300:P181:300:P171:300:P152:T25:300:gTT100:P1:33,19:re24:"PRESS TO CONTINUE. ";e80:(IN$)27(IN$)13IN$"?"202eIN$"?"İ2000::1056e(IN$)27İ210e:e::"DO YOU WANT TO STOP? (Y/N) ";f80:IN$"Y"IN$"N"212.fIN$"Y"15004fGfI11020,Y(Y):22,Y(Y):P(1)2551:T5:300:I:d0:I610:17,24I:I:AXıd13:17,248:X(A)ď7,923:22,6:22,10:d7,918:19,6:19,10:d0:I2935:17,24I:I:YBı+e13:17,2431:YBĎ30,3223:29,22:33,22:Ie30,3218:29,19,3917:2:I2387:16,17I:I:c0:I2022:0,39I:I:15:0,3921:2:I2387:21,I:I:dI115:((1)15)1:15,18(X(X)1):15,18(X(X)1):X(X),15:X(X),18:P(1)2551:T5:300:I:kdI115:((1)15)1:20,22Y(Y)1:20,22Y(Y)1:64:300:4bt16,180:16,182:16,184:16,1:18,3:P57:300: 5bubx13:AXĠ1bz15,18(X(X)1):15,18(X(X)1):X(X),15:X(X),18:b13:YBĠ1c20,22Y(Y)1:20,22Y(Y)1:20,Y(Y):22,Y(Y):ac0:I1518:0,39I:I:15:0,3916:01:2:I2387:21,I:I:T10ao7:35,3916:35,3918:17,35:17,39:P96:300:0ap28,3217:P85:300:1aq16,1821:16,1825:18,22:17,23:16,24:P76:300:2br16,1814:16,1818:14,1818:17,16:P72:300:3Jbs8,1016:8,1118:16,1810:P15,1721:15,1725:17,22:16,23:15,24:P76:300: 2 `h22,2421:22,2425:22,2424:23,23:P72:300: 3 `i21,2329:21,2531:29,3123:P64:300: 4 (aj36,3821:36,3823:36,3825:36,22:38,24:P57:300: 5 .ak\an:15:0,39262[_@(IN$)27İ210:60u_BIN$"Y"İ2000::100_F1000_PIN$:(IN$)180_R_c ** GRAPHICS **_d:15:0,3916:0,3917:2:I2387:16,17I:I:T10`e7:21,251:21,253:2,21:2,25:P96:300: 0 <`f21,259:P85:300: 1 {`g2:X(1)9:X(2)16:X(3)23:X(4)30:X(5)37:Y(0)37:Y(1)30:Y(2)23:Y(3)16:Y(4)9:Y(5)2^(P(6):P(0)96:P(1)85:P(2)76:P(3)72:P(4)64:P(5)57^2::3000^416368,0_<:"DO YOU WANT INSTRUCTIONS? (Y OR N) ";C_>80:IN$"Y"IN$"N"(IN$)27M]10000Y]791,32g] VER 1.3]FIND YOUR NUMBER, COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED] PROGRAMMER/DESIGNER LESLIE M. GRIMM, MT. VIEW, CALIF*^ SIDEWAYS1:VERTICAL2: ORIENTATION OF NUMBER LINE^X(6):Y(6):X(0)          ""fccfccfDDfccfccf+"""w77w""+++rrrr++++"""w7{w'''wDDw'''w{"""wssw""""""w33w"""""""ws"""wssw"""f3336fkDDkf6333f+""++++"`""""f666f66fDDf66f666f""""""""""""""kkkkkkww0+"""w77w"""f36fkkf63f`""""w'""rwDDwr""'w""""''''""<+""+wrrwwrrw"""""""""fccccffkDDkffccccf+"""w77w""+++rrrr++++"""w7fc33f33fDDf33f33cf"""wssw""""""w33w"""""""ws"""wssw"""f6fkkf6f+""+++ww+"`""""f336fkKKkf633f""""""""""""""w""rwDDwr""w0+"""w77w"""+wwww`""""vvvvvDDvvvvv""""''''"".+""+{w'""rwDDwr""'w{"""""""""f36fkkf63f+"""w77w""+++rrrr+'++"""w7f3336fkDDkf6333f"""wssw""""""w33w"""""""ws"""wssw"""+""+++wrrwwrrw+"`""""kkkkkk""""""""ww""""""{w'''wDDw'''w{&+"""w77w"""+w'""rwDDwr""'w`""""f666f66fDDf66f666f""""''''"",+""+fccfccfDDfccfccf"""""""""kkkkkk+"""w77w""+++rrrr+w'w+"""w7f36fkkf63f"""wssw""""""w33w"'"""""ws"""wssw"""+""+++w'""rwDDwr""'w+"`""""""""""""wrrwwrrw""""""fccfccfDDfccfccf0+"""w77w"""+{w'''wDDw'''w{`""""f3336fkDDkf6333f""""''''""$+""+f666f66fDDf66f666f"""""""""+"""w77w""+++rrrr++++"""w7"""wssw""""""w33w"""""""ws"""wssw"""+""++++"`""""""""""""""""""&+"""w77w"""+`""""""""''''"".+""+"""""""      500Yt'P85:T120:10500nt'P85:T60:10500t'P96:T120:10500t'I1200:It'Mt(t)768,P:769,T:770:t N189441Isy'8200Ts~'I13s'(16384)160ı: SKIP TITLE PAGE s'P128:T60:10500s'P96:T60:10500s'P76:T60:10500s'Is'(16384)160ı:SKIP TITLE PAGE s't'I1160:It'P72:T60:10500.t'P76:T120:10500Ct'P76:T60:10IN$:IN$"Y"IN$"N"8510frH!::8rR!IN$"Y"ė:7000:MOVE0:1000ro!16368,0rp!"OKAY! BUMBLE SAYS 'GOODBYE!'"r!I12000:I:1500r' *** MUSIC *** s' MUSIC -- A HUNTING WE WILL GO4s'(16384)160ı: SKIP TITLE PAGE ?st'M122:24,2522:19,24:23,24:19,2325:20,2226uq 15q 10,117:31,327:10,118:31,328:12,9:30,9:13,10:29,10q 14,11:28,11:15,12:27,12:16,13:26,13q q I1100:I r 16368,0:r4!23:"DO YOU WANT TO HUNT AGAIN? (Y OR N) ";[r>!23:30,3123:16,2624pN 18,2425:18,2426:17,2527:16,2628pb 15,1929:23,2729:14,1830:24,2830:11,1731:25,3131:11,1632:26,3132pl 13)qv 17,1818:24,2518:16,1919:23,2619:16,1920:23,2620:16,1921mq 23,2621:17,182128:T200:10500[or8400wo ** DRAW BUMBLE ** }o o 12o 20,2210:20,2211:19,2312:18,2413:17,2514:16,2615:16,2616o& 15,2717:11,1218:14,2818:30,3118p0 11,3119:11,3120+p: 11,3121:11,3122WpD 11,1223:14,281608400: SKIP WINhn] ** TREPAK **n^P64:T100:10500:T50:10500:P68:10500:P64:T100:10500:10500o`P76:10500:P85:10500:P96:10500:P76:10500:P85:10500:T50:10500:P90:10500QobP85:T100:10500:10500:P102:10500:P114:10500:P5,3628:35,3632:29,3135:29,3137:Dnmm? ** GAME END **m@34,20::3:" ***** YOU FOUND THE BUMBLE! ***** "mB:14:"IT TOOK ";CO;:CO1ĺ" TRY!":8012mD" TRIES!"nL2000'nN(16384)1608400: SKIP WIN1nR8200TnT(16384),26: 0Xl15,199: 1l8,108:8,1012:10,9:9,10:8,11: 2l8,101:8,105:9,103:2,410: 3l7l14,1628:14,1630:29,3214:29,3216: A m28,3221:28,3223:22,28:22,30:22,32:B9m28,3028:29,3128:28,3032: Chm3Y1:X1,Y1:X2,X1Y2:X1,X2Y2k13:X1,Y1:X1,Y1kI12000::kW ** INITIAL GRID **kXkb1klY3247kvX15367k{IY2Y2:X2,X2I:IkX:Y l7: DRAW LETTERS AND NUMBERSGl22,268:22,2610:9,22:9Jj21130jjFNBE$" AND IN THIS ROW."jPNBE$" AND UP."jZNBE$" AND DOWN."jd1150j ENDj:791,2:(4);"RUN MENU"j ** DRAW SMALL BUMBLE ** k0:IX2X2:Y2,Y2I:6k12:X1,X1Y2:X2,X2Y1:X2,X2YfkX1,i"0";:650eiN1:Y24:110:1350ti"1";:650iN2:Y17:110:1350i"2";:650iN3:Y10:110:1350i"3";:650iN4:Y3:110:1350i(MA)D$"IT'S TO THE LEFT"j(MA)D$"IT'S TO THE RIGHT"@j((MA)D$"IT'S IN THIS COLUMN"D$;E$]h500:(MA)İ510mh(MA)İ520{hNBİ530hNBİ540hMANBī8000h1100h"A":650hM1:X15:100:1300h"B":650hM2:X22:100:1300i"C":650iM3:X29:100:1300&i"D":650>iM4:X36:100:1300MESCAPE VgoK481250egpK491260tgqK501270grK511280gt1131g~I1200:I:CO0İ120:XOLDX:YOLDY:COCO1:1160g115:XOLDX:YOLDY:COCO1:gI1200:I:200:300h:=h21:" ":21HhWHICH LETTER? ";afR80:K(IN$)fUK27İ600:1105: ESCAPEfVK651200fWK63700: INSTRUCTIONSfXK661210fZK671220f\K681230f`1106fj"WHICH NUMBER? "; gk80:K(IN$)'glK63700: INSTRUCTIONSGgnK27İ600:1130: RESS TO BEGIN. ";}e80:(IN$)13(IN$)27760e(IN$)27Ģ21:1:" ":600e:e::7000e ** EXECUTIVE **fA((1)4)1:B((1)4)1fCOUNTER0f34,217fL ** INPUT LETTER **PfQ:"4,430:4,4339:: POKE 48 WITH SCREEN ASCII TO PRINTd" THE BUMBLE IS HIDING!"d::"TO FIND IT, TYPE A LETTER; "d:"THEN A NUMBER."d::"ARROWS AND WORDS WILL SHOW"e:"WHERE TO HUNT NEXT."4eI11000:I:16368,0Ze21:"P_cbIN$:IN$"Y"IN$"N"610tclIN$"Y"ġ:1500cvIN$"N"ė:cI1200:I:c::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";d23:">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:3d32,5:33,30:34,5:35,20: SET WINDOWvd48,30:8:: LEFT ARROWb13:21,2836:27,35:27,37:26,34:26,38:: RIGHT ARROWb13:9,163:2,10:4,10:1,11:5,11:: UP ARROWc13:9,163:2,15:4,15:1,14:5,14:: DOWN ARROW cW ** EXIT OPTION **?cX:"DO YOU WANT TO STOP? (Y/N) ";E(J1),(Y1))maJIJ2J2:Y2,Y2I:ItaOJzaTa768,P:769,T:770:aP64:T40:400:P96:T80:400:: UH-OHa ** ARROWS **b0:I05:9,16I:I:I3438:21,28I:I:: ERASE ARROWSQb13:21,2836:22,35:23,34:22,37:23,390:P76:400:o` ** REDRAW BLACK LINES **v`0`I6207`12,38I:12,38I1:I`I18327`1,27I:1,27I1:I``+ ** REDRAW SQUARES **`,J3247 a1(X1),(J1))'a6IJ2J2:X2,X2I:I.a;J=a@J15367Pa4[_8(IN$)27İ600::52l_:IN$"Y"700_<:MOVE0:1000_PIN$:(IN$)180_R_c ** DRAW WHITE LINE **_d15:1,26X:_n15:13,38Y: `s13:IYOLD2YOLD2:XOLD2,XOLD2I:I*`x15:IY2Y2:X2,X2I:IO`T60:P114:400:TG!!!!!"~^21::"*** HUNT *** HUNT *** HUNT *** HUNT ***":^(16384)16050: SKIP TITLE PAGE^10000^2936:7000:"ENTER LETTERS AND NUMBERS TO FIND IT."_4:"DO YOU WANT INSTRUCTIONS (Y OR N) ";A_680:IN$"Y"IN$"N"(IN$)275M]20000Y]791,32g] VER 1.3] FIND THE BUMBLE, COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED] PROGRAMMER/DESIGNER LESLIE M. GRIMM, MT. VIEW, CALIF.^ (16384)16050: SKIP TITLE PAGEG^:::23:12:"BUMBLE IS HIDIN            )6006UIN66006wIN$;:ININ1:NAME$NAME$IN$6006IN06006(37)1:(36):".";:(37)1:(36)ބININ1:IN0NAME$(NAME$,IN)IN0NAME$""6006'18944: ERROR ROUTINEUT NAME **trCH(36):CV(37):IN0:FLAG0:NAME$""t(91);".......";"]":CV1:CH2vIN$:IN0IN$(13)IN$"PLAYER":܃xIN$(13)IN$NAME$:zIN$(27)FLAG1:700:|IN$"?"FLAG1:3000:(~IN$(8)6024FIN$(65)IN$(90HUE0:B$(121)(111)(117)" "(119)(105)(110)"!":PX12:PY191:250:330: YOU WIN!4100:FLAG1ıłI12000:I:(16384)160FLAG1:16368,0: ::16302,0:400:41016368,0234,20:16301,0:Ip ** INPU2:230: TACa4100:FLAG1ıB$(116)(111)(99):PX32:PY112:250:X0:Y0:CL2:P1:230: TOC4100:FLAG1ı2:71,150175,34:72,150176,344100:FLAG1ı=HUE5:B$(102)"OUR IN A ROW AND...":PX0:PY176:250:I150:I1:230:X2:Y3:CL5:P2:230: PLAYw4100:FLAG1ı܀HUE6:B$(116)(105)(99):PX32:PY48:250:CL2:P1:X1:Y1:230:X1:Y3:CL5:P2:230:TIC 4100:FLAG1ıMB$(116)(97)(99):PX32:PY80:250:X3:Y3:CL2:P1:230:X4:Y4:CL5:PBEGIN. ";m 60:(IN$)27(IN$)133091 (IN$)27ė:10:700 :34,20::16304,0: ** GAME SET-UP **:::16302,0:400:410(16384)160FLAG2:16301,0:34,20:cHUE3:B$(112)"LAY":PX30:PY20:250:X2:Y2:CL2:P OF "d~ :" 'TIC TAC TOE'!"~ ::"THIS IS A TWO PLAYER GAME."~ :"TO WIN, YOU MUST BE THE FIRST PLAYER TO GET FOUR IN A ROW." :"CAPTURE A POINT BY NAMING ITS NUMBER PAIR (X,Y)."# I11000:I:16368,0I 21:"PRESS TO NU"\} ** INSTRUCTIONS **} ::2::">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";} 23:">>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<";:} 32,5:33,30:34,5:35,22: WINDOW ~ 48,30: INVERSE^!~ 4,430:4,4339:E~ " PLAY BUMBLE'S VERSIONSCS2ĺ"(ACTUALLY, THE CAT WON THE MOST ...)"|"DOES ANYONE ELSE WANT TO PLAY? (Y/N) ";|IN$:IN$"Y"IN$"N"1221|:IN$"N"1500}:P1$"":P2$"":I024:G(I)0:I:CT0:T50::34,20:400:410:40!} ENDC}:::791,2:(4);"RUN MEIN$"Y"X(0):1000{S(S1S2)::S0ĺ"IT'S A TIE BETWEEN ";P1$:"AND ";P2$;" !":1218{B$" GAMES!":S1B$" GAME!"|S1S2ĺ"CONGRATULATIONS, ";P1$;"!":"YOU WON BY ";S;B$:12184|"HOORAY FOR YOU, ";P2$;"!":"YOU WON BY ";S;B$m|SCS15:P2VzP$P2$:600lz510:FLAG11160zG(XY5)P:230:100z1100z:34,20:::P1ĺ"YOU WIN, ";P1$;"!":272:330:270:1204z"YOU WIN, ";P2$;"!":282:330:280{24:"PLAY AGAIN? (Y OR N) ";:{IN$:IN$"Y"IN$"N"1206T{`y34,20::((1).5)1ī1150ryK ** INPUT **yL34,20:CTCT1:CT25ė:"TIE GAME":340:292:290:1204yMCL2:P1yVP$P1$:600y^510:FLAG11110y`G(X5Y)P:230:1009z~CTCT1:CT25Ĺ34,20::"TIE GAME.":340:292:290:1204FzCLInx@DOTDA,DB:DFLAG1:: LEAVE DOT ON xRDFLAGı: DOT NOT ONxTDFLAG0:DOTDA,DB::ERASE LAST DOT x ** INPUT NAMES **x ** MAIN GAME ** yCT0:400:406:I024:G(I)0:I:T504yA253:B24:CL2:222:B70:CL5:224?yX(0)Ow"IDXDA14xw$DOTI,DB:310: DOT ON WITH SOUND w&DOTI,DB: DOT OFFw(Iw*DOTDA,DB:DFLAG1:: LEAVE DOT ONw4850: TURN OFF DOTw6DBDYY32w8IDYDB16 x:DOTDA,I:310: DOT ON WITH SOUND ;x<DOTDA,I: DOT OFF Bx>_vIN$:IN$"X"IN$"Y"720vIN$(27)EFLAG1:34,20:520vIN$"?"EFLAG1:3000vIN$","IN$(8)IN$(13)720vIN$"0"IN$"4"710vwIN$:IN$(27)IN$"?"712w*w ** DOT DRAWING SUBROUTINES **?w DADXX28:DBDY uCH(36):CV(37):22:1:"PLEASE PRESS .":CV1:CH1:650u34,20::uEFLAG0:34,23:::P$;::", ";C$;:u ** INPUT SCREENING ** v::"DO YOU WANT TO STOP? (Y/N) ";)vIN$:IN$"Y"IN$"N"702;vIN$"Y"1500Av ":CV1:CH1gt710tEFLAG1İ680:X;",";Y;:650tIN$(13)670tIN$(8)660t850:DADXX28:DBDY:DOTDA,DB:DFLAG1:CH(36):CV(37):CV1:CH:" ";Du22:1:" ":CV1:CH:630:GET Y AGAIN 1İ680:X;",";:630vsyIN$(13)IN$"X"IN$","630szIN$(8)Ĺ34,20::850:600s{Y(IN$):IN$"Y"640s|CH(36):CV(37):22:1:"ENTER A NUMBER FOR 'Y'.":CV1:CH1:630tIN$;:820:MOVE DOT TO Y^tCH(36):CV(37):22:1:" H1Lrl730grmEFLAG1İ680:X;:620rnIN$(8)Ĺ34,20::850:600roIN$","628rpCH(36):CV(37):22:1:"PLEASE ENTER A COMMA.":CV1:CH1:620+st",";:CH(36):CV(37):22:1:" ":CV1:CH14sv710SsxEFLAGq[EFLAG1600{q\IN$","IN$(8)IN$(13)IN$"Y"602q]X(IN$):IN$"X"610q^CH(36):CV(37):22:1:"ENTER A NUMBER FOR 'X'.":CV1:CH1:602qbIN$;:800:MOVE DOT TO X CrdCH(36):CV(37):22:1:" ":CV1:C ENDppIN2İ850:292:290:1000: CAT'S GAMEvpp(P1$)11(P2$)11P3$P1$:P4$P2$:p(P1$)11P3$P1$:536pP3$(P1$,10):P1$P3$pP4$(P2$,10):P2$P4$: qW ** GET X,Y INPUT **5qXEFLAG0:34,23:::P$;::", ";C$;>qZ710O"WHOOPS! THAT POINT IS TAKEN."wo360: MISTAKE NOISEoI1500:Io850:: ERASE DOT AND RETURNo::"TYPE 1 TO STOP, 2 TO START A NEW GAME, OR 3 TO GO BACK TO THIS GAME. ";p 60:IN(IN$):IN1IN3522Dp ::IN1ī1210: FINAL SCORE,100:PX7nI04:B$(I):PXPX4:NN(I5):250:300:I:NUMBERS AND NOTES FOR X AXIS nHUE6:PX7:PY180nI04:B$(I):NN(I5):PYPY32:250:300:I: 0-4 ON Y AXIS no ** HANDLE INPUT ***oFLAG0:G(X5Y)0ı^oFLAG1:34,20::145:205,0206,145:I144146:68,I206,I:I:mB$" 0 1 2 3 4":PX9:PY160:HUE1:250::REDRAW X AXIS LABELS mHUE3:B$(91)" "(120):PX0:PY160:250: --> X,nB$(94):PX3:PY96:250:B$(121):PY76:250: UP-ARROW Y HnHUE1:PY160:TNPUT MISTAKEulhT10:N114:I16:300:J110:J:Ilj: MISTAKEl ** DRAW GAME BOARD **l3:N228:T5:I70204:I,0I,143:NN1:300:Im0:I8119328:I,0I,143:I:I1214032:70,I205,I:Inm0:69,069,145:68,068,145:205,0205,C **]k,768,N:769,T:770:}k6T10:N96:300:: DOT BLIPkJK((1)10)8:T50kLI1K:J((1)10):NN(J):300:I:kTN76:T80:300:N96:T80:300:N57:T80:300:N64:T180:300lV: CAT'S GAME7l^T5:I04:NN(I):300:I:T50:Llg Ij"B$"PURR!!":PX30:PY126:260:HUE3:PX30:PY144:T10:I115:B$(133):250:NN((1)9):300:B$(134):250:NN((1)9):300:Ij#B$" ":PX30:PY126:260:2k$SCSC1:PY144:PX34(2(SC9)):B$(SC):HUE3:250::CAT'S SCORE Dk+ ** MUSI34(2(S19)):PY48:250::JACK'S SCORE iB$"HOORAY!":PX30:PY78:260:PX30:PY96:HUE3:T10:K18:I04:B$(128I):250:NN((1)9):300:I,K:B$" ":PX30:PY78:260:@jS2S21:PX34(2(S29)):PY96:B$(S2):HUE3:250::JILL'S SCORE E:LGEN:: LARGE CHARGENhLINENUM,PY:COLUMN,PX:SGEN::SMALL CHARGEN!iB$"HOORAY!":PX30:PY30:260:HUE3:PX30:PY48:T10:K18:I04:B$(123I):250:NN((1)9):300:I,K:B$" ":PX30:PY30:260:: JACKiiS1S11:B$(S1):HUE3:PX1:BB1:A,BA10,B5A22,BA22,B9A10,B14A,B9A,Bg: HEXAGONgT200:A68X28:B134Y32:220:B$(X):PYB8:PX104X:260:NN(5X1):300hB$",":PXPX1:260:B$(Y):PXPX1:260:NN(5Y1):300:YhLLINENUM,PY:LCOLUMN,PX:LHUE,HU32:ef ** PRINTER SUBROUTINES **f850:P222,224: ERASE DOT, WRITE NUMBER PAIRfCL:A,BA24,BA24,B11A,B11A,B:AA1:BB1:A,BA22,BA22,B9A,B9A,B::RECTANGLE7gCL:A,BA12,B5A24,B1A24,B10A12,B16A,B10A,BygAAJ13:G(AJ(BJ)5)PJ3:J:160eJ:180:X10,Y10X94,Y106:X9,Y10X95,Y106:1200eA3B3170eJ13:G(AJ(BJ)5)PJ3:J:170fJ:180:X10,Y10X94,Y106:X11,Y10X93,Y106:1200'fA,B:EfX81A28:Y12(4B)A3B1140udJ13:G(AJ(BJ)5)PJ3:J:140dJ:180:X10,Y10X94,Y106:X11,Y10X93,Y106:1200dA1B3150dJ13:G(AJ(BJ)5)PJ3:J:150+eJ:180:X10,Y10X94,Y106:X9,Y10X95,Y106:12001cc ** CHECK FOR WIN **=cdCT7ıOcLL I CALL ONE PLAYER? ":6000:P1$""P1$"PLAYER 1"a)FLAG1ė:34,20:40a*P1$IN$a+::"WHAT SHALL I CALL THE OTHER PLAYER? ":6000:P2$""P2$"PLAYER 2"a,FLAG1ė:34,20:43.b-P2$IN$:P2$P1$P1$P1$" 1":P2$P2$" 2"4b0yb2530:B$I96112:224,I266,I:I:16301,0:34,20`"::"WOULD YOU LIKE INSTRUCTIONS? (Y OR N) ";`#60:IN$"Y"IN$"N"(IN$)2735`$(IN$)27İ700:34`%IN$"Y"İ3000a&T50:FLAG2İ400:406:T50-a'16301,0:34,20:FLAG0ta(::"WHAT SHA114:N(6)102:N(7)90:N(8)85:N(9)76_C$"ENTER X,Y . "_FLAG0:(16384)160FLAG1:5000:34: DRAW GAME BOARD, NO TITLE_4000:16368,0:FLAG2ī34!`0:I420:210,I266,I:I:I3248:224,I266,I:Ii` I6480:224,I266,I:I:ARIABLES^ LLINENUM23427:LCOLUMN23428:LHUE23429:LGEN23040:VARIABLES FOR LARGE CHARGEN.^1:0:DOT2: SHAPE VARIABLES^DX75:DADX:DY135:DBDY: VARIABLES FOR DOT DRAWING _G(30),N(10)d_N(0)228:N(1)203:N(2)181:N(3)171:N(4)152:N(5)'M]10000Y]791,32]TIC TAC TOC, COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED] PROGRAMMER/DESIGNER LESLIE M. GRIMM, MT. VIEW, CALIF.] VER 1.3H^ B$"DUMMY VARIABLE":LINENUM18563:COLUMN18564:SGEN18176: SMALL CHARGEN. V" " " """""""""!!! ! ! ! ! !!!!!!!!!        N MENU"v_ N103,65:104,93:23872,0:(4);"RUN HELLO"_@ ERRORS_J);"BLOAD TLC TITLER.OBJ0"|^((4);"BLOAD PIC.HELLO,A$2000"^416368,0^16297,0:16302,0:16304,0^16384^(4);"BLOADBF 0-4,A$C00"^(4);"BLOAD BUMBLE GAMES.OBJ")_232,1:233,67: XDOT SHAPE TABLE POINTER G_ :791,2:(4);"RUJM]40000g] BUMBLE GAMES HELLO] COPYRIGHT 1982, THE LEARNING COMPANY, ALL RIGHTS RESERVED](104)93(103)65(23872)020000] (4);"MAXFILES 1"/^ (4);"BLOAD MUSICRESETMOVE":1010,23:1011,3:(3)250Č11697^:Y^(4""" "