UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU<SWITCH  UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU<C:100:SW(4,7,1),SP$(1),LB(32,4),AR$(1),PT(4,16),SC(1,8),LY,NY,Q1,Q2,QT,NX:10C@32(LY4NYQ2(QT15))(NXQ1),"*";:C@32CYCXO,M$;: DCXSX2:CYSY1:M$SP$(WP):2: D10,1: D40,1: D+60,1: D J,DY,DX,VX,SD,WX,WY,NUU<B,SX,JX,RR,TY,EX,WP,CX,CY,O,SY,QR,SF,TX,SG,K,AC,A,A$:QR1:3000DSP$(0)"":SP$(1)"":AR$(0)"<-":AR$(1)"->" DQ13:Q20:O1:J14:PT(J,0)E(A01:B08:SC(A,B)0:: E-2K17:L:PT(J,K7)L:PT(J,8K)L:K,J E7< 10 ELF 2,2,2,2cUU<,2,2,2 EVP 40 EmZ 1,2,3,5,8,13,21 Ewd 20 En 2,3,4,5,6,7,8 Ex 80 E 1,4,9,16,25,36,49 E"PLAYER 1";P1$ F"PLAYER 2";P2$:P1$(P1$,3):P2$(P2$,3):P1$;" VS ";P2$F3"IS THIS CORRECT";G$:G$"Y"G$"YES"140FB410:510 FUU<kRR14:@32RR,"*";:@32RR27,"*";FQR1QR:TYQR20:TX26TY:CXTX:CY0FM$((PT(RR,0)),2):2FCX6TY:CY0:M$AR$(QR):2G660:SC(1QR,RR)PT(RR,0)250: END OF ROUND G 200G,J01:K58:SC(J,K)0:K,JGgJ01:K14:GLPUU<T(K,0):ACSC(J,K):SC(J,5)SC(J,5)ACGSC(J,6)SC(J,6)(ACGL)GL:SC(J,7)SC(J,7)(SC(J,K)SC(1J,K)):K,J GJ01:K67:SC(J,K)SC(J,K)SC(J,5):K,J H"J01:K57:SC(J,8)SC(J,8)SC(J,K):K,JHD,J01:K58:Y$(SC(J,K)):L(Y$):TX7J26wUU<LHp6TYK:CXTX(TX20):CYTY:M$Y$:2:K,J H@RR: END OF MAIN LOOP HJ GAME OVERHT@32107,"";H^@32117,"PLAY AGAIN? (Y/N)"; I h@32127,"";I I$:I$""390I.I$"Y"I<I$"N"IEUU<390IQ:2000IWIJ03:SY4J4:K0J3:SX12J2K4ICXSX1:CYSY2:M$" ":2IWP((0)2)ISW(J,K,0)WP:SW(J,K,1)0:3 I&K,J I0CX2:CY0:M$P1$:2 J:CX29:CY0:M$P2$:2J; J3J032:LB(J,0)0::NB1 JHA$:A$UU<""670 JWA$"-" JnA$"+"A$((8))JA(A$):(A1)(A8)670 JLB(0,0)1:J13:LB(0,J)0::LB(0,4)10A2JEX1 JڀJ032:LB(J,0)EX0:760 J:1,1:EXK720 KGDYLB(J,0):DXLB(J,1):LYLB(J,2):NYLB(J,3):NXLB(J,4):QTUU<LY4NYKx(LYNY)LY4@32(LY4NYQ2)(NXQ1)," ";K LB(J,3)(NY1)3:NY1790,810,860,880KLY3LB(J,0)0:950: SCORING ROUTINE K 1:(3)4,5,6 L*VX0:940:SW(WY,WX,1)0(SW(WY,WX,0)SD)0840 L>4VX12SD:LB(J,1)VX:LB(J,3)NY1UU<L|>LB(J,4)NXVX:@32(LY4NYQ2(QT15))(NXQ1VX),"*";:LHSW(WY,WX,0)SDLB(J,0)0:SW(WY,WX,1)1:1:LRLB(J,3)NY1:1:(3)4,5,6 M\LB(J,1)0:LB(J,4)NXDX:@32(LY4NYQ2(QT15))(NXQ1DX),"*"; M"f200,1:M0pQT151M`zLB(J,2)UU<LY1:940:SW(WY,WX,0)1SW(WY,WX,0)MxSW(WY,WX,1)0930 MLB(NB,0)1:LB(NB,1)0:LB(NB,2)LY:LB(NB,3)0:LB(NB,4)NX2SD4:NBNB1NSW(WY,WX,1)0:@32(LY4NYQ21)(NXQ12SD4)," ";:250,1N7SX12WY2WX4:SY4WY4:WPSW(WY,WX,0):3:NfUU<WYLY:JX(NX2)LY6:WX(JX2):SDJX1:N{SFPT(RR,NX22)NSGSC(QR,RR)SF NTX427QR(SG9)(SG99)(SG999)NTYRR:A$((SG),2)NCXTX:CYTY:M$A$:2:SC(QR,RR)SG:O L CHAR COMMAND O0І" 12345678 "OUۆ" UU< "Oz܆" "O݆" "Oކ" "O߆" "P" "P3" "PX"ZUU< "P}" "P" "P" "P" "Q" "Q:" UU<"Qb" ";QhQ :11);"SWITCHBOX"Q †"PLAYERS ALTERNATE DROPPING"Q ̆"BALLS INTO ONE OF 8 SLOTS."Q ֆ"THESE BALLS MIGHT MAKE IT"R "TO ONE OF THE 14 EXIT PATHS"R, "DEPENDING ON THE SWITCHBOXES"RO "THEY UU<MUST PASS THROUGH. THE"Rs "GAME LASTS 4 ROUNDS. ROUND 1"R "EACH EXIT = 2 PTS. YOUR GOAL"R "IS 10 PTS. THE OTHER ROUNDS"R "HAVE THE FOLLOWING SEQUENCES"R "FROM THE CENTER OUTWARDS:S# &"2. 1,2,3,5,8,13,21 goal 40"SH 0"3. 2,3,4,5,6,UU<7,8 goal 20"Sm :"4. 1,4,9,16,25,36,49 goal 80"S D" HIT ANY KEY TO CONTINUE";S NA$:A$""3150S X:"BONUS PTS ARE AWARDED AT THE"S b"END OF EACH ROUND. 4 NUMBERS"T l"APPEAR BELOW THE SCORECARDS."T7 v"THE 1ST IS SIMPLY THE TOTALUU<"T[ "SO FAR. THE 2ND IS THE TOTAL"T~ "PLUS A BONUS. BONUS = GOAL,"T "IF PLAYER'S PTS >= THE GOAL."T "THE 3RD IS THE DIFFERENCE" T "BETWEEN PLAYERS, WHICH IS"U "ADDED TO THE WINNER'S SCORE"U. "AND SUBTRACTED FROM THE LOSER."US Ɔ"UU<THE FINAL NUMBER IS THE GRAND"Ut І"TOTAL. USE ROUNDS 1 AND 3"U ҆"TO SEED THE FIELD WITH BALLS."U ӆ"'+'=RANDOM #. '-'=SKIP TURN."U چ" HIT ANY KEY TO CONTINUE";U A$:A$""3300U :V MC-10 PORT BY J GERRIEUU<U