'd *******************************Mn *******************************sx **** **** **** BY BRIAN A.MITCHELL **** **** **** **** BROCKVILLE, ONTARIO **** **** ****1 **** 613-342-0733 ****W **** ****} **** DEC 1983 **** **** **** **** TPUG# 2923 **** **** **** *******************************; *******************************A _ L5427254296:L,0::L0k U53280 U,0:U1,0:54296,15:"" "2730 ,"" 6" RECOL INSTRUCTIONS (Y/N)" @AN$:AN$"N"560 JAN$"Y"320 T"": ^"THE COMPUTER WILL GIVE YOU A SEQUENCE OFNUMBERS, ONE AT A TIME";y h" INCREASING BY ONEEACH TIME, UP TO THE SELECTED AMOUNT." r |"THE OBJECT IS TO REMEMBER EACH SEQUENCEOF NUMBERS AND ENTER THEM"; " EXACTLY ASTHEY WERE DISPLAYED." > "THERE IS A THREE SECOND TIME LIMIT BETWEEN ENTERING NUMBERS."D  "LEVEL 5 PERMITS YOU TO CHOOSE THE NUMBERIN A SEQUENCE "; "(FOR YOUNGER PLAYERS)." 4990 ""  "LEVEL 6 FOR 2 TO 4 PLAYERS: EACH PLAYERIS RESPONSIBLE FOR ";C "ENTERING A SPECIFIC NUMBER 5,6,7 OR 8 IN THE CORRECT SEQUENCE" "IF HE FAILS TO DO SO HE IS ELIMINATEDAND THE GAME CONTINUES"; " UNTIL THERE ISONLY ONE SURVIVOR." "A GREAT GAME FOR BLUFFING YOUR OPPONENT." 5"THE INSTRUCTIONS WILL BECOME MORE CLEARAS YOU LEARN HOW TO PLAY!"?&4990K0C(100)T:CC1oDNN0:SC0:A0:SQ7:S0NS11:S21:S31:S41X2360bO64340:630lA1C:C(A)(5(31)(1)):Av""2230A1CD1320S$7S$""""9);"WAIT TO ENTER SEQUENCE":S$"">AKER110x""9);" "T110:T""8);">>ENTER SEQUENCE NOW!<<"ERA1CDTT350095050S$ S$"5"S5:830S$"6"S6:830( S$"7"S7:830=*S$"8"S8:830N4S$"5"900e>SC(A)DL1:1030wHO6SS1900RO6SS2900\O6SS3900fO6SS4900pO6SC(A)4840:1810:1040zSC(A)DL0:1810:1100+"";15);" SECONDS ";(TT1000);""MTT2900TT1900TT9502180UTT^""jI110" "2180:XVXV1" TOO LATE! "T150:TIXV0O6SC(A):4840:4340:104011301320DL0A$SCSC1/.ACDD1:630981960BB600LL""aV" GAME OVER "k`4130tj""t8)"THE CORRECT SEQUENCE WAS"~8);"Ř"3380T1250:TA1CD1320A""86)" SCORE ";SC;"FOR";C1;25)" LEVEL ";O;"">k4)" PRESS (E) EXIT (C) CONTINUE "4)" (R) REPEAT (S) SELECT "A$:A$""1260A$"C"CCCC1:630A$"S"570 A$"E"A$"R"1170A$"C"1260"(C(A)5C$"":V10:M1?2C(A)6C$"":V15:M11\<C(A)7C$"":V20:M21yFC(A)8C$"":V25:M31P""ZM)C$" "dM)" Ϸ "nM)" <";C(A);" >";C$;" "xM)" ̯ "M)" "1750DL11450#T1100:T5""IM)" "\M)" "sM)" ۳ "M)" "M)" "DL11530T1150:TDL0:T0S5M1S6M11"S7M21,S8M316SP$""@TP$TP$SP$4J""TP$FTM)""X^M)" "jhM)" "|rM)" "|M)" """TP$M)" ----- "M)" "M)" "M)" "M)" ----- "DL0:T0;54273,4V:54272,73:54276,33T54277,128:54278,17cZ150:Zp54276,0NH0:V0:54273,0:54272,0-L EFFECT"";15)" "&"";6)" "%0K1002010S:""8)" "vD54276,17:54277,40:54278,136N54273,K:54272,250KX1550bO6""12)" ERROR ֘"lKv54276,054273,0:TP$""T1450:TO64340:DL0) W-EFFECT5G034m"";5);" "}DL1:VG253550"";5);"++++++ CONGRATULATIONS ++++++"3110G54276,0CV23 NT13NT1NT$">> WON! >>>>>>>>"- NT2NT$">> HAVE"G*NT3NT$">>>> YOU "S4CVCV5`>GR0CVpHVV3:3110R""\GR)"";NT$;""fGR:NT:54276,0pZ11800:Zz54287,8:54291,9:54287,29XV:54292,12854290,17Z170:Z54290,0#_" SEQUENCE";CD;" OF";KR;" ";29);" LEVEL ";O}"";3)"- TRY #";CC;"-"CD13380:22703150""CDKR4000CD1"";11)">>>>>>WAIT!<<<<<<":234011)" PRESS SPACE BAR ". N$:N$""2310X N$(32)11)" "l N$(32)2310|$ T1200:T. 8 ""B WW1L 17)"RECOL"V 17)""` " SELECT LEVEL "j t 11)" LEVEL  SEQUENCE "~ 4220 G15% CL$"":NT$""C M(G)1CL$"":NT$M$(G)I ~ 12)CL$;"(";G;")";" --- ";S(G);26);"[";NT$;"]" G  12)"( 6 ) --- 2 TO 4  PLAYERS " W13770 :" SELECT FROM 1 TO 6 " O$:O$""2540 CC1$ O$"1"O1:C8:D7:KR7:2630J O$"2"O2:C12:D11:KR11:2630p O$"3"O3:C17:D16:KR16:2630 O$"4"O4:C22:D21:KR21:2630( O$"5"O5:2650:26302 O$"6"O6:4480< O$"6"2540F SC0P Z :d "(2 TO 35) SEQUENCE =";SQn Cx "CHANGE (ANDOR) PRESS  RETURN ";SQd SQ35SQ2"":SQ1:2680z CSQ1:DSQ:KRSQ SQ1O1  "" DP14 "" DL1 3690 M)C$"" M)" RECOL " M)"" 1750  DP  DP411.  ""8 " 3690M , M)C$""` 6 M)" RECOL "s @ M)""} J 1750 T DP ^ DP14 h "" r 3690 | M)C$"" M)" RECOL " M)"" 1750 DP! DP14 ! ""*! 3690?! M)C$""R! M)" RECOL "e! M)""o! 1750w! DP}! ! 21)"BY-BRIAN MITCHELL"! T11400:T! !& 54276,17:54277,130:54278,136!0 54275,50:54274,200 ": 54273,2V:54272,6V"D ("N BACKDROP DISPLAY 15"X LN138I"b ""V"l LN)""b"v XVXV1l" 3740t" LN" 54290,0" F30010" L0F" """ L)"  "" L)"  "" L)" ۳ "# L)"  "# L)"  "!# L2# XV15:21809# FI# T1300:TR# XV0a# O63380g#* v#4 M03010#> CN$""#H O6V11M0CN$""#R O6V21M10CN$""#\ O6V31M20CN$""#f O6V41M30CN$""#p A$""$z M30A$""$ ""2$ M);CN$"  "F$ M)"  "j$ M)" ۳";CN$;" ";A$$ M);CN$"  "$ M)"  "$ M$ T150:T:M0$ $ W-EFFECT$ ""$ G)" "$ G)"> " %G)" "%""+%G)" "<%$G)"> "K%.G)" "^%8""o%BG)" "%LG)"> "%VG)" "%`%jDP1M1:V10:C$""%tDP2M11:V15:C$""%~DP3M21:V20:C$""&DP4M31:V25:C$""&7&54287,2:54291,74:54287,39XV:54292,128F&54290,129L&R&v&54275,145:54278,194:54296,10&HF,LF,DR&HF054276,0:54296,15:3990&54273,HF:54272,LF&54276,65&T1DR2:&54276,33:T115:& 3790'19,63,400)'28,214,200,22,227,100D'(28,214,100,22,227,100_'228,214,100,22,227,325y'<21,154,100,18,42,110'F21,154,100,18,42,100'P21,154,100,18,42,375'Z16,47,250,18,43,100'd19,63,75,21,154,100'n24,63,300,24,63,350(x19,63,300,14,107,350,(19,63,100,14,107,100D(19,63,400,-1,-1,-1J(V(DS16f(""(6)" "(V5:1750(6)"- LAST NUMBER IN SEQUENCE -"(V5:1750(DS(""(V139(" ";)T150:T)V)")"DS011+),""=)612)" ---- "T)@DL1:V11DS:1750h)J12)" TILT ")TDL1:V11DS:1750)^DS)hDL0)r)|CC1O1SC7M(1)1:W1:M$(1)"")CC1O1SC7M(1)0:W2*CC1O2SC11M(2)1:W1:M$(2)""$*CC1O2SC11M(2)0:W2M*CC1O3SC16M(3)1:W1:M$(3)""l*CC1O3SC16M(3)0:W2*CC1O4SC21M(4)1:W1:M$(4)""*CC1O4SC21M(4)0:W2*CC1O5SCSQM(5)1:W1:M$(5)"*"*CC1O5SCSQM(5)0:W2'+S(1)7:S(2)11:S(3)16:S(4)21:S(5)SQ-+@+S5S15:V11S+S6S26:V21f+S7S37:V31y+S8S48:V41+V11V21V31W4:4900+&V21V31V41W1:4900+0V31V41V11W2:4900+:V41V11V21W3:4900+DA1C,NC(A)(5(31)(1))?,XC(A)S1C(A)S2C(A)S3C(A)S44430F,bAO,lD35U,v^,""u," ----------- "," ELIMINATION "," ----------- ",,"ENTER # OF PLAYERS";NO,-NO2NO4" LEVEL 6 -TWO TO FOUR PLAYERS"::4530--NO34640,-NO44710Z-" PLAYER 1 - COL 5 PURPLE  "c-""-" PLAYER 2 - COL 8 YELLOW  "- S26:S37:V21:V31-4780- " PLAYER 1 - COL 5 PURPLE  "-*"".4" PLAYER 2 - COL 6 GREEN  ".>""K.H" PLAYER 3 - COL 8 YELLOW  "Y.RS37:V31c.\4780.f" PLAYER 1 - COL 5 PURPLE  ".p"".z" PLAYER 2 - COL 6 GREEN  ".""." PLAYER 3 - COL 7 BLUE  "/""2/" PLAYER 4 - COL 8 YELLOW  "J/C36:D35:KR35:S0U/""u/11)" PRESS SPACE BAR "/A$:A$(32)4810/10)"ONE MOMENT PLEASE"//S5PN1/S6PN2/S7PN3/S8PN40""9)"---PLAYER";PN;"IS OUT---" 0)0$""30.""S08"  SURVIVOR PLAYER";Wc0B3380:19600LS0:S10:S20:S30:S400VV10:V20:V30:V40:CCCC10`JBJB10jJB20t5800~""011)" PRESS SPACE BAR "1AN$:AN$(32)50101