H+JJJJ  / 2 YIBIB3Ȅ ʎz+ A=A & m'+L^L )JM$YS#햰8  )*+(L  ⁐⒃B`77777777777JJJJx 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*` * QU:xj*h BCq@pp?aa93`pCCCCC PE@h}UUU/U7l}ay\UCCCFFFLLL app | A`fCag J6+*~Cs_~~:N'[9N?GxV 111 Appafgf  (*k/$.-]zHSW;& " x~ga`` ? >sg>`g UE@@Cqymgcq03q`0`|fN|UQQEU5ADg@saxLxp9p  "*@p<qymgcCOsC? ?aCCqc`! CcqyyxxAg0 CC@U@TP`px<O@@O3@@3CC|F@8ggc```N 000 CgGgg@p@psq@Cc`pO(+/**~Y2>}uR2A!f(...FF CCCCap CfOF @UUP@Bb?QUUAAAUUECCFFFLcgcg@sqpppc|f|?0<3?0  **(*$  .:&"*+*  Ǐ)** *R**+Z'h UV`px<??03<0?0NLxx(%$9~(e8 z***00 ``@@@ @``@px~x~93@ UTUTy}UUW_EG?UckpX0}]Q001113 C@x@Cp33sp333x|` h>+ }~\u>z<|x -.VNSRx^GC@@aaaaa0]zj 6(HjO !p*W@@C*gps ~~||x~À/>}(*+*+}?.-*2 ,,(000` @p<| |qCCqc1sax|~HkUUTU5u5UqS5x0\UU `@`scffcgaagGN a3pca`a00~P@}oj#_TZ\BTD1''~V\&$2((PPp@@@g`Ccq ~000T@Dj*+_ .O[~y9H_ykBkKVvSSW667113x^GC@@`px<| |c00`B*+? /e1'D]U 7:/'%19*  GggCqpcFϏMZUUU,MUV\?M6@9RP>+*|?+k>>>7c?2M5\Z*V0()) @`@`gpssqssq1 aF6f(*~_%MUg<aaaaG@@G03<0' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 +" b } `+O&@AȄ= 'JlLJfK L=+L^Ll,` D&`& ƨ&梤(Ƥ00)&JJ&&' &' &' f&') @'л Ф t ``          WIND:(12):CO,0,89F}"Error "ZE" at line "ZN" in WINNERS SCREEN."q}:"Please report this error to MECC."}30000:31000@Counting,Adding,Subtracting,Adding and Subtracting,Multiplying,Dividing,Subtracting (neg. results allowed)ZN" in ROBOT RULES."?"}:"Please report this error to MECC."Q"}30000:31000k"Pò"DATA FOR HOLES ETC."ZÃ3,9,23,31,59,46,63,75"dÃ2,4,7,4,5,1,9,9,3,4,5,5,1,5,3,5"ZÃ3,9,23,31,59,46,63,75"dÃ2,4,7,4,5,1,9,9,3,4,5,5,1,5,3,54SER JUMPS BACK TO)&!2}(12):CO,0,89v!F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160!P}ZE8ĺ"I/O error. Please check you disk drive and diskette.":32160!n}BASIC ERROR!x}(12):CO,0,89"}"Error "ZE" at line "ZA$"y"ZA$"Y"Ĭ" @yRNH,"MENU"2 }ERROR PROCd }ZE(222):ZN(218)(219)256:216,0:32000u }WIND:VSP,1 }ZE25531000 }(15):ZE1532110 }ZUĦ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS)!(} USERS ENTRY POINT (WHERE THE Uy"ENDING ROUTINE h"yVSP,1:WIND:CL$CO$:CO,0,89:"Do you want to try again? "CA$;:GCP,ZX,ZY,yCO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1),ZA$:ZA$(ZA$,1):ZA$"y"ZA$"n"ZA$"Y"ZA$"N"310201y(12):CO,0,89:"One moment please..." 6yARD.PAK":WIND,14,1,279,191:CE$L4NL118:PLAY,R(50)1,10,SO(R(20)1)X>NHO(L1){CNZPHO(L1):300:CO,ZX,ZY:"%&"HNT(T):L1NCO,14,16:" #$#$":L01:AFT,4L:ZPPP(L):300:CO,ZX1,ZY15:")*":L:0uSPACE BAR:u(1):SPACE::10115 'OTZ1FI:700:10110+'OT1:D'PP(FI)PP(FI)İ800q'AFT,1:CN$:BOX,TX1,TY6,TX11,TY11,0'FIFI:BOX,90,1,250,22,0:BOX,1,151,230,184,0:N N "BOARD GENERATOR*NAFT,3:CL$CN$:T1:BC(1)1:BC(2)6 /N::DUN,"GAME BO:Z30:400Qj'(PP(FI)ZOZOMS0)(PP(FI)ZOZO(MS0))Z1FI:Z20:ZO0:600qo'PP(FI)101PP(FI)0LCHt'LCH10040y'ZPPP(FI):300:AFT,4FI:CO,ZX1,ZY15:")*"~'PP(FI)1ZPPP(FI):(ZPHO(2(LE(ZP)1)1)ZPHO(2(LE(ZP)1)2))MSWR(PP(FI)0(MS0))10115GB'OPZ1FI:Z21:600:ZOPP(FI)2MSsL'ETZQPP(FI):Z1FI:Z2(MS0):Z31:400V'Z1FI:ZPPP(FI)MS:300:AFT,1:BOX,TX1,TY6,TX11,TY11,0:CO,ZX5(MS0)4,ZY6:L:TXZX:TYZY:500 `'ETZQPP(FI):Z1FI:Z2(MS0)0#CO,XL,YL:CP$R(4)CQ$:30000:CHR(4):10000q#AFT,0:30000:(12):CO,0,89:"One moment please...":31040w''"MAIN PROGRAM3'TX50:TY0:MS(CH0)(CH0):L08'LLMS:ET(PP(FI)(MS0)(EN(PP(FI)(MS0))1)):OP(PP(FI)MSPP(FI))='0:CO:"If your robot ends its move on another robot, the first robot will be bumped back TEN spaces.":4000x#CO,XL,YL:CP$R(4)CQ$:CHR(4):30000:CN$:10000#1000:1100:1200:CO:"The first robot to move off the bottom level is the winner.":4000(4)CQ$:30000d#CHR(4):10000:1200:AFT,0:CO:"If your robot ends its move on an ";:AFT,3:"%&";:AFT,0:" space, it will fall to the level below."CQ$:Z1FI:30000:CN$:700:FI(FI)ln#BOX,90,1,250,22,0:BOX,1,151,230,184,0:1000:1100:1200:AFT,1100:4000P#30000:CN$:1200:CO:"The number you put in the box marked MOVE is the number of spaces your robot will move." Z#CO,XL,YL:CP$R(4)CQ$:30000:CHR(4):10000:Z1FI:500:ZPPP(FI):300:CO,ZX1,ZY15:")*":1000:1100:4000:CO,XL,YL:CP$R}"Error "ZE" at line "ZN" in MENU."Q}:"Please report this error to MECC."c}30000:31000uPòPROGRAM DATAnÃ"Path Tactics","PATH"sà "Introduction","ROBOT RULES"xà "Winners' Lists","WINNERS LIST"=USER PROCESSING FLAG)(} REENTRY POINT=2}(12):CO,0,89F}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&6384):ZL(Z127)::ZZ128:16368,0:=0uSPACE BAR ROUTINEN:u:SPACE::cyPROCESS ESC-ESCm"y2000} ERROR PROCESSING }ZE(222):ZN(218)(219)256:216,0:32000 }WIND:VSP,1}ZE255ĉ::}(15):ZE1532110}ZUĦ: ZU** qymgcyCg UUE=DP_-1/*as@sCC@U*TPRW\~P_\PUdXXP00```@qymgcgcg```ga*(*jjj+/b"j* `(8**(O?TUUUUUWEP * *&((? AND FIL/ aaaUUECCFFFL ax `cfcg zbj?~r{sW:o$v?Wn|\ 1 `pp?cff  *? +A?{OOW[#l %"  |oca``~ckc@`g TEZAU@ "{PD@VV 0csC|CCCCC ( ***8 #h^( n@`x<<<qymgcyG[c sCCF`!CcpsyL0LaCC@P@TP`pxg@C@aaCCCF|`Cgga``` ("((h"U*`zb(((@@cq`ppOa?1  1511yCCCCC TPuPOUUuuw_=UU<LA CUUPA@JrPD@UFUAQTUCCCFFFLLLaggagCaspC?01610  "*(( *n & ** @Cqymgc~3p30`0~FVFAUUUOPPUgas@| , Y ** L~151@TQrP_UEuwOEyUE;kUTUU000111333 C@x@Cg1331s3 ` @0 Rhj?~Q|W/W^w},zE 0ggGgC`p`psO @10π*:+nO:;+n*w  ,n DCCCCaxCx<<<~ CAC033 ` TTUU15UUQsT5y,0U U `@`s|fffaaaL L300Ï* ** !J`**~R ?X*T@@@`pxy16801LMLxq]*%(,}7 `. **:" ```@@@ ``@psLb */>mX!8}=>nb{(b:09* ggcqpOfϏM]UUUM]MU^\gm~)j/WWV p|OC@@aaaaa0}]*Rr " ~kV OUPB[ "gqs?~ ǁ(?(*++=l}+-*20*$(000``` @```assAs@|`a` cx=uu]]P]}W[!0*  UTL a`ay000`+kWVS]A2`VR2 LxL$6:8PPP@@@g`Ccps000ϗEPx{O*~joX*-mhK8D oC[oGS6rSS666111333p|OC@@`pxg | 000 PUptv^QxpWP_E@]=HP000```@@@ 0F* +~_eR4GM!Fc0\v( Q8mL@ C`<aaaa~ | 0`1UU\jb^r2!RMj,g#W+g //+333UU}TU3*"* ***V ~_|@@@p>y3p3AAA,``@`p@s aa DT@C@x@CayaagfCC  @} (J* cqspssspOcffCO/QE@k>Q UDRT 000CscCCCCC ((**X*(*Tlj* qymgcgGUUEp%U;hC}*! @saCC P,+UPVTV{zP]PUe`UHP000```@@@qymgcag```gc *(()**bj*+&b(jb`*:**?TUUBALYING option.":WIND,20,60,264,108:150:1500:"There are three numbers in boxes at the bottom of the screen.":400:30000:150$"("Choose one number and type it into the first space.":S$"X":200:X125:Y115:PAUSE,5:600:30000:150:"Choose another nuA6:800:30000:150 ("Type the last number into the last space.":X195:Y115:700:30000:150:"To solve the problem, add the first two numbers and subtract the third one.":A8:X237:Y115:800:30000:10510!(WIND:CO,0,30:"How to play the MULTIPm of the screen."&(400:30000:150("Choose one number and type it into the first space.":S$"+":200:CO,180,115:"-":CO,215,115:"=":X230:500:X125:Y115:600:30000:150 ("Choose another number and type it into the MOVE box.":X158:Y115:re you press RETURN, you can change your choices by using the left arrow key.":PAUSE,5:BOX,195,115,205,124,4:PAUSE,5:30000:10510(CO,0,30:"How to play the":"ADDING & SUBTRACTING option.":150:1500:"There are three numbers in boxes at the botto30000wn(170:"Solve the subtraction problem, type in your answer and press RETURN.":X195:Y115:A2:800:30000:150o("If you answer the problem correctly, the robot will move the number of spaces you typed into the MOVE box."x(30000:170:"BefoO:"How to play the SUBTRACTING option.":WIND,20,60,270,180:170:1510:"From the three numbers in the boxes at the bottom of the screen, choose one and type it into the box marked MOVE."e(400:S$"-":200:CO,125,115:N%(0):X158:Y115:PAUSE,5:700:150P("Add the two numbers you have chosen, type in your answer, and press RETURN.":X195:Y115:A6:800:30000:150:"If you have answered correctly, your robot will move the number of spaces you have chosen."Z(30000:10510d(WIND,0,30,279,50:Cre are three numbers in boxes at the bottom of the screen.":400:30000:150<("Choose one number and type it into the first space.":S$"+":200:X125:Y115:600:30000:150:"Choose another number and type it into the MOVE box.":X158:700F(30000:e number of spaces you have chosen.":30000:150(("Before you press RETURN, you can change your choices by using the left arrow key.":PAUSE,8:BOX,152,112,170,125,4:PAUSE,5:30000:10510L2(CO,0,30:"How to play the ADDING option.":150:1500:"The":WIND,20,60,264,93:150:1500:"Look at the three numbers at the bottom of the screen.":400:30000:150("Choose one of those numbers, type it into the MOVE box, and press RETURN.":300:X159:Y116:A6:800:30000:1500("Watch your robot move thth Tactics"CC$W'CO,10,70:P$(LL)", do you want":CO,10,80:"instructions? ";:36000i'Z$"N"10510(CL$:VSP,2:WIND,20,60,264,93::(902LL)10250,10290,10340,10370,10400,10440,10470j (WIND,0,30,279,50:CO:"How to play the COUNTING option. HpƝo) 5po9zp Ъ BpLo ` ֩PyQ AL 5pzpKp`-p,p p,p-p` ~LpH)hJJJKp`LANCS AZ09!/:@[`{~ @BOHOOUNHOOCECRDFAFPARSNOJUSJUSCNNOCNGCDVSHS0OL15:CO,X1,Y:"+":CO,X2,Y:" ":PLAY,30,30,SO30:CO,X1,Y:" ":CO,X2,Y:",":PLAY,40,30,SO30:L:ZR(10)1:FI((Z2)Z2):FI202600OCO,X1,Y:"+":CO,X2,Y:" ":202700$OCO,X1,Y:" ":CO,X2,Y:","1.OAFT,0:CO,1,154:P$(FI)" goes first."C(0)CC$:AFT,4:CO,21,90:")*"CC$z/NAFT,0:WIND,170,90,257,125:CO,170,108:P$(1)CC$:AFT,5:CO,170,90:")*"CC$CO$:WIND/OAFT,6:CN$:CO,127,90:"#$%&":CO,127,104:"'()*":X1121:X2151:Y97/ O5:YY10:YC135:XA6:YA10:950:YY138:YC175:6:950V.FNT"A7:DFT,7,A7i.)24576:20200:939,FI:WIND:CL$CN$:CO,0,89:"One moment please...":RNH,"PATH2".N"WHO STARTS FIRST /NAFT,0:CL$CN$:WIND,25,50,254,191:CO:"Robby the Random Robot will decide who starts.":WIND,21,90,108,125:CO,21,108:P$AT.FNT"A1:DFT,1,A1l-)L01:NAL,(P$(L)):L11(P$(L)):NA1L1(L)(NAL1),((P$(L),L1,1)):L1:L.)PF$"PLAYER.FNT"(PE(0)):RFL,PF$A4:DFT,4,A4:PF$"PLAYER.FNT"(PE(1)):RFL,PF$A5:DFT,5,A5:RFL,"ROBBY.FNT"A6:DFT,6,A6:RFL,"BALL AND DIthe robots as the spaces are counted slowly.":WIND::" 2. "CA$;:GCP,ZX,ZY:WIND,ZX,ZY,279,191:"See the spaces counted quickly.":WIND::"Which number? ";,|)INP,(1,"12"),Z$:938,(Z$)1,)WIND:CL$:CO,0,89:"One moment please..."-)RFL,"LILF(PE(0))10590+h)PE(1)(ZA$)<+r)(902)4(903)410623+s)WIND:CL$:"In options 4, 5, 6, and 7, you can choose how the spaces will be counted for both players."::"You may:"::" 1. "CA$;:GCP,ZX,ZY:WIND,ZX,ZY,279,191,w)"watch the motion of Y8*6)CO,ZX,ZY:INP,(1,"-17",1),ZA$:(ZA$)PE(0)10550L*@)PE(L)(ZA$):Lb*J)P$(1)RO$10610*O)BOX,(PE(0)1)3625,75,(PE(0)1)3642,105*T)BOX:CO:"Which robot should the computer use? "CA$;:GCP,ZX,ZY+^)CO,ZX,ZY:INP,(1,"-17",1),ZA$:ZA$4"CC$CA$:AFT,0:L17:CO,(L1)3630,97:L:L:5:Y172:Y2110:1000),)Y1112:Y2150:1:1000:WIND,25,120,254,145:L0(P$(1)RO$):BOX:CO)-)L1įBOX,(PE(0)1)3625,75,(PE(0)1)3642,105*.)P$(L)", which robot":"will you take? "CA$;:GCP,ZX,Zur robot backward.":30000:10510/()WIND:LLA()SELECT ROBOT(")CL$:Y130:Y270:YA8:XA6:6:1000:WIND,25,35,250,75:CO,25,40:"To play this game you will need one of these robots.":WINDE)')AFT,4:CO,1,75:"'( )* +, -. /0 12 3ion.":30000:BOX:CO'(:"If you answer the problem correctly, your robot will move forward or backward the number of spaces shown in the MOVE box.":30000:BOX:CO!():"A positive answer will move your robot forward. A negative answer will move yoive results allowed)":5:Y158:Y2132:XA8:YA10:1000:WIND,20,60,265,130&(BOX:CO::"The rules for this level are much the same as those of the other levels."'(30000:BOX:CO::"However, this level allows you to move your robot in either directspaces you typed into the MOVE box."%(30000:170:"Before you press RETURN, you can change your choices by using the left arrow key.":PAUSE,10:BOX,195,115,205,124,4:30000:10510J&(WIND,0,30,279,70:CO:"How to play the SUBTRACTING option. (Negat00:S$"":215:900:CO,125,115:N%(0):X158:Y115:PAUSE,5:700:30000:170$%("Solve the DIVISION problem, type in your answer, and press RETURN.":A2:X195:Y115:800:30000:170:"If you answer the problem correctly, the robot will move the number of of spaces you have chosen.".#(30000:10510#(WIND:CO,0,30:"How to play the DIVIDING option.":WIND,20,60,264,108:170:1510:"From the three numbers in the boxes at the bottom of the screen, choose one and type it into the box marked MOVE."K$(4mber and type it into the MOVE box."E"(X158:Y115:700:30000:150#("Multiply the two numbers you have chosen, type in your answer, and press RETURN.":X195:Y115:A8:800:30000:150:"If you have answered correctly, your robot will move the numberD83fLP@@w}?o{~_w}?o{~_@;fpD8sO*eyD|k_j**@/_* <@b(  0U-5+m*[jVZU6U-5+ "\ժ|?o{ T;@@pbL3b@@U6U-5+m*[jVZU6U-5+m*[jVZU@w@b|~_w@* nLg3@@*)"d@Uj ( p+}j @#Dh(e ( 0U-5+m*[jVZU6U-5+ qժ,5+m*[jtPPD8A3~LAP@@U6U-5+m*[jVZU6U-5+m*[jVZU@U6U@: VZU6UPP P83~L@P*'DZ >Uz  |*uap b ~= ( 0@0U-5+m*[jVZU6U-5+ "\Њ,5+m*[jD@*x0x0x| x0`0````0``0``v000x0x0xx0000 0``0 0x`0x |||| ||x|8l````|| x````8p`````lxx|| |x ````l8|x 0```xxxx| ```0``0`00`x000||0xxx||````` xxxxlxx x000000xSPACCEPAUSCWININjbmomfj>kakkkkkkkdkk lmLmmm n`lllll~~~0` pvv0`0``0`000`~<~0000`` 0`xx0p0000xx 8` 8 x8x x<` PP 0 PP x 0\,`@`Р@@0 `` $$$0@@@@ 0$<@H@L  D$0Hd@0D<$p `|||8||t9"  ,$,, 8`А@` pTTpxxxxphp|, | @88 4 4 <̰pp 4$ pp` @ (xpXDTL|<|DpP?2T _~bN3@"@.B@nq|?(Ug"D_*}z*U*~Wjh>Dh 0U-5+m*[jVZU6U-5+ qժ(xTnPP~|, $<@H@L  D$0Hd@0D<$p `|||8|| ``  5Z$"y"Z$"Y"5r5@"Counting","Adding","Subtracting","Adding and Subtracting","Multiplying","Dividing" 5J"Subtracting (negative results allowed)"2ting (negative results allowed)" | @(t.*  P `0` 8(|0`АЀ(| ` 0 P 0,$,p x 0\,`@`Р@@0 | 0\,@`Р@ | 0\,@`Р@ | 0\@`  ,60,32,60,30,60Z,60,30,60Z4fNL110120:BO%(L)2:4NCO,14,16:" #$#$":L01:AFT,4L:ZPPP(L):300:CO,ZX1,ZY15:")*":L:4LONAMES, P TYPES FROM MEMORY5VOFI(939):L01:P(NAL):L11P:P$(L)P$(L)((L11NAL(NAL1))):L1:":WIND,14,1,279,191:CE$%34NL1183>NZPR(20)20(((L11)2)1)1:TE((L11)2)20ZP:TE1TE4TE19TE0BO%(ZP)0200303CNBO%(ZP)1:300:PLAY,R(50)1,10,SO32:CO,ZX,ZY:"%&"3HNT(T):L13RNZL12:BC(ZL)4R(2)R(2)1:ZL#4\NBC(1)072~'PP(FI)1ZPPP(FI):BO%(ZP)1Z1FI:700:10110P2'PP(FI)PP(FI)İ8002'AFT,1:CN$:BOX,TX1,TY6,TX11,TY11,0:PP(FI)101204002'FIFI:BOX,90,1,250,22,0:100122 N "BOARD GENERATOR2*NAFT,3:CL$CN$:T13/N::DUN,"GAME BOARD.PAKd 0 d0t.*     <$ @@ <$ @@@ @  @@d PP 0 PP d PP 0 PP d PP 0 PP d P0 P  'ETZQPP(FI):Z1FI:Z2(MS0):Z30:4001j'(PP(FI)ZOZOMS0)(PP(FI)ZOZO(MS0))(PP(FI)1MS0PP(FI)0)Z1FI:Z20:ZO0:6001o'PP(FI)101PP(FI)0LCH1t'LCH100402y'ZPPP(FI):300:AFT,4FI:CO,ZX1,ZY15:")*":DUįPLAY,20,6,SO3$0='MSWR(PP(FI)0(MS0))10115=0?'DUİ750:LCH:10090e0B'OPZ1FI:Z21:600:ZOPP(FI)2MS0L'ETZQPP(FI):Z1FI:Z2(MS0):Z31:4000V'Z1FI:ZPPP(FI)MS:300:AFT,1:BOX,TX1,TY6,TX11,TY11,0:CO,ZX5(MS0)4,ZY6:L:TXZX:TYZY:500(1`PP(FI):300:CO,ZX1,ZY15:")*")/$'WR0o/.'ZI$"":PK(FI)PK(FI)1:PC(FI)4000,4100,4200,4300,4400,4500,4600/0'P$(FI)RO$İ30000/3'MS(CH0)(CH0):L0/8'LLMS:OP(PP(FI)MSPP(FI)):ET(PP(FI)(MS0)(EN(PP(FI)(MS0))1))/;'WRZ1FI:2200TX50:TY0:AFT,0:CO,90,14:P$(FI)"'s "CA$;:GCP,ZX,ZY:AFT,4FI:CO,ZX,ZY5:")*":AFT,0:CO,ZX17,ZY:"turn".'BOX,0,148,230,184,0:BOX,230,148,250,172,0:PP(FI)110020. 'MS1:PP(FI)MSPP(FI)Z1FI:Z21:600:ZOPP(FI)2MS /"'Z1FI:500:ZP5:CO,X(2),Y:R1(C2):PAUSE,5:CO,X(3),Y:R(CH):CHR(CH):(17):4660- 2000:((A$(1))(A$(2)))(A$(3))CH(A$(3)):4660-*WR1:HW(A$(1))(A$(2)):HBW$(HW):AE$A$(3)-4-'MAIN PROGRAM-'24576-'20300:PP(FI)0:PP(FI)1:20000o.'40:,L13:R1(L)R(L):L:ZD1:L13:L113:LL14633\,R(2LZD)R1(L)R1(L1):ZDZD,L1:L:Z16:1000:C1((CH1)2):C2((CH2)(CH2)):C2(C1C21)(C11)(C1(C2C2))(C12)(C11C2)(C13)E-(16(BC(1)4)):CO,X(1),Y:R1(C1):PAUSE,0140,170:AFT,0:CO,148,160:"-":CO,177,160:"=":161,170170,170+ Z11:B1191:B2221:B3157:B4170:200:CO$:CO,190,174:"MOVE"CN$,LL3:X(1)133:X(2)163:X(3)195:XEX(3):Y160:LE(1)1:LE(2)1:LE(3)2:MI1:VF(1)1:VF(2)1:VF(3)0:P$(FI)RO$4650*Z13:1000d*(16BC(1)4):CHR(CH):CO,X(1),Y:CH:PAUSE,5:CO,X(2),Y:R1CH:(17):4570*2000:(R1(A$(1)))A$(2)CH(A$(1)):4570*WR1:HWR1(A$(1)):HBW$(HW):AE$A$(2)**SUBTRACTION 2C+RP0:ZA0:ZD0:3000:3:131,17R110įCO,119,160\)R1:CO,130,156:AFT,7:")*":AFT,0:CO,179,160:"=":193,170216,170)Z11:B1151:B2169:B3157:B4170:200:CO$:CO,144,174:"MOVE"CN$*MI0:LL2:X(1)157:X(2)194:XEX(2):Y160:LE(1)1:LE(2)2:VF(1)1:VF(2)0:P$(FI)RO$45(A$(1))(A$(2)))(A$(3))CH(A$(2)):4460`(bWR1:HW(A$(1))(A$(2)):HBW$(HW):AE$A$(3)f(lv( "DIVISION(R(1)R(9)1:R(2)R(R(1))1:R(3)(R(1)R(2)):R(1)R(2)R(2)R(3)4510(R1R(1)R(2)R(3):3100:3030)3:AFT,0:CO,111,160:94:XEX(3):Y160:LE(1)1:LE(2)1:LE(3)2:VF(1)1:VF(2)1:VF(3)0:P$(FI)RO$4440a'PZ13:1000|'RARR(3)1:ARCH4434'T(16BC(1)4):CO,X(1),Y:R(AR):PAUSE,5:CO,X(2),Y:R(CH):PAUSE,5:CO,X(3),Y:R(AR)R(CH):CHR(CH):(17):4460-(X2000:(W$(HW):AE$A$(4)&,&0MULTIPLICATION&:MI0:LL3:RP1:ZA1:ZD1:3000:3:119,170128,170:AFT,0:CO,137,160:"X":CO,179,160:"=":193,170216,170&DZ11:B1151:B2169:B3157:B4170:200:CO$:CO,145,174:"MOVE"CN$R'NX(1)121:X(2)157:X(3)1(16BC(1)4):CO,X(1),Y:R(AR):PAUSE,5:CO,X(2),Y:R(CH):PAUSE,5:CO,X(3),Y:R(L2):PAUSE,5:CO,X(4),Y:R(AR)R(CH)R(L2):CHR(CH):(17):4360%2000:((A$(1))(A$(2))(A$(3)))(A$(4))CH(A$(2)):4360&WR1:HW(A$(1))(A$(2))(A$(3)):HBpXDTpPpXpt.*<<<HHH <<<$H <ʱD>` <=<ȥ?< <<= t s 8t 8ȱ>? !:p";"><"? !%p !g^h_^`ȱ^Șe^^_iȑ^^_1"0"/"@A +"  " `@ i @ ȱ "`,!` {ݩ " " ="eD3"E4"B7"C8"@9"A:">;"?<" ! u )! e,L׭s n t o Xs t LXLXs t !$)!;"><"? !p! G 8`Lj!g8hegiȱehj8ȱLs t s ȱ   8L8888Lpt.* @@@D| 0< 8x@H@$4D<px4,H 0`pp 4$ pp` @ (x8L8 88`@ 8L8 88`@8L888 RP)R(1)R(2)R(3)0R(ZL)R(10ZA)ZD:3015V ZL13:3200:ZI$ZI$(R(ZL)):ZL:h NUMBER MIXER& LR(3)1:L1R(3)1:LL131100 BR(L):R(L)R(L1):R(L1)B: PRINT NUMBERS  AFT,0:CO,ZL24,160:R(ZL):B1ZL243:B2B112:B3157:B416ZZ12827Z9Z91:Z9231000H16368,0:ZZ12832ZZ128132231VZ20:600HBW$"":AFT,4FI:CN$:BOX,0,184,279,191,0: GENERAL PROBLEM GENERATOR ZL13:R(ZL)R(10ZA)ZD:ZL- ZL((R(1)R(2))(R(1)R(3)))2(R(2)R(3)):ZL(8:2030z2040$ WRONG ANSWERGZ21:600:BOX,0,184,279,191,0cWIND,0,184,279,191:COAFT,0:CN$:CO,0,184:"The answer is "HBW$". Press Space Bar."CC$3:XE(AE$)8,Y1XE,Y916368,0:Z90ZZ(16384):ZZ1282231):CO,X,Y:" ":(((A$(L1))1)(LE(L1)2)A$(L1)"")(LL1)A$(L1)"":L11L1L11a(A$(L1))1A$(L1)(A$(L1),1):CO,X,Y:(127)" ":2040cVF(L1)02020fZI$ZI$A$(L1):2020pVF(L1)A$(L1)""A$(L1)"-":CO,X,Y:" ":CO,X,Y:"-":XX(P):(A$(L1))LE(L1)L1(L11)(L1LL)LL(L1LL):Z1j/L1LL(A$(L1))LE(L1)įCO,X8,Y:(127):2040v1Z20204XX8:2030>(L1LL)(A$(L1)"")2040RCO,X8(((A$(L1))1)(LL1)),Y:" "(17):U\BOX,X,Y,X7(1(LL1)),Y8,4(BC(1)4(0):TV0:P(5)128:G(P)2040,2045,2110,2140,2160N(A$(L1))LE(L1)2040uA$(L1)A$(L1)(P):(VF(L1))2090 ZT$"":L21(ZI$):A$(L1)(ZI$,L2,1)TVTV1:2080ZT$ZT$(ZI$,L2,1) L2:ZI$ZT$:TVA$(L1)"":20406*Z0:CO,X,Y:T2((LE(T2)20)T21)2T2:1040VD(ZL)T1T2:ZL:CH1:ZL1Z1:D(CH)D(ZL)CHZL`$ZL:sINPUT ROUTINEAFT,0:L114:A$(L1)"":L1:L11:(16(BC(1)4))XX(L1):BOX,X,Y,XLE(L1)7,Y8,4(BC(1)4):A$(L1)""CO,X,Y:(127)3PXA,YCXXXA,YCXXXA,YCYAXX,YCYAXX,YYYAXXXA,YYYA?EYSMART COMPUTERZL1Z1:T1PP(FI)R(ZL):T1(T10)T1(T10):T2PP(FI)BO%(T1)1T1((LE(T1)20)T11)2T1:1020T1T2T2T210!T2T2(T20)(T20):BO%(T2)110CTL:Z20:600.HZPPP(Z1):ZP0860QRZPPP(Z1):BO%(ZP)1İ700:850\\ZO0:qDO COLOR BORDERXX0:XC277L01YYYYL:YCYCL:XXXXL:XCXCL9XXXA,YYYAXXXA,YYXCXA,YYXCXA,YYYAXC,YYYAXC,YCYAXCXA,YCYAXC1FI:Z21:600 $ BUMP BACK*Z1FI:TL110:PLAY,3,1,SO34:PLAY,10,4,SO3:PLAY,5,2,SO10:Z$"#$":ZPPP(Z1):ZP1813+BO%(ZP)1Z$"%&"-300:CO,ZX,ZY:AFT,3:Z$:ZPPP(Z1)1:300:CO,ZX,ZY:"34">PP(Z1)PP(Z1)1:PP(Z1)0ZETLPLAY,30,6,30SO:ZPP(FI):PP(FI)PP(FI)CH:PP(FI)1PP(FI)1ZPP(FI)101PP(FI)101CO1:LZ(MS)PP(FI)MS:ZPL:300:AFT,1:BOX,TX1,TY6,TX11,TY11,0:CO,ZX5(MS0)4,ZY6:MSCO:TXZX:TYZY:PLAY,10,2,30SO:COCO1:PP(FI)PP(FI)Z፠Íōō 4 4t.* <    < 4 < 4   <  4 4 <Ȱ 4 4 Ȱ 4 4Ȱ 4 4Ȱ z #? " ӠŶ Ӡŷ ȮʠĠ3Ơ ԠҮŮ ̮Ԡ ŮԠӠűӠŲ Ӡų ӠŴ! Ӡŵ ҮԶ ҮԵ ҮԷ ٮԠ ԮԠ ŠĮˠҮԠ ĮԠ Ƞ̠Π"!ɠĮԠ"ҮԱҮԲҮԳҮԴ " Ȳ4Ƞ/ήΠӠԠ̮ʠ Ԯʠ̠Ġ֮ԠȠӠϠՠԠԠӠӠΠϠ pqER{C[{RER{C[{RERxCXxE=BlmACjkCjkCjEL ^X|F,<0p@@\@p||p@|F,<0p@@\@p||p@|F,<0p@@\@p||p@MoaglgXJuwv~xxX`AaAAAJuwv~xxX`AaAAAJuwv~xxX`AaAAMAHACURCURCURCURCUA}C-}R}C-}R}C-}R}C-}R}C-}A?C5?R?C5?R?C5?R?C5?R?C5?AC+RC+RC+RC+RC+AoCmoRoCmoRoCmoRoCmoRoCmo^D`qC*RC*RC*RC*RC*^w`c`RC*A{C[{R{C[{R{C[{R{C[{R{C[{ACjRCjRCjRCjRCjA~CV~R~CV~R~CV~R~CV~R~CV~A_CZ_R_CZ_R_CZ_R_CZ_R_CZ_ACURCURCURCURCUAwC6wRwC6wRwC6wRwC6wRwC6wC6wRwC6wRwC6wACURCURCURCURCUA}C-}R}C-}R}C-}R}C-}R}C-}A?C5?R?C5?R?C5?R?C5?R?C5?AC+RC+RC+RC+RC+AoCmoRoCmoRoCmoRoCmoRoCmoAC*RC*RC*RC*C*RC*RC*RC*A{C[{R{C[{R{C[{R{C[{R{C[{ACjRCjRCjRCjRCjA~CV~R~CV~R~CV~R~CV~R~CV~A_CZ_R_CZ_R_CZ_R_CZ_R_CZ_ACURCURCURCURCUAwC6wRwC6wRwwC6wRwC6wRwC6wRwC6w|CURCURCURCURCURCU|ER}C-}R}C-}R}C-}R}C-}R}C-}A?C5?R?C5?R?C5?R?C5?R?C5?AC+RC+RC+RC+RC+AoCmoRoCmoRoCmoRoCmoRoCmoAC*R@E+Ak{;?RACAA@AH+Ak{;?XACAA@AH+Ak{;?XACAA@tCVF\F\A~CV~k~CV~k~CV~|E@R_CZ_RE@R_CZ_RE@R_CZ_|CURCURCURCURCURCU|wC6wRwC6wR   }P(X)(X)(X1)2563 }CS(P(P(999))1)16G }CS1CS7CS6O (}CSU 2} 2} CS6m (}CSs 2} 1CS7CS6 (}CS 2} 06299,0:16302,0) 8192,"PATHUTIL.OBJ"? $RFL,"PPRINT.OBJ"U .RFL,"OPTION.BIN"b 8975,255t RNH,"MENU": (978)157ı ::12:"PATH TACTICS NEEDS AT LEAST 48K TO RUN." 16384,128:16368,0 }PROCESS ERROR BY REBOOT }: W Path Tactics'PROGRAM: HELLOECOPYRIGHT (C) MECC, 1984d(LAST UPDATE: 84/11/02 SPMvMAIN PROGRAM32000D$(13)(4)(64435)6ĺ(21)::3000D$"BLOADRNH.OBJ" 230,64:8192,"LOGO":16304,0:16297,0:1  16368,0:GCP,ZX,ZY:WIND,ZX,ZY,ZX20,ZY10Q2#"":CO,ZX,ZY:9100:AZ:A19070i<#A49A(48N)9010|F#(A);"";CA$;P#9100:Z139070Z#Z8Z127įCO,ZX,ZY:CEL:9010d#9040n#AA48:A1A0x#XX(XX)::&#ZL11:XXXX1:Z(1ESC SCREEN5VSP,4:CL$"Use of ESC Key"CC$::::"You may want to quit in the middle of a program. If so, press the ESC (escape) key twice whenever the computer is waiting for you to type."WIND:VSP:30000:(#INPUT ROUTINE*-#CA$;:player to bump another player back or drop through a trapdoor to get ahead."::"The program includes animated step-by-step instructions. And, two winners' lists record the success of the top "; "ten players in each math level.":30000:CL$ ESC mbers. They can control the actions of their robot by skillfully using these three numbers. Each player tries to outsmart the other player to reach the finish ";"first and become the Path Master.":30000:CO,X1,Y1:CEW"Game strategy allows a gative answers allowed).230000:CO,X1,Y1:CEW"Children can play against a friend or against the computer. Children can each choose a different level of play and still compete equally.":"At all levels, children are given a set of three nuayers' abilities to use basic math operations and also challenges their problem-solving skills.:"The Path Tactics game has seven levels of play. Children can choose from Counting, Adding, Subtracting, Multiplying, Dividing, and Subtracting (with ne2L,183L269,183L:4XGENERAL INFORMATIONTbCL$TI$CC$:PA$""ĺPA$CC$olVE$CC$:::GCP,X1,Y1SHOW DESCRIPTIONS_"Path Tactics, a math game for children ages 5 to 12, is designed to reinforce basic math skills. The game tests pl,Y1LX2DXL,Y1LX2DXL,Y1DYLX2L,Y1DYLX2L,Y2DYLX2DXL,Y2DYLX2DXL,Y2LX1DXL,Y2LX1DXL,Y2DYLX1L,Y2DYLX1L,Y1DYLX1DXL,Y1DYLX1DXL,Y1L:1:L02:9,6L432L,6L:2352L,6L269,6L:9,183L392L,183L:239T #CS1CS7CS6CS%6pDRAW BORDERJz4:21,021,1911:9,69,33:11,611,32:9,1589,185:11,15911,185:267,6267,32:269,6269,33:267,159267,185:269,158269,1856:X10:Y10:X2278:Y2191:DX18:DY12:L02X1DXL(A) RUN THE PROGRAMC XX(P(78)):SEED RANDOM # GENERATOR| CL$:HSP:VSP:CO,0,89:"Getting "F1$"...":RNH,F2$  END OPTION CL$:CO,0,89:"Insert another diskette."CC$ 30000:CL$:UNHOOK::CS(P(P(999))1)16: SLOmber? ";:9000::WIND. AS(1)İ7000:2000r AS(2)A0F1$"the management options":F2$"MANAGEMENT":4000 AS(5)Ĺ975,((975)):CL$:CO,0,89:"The sound is now turned "SB$(((975)))"."CC$:30000:2000 AS(6)5000  F1$MN$(A):F2$CN$:4(N9):S(1)N:N". General Information"Z NN1:4(N9):S(2)N:N". Program Manager" >NN1:4(N9):S(5)N:N". Turn sound ";:SB$(0)"on":SB$(1)"off":SB$((975)) HNN1:4(N9):S(6)N:N". End" RESPOND TO USER'S CHOICE :"Which nu975)255Č24768:975,1R 230,64:24576:DFT,1,29952:AFT,1:CO$:HSP:VSP:WIND CL$:6000:CO,0,MT:CN$TI$CC$:PA$""ĺPA$CC$ CO$:GCP,ZX,ZY:WIND,ML,ZY,270:CO:"Programs:": L1NP:4(L9):L". "MN$(L):: "Options:":* NNP1(14):CO$(15) MT13:ML37; P(S)(S)(S1)256V RFL,"TITLE.PFT"29952n LPROGRAMMER OPTIONS VNP3:# OF PROGRAMS `TI$"Path Tactics":PA$"":VE$"* * * * *" jMN$(NP),CN$(NP) tL1NP:MN$(L),CN$(L): DISPLAY MENU ( Path Tactics&PROGRAM: MENUCPROGRAMMER: P. BOUCHARDa(COPYRIGHT (C) MECC, 19842LAST UPDATE: 84/11/07 CWCINITIALIZATION32000(13)(4)"MAXFILES1"16384 CA$(1):CC$(3):D$(13)(4):CH$(8):CL$(12):CN$       ildren choose the operation Dren choose the operation  "n"Z$"y"36020LZ$"n"Z$"N"_Z$"y"Z$"Y"e@Counting Only,Adding Only,Subtracting Only,Adding and Subtracting Only,Multiplying Only,Dividing OnlyJSubtracting (neg. results allowed) Only,Ch),Z$:Z$(Z$,1):Z$"Y"Z$"N"Z$"n"Z$"y"36020IZ$"n"Z$"N"\Z$"y"Z$"Y"b@Counting Only,Adding Only,Subtracting Only,Adding and Subtracting Only,Multiplying Only,Dividing OnlyJSubtracting (neg. results allowed) Only,Child60%n} PROCESS BASIC ERROR (HI-RES)9x}(12):CO,0,89g}"Error "ZE" at line "ZN" in MANAGEMENT."}:"Please report this error to MECC."}30000:31000 STANDARD YES-NO INPUT(1);:GCP,ZX,ZY6CO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1ESSING FLAG (FOR DOS ERRORS)S(} USERS ENTRY POINT (WHERE THE USER JUMPS BACK TO)g2}(12):CO,0,89F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160006yZ$"Y"ĬU@y(12):CO,0,89:"Getting the main menu...":SET,0:RNH,"MENU"k}ERROR PROCESSING }ZE(222):ZN(218)(219)256:216,0:32000 }WIND:VSP,1}ZE255Č54915:31000}(15):ZE1532110}ZUĦ: ZU IS THE USER PROCD$"WRITEWINNERS FILE"L",R"L1",B13":SC:L1:D$"CLOSE":LL 216,0:32000V 2000\N0uSTANDARD SPACE BAR ROUTINE (HI-RES):uCA$:AFT,1:SPACE::y"ENDING ROUTINE"yVSP,1:WIND:CL$CO$:CO,0,89:"Do you want to try again? "CA$;,y30 Z$"N"ī2000C CL$:9:"Erasing the list...":NA$" ":SC0U 216,0:222,0 ZE(222):ZE0ZE77ZE25532000 2::D$"CLOSE" 3040 L17 D$"OPENWINNERS FILE"L",L20"9 L1111:D$"WRITEWINNERS FILE"L",R"L1",B0":NA$:P,ZX,ZYA \CO,ZX,ZY:INP,(1,"-19",1),Z$:(Z$)9(Z$)OPī2000T _(Z$)OP2140a aOP(Z$) f901,(Z$):CL$:D$"BSAVE OPTION.BIN,A900,L2":2000 "WINNERS LIST DELETE CL$:9:"Do you really want to erase":"the winners' lists? "CA$;:3600ich one of the following options do you want?":U HWIND,14,45,279,185:CO:L19:f JL")":L7ĺl K MWIND,33,45,279,185:CO:L18:OP$(L)" ";:L8ĺ N P"Return to Program Management menu RWIND:CO,1,180:"Which number? ";CA$;:GCinners' lists":CO,20:"3) Return to the main menu"::"Which number? "CA$;:GCP,ZX,ZY CO,ZX,ZY:INP,(1,"123",1),Z$:(Z$)2100,3000,31040 4DISPLAY AND SELECT NEW OPTION0 >CL$"The diskette is currently set at option #";:DB:GCP,X1,Y1:OP". Whn also allows you to erase the names from the winners' lists."I (30000\ "MAIN PROGRAM VSP,3:CL$"Program Management"CC$:: :"Do you want to:"CA$::GCP,ZX,ZYV CO,20:"1) Set the level":CO,20:"2) Erase the names from the":CO,42:"w(OP)OP8 VSP,3:CL$"Program Management"CC$:::"This option allows you to select the level you want children to use. ":> "If you do not select a particular level, the players will be able to select any operation from the menu."::"This optio  PROGRAM:MANAGEMENT2COPYRIGHT MECC 1984ZPROGRAMMER: FREDERICK J. STEINMANNx(LAST UPDATE:84/11/07 SPM-3200022457616384OP$(8):D$(4):CA$(1):CC$(3):CL$(12):CN$(14):CO$(15) L18:OP$(L):L:OP(901):     0:X10:Y1ZY6:ZP97:300:X2ZX11:Y2ZY8:BOX,X1,Y1,X2,Y2,0T7#0:4,Y1210,Y12<#Z13:B1X11:B2X22:B3Y1:B4Y2:200:WIND,X19,Y110,X212,Y210:CO:VSP,4,2 F#1000:AFT,0:CO:"There are three numbers in boxes at the bottom of the screen.":200:ZL:AFT,0oZ12:B1191:B2213:B3157:B4170:200:CO$:CO,90,160:"Which number":CO,187,174:"MOVE"CN$u(#"REAL MAIN PROGRAM-#24576:AFT,0,0=2#BC(3)2:XL198:YL160:FI0:PP(FI)0:PP(FI)1:P$(0)"John":P$(1)"Patty":20000:ZP41:30:-L"READ A SET OF NUMBERS AND THE CHOICECVL14:R(L):L:T"BOX WINDOWuBOX,X13,Y11,X24,Y21,0: "PRINT NUMBERS AFT,0:CO,ZL24,160:R(ZL):B1ZL243:B2B112:B3157:B4169:Z11:200:"COUNTING GENERATIONZL13:3ZETL10CTL:Z20:6003HZPPP(Z1):ZP0860zRZPPP(Z1):ZPHO(2(LE(ZP)1)1)ZPHO(2(LE(ZP)1)2)İ700:850\ZO0:"WHO'S TURN?AFT,0:CO,90,14:P$(FI)"'s "CA$;:GCP,ZX,ZY:AFT,4FI:CO,ZX,ZY5:")*":AFT,0:CO,ZX17,ZY:"turn" BACKf*Z1FI:TL110:PLAY,3,1,SO34:PLAY,10,4,SO3:PLAY,5,2,SO10:Z$"#$":ZPPP(Z1):ZP1813+ZPHO(2(LE(ZP)1)1)ZPHO(2(LE(ZP)1)2)Z$"%&"-300:CO,ZX,ZY:AFT,3:Z$:ZPPP(Z1)1:300:CO,ZX,ZY:"34">PP(Z1)PP(Z1)1:PP(Z1)00:AFT,3:CO,ZX,ZY:" ":CO,ZX6,ZY:" ":AFT,4Z1:ZL125:PLAY,(25ZL)2,1,SO6CO,ZX1,ZYZL15:")*":ZL:AFT,3:CO,ZX,ZY:"%&":PP(Z1)((LE(PP(Z1))20)PP(Z1)1)2PP(Z1)PP(Z1)PP(Z1)ZPPP(Z1):300:AFT,3:CO,ZX,ZY:"34" "BUMP241:PLAY,ZL3,6,SO30Tq(LC);(LC1):ZL:Z2įCO,ZX1,ZY15:" ":Z$"34":640ovZ$"#$":PP(Z1)0640{(PP(Z1)HO(2(LE(PP(Z1))1)1))(PP(Z1)HO(2(LE(PP(Z1))1)2))Z$"%&"AFT,3:CO,ZX,ZY:Z$:"FALLING BODIESRZPPP(Z1):30PLAY,4Z19,1,SO4:PLAY,20Z117,2,SO4:CO,ZLST,Y1:Z$(1):PLAY,107Z1,1,SO10:PLAY,810Z1,5,SO2:ZL:CO,ZL,Y1:Z$(0):X"SINK OR RAISE PLAYERbAFT,4Z1:L15(Z2):L25Z2:STZ2Z2:ZPPP(Z1):300lZLL1L2ST:CO,ZX1,ZY15:LCZL300:TDLD:L1ZX:YZY14:PP(Z1)PP(Z1)MS:ZPPP(Z1):300:L2ZX:(MS0(ET))TDTDi(MS0)ETYZY14Z$(0)(334(TD))(344(TD)):Z$(1)(354(TD))(364(TD))ST((L1L2)(L1L2)):ZLL1TDL22ST(ST1)ST2:CO,ZL,Y1:Z$(0):CO,ZXEV,ZY21ZL:"12":ZL:Z3440a L14(Z3)1:L24Z31:STZ3Z3:ZLL1L2ST:AFT,4Z1 CO,ZX1EV,ZYZL11:Z$:AFT,3:CO,ZXEV,ZY25ZL:LCZL237TZ14:(LC);(LC1):ZL:Z3420  "STANDARD MOVMENTRAFT,4Z1:CN$:ZPPP(Z1):OR MOVMENT" Z$" ":Z2Z$")*" AFT,3:CN$:ZPEN(ZQZ3(MS0)):300:ZDLD:EV(LDLD)12:TZOP(PP(Z1)EN(PP(Z1)1)1):Z3430 L120Z3:L220Z3:STZ3Z3:ZLL12L22ST:AFT,4Z1:PLAY,(ZL2)4,4,SO5% CO,ZX1EV,ZYZL7:Z$:AFT,36)):B1B1HB:B2B2HB:L401:B1L4,B3L4B2L4,B3L4B2L4,B4L4B1L4,B4L4B1L4,B3L4:L4h 3: ,"RETURNS X AND Y VALUES FROM POSITION 6LDLD(ZP):ZX12LD14((LD(LD))(ZP20(LE(ZP)LD)(LD))1)12:ZY16LE(ZP)25 @ "ELEVATZ$(1) xR(NU)((1)NU):LE(NU)(NU20)1((NU20)NU20):EN(NU)LE(NU)20:LD(NU)((LE(NU)2)LE(NU)2):G(NU)(NU48NU57)2(NU13)3(NU8)4((NU45)MI)1 9000 ---BOX GENERATOR--- BC(Z1)_ HB((BC(Z1)2)(BC(Z1)5)P iA1(7165)256:A2A10:A3A2488:A4A3236:A5A4302:A6A5302:NAA6190 kRFL,"LILFAT.FNT"A1:DFT,1,A1:RFL,"BOARD.FNT"A3:DFT,3,A3:RFL,"PLAYER.FNT3"A4:DFT,4,A4:RFL,"PLAYER.FNT2"A5:DFT,5,A5 nPK(1),P$(1),PP(1),PC(1),X(4),VF(4),LE(4), PROGRAM: Robot Rules :COPYRIGHT (C) MECC 1984^PROGRAMER: FREDERICK STEINMANN}(LAST UPDATE: 84/10/23 FJS232000 dD$(4):CA$(1):CE$(5):CN$(14):CP$(16):CQ$(17):CO$(15):CC$(3):CL$(12):HO(12),R(4):NA31990:SO(97         RY POINT (WHERE THE USER JUMPS BACK TO);2}(12):CO,0,89F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160n} PROCESS BASIC ERROR (HI-RES)x}H,"MENU"2} STANDARD ERROR PROCESSING (HI-RES)d }ZE(222):ZN(218)(219)256:216,0:32000 }WIND:VSP,1::(4)"CLOSE":CO}ZE25531000}(15):ZE1532110}ZUĦ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS)'(} USERS ENT1:WIND:CL$CO$:CO,0,89:"Do you want to play again? "CA$;:GCP,ZX,ZY,yCO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1),ZA$:ZA$(ZA$,1):ZA$"y"ZA$"n"ZA$"Y"ZA$"N"310201yCL$:CO,0,89:"One moment please..."6yZA$"Y"ZA$"y"įRNH,"PATH"@yRN" moves."::b)"Level: ";:700:OP$(PT):710::"Name: ";:700:P$:710::"Score: ";:700:PKm)30000h)"THE TITLE SEQUENCEr)CL$:31000N0u"STANDARD SPACE BAR ROUTINE )HI-RES):uCA$:SPACE::y "ENDING ROUTINE F"yVSP,:CO,ZX,ZY:" ":AFT,3:CO,ZX2,ZY13:"34":AFT,0:CO,ZX50,ZY4:"Path Master":PLAY,20,20,SO20:PLAY,30,30,SO20:30000)FINAL WINNERS LIST )OP$(7):X17:OP$(X):X )CL$::::P$", you have become a Path Master by winning the game in "PKZ16:Z22:Z30:900:AFT,0:CO,230,ZY4:"the":AFT,7:PLAY,10,8,20SO(RO0:Z16:Z32:Z20:900:Z10:Z3.5:900:ZXZX1:RO1:Z15:Z30:Z22:Z41:ZYZY1:900:ZXZX1:Z116:Z40:900| (L14:CO,ZX,ZY:(412L);(422L):PLAY,34L2,2L,SO23:LZX,ZY:"'(":ZYZY1:Z30:Z22:Z111:900:CO,80,ZY4:AFT,0:WIND,60,40,150,80:PLAY,23,8,15SO:P$CC$CA$:WIND:AFT,7:Z13:Z32:Z21:900G'ZYZY2:Z14:Z30:Z22:900:CO,222,ZY4:AFT,0:"is":PLAY,40,8,15SO:AFT,7:RO0:Z13:Z32:Z20:900:RO1:Z60:FI:Z21:600:ZP1:PLAY,3,1,SO4:PLAY,10,4,SO3:PLAY,5,2,SO10'PAUSE,4:CO,ZX,ZY:"#$":ZP1:300:CO,ZX,ZY:"34":PAUSE,4:PLAY,3,1,SO4:PLAY,10,4,SO3:PLAY,5,2,SO10:CO,ZX,ZY:"#$":AFT,7'RO1:ZXZX13:ZYZY4:Z61:Z12:Z22:Z32:900:CO,:LL1111:D$WF$L1",B0":NB$:D$WF$L1",B13":SD:NB$NA$:SDSCl~'D$RF$L",B0":NA$:D$RF$L",B13":SC:L{'D$"CLOSE"'"WINNERS SCREENA'::RFL,"PATH FINAL SCREEN":CE$:PP(FI)0:ZPPP(FI):300:AFT,4FI:CN$:CO,ZX1,ZY15:")*":PAUSE,10:Z1L THE WINNERS LIST L'RF$"READWINNERS FILE"(PT)",R":WF$"WRITEWINNERS FILE"(PT)",R":L10:D$"NOMONI,C,O":D$"OPENWINNERS FILE"PT",L20" V'L110:D$RF$L",B0":NA$:D$RF$L",B13":SC:(PKSC)(SC0)L1L:L10 `'L j'L1010120At'NB$P$:SDPKZX,ZY:ZLL22RO2(RO0):(31ZL);(32ZL):ZXZXZ2:ZYZYZ3:L2:ZXZXROZ4:ZYZYZ5:L:o '"MAIN PROGRAM '"COLLECT NAMES AND PROBLEM TYPES FROM MEMORY $'P(NA):L12P1:P$P$((L1NA)):L1:PT(902):PK(903):FI(904) .'"SEARCH AND FIL vZ$"#$":PP(Z1)0640K {ZLHO(2(LE(PP(Z1))1)1):PP(Z1)ZLZ$"%&"f AFT,3:CO,ZX,ZY:Z$: DB:GCP,X1,Y1:WIND,53,0,279,191::CO,53,Y1: DB:GCP,X1,Y1:WIND:CO,0,Y1: "MOVE BALL\ L0Z1:L21(Z6)34(Z6)3(Z6Z6):CO,LE(ZP)LD)(LD))1)12:ZY16LE(ZP)25. @I X"SINK OR RAISE PLAYER bAFT,4Z1:L15(Z2):L25Z2:STZ2Z2:ZPPP(Z1):300 lZLL1L2ST:CO,ZX1,ZY15:LCZL241:PLAY,ZL3,6,SO30 q(LC);(LC1):ZL:Z2įCO,ZX1,ZY15:" ":Z$"34":640(NU20)1((NU20)NU20):EN(NU)LE(NU)20:LD(NU)((LE(NU)2)LE(NU)2):G(NU)(NU48NU57)2(NU13)3((NU8)(NU127))4((NU45)MI)1 10000 ,"RETURNS X AND Y VALUES FROM POSITION( 6LDLD(ZP):ZX12LD14((LD(LD))(ZP20( PROGRAM: WINNERS SCREEN7COPYRIGHT MECC 1984[PROGRAMER: FREDERICK STEINMANNz(LAST UPDATE: 84/05/13 CWC232000dD$(4):CA$(1):CE$(5):CN$(14):CO$(15):CC$(3):CL$(12):NA31725:SO(975) xR(NU)((1)NU):LE(NU)     |h' @`p訨 @@PP @@PXsB63CCnJ*NAsBc600`CFJUOAs``wBfgC{9{{ J*B MBlLC8W0W8JUBBgBlgClk {|J*BBC AC~~|~~JU~JUdGsBcB6f`CBwJUNG_xpxqpxdGsBBCFB;FJ*NGAGsB`B0`Ca]a}}JUNGAGsBgB0gC.5B;J*NGAGsBsB63Cwx{JUNGAGsBs600p00CBnJ*NGAGsBcB6cCtwutJUNGAGsBFA@D`A@H?BByBLyCFJUNG_`@B@`dGOFx~J~xHBBX}- CFJ*NG]AgABgdGOH@NHxBByB{CFJUNG_A?BdGsBBqCFJ*NG\A|D|ApdGs00{C3ACFJUNG_B|dGsvC6ACFJ*NG_GBBOBYOCFJ*NG`E~dGO~x`FGA>B~BBBYCFJUNG\A?lGQF@``DpA`@HB@@_BY_CFJ*NG\AGsdGOG|L|HBFACFJUNG_BsdGOD@CBGB <~~B@@oBLOCFJ*NG]A~AxB~`pdGOE@`ppG`@GBBYCFJUNG\B|DCFJ*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)     $(L)CA$:GCP,ZX,ZY:L:WIND:CO,0,ZY':L0(P$(1)RO$):P$(L)", which number (1-7)? ";:INP,(1,"-17",1),OP$:902L,(OP$):L:P$(1)RO$Ĺ903,(902):"The Computer chooses "A$((903))".":30000'"INSTRUCTIONS'LL0(P$(1)RO$):WIND:CL$:"Pa:"Player #1 will be: "P$(0)" 1":P$(0)P$(0)" 1":CO,40,90:"Player #2 will be: "P$(1)" 2":P$(1)P$(1)" 2":30000'(901)8Ĺ902,(901):903,(901):10200'CL$:"Game options to choose from:":WIND,36,1,279,185$'ZY35:L17:CO,14,ZY:L") "A),IN$(0)I':"Player #2":"Type in your last initial. "CA$;:GCP,ZX,ZY'CO,ZX,ZY:INP,(1,"-AZ-az",1),IN$(1):P$(1)RO$10130'IN$(0)IN$(1)āL01:P$(L)P$(L)" "IN$(L):L:10160s'CL$:CO,10,30:"Because your names are the same:":CO,40,65AZ-az",1),P$(1):P$(1)RO$10080Ej'VSP,4:WIND:P$(0)P$(1)10160t'CL$:3:"Because both of your names are the same you must now enter your last initial."::"Player #1":"Type in your last initial. "CA$;:GCP,ZX,ZY~'CO,ZX,ZY:INP,(1,"-AZ-az",1z",1),P$(0):P$(0)P$(1)100506L'VSP,4:WIND:10160V'VSP,2:WIND,28,120,250,150:BOX:CO:"Player #1-":"What is your first":"name? ";:INP,(8,"-AZ-az",1),P$(0):P$(0)RO$10070 `'BOX:CO:"Player #2-":"What is your first":"name? ";:INP,(8,"-567 '(":CO,70,55:"89 567 89":AFT,0:n.'CO,25:"Which number (1 or 2)? ";CA$;:INP,(1,"12",1),ZA$3'Y1110:Y2160:6:10008'(ZA$)210070B'VSP,2:WIND,28,125,250,150:BOX:CO:P$(1)RO$:"What is your first":"name? ";:INP,(8,"-AZ-a"MAIN PROGRAM'AFT,0:CN$CL$:VSP,4:CO,1,6:"Path Tactics"CC$:CO,25,24:"Do you want to play against:":CO,37,40:"1) The Computer":CO,37,60:"2) A Friend":Y118:Y297:5:XA15:YA11:1000/$'AFT,4:CN$:CO,70,35:"89 XA,Y1X2XA,Y1X2XA,Y1YAX2,Y1YAX2,Y2YAX2XA,Y2YAX2XA,Y2X1XA,Y2X1XA,Y2YAX1,Y2YAX1,Y1YAX1XA,Y1YA{ 5:Y150:Y295:XA8:YA10:1000:6:Y198:Y2145:1000:5:Y150:Y2102:XA8:YA10:1000:6:Y1104:Y2145:1000:'XXXL:XCXCL:XXXA,YYYAXXXA,YYXCXA,YYXCXA,YYYAXC,YYYAXC,YCYAXCXA,YCYAXCXA,YCXXXA,YCXXXA,YCYAXX,YCYAXX,YYYAXXXA,YYYA::"DO COLOR BORDERX10:X2277L01Y1Y1L:Y2Y2L:X1X1L:X2X2LuX1XA,Y1YAX1PAUSE,5:CO,X,Y:N%(1):PAUSE,5:6 "'TYPE' ANSWERY *PAUSE,5:CO,X,Y:A:PAUSE,5:q "HPLOT DIVIDE SIGN 7:L01:143,115L144,115L:140,118L147,118L:143,121L144,121L:: DO COLOR BORDERXX0:XC277:L01:YYYYL:YCYC1:XX21,Y21:X1,Y21:2 "DO NUMBER BOXES AT X,Yo X30:Y110:L213:350:CO,X6,Y4:N%(L21):XX28:: "DO UNDERLINE AT X,Y X,127X22,127: X"'TYPE' FIRST NUMBER bPAUSE,5:CO,X,Y:N%(0):PAUSE,5: "'TYPE' SECOND NUMBER" :Y2Y17:X2X22:L01:XL,YLX2L,YLX2L,Y2LXL,Y2LXL,YL::4:X1,Y1:X21,Y1:X21,Y21:X1,Y21:CO,148,132:"MOVE": ^"DO NUMBER BOX h5:Y2Y13:X2X16:L01:XL,YLX2L,YLX2L,Y2LXL,Y2LXL,YL::4:X1,Y1:X21,Y1:0 "INSTRUCTIONS CLR SCREEN= BOX,20,60,264,93,4:CO:[ BOX,20,60,264,98,4:CO:x "DO LINE-SIGN-MOVE-LINE 3:120,127135,127 300:3:192,127205,127:CO,139,115:S$:CO,180,115:"=": ,"DO MOVE BOX AT X,Y 6X150:Y110 ;64A3236:A5A4302:A6A5302:A7A6190:NAA7255:N%(0)4:N%(1)2:N%(2)6 nRFL,"BOARD.FNT"A3:DFT,3,A3:RFL,"PLAYER.FNT"A4:DFT,4,A4 xR(NU)((1)NU):LE(NU)(NU20)1:EN(NU)((NU1)2)20 L17:A$(L):L SO(975) 938,0:1000- PROGRAM: PATH.COPYRIGHT MECC, 1984UPROGRAMER: FREDERICK J. STEINMANNt(LAST UPDATE: 84/12/20 SPM232000d16384:D$(4):CA$(1):CN$(14):CO$(15):CC$(3):CL$(12):HO(10),M(3):RO$"Computer"H iA129952:A2A10:A3A2488:A             003f<fl8l~`0````0`0000`0Immm`0~~~3000000~~00p000|0000000~~~~~00|~~~w~~~~f<ff<cc>cc>>cc>0000000hw` ```````fffffff~l6iɆpq{0`0``0`00000`Z<`~~6    and Subtracting","Multiplying","Dividing"sJ"Subtracting (neg. results allowed)","Student chooses the operation"o error to MECC.""}30000:310005"YES NO INPUTDGCP,ZX,ZYCO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"Z$"n"Z$"y"36020Z$"y"Z$"Y"Z$"n"Z$"N")@"Counting","Adding","Subtracting","Adding write protect sticker from your diskette.":32160}P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160n} PROCESS BASIC ERROR (HI-RES)x}(12):CO,0,89}"Error "ZE" at line "ZN" in WINNERS LIST."}:"Please report this6,0:32000/ }WIND:VSP,1::(4)"CLOSE":COA}ZE25531000Y}(15):ZE1532110}ZUĦ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS)(} USERS ENTRY POINT (WHERE THE USER JUMPS BACK TO)2}(12):CO,0,892F}ZE4ĺ"Please remove theE::y"ENDING ROUTINE^"yVSP,1:WIND:CL$CO$:CO,0,89:"Do you want to try again? "CA$;i,y36000w6yZ$"Y"Ĭ@y(12):CO,0,89:"One moment please...":RNH,"MENU"} STANDARD ERROR PROCESSING (HI-RES)  }ZE(222):ZN(218)(219)256:21A$""įCO,40,(20(L4)30)2L18:NO$(L1):4070D$"READ WINNERS FILE"L",R"L1",B13":SC:CO,40,(20(L4)30)2L18:NA$:CO,190,(20(L4)30)2L18:SCL1:D$"CLOSE":L:30000:2000N0u STANDARD SPACE BAR ROUTINE )HI-RES):uCA$:SPACWINNERS FILE"L",R"L1",B13":SC:CO,40,(20L30)2L18:NA$:CO,190,(20L30)2L18:SCL1:D$"CLOSE":L:30000:BOX,1,45,279,180,00L57:CO,10,20(L4)30:A$(L)":":D$"OPENWINNERS FILE"L",L20":L112:D$"READWINNERS FILE"L",R"L1",B0":NA$:N$:"from each level"CC$CA$O CO,10,32:"Level":CO,134,32:"Number of Moves" L14:CO,10,20L30:A$(L)":":D$"OPENWINNERS FILE"L",L20":L112:D$"READWINNERS FILE"L",R"L1",B0":NA$ NA$""įCO,40,(20L30)2L18:NO$(L1):4040XD$"READ WL$",R"L",B0":NA$) NA$""L10:3060~ D$"READ WINNERS FILE"WL$",R"L",B13":SC:CO,10,45L10:NA$:CO,120,45L10:SC L:D$"CLOSE":30000:2000 "TOP TWO FROM EACH LIST NO$(1)"None":NO$(2)"" CL$:CO,1,1:"The top two winners"CC WIND:CL$:CO,1,20:A$((WL$))CC$:"Top Ten Winners"CC$CA$ VSP,4:D$"OPEN WINNERS FILE"WL$",L20":D$"READWINNERS FILE"WL$",R1,B0":NA$:NA$""ĺD$"CLOSE":CO,1,90:"There are no winners on the list."CC$:30000:2000 L110:D$"READWINNERS FILE"P,(1,"123",1),ZA$:(ZA$)3000,4000,31040@ "SEE A WHOLE LIST CL$:CO,1,30:"Which list do you want to see?"CA$:WIND,35,1,279,185 ZY50:L17:CO,14,ZY:L") "A$(L)CA$:GCP,ZX,ZY:L:WIND :"Which number (1-7)? ";:INP,(1,"-17",1),WL$< CL$:CO,1,10:"Winners' Lists"CC$:CO,10,60:"Do you want to:":CO,20,80:"1) See a top ten winners' list":CO,20,90:"2) See the top two from each list" CO,20,100:"3) Return to the main menu":CO,10,120:"Which number? "CA$;:GCP,ZX,ZY) INu  PROGRAM: WINNERS LIST5COPYRIGHT MECC 1984SLAST UPDATE:84/05/14 CWC{(PROGRAMMER: FREDERICK J. STEINMANN232000<24576c100016384OP$(8):D$(4):CA$(1):CC$(3):CL$(12):CN$(14):CO$(15) L17:A$(L):L     JUMPS BACK TO)"32}(12):CO,0,89r3F}ZE4ĺ"Please remove the write protect sticker from your diskette.":321603P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":321603n} PROCESS BASIC ERROR (HI-RES)3x}(12):CO,0,894}"Erro}STANDARD ERROR PROCESSING (HI-RES)V2 }ZE(222):ZN(218)(219)256:216,0:32000g2 }WIND:VSP,12}ZE255Č54915:310002}(15):ZE15321102}ZUĦ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS)3(} USERS ENTRY POINT (WHERE THE USER C$:30000:CO$:810u"STANDARD HI-RES SPACE BAR ROUTINEL1:uCA$:SPACE::f1yENDING ROUTINE 1"yVSP,1:WIND:CL$CO$:CO,0,89:"Do you want to play again? "CA$;:360001,y(12):CO,0,89:"One moment please..."16yZ$"Y"Ĭ1@yRNH,"MENU"$2 &LN`L 䎱 掲`RFRNSEDUPLA%^L S N`  = `@ i @ ȱ щ`,X` {ݩD ^ D`UDVED`>? :p"]>^? %p g^h_^`ȱ^Șe^^_iȑ^^_SRQ@A M  = `@ i @ ȱ щ`,X` {ݩD ^ D`UDVED`?^  ) e,L׭XLXLX $)]>^? p G 8`L8ghegiȱehj8ȱL ȱ8쭖8ȱ 8`DEDB` 3#< = <=Ll <=LnL ߆VDUEVBYCZ@[A\>]?^   { RPQ L Ll`Q ߆eDUEVBYCZ@[A\>]   ?L &&'&Ȅ`,&@ȱ@Ȍ>? щ >`LHh`<=< Dﭲ}~ y ) RFH)%n,p h" ֩PyQ ALh) ` ߆[>?@ABCDE { 媤^_   )`L 0ޢ ܦH)?hJ                  PQR <= <ȭ<ȭ<ȭP<ȭR<><ȥ?< <<= H <=QI<P8懅?=4=0>?`LL<0>?`LʇLЇLׇ>?`Lø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !\ LnL؏ 8ɀ  Lȱ:,֘e湥 ϏHΏH L`<=ʱD>`"# 8$%`" %Mm#$` <=     Ro [p [p\pdpep߹dpepSo pSo , g Gp ,Ro .pWp) Xp YpZp)Ip ߅ l Wo ) L{o HHHHp hhh ɛ Moo0LooɈ95ɍGp7,Ip  h5880`L GpHpIpRoKp ( .pL+o | {$0! Hp ,Lo ^ {$0LnNRo Vo|To nr- p nUo n p-UoUoUo pLxnToVoTo^`Nhhhhh,lp` ֩PyQ ALŠҠ僁iimiʈii &'iq&iLi N8`f `.f`mm ` ң Σ  h`+ hR(" \j ެLZj,Hl  l  h l`L, HHHHHHHHH k l jlNO,ɍɠ ɛ8nl,lPݩ mhhhh hmHihʍiii L!iL k=M>k?'<> T _/Ua<"Dh p/u ( |Ap}?o{~_w}? qԀ,5+m*[jpD8sOAțP g ț@@U6U-5+m*[jVZU6U-5+m*[jVZU@U6U:  az VZU6UP@ P;@3fLA@T@*@*_/= T `W>uDuLb*U (_W@"\,5+m*[j Dba|?Fb`@w}?o{~_w}?o{~_@U6UbU*`DhVZU6U(@P .@L3@PT*|*u  (`Wz?0U"DhxW*U (`W@w|?o{ qD83LT8f @wxb~_w( (P;@0f @@D@*p/u( aWj UoGR`W*u U(xUz                ! 000x`0x |||| ||x|8l````|| x0p000x8pp00000xxx|| |x ````l8|x0x0x| x0`00`0000000000`0000`l0`x000x|0xxx||00000 xxxxlxx x000000xx0܌x0xx0000 0``0 0xt`000000lllXXXXX0|x<00` ``t0`0``00 00x0x00000 @000xx0p0000xx 8` 8 x8x x<`x 0```xxxx| 00000`0``0`0 !! ! ! PLAY,(25ZL)2,1,SO6yCO,ZX1,ZYZL15:")*":ZL:AFT,3:CO,ZX,ZY:"%&":PP(Z1)((LE(PP(Z1))20)PP(Z1)1)2PP(Z1)PP(Z1)PP(Z1)ZPPP(Z1):300:AFT,3:CO,ZX,ZY:"34"HANDLE DULL MODE?ZPPP(FI):300:BOX,ZX1,ZY15,ZX11,ZY2,0:15:LCZL241:PLAY,ZL3,6,SO30]q(LC);(LC1):ZL:Z2įCO,ZX1,ZY15:" ":Z$"34":640xvZ$"#$":PP(Z1)0640{BO%(PP(Z1))1Z$"%&"AFT,3:CO,ZX,ZY:Z$:FALLING BODIESZPPP(Z1):300:AFT,3:CO,ZX,ZY:" ":AFT,4Z1:ZL125:PLAY,4Z19,1,SO4:PLAY,20Z117,2,SO4:CO,ZLST,Y1:Z$(ZP1):PLAY,107Z1,1,SO10:PLAY,810Z1,2,SO2&ZL:CO,ZL,Y1:Z$(ZP):XSINK OR RAISE PLAYERbAFT,4Z1:L15(Z2):L25Z2:STZ2Z2:ZPPP(Z1):300 lZLL1L2ST:CO,ZX1,ZYSTANDARD MOVEMENTAFT,4Z1:CN$:ZPPP(Z1):300:TDLD:L1ZX:YZY14:PP(Z1)PP(Z1)MS:ZPPP(Z1):300:L2ZX:(MS0(ET))TDTD(MS0)ETYZY14ST((L1L2)(L1L2)):ZPTD2 ZLL1TDL22ST(ST1)ST2:CO,ZL,Y1:Z$(ZP)qZ1:PLAY,(ZL2)4,4,SO5a CO,ZX1EV,ZYZL7:Z$:AFT,3:CO,ZXEV,ZY21ZL:"12":ZL:Z3440 L14(Z3)1:L24Z31:STZ3Z3:ZLL1L2ST:AFT,4Z1CO,ZX1EV,ZYZL11:Z$:AFT,3:CO,ZXEV,ZY25ZL:LCZL237TZ14:(LC);(LC1):ZL:Z34201)12:ZY16LE(ZP)25 r, ELEV MOVED Z$" ":Z2Z$")*" AFT,3:CN$:ZPEN(ZQZ3(MS0)):300:ZDLD:EV(LDLD)12:TZ(PP(Z1)EN(PP(Z1)1)1)EN(PP(Z1)1)EN(PP(Z1)1):Z3430 L120Z3:L220Z3:STZ3Z3:ZLL12L22ST:AFT,44B2L4,B3L4B2L4,B4L4B1L4,B4L4B1L4,B3L4:L4> 3:T ,GET X,Y FROM POS] -350r 1ZP0ZP100350 2LDLD(ZP) 6ZXCO%(0,ZP):ZYCO%(1,ZP): @ ^X,Y VAL FROM POS hLDLD(ZP):ZX12LD14((LD(LD))(ZP20(LE(ZP)LD)(LD)))1 L113:N%(L),D%(L):Lf FOR ZP = 0 TO 100: GOSUB 350:CO%(0,ZP) = ZX:CO%(1,ZP) = ZY: NEXT Z$(0)"!"(34):Z$(1)"#$":Z$(2)"%&":Z$(3)"'(" 10000 BOX BC(Z1)5 HB((BC(Z1)2)(BC(Z1)6)):B1B1HB:B2B2HB:L401:B1L4,B3L$"Computer"I nPK(1),P$(1),PP(1),PC(1),X(4),VF(4),LE(4),Z$(3),BO%(110) xR(NU)((1)NU):LE(NU)(NU20)1((NU20)NU20):EN(NU)LE(NU)20:LD(NU)((LE(NU)2)LE(NU)2):G(NU)(NU48NU57)2(NU13)3((NU8)(NU127))4((NU45)MI2 PROGRAM: PATH2.COPYRIGHT MECC 1984KPROGRAMER: F. STEINMANNi(LAST UPDATE:84/12/21 FJSu232000<ZE0:ZN0ZDU(938) dD$(4):CA$(1):CE$(5):CN$(14):CO$(15):CC$(3):CL$(12):R(6),N%(13),D%(13):NA31725:SO(975):RO" """""""""           Ǎ" |,|,t.*  <8@  <((L < <L@ p <@P P|, | @88|, | 8|, ||, ""