' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 7777777 7777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`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- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`,89SF}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160n} BASIC ERRORx}(12):CO,0,89}"Error "ZE" at line "ZN" in Exit Manager."}:"PleGetting the menu...":RNH,"MENU"-0uSPACE:7y1000N} ERROR PROCESSING }ZE(222):ZN(218)(219)256:216,0:32000}WIND:VSP,1:ZE25531000}(15):ZE1532110}ZUĦ: ZU=USER PROCESSING FLAG(} REENTRY POINT2}(12):CO,0(901),(902))MA1:CO,1,Y40:PR$(((1)3)1)"!"CC$z MA0įCO,1,Y40:"Please try ";PG$((901),(902));" again.";CC$ MA1PG$((901),(902))"ELEPHANT WALK"İ50000:CO,1,Y50:"You are ready for "QP$".";CC$SPACE:CL$ CL$:CO,14,89:"X1:N$N$((X)):(X)322623 (X1)32262Y CL$:5::N$;LN$;CC$:X70:Y75: CO,X8,Y:"You did problem"Q1$(2(PG1))".":CO,X56,Y:PG:CO,X8,Y10:"You got problem"Q1$(2((904)1))" right.":CO,X56,Y10:(904)5 (904)P(ĈsL х ` RP6PDH)#n6,6ph" ֩PyQ AL6h) `P Pxp @ @  @  @hPPP؈P PP  @@  P@ pxxxxxxpx0H@@@@pxp ` p0`` pبppxxxp@@@@H0hP @@ppppx @ @@ @  @p px Pppxxp ppبȨppph𠐈ppp pP PAUSCWININj]mjmfj9k\kkkkkkkdkklmGmmmn` PPPPPPPP xp(  @@@h @ @@  p p @  @pȈp ` pp0@0p0Pp8@p @pʝo) ,po9qp Ю 9pLo ` ֩PyQ AL ,pqpBp`$p#p p#p$p` ~LpH)hJJJBp`LANCS AZ09!/:@[`{~ @BOHOOUNHOOCECRDFAFPARSNOJUSJUSCNNOCNGCDVSHSSPACCEZC0:GCP,ZX,ZY:Z$""#>CO,ZX,ZY8>A$:A$""16040f>(A$)9ZN(A$):ZNZN(ZN96ZN123)32>(ZN1ZN8ZN13ZN24(ZN49ZN57))16040>ZN8ZC1ZC0:(8);:Z$"":16040>ZN816040>ZN13(Z$)ı>ZN1316030>ZN215);" FROG"('(907)1Ĺ907,0:100203'907,1$'D$"BSAVE T.O.FILE,A900,L37":CF$CL$:CO,0,89:"Sound is now turned "ST$((907))"."CC$;CB$:QF1:900:QF0:CL$CF$CB$:220> INPUT ROUTINE> EXIT: ANSWER PLACED IN Z$>(1);:ZE0:16368,0:agement Option is available for adjusting the time allowed for each step taken by the 'Computer Elephant'."8" The drill is not timed if the graphics have been turned off. (20 problems)" "3. ";(14);")*";(15);" BALLOONS 6. ";(14);"456";(g. (20 problems)",""$"CANNON SHOOT","Cannon Shoot",3,1,"Drills on whole number addition involving 2 or 3 addends. (25 problems)",""k."ELEPHANT WALK","Elephant Walk",3,0,"A timed drill which reviews problems from all four preceding levels. A Manddition with two digit addends. The problems may involve up to three addends and do not involve regrouping. (20 problems)","""HIGH WIRE","High Wire",2,6,"Drills on whole number addition with 2-4 digit addends. The problems do not involve regroupinUC:CO$:WIND:V0CO,RX,RY:CN$;"NO, TRY AGAIN.";CO$:30000:BOX,RX,RY,RX168,RY15l 0(UC)UC0:12400|*0UC1:12010p0 STEP THROUGHu0(HO)įBOX,ZX25,ZY7,ZX2512(ZA$):ZTHO:11020:HOZT:HXZX25:HYZY7z0ZXPX(ZM1)12:ZYPYZA1231)0)):CO,ZX25,ZY7:CN$;ZA$;(127);" "CA$;CO$:12220I 0 ANSWER CHECKu 0HOįCO,ZX2512(ZA$),ZY7:CN$" "CO$0(HO)įCO,ZX,ZY:CN$;" ";CA$;CO$0PNPN1UC:(ZA$)((AN))123160CO,RX30,RY:CN$;"RIGHT!";CO$:UC(UC):PAUSE,20:SCSCȹ16368,0:KB(ZP)12230,12250,12270,12290,12240,12295A/12220T/ZA$""12300_/12220t/ZEZE1:12220/310000(ZA$)1((AN))122200ZA$ZA$(ZP128):CO,ZX25,ZY7:CN$;ZA$;(255);CA$;CO$:1222060ZA$(ZA$,1,(ZA$)1((ZA$ZY:CN$;(127);ZA$;CA$;CO$:ZXZX12:12030N/ZXZX12((ZA$)0):ZA$(ZA$,2,(ZA$)1((ZA$)0)):CO,ZX,ZY:CN$;" ";(127);CA$;CO$:12030/ HORIZONTAL INPUT/BOX,ZX25,ZY7,ZX2610(1((AN))):CO,ZX25,ZY7:""6/16384,128:ZP(16384):24HO15:ZA$"":CO,ZX,ZY:CN$;" ";(127);CO$|.16384,128:ZP(16384):16368,0:KB(ZP)12030,12050,12070,12090,12110/12030/ZA$""12300/12030&/ZEZE1:120300/31000:/(ZA$)1((AN))12030*D/ZA$(ZP128)ZA$:CO,ZX,:ZA$(ZA$,(ZA$)1)" = "6z+CO,PX,PY:CN$;ZA$;CO$N+ZA0:ZM(ZA$):HO1T.h. PROBLEM INPUTq.UC0.NOJUST:AFT,1:CN$:ZZ0:ZE0:ZXPX(ZM2)12:ZYPY724(HO)ZA12:ZA$"":HO112020,12200. VERTICAL INPUT..BOX,PX,ZY,ZX20,ZY(A(L1)),ZM)::Z$(A(L1)):ZA$(L1)(" +"(" ",(((ZM3)(Z$))1))Z$,ZM)>+L11ZC1:CO,PX,PY24((L11)12):CN$;ZA$(L1);CO$::12800H+ZAZC1:HO0:11999\+ HORIZONTALLYf+ZA$"":ZC3:A(3)0ZC2p+L11ZC:ZA$ZA$(A(L1))"+":AFT,1:3:HOHO((OB2)(OB9)(OB10)):TG0OB2TG1:HO1:11015V +OB2TG0:HO0x +(((1)2)1)HO11020,11100 + VERTICALLY +ZC2:A(3)0ZC1 +ZM1:L113:((A(L1)))ZMZM((A(L1))) *+:ZMZM3S4+L11ZC:ZA$(L1)(" "B`xA?&=*""AAAAt `  -Р@  Р@ <@LRs z1I0 ?^?@<2J0 -Р@      IN UPPER CASE+"Circus Math","* * *",5"CLOWN MAKER","Clown Maker",2,4,"Drills on whole number addition with two digit addends. The problems do not involve regrouping. (20 problems)","""CLOWN CAR","Clown Car",2,5,"Drills on whole number aZ(2)(Z(3)(OB1))10)ZL1:ZCR(2):ZL10(Z(1)Z(2)(Z(3)(OB1))):Z(ZC)Z(ZC)R(9Z(ZC)):A$(ZC)(Z(ZC))(A$(ZC),2) 'AN0:L11LINES:A$(L1)(A$(L1),DI(L1)):A(L1)(A$(L1))MU(L1):ANANA(L1):AN(AN.5):: * PROBLEM DISPLAY *BOXB +0:CAR(1)B `'ZM0:L113:A$(L1)"":A(L1)0:DI(L1)ZMZMDI(L1)H j' t'L11ZM:ZL1:Z(1)R(9LINES):Z(2)R(8Z(1)(Z(1)CA(L1ZM))):Z(3)(DI(3)0)R(9(Z(1)Z(2))((Z(1)Z(2))CA(L1ZM))) ~'L21LINES:A$(L2)(Z(L2))A$(L2)::{ 'CA(Z(1)121)/ $'DI(L1)Z1:Z2Z1ZLZ1:DI(L1)R(Z2)5 .'e 8'L113:Z1OD%(OB,L126):Z2OD%(OB,L127) B'MU(L1)10Z1:Z2Z1ZLZ1:MU(L1)10R(Z2) L' O'OB3(MU(1)MU(2))ZL1:MU(1)10R(3):10063 R'OB10MU(2)MU(1) V'CAOD%(OB,14):CA2ZL ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ,64:::HSP,4,1:DUN,"CLOWN.PCK":(5):CO,75,153:"One moment please..."q 13000:RFL,"NUM.FNT"F1:DFT,1,F1 P9įBOX,75,153,279,190:30000 24576:20000 ' PROBLEM GENERATOR 'OBOB(PN):LINESOD%(OB,1):L113:Z1OD%(OB,L12):Z2OD%(OB,L,279,191:CO,8:DE$(I1);DF$(I1):WIND,0,36,279,191G 900:::WINDV*WIND:CL$fh17000:CL$lpSPACE-BAR ROUTINECA$CO$:SPACE: FIRST LINE OF DATA:DISKETTE #,NAME LINE 1,NAME LINE 2,# OF PROGRAMS PROGRAM NAMES MUST BErinter for printing results.";x" See your support booklet for information about accessing the Management Options."SPACE4I1N2:BOX:CO::CQ$(I)::WIND,8,36,279,191:CO,8:DE$(I);DF$(I):WIND,0,36,279,191::I4ĺ:CQ$(I1)::WIND,8,36ts whole number addition problems.";a" The programs are sequenced according to difficulty.":"The Management Options section allows you to see your children's scores, adjust the time for the review program, turn the graphics off, and set up a pON3CL$:CO,0,89:"Insert another diskette."CC$A900:CL$dCS(P(P(999))1)16:SLOT #xCS1CS7CS6CS:DESCRIPTIONS $CL$:DN$CC$:D2$CC$:WIND,0,36,279,191:CO:"CIRCUS MATH is a drill and practice package that presen               !!"          )1) XbA$L$", "F$" "::X910935:A1A11:X,((A$,A1,1)):XCL$:CO,0,89:"Getting "CQ$(A)"..."PR(950)0İ900901,LV(A):902,GP(A):D$;"BSAVE T.O.FILE,A900,L37":16384:RNH,"IN MANAGER"XEND OPTI X2(F$):(F$,1)" "F$(F$,(F$)1)> X:F$" "501 14:"What is your":"last name? ";:INP,(11,"-AZ-az. '-"),L$:L$L$" ":X2(L$):(L$,1)" "L$(L$,(L$)1) X:L$" "504 (L$)1509X2(L$):(L$,1)" "L$(L$,(L$N1PRģ16384:RNH,X2$) lAN3PD600> mAN2PDī10000] rAN1PDİ750:MENU0:200 SEED RANDOM # GENERATOR & CLEAR HGR X(P(78)) GET THE PROGRAM CL$:10:"What is your":"first name? ";:INP,(11,"-AZ-az. '-"),F$:F$F$" "+% PROGRAM:CLOWN MAKER8PROGRAMMER: P. FUGLESTADK(C) MECC 1983i(LAST UPDATE: 6/27/84 PRWw2P9(908)d32000MU(907):D$(4):CN$"":CL$" ":PX84:PY50:RX64:RY130F132638:F2F11161:IM33800:DFT,7,IMJ DFT,7,F2:230            CO,172,150:"Which":CO,172,160:"number? ";:16000:A$Z$ TCAA$(1)ĺD$"BSAVE T.O.FILE,A900,L37":CL$:CO,00,89:"Getting the management options...":PAUSE,20:16384:RNH,"MANAGEMENT OPTIONS" ^A((A$)) hIN:PRAN1ģ16384:RNH,X1$ jDRA$" ":L+ (904)P((901),(902))MA19 MA$(MA)U A$N$L$G$PG$PC$MA$n D$"OPEN STFILE,L35" D$"WRITE STFILE,R"RE A$ D$"CLOSE STFILE" 265 LN$"":N$"":X909 XX1:(X)44LN$LN$((X)):260 XX1 X"0"TR$:154 A$RE$TR$5 D$"OPEN STFILE,L35"O D$"WRITE STFILE,R00"W A$m D$"CLOSE STFILE" 250:L$((901)):G$((902)) PG$(PG):(PG$)1PG$"0"PG$ PC$((904)):(PC$)1PC$"0"PC$ N$LN$"* "N$:L(N$)25:N$N:L13:PR$(L):L _PG(903)9 dD$"OPEN STFILE,L35"R nD$"READ STFILE,R00"Z xA$p D$"CLOSE STFILE" RE((A$,3)):TR((A$,4)) RERE1:RE101RE1 TRTR1 RE$(RE):TR$(TR) (RE$)3RE$"0"RE$:153 (TR$)4TR$(2)"s":DFT,1,32768:AFT,1, ((900)090` 2CL$::CO,70,95:"INSERT MANAGER DISK.":SPACE 7CL$:CO,0,89:"ONE MOMENT PLEASE..." <D$"BLOAD CHECK FILE" P(940)1ĺCL$:CO,0,89:"PLEASE INSERT THE FILE MANAGER DISK.":L12000:L:50 Z  "PROGRAM: EXIT MANAGER; "PROGRAMMER:P.FUGLESTAD O"(C) MECC 1983n"LAST UPDATE: 84/06/28PRWz3200024576:CL$(12):PG$(3,6),P(3,6):L123:L206:PG$(L1,L2),P(L1,L2):L2:L1 #D$(13)(4):CC$(3):CL$(12):Q1$(1)"":Q1$BBBBBBUHiB*HiBUHiB*R_BUR_B*BU~ NEEDS AT LEAST 48K RAM MEMORY TO RUN.":16384,128:16368,0g +CS(P(P(999))1)16:CS1CS7CS6z +(4);"PR#";CS C0,64:D$"BRUNLOGO":16304,0:16297,0:16299,0:16302,0 D$"BRUNCIRCUTIL.OBJ":RNH,"PRUTIL.OBJ-A$8C4A-L$3B5":PP(948)(949)256:RFL,"PRINTER COMMANDS.BIN"PP RNH,"HPRINT.OBJ":RFL,"ASCII BOLD.FNT":RNH,"MENU" *:< +11:"THIS DISKETTE | PROGRAM:HELLO1PROGRAMMER:S P MCCARRONKCOPYRIGHT:MECC, 1983h(LAST UPDATE:84/06/06HBW|2(978)157100<11020F(64435)6ĺD$"PR#0":D$"IN#0":16372,0dINITIALIZATIONnD$(4)MAIN PROGRAM16368,0: :23:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"Z$"n"Z$"y"36020Nsur disk drive and diskette.":321605n} BASIC ERRORIx}(12):CO,0,89}"Error "ZE" at line "ZN" in Management Options."}:"Please report this error to MECC."}30000:31000STANDARD YES-NO INPUT(1);:GCP,ZX,ZYHCO,ZX,ZY:CEL   32000$}WIND:VSP,1:ZE25531000<}(15):ZE1532110`}ZUĦ: ZU=USER PROCESSING FLAGt(} REENTRY POINT2}(12):CO,0,89F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160#P}ZE8ĺ"I/O error. Please check yo䵍䵩m嵍`"L ŵ8ŵH ~(`  d ֠z#>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0ҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7ߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ֠Ӥ~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦ D@ C N cLuɠ% d: L ФLANGUAGE NOT A01111002","21111002323002","22222000000001","32222220000001","23333000000001"1,"32222220000001","23333000000001"02","22222000000001","32222220000001","23333000000001"R POWER[1..3,LOW..HI],CARRY TYPE )փ "-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000"M*փ "21111023333000000001"W..HI],MULTIPLIER POWER[1..3,LOW..HI],CARRY TYPE (փ "-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000"6)փ "21111001111002","211110023230OWER[1..3,LOW..HI],CARRY TYPE 'փ "-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000"(փ "21111001111002","21111002323002","22222000000001","32222220000001","_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`DE ɤ<(LΡ DE`80!  eDeE eDDeEE8`D&E`( 80 /#۱Q/` "-PROB",25,13,1,4,2,2,3,1,4,2,5,2,6,2,7,2,8,2,9,1,10,1,11,2,12,2,13,28  L  QL  QL  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb:CN$;:CO,100,82:LG$"ZZZZ"RG$;.گAFT,0:CN$;:CO,164,87:" and ";:AFT,2:CN$;:CO,198,82:P2$;:AFT,0:CN$;:CO,215,87:" will":AFT,2:CN$;::CO,32,98:P1$;:AFT,0:CN$;:CO,48,103:" down.":5:113,81149,81.ں:CO,0,126:" - Best score = 10" compatible with the Apple //e)":"2. Any other type of printer":" interface card (e.g., parallel":" or serial, Centronics type,":" etc.)"::"Which type of printer interface":"will you be using? ";:ZB1:ZT2:37000ZN6000,700>6662>>4`pp8>98000p`0 8\||8||x80 ?3 <@```xc7? <@@```x <p```x:>Fޞfff~33~~??33fff~Ɔfff~`pp8>9x` 76vGޞfff~ޞ~~Ɔfff~~~??33fff~??33 <```xA pppA  ppp`ph@ pp880p:>>6662>>4t`ޞfff~ޞ~~Ɔfff~Fޞfff~ޞ~~33 AREA &ZÃ"-PROB",20,2,5,8,7,12N&dÃ24,29,54,84,114,149,149,144,114,84,54,24&nÃ"#$","%&",")*"," ","'(","+,","-.","/0","MNO","PQR","STU",";<","78","9:","=>","?@","AB","CD","EF","GH","IJ","KL","VW","XY","Z["'ֲ LINES,DIGITS[1..3,LOW..HI],MULTIPLIER Pror "ZE" at line "ZN" in High Wire."O%}:"Please report this error to MECC."a%}30000:31000|%STANDARD YES-NO INPUT%(1);:GCP,ZX,ZY%CO,ZX,ZY:CEL:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"36020%%@PLAY,TMU,7:&PòDATAROCESSING FLAG"$(} REENTRY POINT6$2}(12):CO,0,89$F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160$P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160$n} BASIC ERROR$x}(12):CO,0,89$%}"Er#:u(1):SPACE::9#ySTANDARD ENDING ROUTINE (HI-RES)j#@y903,PN1:904,SC:SET,0:RNH,"EXIT MANAGER"#} ERROR PROCESSING# }ZE(222):ZN(218)(219)256:216,0:32000#}WIND:VSP,1:ZE25531000#}(15):ZE1532110$}ZUĦ: ZU=USER P19):CC1(3(C14)):PFPF1:PF9PF0:PLAY,37MU,4N"HJ:CO,X,149:HP$(13)"LJCO,190,149:HP$(24):PAUSE,10:X12:CO,190,149:HP$(23):PAUSE,10:CO,190,149:HP$(25):PAUSE,10::CO,190,149:HP$(23)"N"0u STANDARD SPACE BAR ROUTINE )HI-RES)!7J!8JRUN GUY ACROSS FLOOR+!=JFPFP1C!?J(FP1)19010,19015!BJC12:X56138:CO,X,149:HP$(C):CO,56,149:HP$(19):CC1(3(C14)):PFPF1:PF9PF0:PLAY,37MU,4!CJ:CO,X,149:HP$(13):5"GJC12:X139190:CO,X,149:HP$(C):CO,56,149:HP$(38:F2F11161- RFL,"NUM.FNT"F2:DFT,1,F2 RFL,"CAR2.FNT"F1:DFT,2,F1:230,64:::DUN,"CAR.PCK":(5):3:CO,75,153:"One moment please..." 13000:C1$"*+,":C2$"-./":B1$(34)"#$":B2$"%&'":LP$"()":B3$"%&'":C3$"345":C4$" 7 " LHSP,4,  PROGRAM: CLOWN CAR7PROGRAMMER: P. FUGLESTADJ(C) MECC 1983h(LAST UPDATE: 6/27/84 PRWtd32000WA(13),PE(13),PR(13),PS(11),QD(12):MU(907)P9(908):P60:D$(4):CN$"":CL$" ":PX99:PY109:RX90:RY89:P90P81 F1326  !!! ! ! ! ! !!!!!!S)5 ZB = MIN, ZT = MAX, ZC = C/R LEGAL (BOOLEAN)K(1);:GCP,ZX,ZY[ZL((ZT))CO,ZX,ZY:INP,(ZL,N,(ZC)),ZN$:ZN(ZN$):ZCZN$""ıZNZBZNZTįCO,0,181:ZF1:"Enter a number between "ZB" and "ZT"."(3):37030ZFįCO,0,181:C@yCL$:CO,0,89:"Returning to Management Options...":SET,0:RNH,"MANAGEMENT OPTIONS"s STANDARD YES-NO INPUT(1);:GCP,ZX,ZYCO,ZX,ZY:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"36020 STANDARD RANGED NUMERIC INPUT (HI-REM#A((S$,K,1)):PPCTK,A:A32AA64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3^#(A);CA$;:q#K:Q$:CTCTLw#0uSPACE BAR ROUTINE:u:SPACE::yENDING ROUTINE"yWIND:CL$:10:"Do you want to try again? ";,y360006yZ$"Y"ĬW0#F#JK6L:(S$,J,1)")"9100EP#X$(S$,K5,JK5):X((X$))XZ#X0X127X0td#L$"":K1L$(S$,K1)n#R$"":LJR$(S$,LJ)x#S$L$(X)R$#LKLJ:9110#J#K#13:CA$;:GCP,X,Y:0:50,Y1279,Y1:CEL:L(S$):K1LC$Q$;:8020hA88080-rA34L198020`|A32AA64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3|(A);::S$S$C$:8020C$" "C$;:L1S$"":8020S$(S$,L1):8020(#SCAN FOR CHR$2#L(S$):L79120<#K1L6:(S$,K,5)"CHR$("911S$""İ9000:CTCT1:PPCT,13QL2:CTCT1:PPCT,0:PPCT1,255:PPCT2,25517:"Are the above commands correct? ";:36000L1(Z$"Y"):L1@STRING INPUTJS$"":16368,0TL(S$):C$:A(C$):A13Ĺ16368,0: ^(A8L0)ĺ:PP3,255:PP4,255:BOX:CO:"Please type in the special commands for your printer. Type an extra 'RETURN' when you have finished."L111:CT1L215:42L2:6:CA$;:CEW:"PRINT "Q$;:8000S$""Ģ42L2:1:CA$;:CEW::L25BOX::4:"The printer interface card may be in any slot 1 - 7. (Most commonly 1 or 2.)"l9:"Which slot is your interface card in? ";:ZB1:ZT7:37000:PP,128ZNv13:"Does your printer require any special commands? ";:36000Z$"N"ĹPP2,0 30 cps)"::"2. Low speed (usually 10 cps)"w9:"Which printing speed do you want"::"to use? ";:ZB1:ZT2:37000PP2,128(ZN1)14:"Which slot is the communications"::"card in? ";:ZB1:ZT7:37000PP,ZN:XNOT A COMM CARDZb20:ZC0:37000:PP1,ZN:'PID FIELDAZL120:PP106L,0:d10:"What printer are you making these":"settings for? ";:INP,(20,0),P$:LP(P$):LP0ınL1LP:PP106L,((P$,L,1))::pSET COMM CARD,zBOX:3:"1. High speed (usually0PP1,66:BOX:APLİ5100S5200:D$;"BSAVEPRINTER COMMANDS.BIN,A"PP",L128"YrADJUST PAPER LENGTH2:"The normal setting for page length is":"66 lines per page.":6:"What page length is your printer set to produce? ";ZB10:ZT10 0A@@<A@@ @@@@@A`@x@`@`@x@`@A`@@A@@Ap@<@0Ap @<A@ @A@ @Ax Ax@? @xAp A@ @~ A| A`?Ax Ap@ @~Ap A`@?@Ax@<@ApA@A@A|@x@C``A@@0A@@0A@Dp@@@D@pC@0C@0C@0B0B0B0B<B B B B B B B B B B B B B B<C@0C@0C@0C@0C@0C@0C@0p@0A@@0A@@@ 6 `@A@@@@@@@@@@@@@@@@@@@A`@A`@A`@@`@@x@@@@@ @@ @@ @@ @@ @@ @@ @@<   N$;:CO,147,48:"."(-ڒ5:96,42131,42-گAFT,0:CN$;:CO,0,70:" - Press the ";:AFT,2:CN$;:CO,112,65:ZE$;:AFT,0:CN$;:CO,128,70:" key when the ";:AFT,2:CN$;:CO,236,65:B1$;:AFT,0:CN$;:CO,245,70:" is" .ں:CO,32,87:"over the ";:AFT,2CO,210,149:HP$(4) OF2 PFMOVE GUY OFF LADDERB ZF(CL)18500h dFMOVE GUY OFF BOTTOM OF LADDER(0)s CHFP1: DHMOVE OFF TOP OF LADDER(1) NHCO,210,24:HP$(2):CO,210,19:HP$(6):CO,210,14:HP$(7) XHCO,210,9:HP$(8):CO,210,3:HP$(10):16000HP$(21)}BPAUSE,1:CO,56,14:HP$(20):PAUSE,1:CO,56,19:HP$(22):56,1880,18:PAUSE,1:CO,56,24:HP$(15):1:56,2480,24[D\DPUT GUY ON LADDER(1) fDC12:X190210:CO,X,149:HP$(C):CO,210,149:HP$(19):CC1(3(C14))::CO,210,149:HP$(1):FPF1:PF5PF0:PLAY,50MU,68>:CO,X1,3:HP$(10)U>WPWP1:WP13CP1:CL0[gBuhBMOVE GUY ONTO LADDERrB(CL)17500|BPUT GUY ON LADDER(0)BCO,56,3:HP$(10):PAUSE,1:CO,56,9:HP$(8):0:56,880,8:PAUSE,1:CO,56,3:" ":CO,56,9:(C):CC1(2(C2)):PAUSE,1:TT1:40000::CPCP1:CO,210,YP(CL,CP):HP$(4):CO,210,YP(CL,CP):HP$(5)xCO$:>RUN GUY ACROSS WIRE>C9:X3210WP12:XX3X3111:CO,X,3:HP$(C):CC1(3(C11)):PAUSE,1(2(((1)5)1)4):PȮǠʮʠȠǮʠˮȠˠΠȮĠȪĠȮʠҮΠҮΠ媠栠砠ԪҠàҪʠ٠ƠŪΠǪ͠ĠȪ猪򠠠栠檠栠᪠ᠠ٪٠٪٠ЪȠꪠ%LISA H., DHESJ  0000001","23333000000001":,ڲ INTRO INSTRUCTION SCREEN,گAFT,0:CN$;:CO,0,30:" - See how many ";:AFT,2:CN$;:CO,133,25:P2$;:CO,149,30:AFT,0:CN$;:"'s you can catch"-ں:CO,32,48:"in the ";:CO,83,43:AFT,2:CN$;:LG$"ZZZZ"RG$;:AFT,0:CLTIPLIER POWER[1..3,LOW..HI],CARRY TYPE +փ "-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000",փ "21111001111002","21111002323002","22222000000001","3222222annon Shoot."8*}:"Please report this error to MECC."J*}30000:31000e*STANDARD YES-NO INPUT*ZH(36)1:ZV(37)1:INP,(3,"YESNO",ZC),Z$:Z$(Z$,1):(Z$""ZC)(Z$"Y"Z$"N")ĖZH:ZV:868:36010*(+ֲ LINES,DIGITS[1..3,LOW..HI],MURY POINT)2}(12):CO,0,89l)F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160)P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160)n} BASIC ERROR)x}(12):CO,0,89 *}"Error "ZE" at line "ZN" in CUTINE("yCL$D(@y(12):SET,0:903,PG:904,CP:RNH,"EXIT MANAGER"[(} ERROR PROCESSING( }ZE(222):ZN(218)(219)256:216,0:32000( }WIND:VSP,1(}ZE255Č54915:31000(}(15):ZE1532110(}ZUĦ: ZU=USER PROCESSING FLAG)(} REENTOX,X5,Y,X21,Y31:CO,X5,Y16:(P2$,2):25000x'uBOX,0,176,279,191,0:30000:AFT,2:CN$:WSWS1:T6T61:WS220000'uT6320000'uDE1DE0:29500' u29506'0uSPACE-BAR':uAFT,0:CN$:(1):SPACE::AFT,1:CN$:(y STANDARD ENDING RO0:29500&_tT6:200000&htCO,X,Y:" ":29950E&t TO MOVE GUYSe&tXLP(1)4XLP(2)1129730&tDD1įBOX,X,Y,X30,Y32:CO,X5,Y16:P2$:5:LP(1)13,158LP(2)2,158:25000:BOX,0,176,279,191:PAUSE,10:29955&t297300't1:0,175279,175:BL:CO,X5,Y16:P2$%[tNM1āL213:Z1:L1NM1:CO,Z,3:LP$:ZZ20:L:PAUSE,5:Z1:L1NM1:CO,Z,3:LB$:ZZ20:L:PAUSE,5:L2:Z1:L1NM1:CO,Z,3:P2$:ZZ20:L%]t25000:26000 &^t29502:BOX,0,176,279,191,0:BOX,X,Y,X30,Y31:30000:DE1DE00:30000:DD1:29500Z$JtYYZ:ZZ.08:CO,X5,Y16:P2$:0:X,Y32X30,Y32:Z.129770$TtYYZ:ZZ.08:CO,X5,Y16:P2$:Y126Ē5:LP(1)13,158LP(2)2,158:29785$Ut29780%YtPAUSE,5:L110:CO,X5,Y16:LG$:PAUSE,1:CO,X5,Y16:RG$:PAUSE,1:CO,X5,Y16:LB$<#!t(Y)126XLP(1)20XLP(2)11ī29900#"t(Y)126XLP(1)20XLP(2)11Ē5:LP(1)13,158LP(2)2,158:Z1:NMNM1:29760#,t(Y)14329950#6t29720#@t HAPPY ROUTINE#CtBOX,X,Y,X30,Y15$EtDE1DE0:CO,X5,Y16:P2$:560 nP(I)(I)(I1)256f }LE$"-1"(N3PD):(CA)LE$LE$(1): DEFINE LEGAL INPUT CHARACTERSx DISPLAY MENU WIND:::DUN,"MENU.PCK":(5) CO,173,106:ST$(((907))) , RESPOND TO USER'S CHOICE9 @IN11:BOX,140,160,267,170,4:5):CB$(2):CF$(6)' D$"NOMON CIO"8 (:255:0:1^ -X(ZZ)(ZZ1)7:Y(ZZ)(ZZ1)9v 7D$"BLOAD T.O.FILE" <DN$,D2$,N:CN$(N),DE$(N),LV(N),GP(N),CQ$(N),DF$(N) FSP$"":N1SP$"s" PI1N ZCN$(I),CQ$(I),LV(I),GP(I),DE$(I),DF$(I): MENU(CIRCUS MATH)7AUTHOR: R PHILIP BOUCHARDULAST UPDATE: 84/06/26PRWm(C) MECC HGR2 1983w8192 INITIALIZATIONS D$(13)(4):DL6:CN1:CA1:PR0:DR0:IS1:DI0:CL$(12):CC$(3):ST$(1)"on ":ST$(0)"off":CA$(1):CO$(10:WP0WP13İ16000:-:FP0İ19000::(CL)C16:YYP(CL,1)YP(CL,6)5:CO,56,Y:HP$(C):CC1(2(C17)):PAUSE,1:TT1:40000::CP6:CO,56,YP(CL,CP):HP$(15):CO,56,YP(CL,CP):HP$(18)g:(CL)C1:YYP(CL,CP)YP(CL,CP1)5:CO,210,Y:HP$5:"High Wire"6WIND,82,50,200,150:BOX:CO:CO$"Try to climb the ladder and walk the high wire."::"You can move by getting the right answer on the first try."630000:BOX:BOX,90,5,200,17::MOVE HIGH WIRE GUY:AFT,2:CN$:CP1İ1700279,170:1:56,24222,24:3:L101:56L1,16856L1,24:69L1,16869L1,24:223L1,24223L1,168:210L1,24210L1,168:6L101:L2169245:56(154L1),L270(154L1),L2::6AFT,2:CO,190,149:CN$;HP$(13);CO$:CL1:CP16AFT,1:CN$:CO,90,B@B@B@B@B@B@B@B@B@B@B@B@B@@@9U@|@? A`ժA @@ @ނ@ @ׂ@ ժA @`ժAA`?H0ժ~ժB@HWrժB@H/U*ժF@x^*UBrײF@|W*UB*E@@U*AeH`ժ B@պC A׺B AܺBպ ApBp՞ A@B@ @7B@ @?A@ @0A@ @0A@ @`A@ A@@@@ @@C@B@B`B B B B0BBB0B B B B B B`B@B@0ժN|?ժpժFժC@ժF竇ժC@ժFժC@ժFתժCfժDժ@@ժDտժDxׁJռժ~H|ժժAGժժ@L`תժJܪժպJpժIժHժ @6S)OA@BpaB0 A@C<`C0@F `<Cp@G xCp@G؎`C@G޾xM@~ֺMCx@HՎ @@Oռվ @ժHժ<pժN@ժ    Cx*UCL*UCT*UCW*UD`U*U:0U*UzUzU*U?*$U`)(U' (U,(U:((Ujx5,Ujc58KU*5`U*5DS*5DR*55DN*u5D8*U5D`*UuD@*U*}D@+U*}C.U*}CU*CU*CpT*C@U* BU* BW*BL*BHjA8zA`|@C`'UC *UC0*Uz\*UjT*U*V*U*S*U*@U*O*u@TzW*U`TV*U UV*U0UV*UU^*UU0\*U(u<^*U,5 R*U$5 R*U,5 R*u,5 S*5.LU*=.lT*./U*.0Uj.Uz.5RU.u'U.U*u.U*5C.U*C.U*C*U*C&U*C$UjB,U:B8UB`UA*ApA5C@)u "#D "#D b#D8@ @m"D@Q@"d@1@"@ @" @@"@@"@ A#AK@n@8( @A@A@rA`Hz8BL"D"D"D" D "x "` @#A A&A A,AA8AA0AA0A A`A@) A@AAAAAB@B@B`B BpBB\BBDBGBDAB|@B@@ppDĂDȜX蝒ǰp@ĨBBĨBBĨB8B` (@p@\@W`E00D,Dp B$D""D`@@@?̈`DŽ>@p@Ă@@A`AĎ   Ĉ Ĉ L Ĉ  B`B@A@?%@ApA؆AAΘAAŨB@B@ĨB@B@ĨB`B ĨB B ĐB0BĈBBĄBBĂBBBA@8ժA@`ժ@@@ժB@ׁ@@|@*ժA`ժB ժA@ժS ժ@תժ ժJ֪ժ`ժJתժ@ժJת@ժCܪժD@ժCܪժD@ժCܪժCժCުժIת֪ժIުժתժIتժՒIتժ`ժ՚IЪժ0ժՊIժժՎA`ժA@ժA@ժA@ժAՀpT*T*UH@S*L*UGR*X*uFV*p*=F\*@*Bp*AiB@+@A> A`* *@0@C@~xCp٫H@C@LACժ@G@ժmpժ@تժxުժߪׂCժBժBժAժBժA8ժB0L(ZH0):KB(ZZ)((ZZ127)(2(ZZ141))(3(ZZ155))(4((ZZ176)(ZZ185)))(5(ZZ149ZZ255)))3PN1:SC0:ZL1:L11503Z1R(NO):Z2R(NO):Z1Z2132103TROB(Z1):OB(Z1)OB(Z2):OB(Z2)TR:66GRAPHICS INITIALIZATIONy66:0,170ITIALIZATION/2:OD%(13,14),DI(3),MU(3),Z(3)J2A$:A$"-INIT"130202L1113:A$:L2114:OD%(L1,L2)((A$,L2,1))::22A$:A$"-PROB"130503C1:NO:OB(NO):A:L11A:A,B:L21B:OB(C)A:CC1::e,3R(ZH)((1)(ZHZL1))Z((AN))ZZ,1))įCO,RX4,RY12:CN$"NO,":CO,RX4,RY1:"TRY AGAIN.":PAUSE,20:BOX,RX4,RY12,200,RY10:12710|1ZZZZ1:2 DRAW BAR 23:L201:(PXZM12)(((AN))12)IN3,PY(((L11)12)3)L2PXZM12IN3,PY(((L11)12)3)L2:: 2 IN63CCnJ*NAsBc600`CFJUOAs``wBfgC{9{{ J*B MBlLC8W0W8JUBBgBlgClk {|J*BBC AC~~|~~JU_a@DOdGsBcB6f`CBwJUNGAGsBBCFB;FJ*NGAGsB`B0`Ca]a}}JUNGAGsBgB0gC.5B;J*NGAGsBsB63Cwx{JUNGAGsBs600p00CBnJ*NGAGsBcB6cCtwutJUNGAGsBsBFA@D`A@H?BByBLyCFJUNG\gG''DgdGOFx~J~xHBBX}- CFJ*NG\sqpr2C3sdGOH@NHxBByB{CFJUNG_BdGsBBqCFJ*NG]AOABOdGs00{C3ACFJUNG\BABdGsvC6ACFJ*NGBBOBYOCFJ*NG_`@B@`dGO~x`FGA>B~BBBYCFJUNG_DyCdGQF@``DpA`@HB@@_BY_CFJ*NG_ | dGOG|L|HBFACFJUNG_p`pc`pdGOD@CBGB <~~B@@oBLOCFJ*NG_DsdGOE@`ppG`@GBBYCFJUNG_<B?dGOGCGA~HJ*NGAGJp`@UCUBUBUUUBUABUCUBOBfFCFJUNGAGN~C*B*B* FBC BBB CFJ*NGAGOCUBWBB@B`@CFJUNGAGOCC@D`DpD8DBBBGlo`OCFJ*NGAGO~x`FDQB oBlOCFJ捿ttmtt`BB0xXCFJ*B037B6ACFJUBBC3ACFJ*BBC3ACFJUNA^D?A/A/++++**BB3?>CFJ*NGAGOC_B WUUUBUABUCUBB>0CFJUNGTvGLB?C*B*B***B*AB*C*BBB3CFt u@ )` t t t0H)?hJ t t t?Lt t&'&Ȅ``tt ttt`t)tJJ tttt .t .t ntt)        1ZC:ZX2,ZY2ZX10,ZY2ZX10,ZY15ZX2,ZY15ZX2,ZY2:12800:P1 INPUTe116368,0:AFT,1116368,0:CO,ZXIN,ZY:CN$"?"CO$:16384,128:ZP(16384):ZP176ZP18512710116368,01CO,ZXIN,ZY:CN$;(ZP);CO$n1ZP128(((AN),25,RY10:AFT,1:CN$;"RIGHT!";CO$:WIND:PNPN1:G0ZZ(ZM3)12420y0ZC3:12600:12700:ZC0:12600:ZXZX1:124400 DRAW A BIG BOX0ZC:ZXIN1,PY2ZXIN10,PY2ZXIN10,ZY15ZXIN2,ZY15ZXIN2,PY2:12800:81 DRAW A SMALL BOXDB}3<3|sL3L?L?|sO~xAE B D}A@B`@yfgg?L9fyf9>9x}E  DAAݻEGDC|3Ls|?O3L3O?|sL3Ls<3AFT,2:CN$%>NOJUST:WE$HE$(C5):CWWE$CE$(C5)%>CO,(99CW)(139HW),79:WE$!&>CC1:HWBP(0)āXCTBP(0)C0C1:CO,X,79:HE$(C):CCC1,279,20:CO:N$;"'s";CC$:EL$;CC$:WIND:CO$:NOJUST:AFT,2:CN$:CO,0,79:CE$(2):CO,247,79:HE$(2);CA$:CO,131,79:BR$;CA$;CO$$>PARSE:$>SPRAY & RESTART$>(GA)16100$>PARSE:BOX,0,110,279,191:E$"The computer":HWE$N$i%>CO,0,130:((1)(ZHZL1))ZL(ZH0):KB(ZZ)((ZZ127)(2(ZZ141))(3(ZZ155))(4((ZZ176)(ZZ185)))(5(ZZ149ZZ255)))#3SC0:ZL1#6#:SOME INIT STUFF (GRAPHICS)+$:17000:EP01:EP:WIND,0,0,140,20:CA$:"Computer's";CC$:EL$;CC$:WIND,140,0RAW BARi" 23:L201:(PXZM12)(((AN))12)2,PY2((L11)12)L2PXZM121,PY2((L11)12)L2::~"2 INITIALIZATION"2:OD%(13,14),DI(3),MU(3),Z(3)"2A$:A$"-INIT"13020"2L1113:A$:L2114:OD%(L1,L2)((A$,L2,1))::x#,3R(ZH)8,0:CO,ZX,ZY:CN$;"?";CO$:16384,128:ZP(16384):ZP176ZP18512710V!116368,0s!1CO,ZX,ZY:CN$;(ZP);CO$!1ZP128(((AN),((AN))ZZ,1))įCO,RX3,RY:CN$;"NO, TRY AGAIN.";CO$:PAUSE,20:BOX,RX,RY,RX168,RY15:12710!1ZZZZ1:"2 D3:12600:12700:ZC0:12600:ZXZX1:12440@ 0 DRAW A BIG BOX 0ZC:ZX1,PY2ZX10,PY2ZX10,ZY15ZX2,ZY15ZX2,PY2:12800: 81 DRAW A SMALL BOX B1ZC:ZX2,ZY2ZX10,ZY2ZX10,ZY15ZX2,ZY15ZX2,ZY2:12800: 1 INPUTH!1163625:HYZY7Iz0ZXPX(ZM1)12:ZYPYZA127:ZE0:BOX,PX,ZY,ZX20,ZY15Y0ZC3:12500y012700:ZC0:12500:ZXZX120ZZ((AN))HOįCO,HX,HY:CN$(AN)0ZZ((AN))įCO,RX60,RY:CN$;"RIGHT!";CO$:PAUSE,10:WIND:0ZZ(ZM3)12420* 0ZC:UC(UC):PAUSE,10'0(RV)SCSCUC80CO$:WIND:0CO,RX3,RY:CN$;"NO, TRY AGAIN.";CO$:30000:BOX,RX,RY,RX168,RY15 0(UC)UC0:12400*0UC1:12010p0 STEP THROUGH u0(HO)įBOX,ZX25,ZY7,ZX2510((AN)):ZTHO:11020:HOZT:HXZXCO$:12030"/ HORIZONTAL INPUT{/BOX,ZX25,ZY7,(ZX25)(10((AN))):CO,ZX25,ZY7:INP,(((AN)),N,((AN))),ZA$ 0 ANSWER CHECK0(HO)įCO,ZX,ZY:CN$;" ";CA$;CO$0PNPN1UC:(ZA$)((AN))123160CO,RX60,RY:CN$;"RIGHT!";CO$2030/ZA$""12300"/120307&/ZEZE1:12030B0/31000_:/(ZA$)1((AN))12030D/ZA$(ZP128)ZA$:CO,ZX,ZY:CN$;(127);ZA$;CA$;CO$:ZXZX12:12030 N/ZXZX12((ZA$)0):ZA$(ZA$,2,(ZA$)1((ZA$)0)):CO,ZX,ZY:CN$;" ";(127);CA$;ST:AFT,1:CN$:ZZ0:ZE0:ZXPX(ZM2)12:ZYPY7ZA12:ZA$"":HO112020,12200e. VERTICAL INPUT.BOX,PX,ZY,ZX20,ZY24HO15:ZA$"":CO,ZX,ZY:CN$;" ";(127);CO$.16384,128:ZP(16384):16368,0:KB(ZP)12030,12050,12070,12090,12110/1CN$;ZA$(L1);CO$::128000H+ZAZC1:HO0:11999D\+ HORIZONTALLYaf+ZA$"":ZC3:A(3)0ZC2p+L11ZC:ZA$ZA$(A(L1))"+"::ZA$(ZA$,(ZA$)1)" = "z+CO,PX,PY:CN$;ZA$;CO$+ZA0:ZM(ZA$):HO1.. PROBLEM INPUT.UC0O.NOJU̮ʍŲԮʍŹŹŹBl|GA|A A|A A|F;n;Bw]wCGGAAAAAFw]wBn;nCA0ApE0GApA0ApC0Fn;nB]w]CBBG  F]w]B;n;@\;n;Bw]wS\v\B;.8,;. PGH@B\w]w]vB8n; S ;n8Bw]wC`p8C8p`G8xXXDFw]wBn;nC C G  D Fn;nB]w]CI`H@G`F]w]B;n;KA?G900??B0F;n;Bw]wfw]wBn;nC~EC~G Cc33cCFn;nB]w]DGHGF]w]B;n;CD @UuBUFxA E*A Ɗ?Hy|`x C p@D (*z/** E@AABB̷̳ȰHA| EB SB`B@AA@C @08 LNFGCCFFB xB?E~<1CGAH p`AAA@B @F~||@0 @`00`@I@EP@Dp@ABB`晌@p|J|x~xC~GA /.~~j*( E>`A@PTTEUAT޷ϳϳͲ̳`I|80808BCERTICALLY+ZC2:A(3)0ZC1O +ZM1:L113:((A(L1)))ZMZM((A(L1)))]*+:ZMZM34+L11ZC:ZA$(L1)(" "(A(L1)),ZM)::Z$(A(L1)):ZA$(L1)(" +"(" ",(((ZM3)(Z$))1))Z$,ZM)>+L11ZC1:CO,PX,PY24HO((L11)12):Z(ZC)R(9Z(ZC)):A$(ZC)(Z(ZC))(A$(ZC),2)'AN0:L11LINES:A$(L1)(A$(L1),DI(L1)):A(L1)(A$(L1))MU(L1):ANANA(L1)::AN(AN.5):* PROBLEM DISPLAY*BOX+AFT,1:3:HOHO((OB2)(OB9)(OB10)):(((1)2)1)HO11020,11100  + VL11ZM:ZL1:Z(1)R(9LINES):Z(2)R(8Z(1)(Z(1)CA(L1ZM))):Z(3)(DI(3)0)R(9(Z(1)Z(2))((Z(1)Z(2))CA(L1ZM)))~'L21LINES:A$(L2)(Z(L2))A$(L2)::-'CA(Z(1)Z(2)(Z(3)(OB1))10)ZL1:ZCR(2):ZL10(Z(1)Z(2)(Z(3)(OB1))):Z(ZC)26):Z2OD%(OB,L127)FB'MU(L1)10Z1:Z2Z1ZLZ1:MU(L1)10R(Z2)LL'O'OB3(MU(1)MU(2))ZL1:MU(1)10R(3):10063R'OB10MU(2)MU(1)V'CAOD%(OB,14):CA2ZL0:CAR(1)`'ZM0:L113:A$(L1)"":A(L1)0:DI(L1)ZMZMDI(L1)j'yt':RY150:RX53:CN$:HO0:WIND,46,46,230,178:11000:RV1:12000FL7X30000:31000p' PROBLEM GENERATOR'OBOB(PT):LINESOD%(OB,1):L113:Z1OD%(OB,L12):Z2OD%(OB,L121)$'DI(L1)Z1:Z2Z1ZLZ1:DI(L1)R(Z2).'8'L113:Z1OD%(OB,L18 @>>l6[kg*V $$$"# `p ` ?I @*"A@0 Р@  A@  @$$"?? (P `0`p0 @HRx> @9b    0:BOX,RX4,RY18,200,RY50 0(UC)UC0:12400@*0UC1:12010Sp0 STEP THROUGHzu0(HO)įBOX:ZTHO:HO0:11000:HOZTz0ZXPX(ZM1)12:ZYPYZA127:ZE0:BOX,PX,ZY,ZX20,ZY150ZC3:12500012700:ZC0:12500:ZXZX1220ZZ((AN))įCO,RXER CHECK20(HO)įCO,ZXIN,ZY:CN$;" ";CA$;CO$N0(ZA$)((AN))123160AFT,1:CO,RX25,RY18:CN$;"RIGHT!":AFT,0:CN$:SCSC1UC:UC0:PNPN1:CO$:WIND:0FT0:CO,RX4,RY18:AFT,1:CN$;"NO,":CO,RX4,RY5:"TRY AGAIN.":AFT,0:CN$:3000127);ZA$;CA$;CO$:ZXZX12:12030N/ZXZX12((ZA$)0):ZA$(ZA$,2,(ZA$)1((ZA$)0)):CO,ZXIN,ZY:CN$;" ";(127);CA$;CO$:12030/ HORIZONTAL INPUT/BOX,ZX25,ZY7,(ZX25)(8((AN))):CO,ZX25,ZY7:INP,(((AN)),N,((AN))),ZA$ 0 ANSW:CO,ZXIN,ZY:CN$;" ";(127);CO$o.16384,128:ZP(16384):16368,0:KB(ZP)12030,12050,12070,12090,12110z/12030/ZA$""12300/12030&/ZEZE1:120300/31000:/(ZA$)1((AN))12030 D/ZA$(ZP128)ZA$:CO,ZXIN,ZY:CN$;(ZA$,(ZA$)1)" = "3z+BOX:CO,PX,PY:CN$;ZA$;CO$K+ZA0:ZM(ZA$):HO1Q.e. PROBLEM INPUTp.AFT,1.NOJUST:AFT,1:CN$:ZZ0:ZE0:ZXPX(ZM2)12:ZYPYZA127:ZA$"":HO112020,12200. VERTICAL INPUT!.BOX,PX,ZY,ZX20,ZY15:ZA$""+"(" ",(((ZM3)(Z$))1))Z$,ZM)>+IN6((AN9)(AN99)(AN999)):BOX:L11ZC1:CO,PXIN,PY((L11)12):CN$;ZA$(L1);CO$::12800H+ZAZC1:HO0:11999\+ HORIZONTALLYf+ZA$"":ZC3:A(3)0ZC2p+L11ZC:ZA$ZA$(A(L1))"+"::ZA$(A(L1):: * PROBLEM DISPLAYL+AFT,1:3:(((1)2)1)HO11020,11100] + VERTICALLYs+ZC2:A(3)0ZC1 +ZM1:L113:((A(L1)))ZMZM((A(L1)))*+:ZMZM3'4+L11ZC:ZA$(L1)(" "(A(L1)),ZM)::Z$(A(L1)):ZA$(L1)(" ))- ~'L21LINES:A$(L2)(Z(L2))A$(L2):: 'CA(Z(1)Z(2)(Z(3)(OB1))10)ZL1:ZCR(2):ZL10(Z(1)Z(2)(Z(3)(OB1))):Z(ZC)Z(ZC)R(9Z(ZC)):A$(ZC)(Z(ZC))(A$(ZC),2) 'AN0:L11LINES:A$(L1)(A$(L1),DI(L1)):A(L1)(A$(L1))MU(L1):ANANOB10MU(2)MU(1)7 V'CAOD%(OB,14):CA2ZL0:CAR(1)o `'ZM0:L113:A$(L1)"":A(L1)0:DI(L1)ZMZMDI(L1)u j' t'L11ZM:ZL1:Z(1)R(6LINES):Z(2)R((83(DI(3)0))Z(1)(Z(1)CA(L1ZM))):Z(3)(DI(3)0)R(9(Z(1)Z(2))((Z(1)Z(2))CA(L1ZM)OD%(OB,1):L113:Z1OD%(OB,L12):Z2OD%(OB,L121)\ $'DI(L1)Z1:Z2Z1ZLZ1:DI(L1)R(Z2)b .' 8'L113:Z1OD%(OB,L126):Z2OD%(OB,L127) B'MU(L1)10Z1:Z2Z1ZLZ1:MU(L1)10R(Z2) L' O'OB3(MU(1)MU(2))ZL1:MU(1)10R(3):10063 R':RFL,"NUM.FNT"F1:RFL,"HIGH.FNT"F2:DFT,1,F1:DFT,2,F2:AFT,1:HSP,4,1T LSTARTj QCL$:(GA)İ14000 V10000:HO0:FT1:WIND,77,50,200,150:11000:12000 `(GA)(FT)İ15000 jNOPN1110 '31000 ' PROBLEM GENERATOR3 'OBOB(PN):LINESРΪ٠ĪΠĪΠ䠠Ū٪젠젠젠젠젠젠젠Ϊ٠젠젠젠젠젠젠    G@ݷBX{6z#x ӮǠҲԠήˠΠ Ա٠! ŮǠΠҠ' ӯӮǠӮǠӮǠ ̮ʭô̤µΠҠ)ήˠɠĮԠ ԠŠҮˠҮʭô  ΠԠ2ԮԠ ԮϮŠ ҠӮΠ ȮԠ  ҠԠŠ  ծˠ ΠҠ$" ȠŠ$βԠРԠ"Ȯˠ ԮˠήԠΠҠԠҠ  ԠӠͮԠˠŠӠȠϠՠԮʠ̮ʠ Ϡ Ԡˠ*5:(J);:::J96127:(J);:::::FEEDcPOFF:24576:11:" Printer test complete.":30000WIND:CO:"Printer Support"CC$:WIND,0,20,279,191:SET NEW OPTIONS$3:"1. Apple communications board":" (an obsolete card that is not":" I0127:PPI,0:C D$"BSAVE PRINTER COMMANDS.BIN,A"PP",L128"P 30000:fTEST THE PRINTERBOX:9:"Please prepare your printer...":30000CL$:9:"Testing the printer...":D$"IN#0":D$"PR#0":PACT:"Printer Test":+I13:J329(P13):PP21L2:(P)CA$;:' L2:1 L1:C PRINTER TYPE :" Type of printer:"::7:L120:((PP106L));::: RETURN TO DEFAULTS  8:"Now returning the printer settings"::"to their original state (slot"::"search)...")0İ2400 $ (PP107)0İ2500-. 30000:I` PRINT SPECIAL COMMANDSdj " Commands:"::CT2t L115:(PPCT)0L15:2470~ 7:"PRINT "(34)CA$;:L211:P(PPCT):CTCT1 P0P13P32PP64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3 L2(usually ";SD;" characters per second)."Q :APLĺ:" Page length: ";(PP1)j :(PP107)0İ2500w 30000: USER SET  CO:"The current printer settings are:"  :" Slot: ";(PP)128::APLĺ" Page length: ";(PP1):  (PP2iskette is started up."$ H30000:3 COMM CARD 3:"This diskette is currently set up to":"expect an Apple Communications Board":"in slot #";(PP);".": SD$"LOW":SD10:(PP2)127SD$"HIGH":SD30( 7:"The speed is set to '";SD$;"'":"0 CHECK CURRENT SETTINGS< JP1((PP)0)((PP)127)U JP2100,2200,2300:c 4DEFAULTS >5:"This diskette is currently set to"::"the default setting, which is to"::"search slots 1 and 2 for a"::"recognizable card each time the"::"d printer settings to":" original state (slot search)":` " 4. Test printer settings": " 5. Return to Management Options":" menu" $::"What is your choice? ";:ZB1:ZT5:37000 8BOX:CO:ZN2000,5000,3000,4000,31040 BL00:LCA$(1):CC$(3):CL$(12):Q$(34):VSP:HSPl 24576:WIND:CO:"Printer Support"CC$:WIND,0,20,279,191v MENU L011:BOX:CO::"You may:": " 1. Check current printer settings": " 2. Change printer settings":< " 3. Return PROGRAM: PRINTER SUPPORT<PROGRAMMER: P. BOUCHARDYCOPYRIGHT (C) MECC 1983w(LAST UPDATE: 84/06/04HBW2HI-RES VERSIONdINITIALIZATIONnAPL0:SET TO 1 TO ALLOW USER TO ADJUST PAPER LENGTHxD$(4):. PP(948)(949)256:       's frog":"󀀪SBMEAACBEAAAFAAS漀UVఘBVoCEAAABAASEUE\\oCEAACSGUACEAAAA츀IpttE}EtAPA@SDBDLEVoCEAAAACAAKSABDƌNBDYȦC]CDBCMEAACBAASAADNA`ACD\CDBCMEAACBSACDBNCABBACMEAACBSACMMEAACBDVBBBB؈ZDBCMEAABDBASBBALBBVÃBBÃBZB𱳳CMEAAABSABBALABDV C\DBCMEAAAB : 55UTTyOEAET ఌLw]w@UuMM pSCCDEBIA`XVDUu= CAp ~. br;p`MEAE_CY ?*jklY TBCOG :Bj:EC ?54537MEAAJA{BBXAEAAJASDBBLDCO@`0 ~*>CC~KBB~B@e@pB0B@CPOMEAERߖƖ~00 0@J~]DB]_[[{KBxհBAb`XVFU +*8|n|8MEAER ȢC```J ;l0`@@?EjMBB0DCOM@0,++D*Aj(902))"HIGH WIRE"QP$"CANNON SHOOT"aníPG$((901),(902))"CANNON SHOOT"QP$"ELEPHANT WALK"gxñoxñ?R"QP$"CLOWN CAR"FZíPG$((901),(902))"CLOWN CAR"QP$"HIGH WIRE"}díPG$((901),(902))"HIGH WIRE"QP$"CANNON SHOOT"níPG$((901),(902))"CANNON SHOOT"QP$"ELEPHANT WALK"xñS((901),(902))"CLOWN CAR"QP$"HIGH WIRE"&díPG$((901),ase report this error to MECC."1}30000:31000@"",0,"",0,"",0,"",0,"CLOWN MAKER",16,"CLOWN CAR",17,"HIGH WIRE",18,"ELEPHANT WALK",18,"CANNON SHOOT",22,"",0,"",0,"",0,"",0,"",0,"VERY GOOD!","TERRIFIC!","NICE JOB!"PíPG$((901),(902))"CLOWN MAKE DBEACBCAAE\GUBA_CcBABZEAE\CU_cZEAE\EUEEB@SDOQEZEAETA`~^~BxBD@Y`XXBVAUSECDEB]|B,Ff@NEAER*#BABRI 'OBOB(PN):LINESOD%(OB,1):L113:Z1OD%(OB,L12):Z2OD%(OB,L121)r $'DI(L1)Z1:Z2Z1ZLZ1:DI(L1)R(Z2)x .' 8'L113:Z1OD%(OB,L126):Z2OD%(OB,L127) B'MU(L1)10Z1:Z2Z1ZLZ1:MU(L1)10R(Z2) L' O'OB3(MU(1)MU(2))ZL1:MU(1)*+,":T5$"-./0":T6$")7+,":T2$"2":T3$"3":T4$"4":T7$"@ABC":T8$"DEFG":P2$"!"(34)" ":P1$"#$ ":LP$"%&":B1$"5":B2$"6":P3$"#$8":LG$"9:":RG$";<":13000 LHSP,4,1 `P9įBOX,75,153,279,190:30000:CL$ aCL$ j20000 ' PROBLEM GENERATON$(14):CL$(12):PX98:PY50:RX74:RY140C F132638:F2F11161c RFL,"NUM.FNT"F2:DFT,1,F2 RFL,"CAN2.FNT"F1:DFT,2,F1:230,64:::DUN,"CANNON.PCK":(5):AFT,0:CN$:CO,75,153:"One moment please..." ZE$"=>":LB$"'(":AFT,1:CN$:T1$")o0 "PROGRAM: CANNON SHOOT;"PROGRAMMER: P FUGLESTADO"(C) MECC 1983n("LAST UPDATE: 84/06/28PRWw2HO1<RNH,"USR.OBJ-A$88C4"d32000WA(13),PE(13),PR(13):MU(907)R1(X)((1)X)1P9(908):T50+ NM1:D$(4):Cver the computer is waiting for you to type.":VSP:900:SyQFĺCF$CB$:QF0:220b"yWIND:200L1500:L:"The computer picks ";CNXCF$A$(CN3):HF$A$(HN):L12000:L&bCL$vCL$:AFT,1:JUST:N$"4ZC0:Z$"":16035$>(Z$)16040:>Z$(ZN):ZN32ıO>ZC1:Z$;:16040dhB ESC ESC SCREENrBHSP:VSP,3:CL$"Use of ESC Key"CC$:CO,0,70:"You may want to quit in the middle of a program. If so, press the ESC (escape)";9|B" key twice wheneRp RpSp[p\p߹[p\pNo pNo , g >p ,Mo %pNp) Op PpQp)@p ߅ l Ro ) L{o HHH?p hhh ɛ Moo0LooɈ5ɍ>p7,@p ? h5880`L >p?p@pMoBp ( %pL&o | {$0! ?p ,Ln ^ {$0LnNMo Qo|Oo nr- p nPo n p-PoPoPo pLsnOoQoOo^`NMo hhh,lp` ֩PyQ ALŠҠ僁 i imiʈii &' iq&iLi N8`f `.f`}m~m ` ң Σ  h`+ hR(" ެLUj,Hl  l  hl`L, HHHHHHHHH k l |jlNO,ɍɠ ɛ8nl,lPݩ mhhhhhhmHihʍiii LiL 7k 8kM9k7k !g<>=M9k?'<>7k7k8k` H g Rh PQ`L     խ)?` ` @)`,` Wj`i-ii i !g&'i jQ&-iQ&& i ii`*U U*ժ Kj')JMKj)i Q&,iP 0=Pj`Lj`J&)` `L3f̙zj{j ߅$0Hzj{j LbLvjj j` h i i i hȥq8)h` g R  QP (`L h`L)  @ iiiijii i i giiiii giiiiiB i !g&'i jQ&-iQ&&ȭii j& jQ&-iQ&& i iihHhhh hJ` &eeieh ghIi[hi 썠h !gmhﬡhMh[hPjjjjjjj0jj) h0ȱjhjhhУ`8pPH)8 q -`,f` im imʈii iʎiLi Fggg`gg ggg`g Fg gggg`ggg8pzg.g(zgggmgg`8pg)gJJ gggg .g .g ngg)ggmgg`de80 " Ofm8h)` dem88eLf` deme` d8` f@ ~f ~f f`Lb dffL-f ``fʽ`) ` `fH`mS` dS`)\e`[e h\e g[e}`mf8ff`f` dLb,0*`%f 8fHfJhj`mfff` b d` b dI``L `emfff`) ffffffO,0 `)  d`f(`HHf,Pf88`f d fhLcfHfHff,P d fhf8hfffffff``S`S```f穀f f`f3f'ff ``)   LX8e湥 pHpH L`@ @ʩ WRPT` J  dȱȱȱ` hfH) #,f h`` fffffffh`f fS```emffff f0 d -f%%h $20 LUc $ aHaH`d\eheWeeeee,fNfgffffff(bb d #cf hf gNOH #c h f ghH ,aɈ( #cb h) e f g #c ebbh`yo 8`?```L`bbbbps$% `@ LaQa6 ,fLbLhfUabHaa,aaɠ,|a ` a欌aah`ɀ)?  @IH #c$ d e$%       L1:Z(1)R(6LINES):Z(2)R((83(DI(3)0))Z(1)(Z(1)CA(L1ZM))):Z(3)(DI(3)0)R(9(Z(1)Z(2))((Z(1)Z(2))CA(L1ZM))) ~'L21LINES:A$(L2)(Z(L2))A$(L2)::2 'CA(Z(1)Z(2)(Z(3)(OB1))10)ZL1:ZCR(2):ZL10(Z(1)Z(2)(Z(3)(OB1))):ZOD%(OB,L127)= B'MU(L1)10Z1:Z2Z1ZLZ1:MU(L1)10R(Z2)C L'v O'OB3(MU(1)MU(2))ZL1:MU(1)10R(3):10063 R'OB10MU(2)MU(1) V'CAOD%(OB,14):CA2ZL0:CAR(1) `'ZM0:L113:A$(L1)"":A(L1)0:DI(L1)ZMZMDI(L1) j'~ t'L11ZM:Z1) `P9įBOX,75,153,279,190:30000:CL$? eX111:PS(X):XO jCL$:20000g ' PROBLEM GENERATOR 'OBOB(PN):LINESOD%(OB,1):L113:Z1OD%(OB,L12):Z2OD%(OB,L121) $'DI(L1)Z1:Z2Z1ZLZ1:DI(L1)R(Z2) .' 8'L113:Z1OD%(OB,L126):Z2и{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !RFRNSEIMAGPLADUM{{}3xF~ v t`~8~?=4=0>?`L~L~<0>?`L~L~L~>?`L~ø`L 䎱 掲` 3#< = <=Lt~ <=Lv~L ~ ~8~?=4=0>?`L~L~<0>?`L~L~L~>?`L~ø>}? }%p J}g^h_^`ȱ^Șe^^_iȑ^^_}}}@A }  } `@ i @ ȱ z`,X` {ݩD ^ D`}D}ED` &Lt|&J} eL׭(|#|)|$|X(|)|LXLX(|)| K}$)J}}>}? }pJ} G 8`L}8ghegiȱehj8ȱCv(| )| (|ȱ)|8(|)|8ȱ>? }:p"}<ȭK{<ȭM{<><ȥ?< <<= H <=L{I<K{}?} }  { RP(|Q)| 2|L *|J}Ll`N wbD}E}B}C}@}A}>}?} } *QP (`L y`L Sz!z z`z!z z"z#z`z Sz z"z#z z`zzz8p݇z.z(z zzmz!z`8pz)"zJJ "z"zz#z .#z .#z n"z#z)#z"zm!z"z`  K{L{M{ <= <ȭ<ȭLx2 & &JJ==<= 6yP`yyy)yhy yxx x>?xxxx .z>?xe>>?yyyH(y`yyyIiy>yPjjjjjjj0NyjJ y>0ȱ>jNyyj y>` g R  ʱD>`Lޭ@A x@0R zx $zxy8yyxx @<ȱ@=@e<?xe>>? x`/0<=(0% Hh @H(hJ)?<= 6yPp︄'&Ȅ`,&@ȱ@Ȍw>w? z >`LHh`<=< Dﭲwww w ) 8`wDwEDB`<=      w[>w?w@wAwBwCwDwEw { 媤^_ mw  w)`L w `w w v `w0ޢ wܦH)?hJ `w w `w v?Lwv .z&((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP                    t{ LtLwU~ 8ɀ  Lȱ:,֘e湥 lHkH L` <=?>,>$f<<` 0$H)1h0,20RLou67  0N2 394I73B4C5JLuɌuLɯtᅝ 8ɀ   Lޤȱ:,Әe湥 HH L`LB ?F<?F<>[ >_?Ȑ۩`?)"Let's have another race.":30000_)gBGIC1:CWC0:HWC0:BP(0)C0:BP(1)C0:CO$:AFT,1:PARSE:o)hBDRAW FLOOR)rBBOX,0,99,279,106,4@*|BHC5:HC:BOX,0,99,31,106,HC:BOX,247,99,279,106,HC:BOX,131,99,147,106,HC:LQ01:0,99LQ279,99LQ:0,105LQ279,X'(>CWįBOX,138,50,247,84,4:PAUSE,5_(>PN20ĺCL$:AFT,0:CN$:WIND,0,0,279,191:CO:5000(>BOX,0,50,279,98:CO,0,79:CE$(C2):CO,246,79:HE$(C2):CO,131,79:BR$")>PN20įBOX,32,100,247,104:17000:CA$:AFT,0:CN$:BOX,0,130,279,145:CO,55,130:39201:XXXX.0135:YY(XX):ZZ.05:ZZZZ.1='>CW16070\'>X,Y:X,Y1Z:X,Y2ZZ:X'>HWįBOX,32,50,139,84,4:PAUSE,5(>CWįCO,99,79:CE$(C4):Z0:ZZ0:6:XX5.5:Y79:X138263:XXXX.0135:YY(XX):ZZ.05:ZZZZ.1:X,Y:X,Y1Z:X,Y2ZZ:(C3(CC3))::CO,C0,79:HE$(C2)}&>CWBP(1)āX247CTBP(1)247:CO,X,79:CE$(C):CCC1(C3(CC3))::CO,247,79:CE$(C2)&>BP(0)BP(1)įPAUSE,10/'>HB(F3256):232,F3HB256:233,HB:6:1:0:HWįCO,139,79:HE$(C4):Z0:ZZ0:6:XX5.5:Y79:X1000`0x |||| ||x|8l````|| x0p000x8pp00000xxx|| |x ````l8|x0x0x| x0`l00000000lll0`x000x|0xxx||00000 xxxxlxx x000000xx0܌x0xx0000 0``0 0xp`000000lllXXXXX0|x<00` ``t0`0``00 00x0x00000 @0 0`xx0p0000xx 8` 8 x8x x<`x 0```xxxx| 00000`0``0`0    }~{.6'/iv888<x'/vy888<x?5555?5555?5555O0?߿|8w{.6'/wz}|888<.60 Τqq1 ACEAEHS B؈KABDBACEAE\KADNACEAE\AB ÀǀKBDN񘘙ACEAE\AEǀKEBABNBACEAE\AKK#CoC{Bogc!UBCLCVoCEAADCAAKUF~B}Bw}CtBPB@JADBNCXBoCEAAJAJ h{BoB?>??Co#BAAJACBBNBVABoCEAAJAI??CA?ERADBNC8,188,178,168,158,148].dÃ13,9,2,11,2,12,2,13,2,14,2,15,2,16,2,17,2,18,2,19,2,20,2,21,2,22,2.ֲ LINES,DIGITS[1..3,LOW..HI],MULTIPLIER POWER[1..3,LOW..HI],CARRY TYPE @/փ "-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32}:"Please report this error to MECC.":-}30000:31000V- STANDARD YES-NO INPUTl-(1);:GCP,ZX,ZY-CO,ZX,ZY:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"36020--PòDATA AREA.ZÃ32,42,52,62,72,82,92,102,112,122,238,228,218,208,192):CO,0,89[,F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160,P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160,n} BASIC ERROR,x}(12):CO,0,89,}"Error "ZE" at line "ZN" in Elephant Walk."(-1B:OB(C)A:CC1::,3R(ZH)((1)(ZHZL1))ZL(ZH0):KB(ZZ)((ZZ127)(2(ZZ141))(3(ZZ155))(4((ZZ176)(ZZ185)))(5(ZZ149ZZ255))6(ZZ136))3PN1:SC0:ZL1:L11503Z1R(NO):Z2R(NO):Z1Z2132103TROB(Z1):OB(Z1)OB(11)12)L2PXZM12,PY27((L11)12)L2::B2 INITIALIZATIONe2:OD%(13,14),DI(3),MU(3),Z(3)2A$:A$"-INIT"130202L1113:A$:L2114:OD%(L1,L2)((A$,L2,1))::22A$:A$"-PROB"130503C1:NO:OB(NO):A:L11A:A,B:L2176ZP18512710116368,0<1CO,ZX,ZY:CN$;(ZP);CO$1ZP128(((AN),((AN))ZZ,1))įCO,RX,RY:CN$;"NO, TRY AGAIN.";CO$:PAUSE,20:BOX,RX,RY,RX168,RY15:127101ZZZZ1:2 DRAW BAR- 23:L201:(PXZM12)(((AN))12),PY27((L BIG BOXS0ZC:ZX1,PY22ZX10,PY22ZX10,ZY15ZX2,ZY15ZX2,PY22:12800:j81 DRAW A SMALL BOXB1ZC:ZX2,ZY2ZX10,ZY2ZX10,ZY15ZX2,ZY15ZX2,ZY2:12800:1 INPUT116368,0:CO,ZX,ZY:CN$;"?";CO$:16384,128:ZP(16384):ZPđA:jj**jj: ]`@D[ABn DBA?De?BDMFHAaBpaA 0@OC?Ea?{@`0\VSUTcUu5=mGNH?B?`OđCA`Iđy 9jj^*Bj: `@GՕBBpB0A QCA?GA} =uRUu55 L0`@CDYĂDND:903,PN((PN20)(PN20)):904,SC:SET,0:RNH,"EXIT MANAGER"V+} ERROR PROCESSING+ }ZE(222):ZN(218)(219)256:216,0:32000+}WIND:VSP,1:ZE25531000+}(15):ZE1532110+}ZUĦ: ZU=USER PROCESSING FLAG+(} REENTRY POINT ,2}(1105LQ::I010010:I31,99I31,105:247I,100247I,105:I:W*PFINVERT FLOOR TILE*ZFBOX,FB(EP,BP(EP)),101,FB(EP,BP(EP))8,104,6:*0u STANDARD SPACE BAR ROUTINE )HI-RES)*:uCA$:SPACE::*y STANDARD ENDING ROUTINE (HI-RES)?+@yVSP,1:WI@r\H @A`ABBňBBňBBňBBƈBBȈBB`B@B@AAAAAAAAAABBBBBĂBBĆBBnjBBBΡY`@@    sEA029630##sRFL,"EARS.IMG"F2=#sEA29600,29610,29620g#sIMAGE,1,43,12:IMAGE,2,206,12:29630#sIMAGE,3,50,46:IMAGE,4,206,46:29630#sIMAGE,5,37,45:IMAGE,6,205,45#sEY029690#sRFL,"EYES/NOSES.IMG"F2#sEY29660,29670,29680$sE,2,79,80:CO,30,40:"1":CO,30,120:"2"n"qCO,0,170:"Which top do you want? ";:INP,(1,"12"),A$:HE(A$):"eX:27000weX15:IMAGE,3,50,44:IMAGE,4,206,44:MUįPLAY,40,5eIMAGE,3,50,46:IMAGE,4,206,46:MUįPLAY,35,5eX:27000eX15:IMAGE,5,35,46:IMAGE,6,205,46:MUįPLAY,43,5"eIMAGE,5,35OX,89,65,145,80:IMAGE,2,119,60:26000~aBOX,105,53,141,82:IMAGE,7,92,68:PAUSE,3:BOX,94,68,110,74:IMAGE,3,105,53:26000e WIGGLE EARSeRFL,"EARS.IMG"F2eEA26020,26030,26040eX15eIMAGE,1,43,10:IMAGE,2,206,10:MUįPLAY,35,5020010aWINK EYES%aP90310003aPAUSE,20PaRFL,"EYES/NOSES.IMG"F2paMU1įPLAY,40,3:PLAY,48,3aEY25030,25050,25060aBOX,93,47,139,81:IMAGE,7,93,62:PAUSE,3:IMAGE,1,93,47:26000&aBOX,119,60,145,80:IMAGE,7,89,65:PAUSE,3:BZ2):OB(Z2)TR:6( N MAIN ROUTINE@*NGSGS1:GS625000{/NHO1:AFT,1:CN$:HSP,4,1:GTGT1:10000:11000:120000NUC1CPCP11NPGGT4NGT4(GT4)200159NP9020000>NPAUSE,20:29000:29500:AFT,0:CN$:30000:AFT,1:CN$HN;n;P;n;nđM݃đw]wCACGO[scBCBw]wo∇~Cn;nCIBn;npCDJꫫTF]w]P]w]tBHCY;n;P;n;vFJSDzw]wPw]wBAAฏz]w]Cx|E |xB]w]oPPC};n;CEB;n;nđėؘخFBCAE민Aw]wPw]wnO㾅넢An;nCDB6~LBn;nnODŽŗA]w]CHB]w]nP R\w] w]tB8n:E:n8Bw]wC@`pC0p`@Bw]wBn;nCCBn;nB]w]P]w]AGBA;n;CGAxB;n;A忱CA จB|w]wKABw]wAGBCAAzn;nPn;nAK ၃     (L1ZM)))5 ~'L21LINES:A$(L2)(Z(L2))A$(L2):: 'CA(Z(1)Z(2)(Z(3)(OB1))10)ZL1:ZCR(2):ZL10(Z(1)Z(2)(Z(3)(OB1))):Z(ZC)Z(ZC)R(9Z(ZC)):A$(ZC)(Z(ZC))(A$(ZC),2)'AN0:L11LINES:A$(L1)(A$(L1),DI(L1)):A(L1)(A$(L1))MU(LiTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ10R(3):10063' R'OB10MU(2)MU(1)M V'CAOD%(OB,14):CA2ZL0:CAR(1) `'ZM0:L113:A$(L1)"":A(L1)0:DI(L1)ZMZMDI(L1) j' t'L11ZM:ZL1:Z(1)R(9LINES):Z(2)R(8Z(1)(Z(1)CA(L1ZM))):Z(3)(DI(3)0)R(9(Z(1)Z(2))((Z(1)Z(2))CA00000000","32222220000000","23333000000000","23411000000000","23422000000000"0փ "21111001111002","21111002323002","22222000000001","32222220000001","23333000000001" /O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   ϠPERROWRITE PROhWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦAD@ C N cLuɠ% d: L ФLANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`DE ɤ<(LΡ DE`80!  eDeE eDDeEE8`D&E`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH 4,4,168  L  QL  QL  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L&-INIT","31111110000001","21111000011000","21111001313000","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000")փ "21111001111002","21111002323002","22222000000001","32222220000001","23333000000001"*` "-PROB",20,2,2,o MECC."(}30000:310005(STANDARD YES-NO INPUT(ZH(36)1:ZV(37)1:INP,(3,"YESNO",ZC),Z$:Z$(Z$,1):(Z$""ZC)(Z$"Y"Z$"N")ĖZH:ZV:868:36010((ֲ LINES,DIGITS[1..3,LOW..HI],MULTIPLIER POWER[1..3,LOW..HI],CARRY TYPE )փ " remove the write protect sticker from your diskette.":32160'P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160'n} BASIC ERROR'x}(12):CO,0,89'}"Error "ZE" at line "ZN" in Clown Maker."(}:"Please report this error t03,PG:904,CP:RNH,"EXIT MANAGER"8&} ERROR PROCESSINGj& }ZE(222):ZN(218)(219)256:216,0:32000&}WIND:VSP,1:ZE25531000&}(15):ZE1532110&}ZUĦ: ZU=USER PROCESSING FLAG&(} REENTRY POINT&2}(12):CO,0,89='F}ZE4ĺ"PleaseMO29780,29790,29800/%TtIMAGE,1,90,107:29810J%^tIMAGE,2,97,109:29810_%htIMAGE,3,100,109e%rt%0uSEMI-STANDARD SPACE BAR ROUTINE )HI-RES)%:uAFT,0:CN$:(1):SPACE:AFT,1:CN$::%ySEMI-STANDARD ENDING ROUTINE%"yCL$!&@y(12):SET,0:9IMAGE,1,93,47:296900$sIMAGE,2,119,60:29690D$sIMAGE,3,105,53T$sNN029750q$tRFL,"EYES/NOSES.IMG"F2$tNN29720,29730,29740$tIMAGE,4,127,83:29750$"tIMAGE,5,114,84:29750$,tIMAGE,6,122,80$6tMO0ı$@tRFL,"MOUTHS.IMG"F2%Jt222220000000","23333000000000","23411000000000","23422000000000"/փ "21111001111002","21111002323002","22222000000001","32222220000001","23333000000001" S3,LOW..HI],CARRY TYPE M0փ "-INIT","31111110000001","21111000011000","21111001313000","222220(" "(A(L1)),ZM)::Z$(A(L1)):ZA$(L1)(" +"(" ",(((ZM3)(Z$))1))Z$,ZM)z9+IN6(ZM3):PXPXIN>+L11ZC1:CO,PX,PY24((L11)12):CN$;ZA$(L1);CO$::12800H+ZAZC1:11999\+ HORIZONTALLYf+ZA$"":ZC3:A(3)0ZC21):ANANA(L1):AN(AN.5)::4* PROBLEM DISPLAY=*BOX+AFT,1:3:HO((1).7)((OB2)(OB9)(OB10)):CO,10,10:(HO)11100 + VERTICALLY+ZC2:A(3)0ZC1 +ZM1:L113:((A(L1)))ZMZM((A(L1)))*+:ZMZM3a4+L11ZC:ZA$(L1)ÀNCACEAE\ACUIBNBACEAE\AUKBLABACEAE\ACUKCACEAE\ABUACEAAC^BCACABABBCACABABE#0ApE0AA "*(B F~SDYđCBBAđAMJA@` 0C?7DYOAx8h8XLVWUUTTGUBT UW\λDYđOđA@p-&+)W*+~DYCx| |x |xA@`8LVSUT]U YAKQ8pBVđCACGO[scBCAđAKQDYCIAAAKQDYđCAacgmyqBaAđASDYC@G`@AB _DYđC?E0?đA Ea1B0 `@@TDYCA zVࠠB@@E(`D `^ĂĐA~ODYDAPꪚYđCpxC xpđAP BCA 0@PCCAJCP<~D~<~OđCx|N~~BAđAJQ0`aBCa`0 PDGA"   p``13ggyw{n=<xwwwsTTTT9pTTTTyon}=<xwwsTTTT??}st``l8oo={wx{{>`p??}st`l8_^>=<xs??}st``l9__ݾ~/wwxws% 8 @>>l6[kg*V$$$"# `p ` ?I @*"A@0 Р@  A@  @$$"?? (P `0`<<<p0 @HRx> @9b    A BIG BOXQ0ZC:ZX1,PY2ZX10,PY2ZX10,ZY15ZX2,ZY15ZX2,PY2:12800:h81 DRAW A SMALL BOXB1ZC:ZX2,ZY2ZX10,ZY2ZX10,ZY15ZX2,ZY15ZX2,ZY2:12800:1 INPUT116368,0:CO,ZX,ZY:CN$;"?";CO$:16384,128:ZP(16384):ZP1E0:BOX,PX,ZY,ZX20,ZY15*0ZC3:12500J012700:ZC0:12500:ZXZX120ZZ((AN))įCO,RX30,RY50:CN$;"RIGHT!";CO$:PAUSE,10:BOX,RX30,RY50,RX130,RY30:WIND:0ZZ(ZM3)124200ZC3:12600:12700:ZC0:12600:ZXZX1:12440 0 DRAW IGHT!";CO$:UC(UC):SCSCUC:CO$:WIND:|0CO,RX30,RY50:CN$;"NO, TRY AGAIN.";CO$:30000:BOX,RX30,RY50,RX150,RY35 0(UC)UC0:12400*0UC1:12010p0 STEP THROUGHu0(HO)įBOX:ZTHO:HO0:11000:HOZTz0ZXPX(ZM1)12:ZYPYZA127:Z27);CA$;CO$:12030)/ HORIZONTAL INPUT/BOX,ZX25,ZY7,(ZX25)(8((AN))):CO,ZX25,ZY7:INP,(((AN)1),N,((AN))),ZA$ 0 ANSWER CHECK0(HO)įCO,ZX,ZY:CN$;" ";CA$;CO$0PNPN1UC:(ZA$)((AN))12316)0CO,RX30,RY50:CN$;"R0 /12030/ZA$""12300*/12030?&/ZEZE1:12030J0/31000g:/(ZA$)1((AN))12030D/ZA$(ZP128)ZA$:CO,ZX,ZY:CN$;(127);ZA$;CA$;CO$:ZXZX12:12030N/ZXZX12((ZA$)0):ZA$(ZA$,2,(ZA$)1((ZA$)0)):CO,ZX,ZY:CN$;" ";(1AFT,1:CN$:ZZ0:ZE0:ZXPX(ZM2)12:ZYPYZA127:ZA$"":HO112020,12200`. VERTICAL INPUT.BOX,100,30,200,60:BOX,PX,ZY,ZX20,ZY15:ZA$"":CO,ZX,ZY:CN$;" ";(127);CO$.16384,128:ZP(16384):16368,0:KB(ZP)12030,12050,12070,12090,1211(L1);CO$::12800)H+ZAZC1:HO0:11999<\+ HORIZONTALLYYf+ZA$"":ZC3:A(3)0ZC2p+L11ZC:ZA$ZA$(A(L1))"+"::ZA$(ZA$,(ZA$)1)" = "z+BOX:CO,PX,PY:CN$;ZA$;CO$+ZA0:ZM(ZA$):HO1.. PROBLEM INPUT.UC0K.NOJUST:LLY+ZC2:A(3)0ZC1I +ZM1:L113:((A(L1)))ZMZM((A(L1)))W*+:ZMZM34+L11ZC:ZA$(L1)(" "(A(L1)),ZM)::Z$(A(L1)):ZA$(L1)(" +"(" ",(((ZM3)(Z$))1))Z$,ZM)>+BOX:L11ZC1:CO,PX,PY((L11)12):CN$;ZA$A$;(255);CA$;CO$:12220n0ZA$(ZA$,1,(ZA$)1((ZA$)0)):CO,ZX25,ZY7:CN$;ZA$;(127);" "CA$;CO$:12220 0 ANSWER CHECK0HOįCO,ZX25(ZA$)12,ZY7:CN$" "CA$CO$0(HO)įCO,ZX,ZY:CN$;" ";CA$;CO$0PNPN1UC:(ZA$)((AN))12316J(AN))):CO,ZX25,ZY7:""n/16384,128:ZP(16384):16368,0:KB(ZP)12220,12250,12270,12290,12240,12295y/12220/ZA$""12300/12220/ZEZE1:12220/310000(ZA$)1((AN))122200ZA$ZA$(ZP128):CO,ZX25,ZY7:CN$;Z:/(ZA$)1((AN))12030bD/ZA$(ZP128)ZA$:CO,ZX,ZY:CN$;(127);ZA$;CA$;CO$:ZXZX12:12030N/ZXZX12((ZA$)0):ZA$(ZA$,2,(ZA$)1((ZA$)0)):CO,ZX,ZY:CN$;" ";(127);CA$;CO$:12030/ HORIZONTAL INPUT/BOX,ZX25,ZY7,ZX2612(1(12020,12200 . VERTICAL INPUTf.BOX,PX,ZY,ZX20,ZY24HO15:ZA$"":CO,ZX,ZY:CN$;" ";(127);CO$.16384,128:ZP(16384):16368,0:KB(ZP)12030,12050,12070,12090,12110/12030/ZA$""12300/12030&/ZEZE1:120300/31000=p+L11ZC:ZA$ZA$(A(L1))"+"::ZA$(ZA$,(ZA$)1)" = "Vu+IN4(ZA$):PXPXINqz+CO,PX,PY:CN$;ZA$;CO$+ZA0:ZM(ZA$).. PROBLEM INPUT.UC0 .NOJUST:AFT,1:CN$:ZZ0:ZE0:ZXPX(ZM2)12:ZYPY724(HO)ZA12:ZA$"":(HO1)NON SHOOT","","","","",""  PROGRAM: INIT MANAGER6COPYRIGHT 1983 MECCBD$(4)SRUN PROGRAMkLV(901):GP(902)L123:L206:NM$:L1LVL2GPL13:L26L2:L1RNH,NM$ @"","","","","CLOWN MAKER","CLOWN CAR","HIGH WIRE","ELEPHANT WALK","CAN 1A:A,B:L21B:OB(C)A:CC1::,3R(ZH)((1)(ZHZL1))ZL(ZH0):KB(ZZ)((ZZ127)(2(ZZ141))(3(ZZ155))(4((ZZ176)(ZZ185)))(5(ZZ149ZZ255)))3PN1:SC0:ZL1:L11503Z1R(NO):Z2R(NO):Z1Z2132103TROB(Z1):OB(Z1)OB,PY(((L11)12)3)L2PXZM12,PY(((L11)12)3)L2::N2 INITIALIZATIONq2:OD%(13,14),DI(3),MU(3),Z(3)2A$:A$"-INIT"130202L1113:A$:L2114:OD%(L1,L2)((A$,L2,1))::22A$:A$"-PROB"13050"3C1:NO:OB(NO):A:L176ZP18512710116368,0:1CO,ZX,ZY:CN$;(ZP);CO$1ZP128(((AN),((AN))ZZ,1))įCO,RX30,RY50:CN$;"NO, TRY AGAIN.";CO$:PAUSE,20:BOX,RX30,RY50,RX150,RY35:127101ZZZZ1:2 DRAW BAR9 23:L201:(PXZM12)(((AN))12)ҠȠΠ٠ˠ A1A0:CO,0,166:39):3060 ::"New time-------> SECONDS":CO,136,149:INP,(2,N),N$:N(N$):L0:N0N15Ĺ936,N:L1 L CO,0,183:D$"BSAVE T.O.FILE,A900,L37": NAME AND SCORE LIST D$"OPEN STFILE,L35":D$"READ STFILE,R00",15:"Set Elephant Walk Time";(3)- L11 CO,0,50:" In this option you can set the time it takes for the computer's elephant to take one step. This time can be set between 1 and 15 seconds." :::"Current time---> "(936)" SECONDS "!Set up the printer"7 8CO,30,125:"6. Return to menu"s BCO,30,170:"Which option? ";:INP,(1,"-16"),O$:O(O$) GO2000,3000,6000,5000,10000,31040 I1010 (908)1Ĺ908,0:2020 908,1 D$"BSAVE T.O.FILE,A900,L37" " CL$:CO,0 CO,30,50:"1. Turn graphics ";:S$(0)"on":S$(1)"off":S$((908)) CO,20,145:"Graphics now "S$((908)):CO,30,65:"2. Set Elephant Walk time" $CO,30,80:"3. See names and scores" .CO,30,95:"4. Clear names and scores" 3CO,30,110:"5. O " MANAGEMENT OPTIONS9" PROGRAMMER:P FUGLESTADU" COPYRIGHT:MECC, 1984t(" LAST UPDATE:84/06/28PRW-320002CL$(12):D$(13)(4):R1:A$(100)<WIND:RFL,"T.O.FILE"R101CL$CO,0,15:"Management Options";(3)E      (L1,L2)((A$,L2,1))::2:2A$:A$"-PROB"13050x3C1:NO:OB(NO):A:L11A:A,B:L21B:OB(C)A:CC1::,3R(ZH)((1)(ZHZL1))ZL(ZH0):KB(ZZ)((ZZ127)(2(ZZ141))(3(ZZ155))(4((ZZ176)(ZZ185)))(5(ZZ149ZZ255))6(8,RY20:127101ZZZZ1:+2 DRAW BAR 23:L201:(PXZM12)(((AN))12)2,PY27((L11)12)L2PXZM122,PY27((L11)12)L2::2 INITIALIZATION2:OD%(13,14),DI(3),MU(3),Z(3)2A$:A$"-INIT"130202L1113:A$:L2114:OD%12800:1 INPUTg116368,0:CO,ZX,ZY:CN$;"?";CO$:16384,128:ZP(16384):ZP176ZP18512710u116368,01CO,ZX,ZY:CN$;(ZP);CO$1ZP128(((AN),((AN))ZZ,1))įCO,RX12,RY5:CN$;"NO, TRY AGAIN.";CO$:PAUSE,20:BOX,RX12,RY,RX16:0ZZ(ZM3)12420I0ZC3:12600:12700:ZC0:12600:ZXZX1:12440^0 DRAW A BIG BOX0ZC:ZX1,PY22ZX10,PY22ZX10,ZY15ZX2,ZY15ZX2,PY22:12800:81 DRAW A SMALL BOXB1ZC:ZX2,ZY2ZX10,ZY2ZX10,ZY15ZX2,ZY15ZX2,ZY2:,ZY5:ZTHO:11020:HOZT:HXZX25:HYZY7hz0ZXPX(ZM1)12:ZYPYZA1231:ZE0:BOX,PX,ZY,ZX20,ZY15x0ZC3:12500012700:ZC0:12500:ZXZX120ZZ((AN))HOįCO,HX,HY:CN$(AN)0ZZ((AN))įCO,RX30,RY:CN$;"RIGHT!";CO$:PAUSE,10:WIND0CO,RX30,RY:CN$;"RIGHT!";CO$:PAUSE,10:UC(UC):SCSCUC:CO$:WIND:0CO,RX12,RY:CN$;"NO, TRY AGAIN.";CO$:30000:BOX,RX12,RY,RX168,RY15 0(UC)UC0:12400*0UC1:12010p0 STEP THROUGH)u0(HO)įBOX,ZX25,ZY7,ZX2611(1((AN)))(RT)(MO)ı) GC(P)120,190,230,2502 120B SA$""120 RTC1:S$"WRONG.":PNPN1:(SA$)ANSCSC1(PNCX):S$"RIGHT!" AFT,1:CO,180,80GA60:CN$S$:NOJUST:CO,TX,TY:" "CO$:120 31000 (SA$)1((AN))1208 SA$(P128ECECMOGA! ECTI12MO1GAm MOįNOJUST:AFT,2:CN$:CO,X,79:CE$(C):CCC1(C3(CC3)):XXC1:CO$ MOX(CT(BP(C0)C1))ECC0:EPC0:NOJUST:AFT,2:CN$:MOC0:CO,X,79:CE$(C2):BP(C0)BP(C0)C1:CO$:18000:BP(C0)CTCWC1 HWCWı ' "PROGRAM: ELEPHANT WALK:"PROGRAMMER : TIM HEAPV"COPYRIGHT: MECC, 1984u("LAST UPDATE: 84/06/27PRWcMU(907):1000d TIMED INPUToRTC0:SA$"":P(C0):MOC0:CC0:XCTBP(C0):CO,TX,TY:CN$" "(127)CO$sECEC24 xP(C3): !""" " "        NDING ROUTINE (HI-RES)Y"yWIND:(12);(15):CO,0,89:"Do you want to try again? "(1);d,y36000r6yZ$"Y"Ĭ@y(12):CO,0,89:"Getting the menu...":WIND:(1):SET,0:RNH,"MENU"} ERROR PROCESSING }ZE(222):ZN(218)(219)256:216,0:$:L <##TITLE.#62)"M":59)"C A"n#50)"N"8)"O S":50)"U L G G R T":50)"M E R I R E"#50)"B V O V E R":50)"E E U E C Y":"NAME"46)"R L P N T Y"#I179:"-";:::'RNH,"PRINTER SUPPORT"0uySTANDARD E(A$(X),1)"0"X100/hX:D$"CLOSESTFILE":<(#DISSECT2#NA$"":N1$"":N$(A$(X),25):L$(A$(X),27,1):G$(A$(X),28,1):GI$(A$(X),29,2):CO$(A$(X),31,2):MA$"NO":(A$(X),1)"1"MA$"YES"4#L125:NA$(N$,L,1):NA$"*"NA$","7#N1$N1$NA3L);CO$;" ";MA$+FEED,3,F:Fİ9100:F0>X:FEED:POFFv24576:CL$:CO,0,90:"Printing complete.":SPACE:@GET FILEJD$"OPEN STFILE,L35":D$"READSTFILE,R0":A$:R((A$,3))1TX1100:RR1:R0R100^D$"READSTFILE,R"R:A$(X):U$((G$)):G$"0"G$"R"5NU$"0"NU$"5":7060PNU$"1"NU$"4":7060kNU$"6"NU$"3":7060NU$"5"NU$"2":7060NU$"4"NU$"1"L(N1$):N1$;50L);NU$;:L(L$):2L);L$;:L(G$):2L);G$;:L(GI$):3L);GI$;:L(CO$):000:6040Y$"N"6010%4000+8XPRINTERs]CL$:CO,0,89:"Please prepare your printer...":SPACEbCL$:CO,0,90:"Printing the report...":D$"PR#0":D$"IN#0"l8000:PACT:9100vX1100:9000(N$,2)"00"X100:7080NLE,L35" D$"WRITE STFILE,R0"/"0000000"<X1100UD$"WRITE STFILE,R"X`"000"gX}D$"CLOSE STFILE"pCHOOSE SCREEN/PRINTER zCL$:12:"Would you like to use"::"a printer? ";:INP,(3,"YESNO"),Y$:Y$(Y$,1):Y$"Y"İ70"įSPACE:BOX,0,70,279,191,0::4260/X1006XHHSP:SPACE:CL$:CO,0,89:"Are you sure you want to clear all"::"the names and scores? ";:DB:36000:Z$"Y"Z$"y"ıCL$:CO,0,89:"Clearing names and scores..."D$"OPEN STFI6"NU$"3":4240+NU$"5"NU$"2":4240@NU$"4"NU$"1"HSP,1:CO,0,Q:N1$:HSP,2:CO,170,Q:NU$:CO,185,Q:L$:CO,202,Q:G$:CO,215,Q:GI$:CO,238,Q:CO$:CO,258(4(MA$"YES")),Q:MA$Q1604260%Q60:XX1:9000:XX1:(N$,2)"0--------------------------"0CO,0,56:"NAME":8000_@CO,70,100:" "lJX1100wTQQ15^9000r(N$,2)"00"X100:4260NU$((G$)):G$"0"G$"R"NU$"0"NU$"5":4240NU$"1"NU$"4":4240NU$" are retained."$SPACE:CL$:Q60CCO,170,8:" C M":CO,170,16:"N O A":CO,170,24:"U L G G R S":CO,170,32:"M E R I R T":CO,170,40:"B V O V E E":CO,170,48:"E E U E C R":CO,170,56:"R L P N T Y""---------:A$:D$"CLOSE STFILE"( TR((A$,4))^ CL$:CO,20,80:TR" record";:TR1ĺ" has";:4015m "s have"; " been entered.":TR100įCO,20,100:"When you reach 100 the oldest":CO,20,109:"records will be dropped.":4028CO,20,100:"Final 100@,6R=s &   ),* @| AV AV AV @<E@W*`/E`U*xjF UjX*F0UJ\*F0ujT* F8}*V*F,]*V:F.]VjuG*_VjUH@+W VjWApH`jU T*W A_ L`jU\*]z@Ucx:UX*]rpUr@_*Up*uj?Uj?U   U`0`Up0 @HRx> @$1b8 @>>  O{ 2r@@@GIMLO{0r𐐐at 0 O{H0r p?΄D" s!"DHxH@GIMLO{2r pA@GIMLO{2r p p A@  @$U$"??U (P G@w.UrCU*M|o,e*U M}',ժ+M|,ުժ?FoLׁBUE|xժBwEpժ@>Eݯժ@LժGBBpB0~ժAA`A|ׂ@A`ժBJժ~ߪժK@ߪ+UzժCpժ~U*D}ߪC29100NP30:CN"NP9031000gNAFT,2:CN$:CO,21,74:" ":BOX,0,89,279,191,0:PAUSE,20:Q7P6NX302402:CO,X,109:C1$:PAUSE,1:CO,X1,110:C1$:PAUSE,1NP60ĭX20(X20)P6P61:AFT,2:CN$:CO,X11,110:LP$NXNX302402N7:250,X258,X:X0fNAFT,2:CN$:X2524523EpNCO,X,12:LP$:X]zN2:10,22258,22:5mN MAIN LOOPNCN10(10P8)11:P40N(908)0İ29200:20130N29000NCN10P30N29200:UC1İ29100:P31NUC0P30N29200:UC1İ(Z2):OB(Z2)TR:6 NCL$<*N DRAW LADDER AND RACKL/NP9020100`4N6:0,86279,86>N5:10,8510,20:18,8518,20:250,85250,20:258,85258,20:9,859,20:17,8517,20:251,85251,20:259,85259,20HNX85207:10,X18,X:XRNX8520ԮԠ0003f<ff<>gccccg>>~~|` fffffffffl6iɆpqs 0 000000 0 0Z<|~~6    84:13000:PE(13),PR(13),WA(13),FB(1,10),CE$(5),HE$(5),OB(26),P1(30),P2(30),P3(30)(C00:C11:C22:C33:C44:C55:C66:C77:C88:C99:CT10:CX20:CC100:KS16368:KB16384:PX50:PY120:RX87:RY160:BP(0)C0:BP(1)C0:D$(4):CA$(1):CL$(12):CC$(3):EPBP(EP)CTHWC1+ ^CO$:AFT,1:PARSE:5 MAINA 32000c SO(907):GA(908):TI(936) 230,64:::RFL,"NUM.FNT":RFL,"ELEPHANT.FNT":RNH,"USR.OBJ-A$88C4":DUN,"ELEPHANT.PCK":(5):DFT,1,32636:DFT,2,33796:AFT,1:HSP,4,1:VSP,1R163):CCC1:CC4CC11 7X:CO,X,79:CE$(C2):330A ;HUMAN MOVE @NOJUST:AFT,2:CN$:CC0:EPC1:X247CTBP(EP)(247CT(BP(EP)C1))1:CO,X,79:HE$(C):CCC1:CC4CC1 EX:CO,X,79:HE$(C2) JBP(EP)BP(EP)C1:18000:EPBP(EP)CTCWC1 T@ @@C@B@B`B B B B0BBB0B B B B B B`B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@9+U*DUB_*UCj՜AU*BՒAU*BuךA&U*BUތA)U*BU@*UAjFz*U:U+_*UAjM@_*]:u+Wju*U*M`U.]>ukWzuju+MpU/_~}{W>ujuzwN}j}zGG7Uo@ ^Dz{D`1uGxCg{B p}D?0B@ @0@ @`@ A@@@ p A@  @$U$"??U (P U`0`UD?J( EP(@ B@(@8$A f@HD PB@@H@B@H)SA$:AFT,1:CO,TX,TY:CN$(127)SA$CA$CO$:TXTX12:120 TXTX12((SA$)0):SA$(SA$,2,(SA$)1((SA$)0)):AFT,1:CO,TX,TY:CN$" "(127)CA$CO$:120 ,COMPUTER MOVE 6NOJUST:AFT,2:CN$:CC0:EPC0:XCTBP(EP)(CT(BP(EP)C1)):CO,X,79:CE$(CAA;n;CAxAAxXBB;n;A𘈌BAw]wC   Bw]wA ࠸An8`E8n:ABA 747ADBKBఐBCBMBHABCAABCAEK〸΃wn;nD@E`@Cn;nAEHǜÏCw]w]C?1C1?B]w]ADIDx;n;P;n;AEADBAw]wC@`p00ppB0Bw]wAAn;nCBBn;nA𐘈A]w]P]w]A C>UjDp+U*u@_*U@@`U*AU@>U*AU:A@+U*BUjHp*U*uS*C\*U?*@HW*})U*u*C`U*O*UA+5C8UzS*UB.uB,UU*CU:UB$U/U*CUjTB'U)U*CUjUK@)U*Uj'U*W:K@*u*U|S*]*Ep*]*uC~)UjDX*W*=I'5jH*S*I,5*L*UjHU*T*UzH.U`+UC*Uj+UB+U.U*Cu*UB+U:U*B]*UB.UjU*DUjW*uC,U*W*UC:U*K8U*}U*uU* C0U*}BU*K`U*}W*}U*IU*}U*}U*IW*}U*}UjI^*}U*}?UIX*}U*}*U Ap+U*AU@.U*Au@8U*@@`U*BUjEW*U*u?D|*U* D@?Uj B`W> A|3 #.B`?60:LP(1)LP:LP(2)LP36:29530-UsT0:20000eZsAFT,2:CN$:CO,LP(1)1,159:LG$:CO,LP(2),159:RG$ds1:0,175279,175:5:LP(1)13,158LP(2)2,158:OXLP18nsDE129570> xsT50:AFT,0:CO,40,180:"Press 'Z' to make ";:AFT,2:CN$;:CO,179,176:P2SC0h@sBOX,249,2,277,12,4:CO,2606(SC9),2:SC:AFT,2:CN$:NM0Z1:L1NM:CO,Z,3:P2$:ZZ20:LnAsBsAFT,2:CN$:T612:BOX,0,30,279,191,0:FX11:FY155:X25:Y149:Z1.8:3FsAFT,2:CN$:CO,0,150:T1$:CO,0,166:T5$PsT42LPR1(120)wժa`ժ`ժ`վժ`תժEתկEߪE?՚Ep՞Bx AAWAWB`WB`UB`UB`UB`UB`UB`UB`UC@gUCpUc|Uz?|Uz|Uz|U~pW~pWfBWg?B@<pU|Uz?|Uz|Uz|U~pW~pWfBWg?B@<  "B@G~px@|@A(تժܪܪتժXժ\xժpժp՚p՚ Պ@ՆBBAx<@ ApApAAܞAߚAAC`C`ժCxժHժ`ׁB`ժC`՚p՚ Պ@Նx<@ApApAAܞAߚAAC`C`ժCxժGժ`ׁA`ժB`ժy`ժ`ժ`վժ`תժתկߪ?՚p՞Bx AAWAWB`WB`UB`UB`UB`UB`UB`Uk`U@gUݪժ`ժsݪ`CC`@@`@Y`՚@`՚ߚ`՚pG`՚G``F\`ՎF``D`D0`A@@B`B<B0 B`@ @Ax<@Ն`Պp՚p՚pժxժتժتժܪܪتժXժxժpժpYtߔʿ̙͗ʙ@A@@ "ApB~|A@G<xsHׯؿHׯؾH׫޾ݺH׫־ݺH֮ݺHߺH՞~H@?HsժHߪժժHתժժתժݪժ`תB`D@?Ix|??I~|??Jp?|?Jp?p?I@?@?CxB~B`BxAמB`AB`AAA|@?A|@?A|@<Ap@<Ap@< AC@ș̙̝ʗ՟ߔUJ2U BBCĀBCCĈCĈKĈĈDĈDKĈGAKp<Kp<Kp?K|K|I|G|`A|B`AߞBx    E,3:CO,Z,3:"HI":PAUSE,3:CO,Z,3:"JK":PAUSE,3:CO,Z,3:P2$:IsWS0:AFT,0:1:0,22279,22:6:CN$:Z1:L110:Z,20Z15,20:ZZ20:L:CO,206,2:"Score ";:AFT,1:CN$;:5:247,0279,0279,14247,14247,0?sSCNM:NM1200059NP90200051>NK90K91:DE1:29500GCNK91DE0:29500RHN20010ca " FADE OUTaAFT,2:CN$:PAUSE,3:CO,X5,Y16:"HI":PAUSE,3:CO,X5,Y16:"JK":PAUSE,3:CO,X5,Y16:BOX,X5,Y16,X20,Y31:e" FADE IN@eAFT,2:CN$:PAUSZZ136))$3PN1:SC0:ZL1:L1150I3Z1R(NO):Z2R(NO):Z1Z213210q3TROB(Z1):OB(Z1)OB(Z2):OB(Z2)TR:w6 NCL$%NGT2531000*NPX98:10000:11000:12000:GTGT1:PGGT:UC1CPCP1/NGT5(GT5)įPAUSE,204NT40:GT5(GT5)CN$(14):CO$(15):QP$(1)"":QP$(2)"s"9(GA)PY60BR$"89":EL$"Elephant":CE$(1)(34)"#$%":CE$(2)"&'()":CE$(3)"*+,-":CE$(4)"./017":CE$(5)"23456":HE$(1)":;<=":HE$(2)">?@A":HE$(3)"BCDE":HE$(4)"JFGHI":HE$(5)"KLMNO":N$"":SC0YGC(Z50:T4$:PAUSE,1:CO,24,150:T3$:PAUSE,1:CO,0,150:T6$:CO,0,166:T5$:11,15716,162w!sBS(R1(30)10)10:16368,0!sXXBS:YYZ:ZZ.014!sX262įCO,XBS,Y:" ":29955!sX50įAFT,2:CN$:CO,0,150:T7$:CO,0,166:T8$:29616"sDE1U(3)$;:AFT,0:CO,200,180:CN$;:"drop.":T4T41:1:0,175279,175 sL1302:0:FXFX.4:FYFY.4:PAUSE,1:3:FX,FYFX2,FY:FX,FYFX2,FY1:0:FX,FY:FX,FYFX2,FY:FX,FYFX2,FY1:LV!sAFT,2:CO,24,150:T2$:PAUSE,1:CO,24,150:T3$:PAUSE,1:CO,24,1UME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   ϠPE`DH hWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦAD@ C N cLuɠ% d: L ФLANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`DE ɤ<(LΡ DE`80!  eDeE eDDeEE8`D&E`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^2,254% 1,20,338  L  QL  QL  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQ0","22222000000000","32222220000000","23333000000000","23411000000000","23422000000000"$փ "21111001111002","21111002323002","22222000000001","32222220000001","23333000000001"$` "-PROB",20,3,2,1,4,1,5,18 % 27,48,71,94,117,140,163,186,209,23#ZH(36)1:ZV(37)1:INP,(3,"YESNO",ZC),Z$:Z$(Z$,1):(Z$""ZC)(Z$"Y"Z$"N")ĖZH:ZV:868:36010u##ֲ LINES,DIGITS[1..3,LOW..HI],MULTIPLIER POWER[1..3,LOW..HI],CARRY TYPE W$փ "-INIT","31111110000001","21111000011000","2111100131300":32160S"P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160e"n} BASIC ERRORy"x}(12):CO,0,89"}"Error "ZE" at line "ZN" in Clown Car.""}:"Please report this error to MECC.""}30000:31000"STANDARD YES-NO INPUToING5! }ZE(222):ZN(218)(219)256:216,0:32000T!}WIND:VSP,1:ZE25531000l!}(15):ZE1532110!}ZUĦ: ZU=USER PROCESSING FLAG!(} REENTRY POINT!2}(12):CO,0,89"F}ZE4ĺ"Please remove the write protect sticker from your diskette.58,79 Ps" s PLOT LEFT LADDER5 s0,0100,100:` 0u STANDARD SPACE BAR ROUTINE )HI-RES) :uAFT,0:CN$:(1):SPACE::AFT,1:CN$: y STANDARD ENDING ROUTINE "yCL$ @y(12):SET,0:903,PG:904,CP:RNH,"EXIT MANAGER"!} ERROR PROCESS6,X:" ":CO,PS(CN)6,X12:" ":P6P612qCr GEN PROBrAFT,1:CN$:WIND,20,89,270,191:10000:11000:12000:PGPG1:WIND:UC1CPCP1$r D$(4)(13):CL$(12):CC$(3):CN$(14):CO$(15)a L101:L216:YP(L1,L2):: L1125:HP$(L1)::HP$(4)"!"(34):NEED(") IN STRING .SO(907):GA(908):PY65:PX99:RX87:RY140:GXRX25:GYRYI BF132636:F2F11161:F3F22024  PROGRAM: HIGH WIRE3PROGRAMMER: TIM HEAPNCOPYRIGHT: MECC, 1983l(LAST UPDATE: 6/27/84PRW |2WA14, WA16MU(907): MAIN3200016384::DUN,"HIGH.PCK":(5):CO,75,183:"One moment please..." 13000:HP$(25),YPDRqA*HOYqBBBBBBBBBBBBBBBBBBBBUHsqBBBBBBBBBBBBBBBBBBBB*Hi{CBBBBBBBBBBBBBZOER{UHIDaF`CQZVR{*HIđDFCđQZVR{UHID~B~6fFCQZVR{*HIđDaBca``acCđQqAUHIC?BB?CQqA*HIđEđQqAUHJCC ၁CQXID@ఘR{*HIđBCCBđQXDxB`R{UHIDCCBQXEBER{*HIđQđQXMGR{UHIQQXOER{*HIđDDCA[fCđQUExoA*LLHZpAUHNXpA*HIđFĂRpAUHICHCRpA*HIđCCCBđQZDPR{UHIBAFBQZDNR{*HIđBADBđQZEMR{UHI KAY*~AYU~AKAKA*~AUExA*ExAUExA*ExAUExoBBBBBBBBBBBBBBBBBBBB*ExoB`B`B`B`B`B`B`B`B`B`B`B`B`B`B`B`B`B`B`B`"""""(FL)31000WIND:VSP,5:PARSE:CL$:CO,0,18:"Let's review the "20SC" problem"QP$(1(20SC1))" that you missed:":1:45,45231,45231,17945,17945,45L7120:P1(L7)05050>A(1)P1(L7):A(2)P2(L7):A(3)P3(L7):ANA(1)A(2)A(3):PY80:PX100)12:TYPYZA127:100c](HW)(CW)(SA$)ANPN21FLC1:P1(PT)A(1):P2(PT)A(2):P3(PT)A(3)b((CW)(HW)(SA$)AN)(GA)İ315e(GA)ĭHWCWİ16000j(SCCXGI)(PNCX(GA))İ30000:CL$:5000~GIC0:1110REVIEW PROBLEMS :U218U25029710,"sDE1OXX6229710D"sCO,X,Y:"1":29600U"tCO,X,Y:" ""t16368,0:CO,X,Y:" ":XX9:CO,X10,Y:PAUSE,1:B1$:PAUSE,1:CO,X10,Y:B2$:PAUSE,1:CO,X5,Y:P1$:CO,X5,Y12:P2$#tTT.3:PLAY,MUT,2:YY1:CO,X5,Y:P1$:đCđA@`0&+)^*jzZ^VC BCA 0@PCCA~CAA@`0XNSUTcUH<~D~<~OđCIAđA`0,&+j*H00`ABCa`0 PC~EC~A@pXLVSjUu5 H@@BaA@TđDGABđA@`8,&+)e*Aj:""                  OB(R2):OB(R2)TR: EL1126RFR1((1)14)13:R2((1)14)13:R1R21094zGTROB(R1):OB(R1)OB(R2):OB(R2)TR:J(GA)İ30000K(GA)ĺCL$LSTART OF MAINVPTPT1:PT27PT1[10000:HO0:WIND,0,110GA,279,191:11000:TXPX(ZM2000:CO,0,130:"Try to beat"CC$:CO,0,139:"the computer's elephant"CC$:CO,0,148:"to the water bucket!"CC$.:L101:L2110:FB(L1,L2)::8L1113:OB(L1)L1:OB(L113)L1:BL1126CR1R1(13):R2R1(13):R1R21091DTROB(R1):OB(R1)Z)((ZZ127)(2(ZZ141))(3((ZZ176)(ZZ185)))(4(ZZ149))):R1(ZZ)(((1)ZZ)1)d L1909 L1L1C1:(L1)441035L1L1C1:(L1)32(L11)32N$N$((L1)):104030000:CL$:(GA)įCO,0,89:"One moment please..."l$(GA)İ15