" (98) NUMREVUE","(108) SHOOTN","(117) RESCUE"/:. END52) COCOLERN". " (60) F15EAGLE"," (84) BLAKJACK"," (86) SPEEDSTR"," (88) THEATRE"," (88) MAGICSQR". " (89) HANGMAN"," (90) WORD1"," (91) MAPPER"," (91) JOYCHECK"," (93) COCOKEY2"/0G10,112),2,: G8_15:(11,11),"-PROGRAM ABORTED-":(4,13),"WOULD YOU LIKE TO RESTART(Y/N)?"8o 17108I$: I$"Y" : 160 : I$"N" 1850 : 17108: GAME OVER815:(15,11),"GAME OVER"9 (3,13),"WOULD YOU LIKE TO PLAY AGAIN(Y/N)?"9ֈ 17609UI$: I$"Y" : 160 : I$"N" 1850 : 17609n: ON ERR COMES HERE9P$"1836110763310938001800630018003818540936632745380018006300180038"9 1630: 15,389 MN1 : 9 32:: "ERROR NUMBER - ";: "ERROR LINE - ";:/& 65496,0::E0: END OF PROGRAM::P$"1836110763310938001800630018003818540936632745380018006300180038":D 1630: 15,38:N MN1 : : 32:X1:65496,0::b: INSTRUCTIONS FOR TITLE;l: SCREEN;+v SHOOT'N RANGE by Albert Marsh;5 " ";? " ";b Welcome to the Shoot'n Range;l " "; There are only a few short rules to; remember; " ";Ɔ Use the right controller to play;І " "<چ Use either button to fire<  " "<4 You must keep your percentile above 880: SET-UP'^ : 940: HGET EVERTHING'w 1150: TITLE CARD' 1240: DRAW SCREEN'PRC$"1.00":SC0:PO5000:HI1:AL1:T0:M2:TT2:F50:R1:PI5000' : 1680( 1540: SET LEVEL(: MAIN LOOP(7JA(((0)5)2)2:JB(1)2(X(316,JB40)(320,JB40),1,( JAX (X,175)(X3,189),1,:XJA:(X,175)(X3,189),8,( (0)1 (1)1 PO0 330) NU0 G1 NU:T(G)T(G)1: T(G)0 780: G : G)7 NUM TNOTT (F)1 640:TNOTNO1)X(316,JB40)(320,JB40),1,)s NU0 TNOTT 300)~" 210), 1370: ADVANCE LEVEL)6 210)@: FIRE SHOT)JFL0: 0,2)T G1 NU* ^ XX(G) XX(G)15 JB40Y(G)20 FL1:FPG*h G*3r FL1 YY(FP) : YJB40*H|(X,174)(X,Y),9*](X,174)(X,Y),*"L255T255O3V15;1;V-;2;V-;3;V-;4;V-;5;V-;6;V-;7;V-;8;V-;9;V-;10;V-;11;V-;12"*(X,174)(X,Y),9,* 5:(32,0),PO*POPO(128JB): PO0 PO0+  0:(32,0),PO+… FL0 +-: HIT TARGET+X(X(FP),Y(FP))(X(FP)15,Y(FP)16),7,+"L255T255O1V20AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-AV-A"+ GY(FP) Y(FP)16+(X(FP),G)(X(FP)15,Y(FP)16),7,+ G+ GFP NU,'X(G)X(G1):Y(G)Y(G1):T(G)T(G1),/ G,C&HIHI1:NUNU1,T05:(8,0),SC,e:(21,0),PRC$,sDSCSC100,N HITT1 PRC$"1.00" : PRC$((HITT),4),X0:(8,0),SC,b(21,0),PRC$,l,v: ADD TARGET TO SCREEN,NUNU1-,FL0:X(NU)(((290)10)2)2:Y(NU)(100)40-= NU2 710-N G1 NU1- (X(NU)20)(X(G)20) (Y(NU)20)(Y(G)20) FL1- G- FL1 650-"L255T255O3V0":P0-Ѐ GY(NU)16 Y(NU) 1.(X(NU),G)(X(NU)15,Y(NU)16),6,.%PP1:P$"V"(P)"A": P$.- G.BT(NU)T(10):.a: TAKE TARGET FROM SCREEN.{ "L255T255O3V17":P17. QY(G) Y(G)16. (X(G),Q)(X(G)15,Y(G)16),6,.*PP1:P$"V"(P)"D": P$.4 Q.> QG NU/HX(Q)X(Q1):Y(Q)Y(Q1):T(Q)T(Q1)/R Q/+\NUNU1:/Kf: SET VARIBLES AND PALETTE/cp X(16),Y(16),T(16)/zP$(1)"6316180756080925370454544835000000000000000000000000000000000"/P$(2)"6302331632112743000300351906000000000000000000000000000000000"0P$P$(MN): 1630: 15,0001: HGET EVERYTHING0R 1: 1,220:(1,1)(20,20),10s 2: 2,220:(1,1)(20,20),20 5: 3,110:(1,1)(20,10),30 6: 4,110:(1,1)(20,10),40 7: 5,110:(1,1)(20,10),50 2: 11:(0,1)(15,16),,BF1 6:(3,4),3:(12,4),31-(3,4),0,6:(12,4),0,61I 9:(7,10),5,,.75,0,.51f 6,200:(0,0)(15,16),61 12:(0,1)(15,16),,BF1 6:(3,4),3:(12,4),31$(3,4),15,6:(12,4),15,61. 9:(7,12),5,,.75,.5,018 7,200:(0,0)(15,16),72B 1: 3:(4,1)(4,15),2(L 4:(5,5)(5,15),2RV 9:(6,10)(6,14),:(7,11)(7,14),2n` 8,300:(4,1)(7,15),82|j 9,400:2t: TITLE SCREEN2~ 40: 72 0,3: 0,42 I$: I$"999" 12002L40(I$):L(L2)2 L);I$: 11703  6,6: 39,23: 3  "" 12103* :3=: DRAW SCREEN3H 2:23] G0 320 203v(G,0)(G19,10),3,3(G,11)(G19,21),4,3(G,22)(G19,32),5,3 G3"C3;BM319,32;M0,32;M80,12;M160,30;M240,12;M319,32":(80,20),3,34."C4;BM80,32;M240,32;M160,12;M80,32":(160,20),4,44J(0:(0,171)(320,171),4{2 G0 320 20:(G,172)(G20,192),1,: G4<(3,0),"SCORE 0 PRC 1.00 POWER 5000"4F4P: LEVEL ADVANCE4Z 5:(8,0),SC4dPB((HITT)500):SCSCPB5 n 0:(8,0),SC5$x15:PB$(PB)"pts."5F(7,11),"POINTS BONUS- "PB$5hRR1: (R10)R10 15005 15:(7,13),"POWER BONUS - "(PI)" units"5 5:(32,0),PO:POPOPI5 0:(32,0),PO5PIPI20005 G1 106&"L255T255V20O2;A;V+;B;V+;C;V+;D;V-;E;V-;F;V-;E;V+;F;V+;G"6.ҋ G6B܀ G1 500: G6W G40 280 86u(G,88)(G8,112),2,: G6 HITT .5 PO0 17306NU0:TT10: T10 T55:TTTT2:MM2: M10 M106FF1: F5 F57 10:(15,3),"ROUND":(20,3),R7" Q1 M: 640: Q73, G1 200: G7T64:(15,3),"ROUND":(20,3),R7h@TNOM:HI0:JAX7nJ7T: PALETTE SET-UP7^ G0 317hP((P$,(G2)1,2))7r G58964,P7| G:7: PROGRAM ABORTED8 G32 288 10:(G,88)(& **WORD SEARCH**&/**BY NEIL JOHNSON**&G**APRIL 17, 1987**&M(&W2 250&_:qHF1F11: F1(48TH)6 : F210 850 : CF1 CF0: &HFFB6,M1 : CF1: &HFFB6,M2:RF10:(F,185)(F,190),:"CC":FF1: F160 :\ 910:f G1 G0: 1120 : G1:pAPO:0:890:APN:3:890:POPN:;gz A1 "BM160,158;NG12NE12BF4G4E8" : A2 "BM160,158;NL16NR16BD4L4R8" : "BM160,158;NF12NH12BG4H4F8";m;T:0::3,0,B:4)"<<==- YOU RAN OUT OF FUEL ! -==>>":930;T:0::3,0,B:4)"<<==- YOU WERE SHOT DOWN -==>>"<&HFF9A,0:"T255L255;V31;":Y15:X112: (X):X,Y:2,0:0,5:"Flight Time":30,5:(T3600);":";((T(T3600)3600)60);:0,7:"Hit/Miss Rating"< TT0 I0 : I(100(HT(TT1)))<30,7:I;"%"<0,9::"Total Score:":30,9:(I10(LV1)):Y11000:Y=!10,16:"Play another game ?"=CA$: (0)0 A$"" 970=ԅ (0)0 150 : A$"Y" 150 : A$"N" : : 970=0,0: :>P3(0):P4(1):P463P4: P316 PN1:P1P14:P1P1(TH11) : P348 P1P14:P1P1(TH11):PN3 : PN2>9P1(P1): P115 P115 : P1265 P1265>P426 P2P24:P2P2(TH22) : P436 P2P24:P2P2(TH22)>P2(P2): P264 P264 : P2107 P2107>(P1,126)(P140,132),1,>>$ PN 1070,1080,1090?1.(P110,P2)(P128,P218),2:(P110,P2)(P128,P218),4,:?i8(P1,P2)(P140,P26),2:(P1,P2)(P140,P26),3,:?B(P110,P2)(P128,P218),2:(P110,P2)(P128,P218),5,:?L PN2 (P1,P2)(P140,P26),2,: : (P110,P2)(P128,P218),2,:?V@` (0)0 : TTTT1@8j 14: PN 1170,1180,1190@]t"F": 13: PN 1170,1180,1190@~ FPE1 FPE16 : HTHT1:100,1:"BM"((54(E16)))",152;C0;U1R1D1L1":(E1,56)(E18,58),7,:E1(250)25:(E1,56)(E18,58),7:@A/(P1 PO 2000,2010,2020::12708:1,1:"C8BM0,60R15F5D10G5NL15F5D10G5L15U40BR35D40R20BR15U20NR20U10E10F10D30BR15BU5F5R10E5U10H5L10H5U10E5R10F5BU5BR15R10NR10D40BR25NR20U20NR10U20R20BR15ND40R15F5D10G5NL15F5D159f "C7BM20,20ND20F10E10D20BR5BU20D15F5R10E5U15BR5ND20F20U20BR20NF5L10G5D10F5R10NE5BR10U10NU10R20NU10D10BR5U10R10NF10NE10L10U10BR30D20BR10U20F20U20:"BM20,182C6ND8R2F2G2NL2F2G2L2BE8F2NE2D6BR16R4U4L4U4R4BR4R4L2D8BR6NR4U4NR4U4R4BR4D6F2E2U6BR4NR4D4NR4D4R4BR14NU8R2E2U4H2L2BR8D8R4U8L4BR8ND8F8U8BR4ND8R4D4NL4D4BR4NR4U8BR8D8R2E2U4H2L2:I221105:(I,110)(I34,130),S,::I01005:(I,146)(I26,179),C,::I2352002:(I,110)(I20,132),B,::I1500PO::(1,0;_2"C2BM100,120R4F2D2G2NL4F2D2G2L4U12BR13G3D3ND6R6ND6U3H3BR11NF2L2G2D2F2R2F2D2G2L2NH2BR8NR6U6NR4U6R6BR6D6NE6NF6D6BR10U12BR4D12R6BR4NU12R6BR4NR6U6NR4U6R6BR4ND12R4F2D2G2NL4F2D4;<"BM134,164U12F3E3ND12BR4D10F2R2E2U10BR4ND12F12U12BR6NR4G2D8F2R4BR4U12D6R6U6D12BR4U12D6NE6F6BR4U12BR4ND12F12U12<,F"BM0,140D12R4E2U2H2NL4E2U2H2L4BR10D12R6BR6H2U8E2R2F2D8G2L2BR8U12R4F2D2G2NL4F2D2G2L4 K11000:BU(65280): BU126 BU254 10,5::K:1280>0X8020040:(X,180)1PP100>E:BS1PP1000>K>q@290,"POINTS=";P;:I1500PO:I>HHH:H10H10>ȁ200?҆ "THE EARTH"," MARS"," JUPITER"," SATURN"," URANUS"," VENUS"," PLUTO"," MERCURY"," NEPTUNE"?Њ?ڒ65494,0:?#65496,01PP100>E:BS1PP1000>K>q@290,"POINTS=";P;:I1500PO:I>HHH:H10H10>ȁ200?҆ "THE EARTH"," MARS"," JUPITER"," SATURN"," URANUS"," VENUS"," PLUTO"," MERCURY"," NEPTUN&! =========================&A = F-15 EAGLE =&a = "GROUND ASSAULT" =&( = =&2 = WRITTEN BY: ERIC WOLF =&< = 1630 N. JOHNSON STREET=&F = SOUTH BEND, INDIANA ='P = 46628='!Z =========================''d'1n1000'Nx : 40:2000: 65497,0'|Y15: Y,275:Y: 6,100: 7,100: 8,100' 990'Y015:Y,0:Y: &HFF9A,0:2'0:"C15;BM2,2;R4L2U1L4R8L4U1L1R2":(0,0)(8,2),6(13:PL$"S4;BM20,6;NL8NR8U1NL6NR6U1NL2NR2NL12NR12U1NL10NR10U1NL7NR7U1NL2NR2U1NL1NR1": "C11"PL$:14:(17,6):(18,6):(22,6):(23,6):(0,0)(40,6),3:13)PM$"S3;BM10,10;NG8NE8L2NG6NE6U2NG12NE12L2NG10NE10U2NE7NG7L2NG2NE2U2NG2NE1": "C11"PM$:(8,12,14):(12,8,14):(0,0)(18,18),4: 13)PM$"S3;BM8,10;NF8NH8R2NF6NH6U2NF12NH12R2NF10NH10U2NF7NH7R2NF2NH2U2NF2NH1": "C11"PM$:(6,8,14):(10,12,14):(0,0)(18,18),5)13:"C8"PL$:(0,0)(40,6),1))4:Y032010:(Y,0)(Y,192),:Y:Y019212:(0,Y)(319,Y),:Y*P$(1)"R8F8L2F12R4M+8,-4;M-6,-16R1M-8,-4L6U2M+6,-1U8M-6,-1U1R6U2L6U1M+6,-1U8M-6,-1;U2R6M+8,-4L1M+6,-16M-8,-4L4G12R2G8L8U20M+4,-20;M-16,-6L4M-40,46;BR55BD36D20M+4,20;M-16,6L4M-40,-46"+P$(2)"M-28,-4NR20L12U7R4U2L32;M-8,-2;H2U2E2;M+8,-2;R32U2L4U7R32L20M+28,-4;"+P$(3)"U16E2R16F2D4G2L8D4R8F2D4G2L8D12G2L6H2U24BR26BD6E2R8F2D4G2L8H2U4D4F2R8BR8D12F2R6E2U30H2L6G2D30BR16NU4F2R20E2U16H2L13U6R13E2U4H2L20G2D15F2R13D6L13G2,P$(4)"BR48D5F2R24E2U4H2L16U5R16E2U4H2L16U5R16E2U4H2L24G2D24BR34D6F2R8E2U6R4D6F2R8E2U30H2L24G2D24BR12BU8R4U8L4D8,P$(5)"BR22D14F2R28E2U16H2L16G2D4F2R8D4L10H2U14E2R16E2U4H2L26G2D24BR38D6F2R28E2U6H2L16H2U20H2L8G2D28BR38D2F2R24E2U4H2L16U5R16E2U4H2L16U5R16E2U4H2L24G2D28-Y00:X01:"BM"(138X)","(146Y)";C3;"P$(1): P$(2):X,Y-%"(8,6),"Written By Eric A. Wolf"-7,(80,130),2,3-6(23,11),"Range: 4000":(23,12),"Speed: 0- Mach 2":(23,13),"Fuel: 20000 lbs"-@(23,14),"Ceiling: 85000 ft":(23,15),"Armourment:":(24,16),"- Sidewinders".+J(24,17),"- Sparrows":(24,18),"- GBU 15 bombs":(24,19),"- 30 mm Gun Pods".LT(23,20),"Thrust: 25000 lbs".^X120:Y120:"C1;BM"(X1)","(Y1)";"P$(3): P$(4): P$(5):(X14,Y14):(X132,Y14):(X152,Y14):(X164,Y19):(X1112,Y19)/h(X1150,Y19):(X1180,Y19):(X1$&# : ##########################&E: ##########################&g: ## ##&(: ## MUNCHKIN BLASTER ##&2: ## ##&<: ## BY ##&F: ## ##'P: ## STEPHEN DONALD ##'3Z: ## ##'Td:## OBA,ONTARIO,CANADA ##'un:## P0M2P0 ##'x:## ##':##########################':##########################'XYMN::"SPEED UP POKE [Y/N]?"(*P$:P$"N"PO1:170: P$"Y"160(H"DOUBLE OR TRIPLE [2/3]"(P$:P$""164: P$"3"65497,0:PO3 : P$"2"65495,0:PO2 :164(S(34),C(31),B(25),G(9):O1:HS440:H$"STEVE"(TA8:TA0(EA$:HH0:F0:T0:H0:P0)"T255L255":3,1::BS1)/"C4BM100,100E5R5F5G5L5H5)B(105,100),4,4)n"R5C2D2BR5U2BM150,100E6F6D4ND4L12ND4U4)(155,100),2,2)"R3C3D2BR6U2BM150,150E6NH4NE4F6ND4G6H6ND4)(155,150),3,3)"R5BU8C2D2BR4U2)(90,90)(124,110),S,G*"(143,89)(169,112),C,G*,,(146,134)(166,156),B,G*B6HH0320:1280*H@*QJ3,1*T"C4BM0,160R20F10R195E10R20D31L255U31C4BM50,172F4D6F4D4L4H4G4L4U4E4U6E4*^(50,180),4,4*h(80,180),8,2,.5*r3,1*|(30,171)(225,171),*(120,180),8,2,.5+(160,180),8,2,.5+)(200,180),8,2,.5+II8020040:(I,180),2,2:+"C3BM38,191U14NR6U4BL4D4NR4D14E4H4E4H4BM75,191U4E4R4F4D4U4L12BM115,191U4E4R4F4ND4L12BM195,191U4E4R4F4ND4L12BM155,191U4E4R4F4ND4L12+(100,100)(108,100),,»(104,96)(104,104),,!(95,91)(115,109),G,G,CX95:Y91:M(235):N(120),L4,1,h(95,91)(115,109),,BF,(0,160)(20,191),,BF,(235,160)(255,191),,BF,Q1200:Q:1,0,O(3): O 540,680,820,I1 10H-&(0)10XX5:X0X0-"0(0)53XX5:X235X235-?:(1)10YY5:Y0Y0-`D(1)53YY5:Y141Y141-{N(X,Y)(X20,Y18),G,-X(M,N)(M26,N23),C,-bBU(65280): BU126 BU254 "O1EFEFDDFEFBBFC": BS 960,970,980 :630.Ml(M,N)(M26,N23),C,:(X10,Y9)1I110:"V10O1GF":(M,N)(MI26,NI23),C,:I:1020._vMVMM:NNVN.zM0M0:M229M229.N0N0:N120N120..990.I1 15H.(0)10XX5:X0X0.(0)53XX5:X235X235/ƅ(1)10YY5:Y0Y0/0Ѕ(1)53YY5:Y141Y141/K(X,Y)(X20,Y18),G,/f(M,N)(M34,N20),S,/BU(65280): BU126 BU254"O1EFEFDDFEFBBFC": BS 960,970,980:7700(M,N)(M34,N20),S,:(X10,Y9)1I110:"O1FG":(M,N)(MI34,NI20),S,:I:10200)MVMM:NNVN0D M0M0:M221M2210_N0N0:N120N1200e 0o*99004VM(2):VM2VM10>(0)10XX5:X0X00H(0)53XX5:X235X2350R(1)10YY5:Y0Y01\(1)53YY5:Y141Y1411f(X,Y)(X20,Y18),G,1:p(M,N)(M20,N22),B,1zBU(65280): BU126 BU254"O1EFEFDDFEFBBFC": BS 960,970,980:9101(M,N)(M20,N22),B,:(X10,Y9)1I110:"O1FG":(M,N)(MI20,NI22),B,:I:10202MMVM4:M0M0:9402M235M235:9402(8302NNH1:N169"O1FGFGFGBBDAGFEBDGFFFAAFDGEGEDBFBFBDGCCCDGEFDBCGDEFAAGDBE":114028302(10,160)(X10,Y9),:(245,160),:(10,160)(X10,Y9),:(245,160),:3 ʻ(10,160)(X10,Y9),:(10,160)(X10,Y9),:3CԻ(245,160)(X10,Y9),:(245,160)(X10,Y9),:3aVM((10)5):VN(10)53s(5)110703 O 540,680,8203PP10:(M,N)(M44,N22),,BF:"O4;AGDFBAGDFEGCBDGEGAF3M(221):N(120)3O(3)4hTT1:T10T0:1430:HHHH1:0,0:6:@200,"CONGRADULATIONS";:@228,"YOU'VE CLEARED"HH"SET";:HH1"S";:1460:14604$ O 540,680,8205!.F40(4)40:(M12,N12)(F,190),:"O5EDEEDEBCCE":(M12,N12)(F,190),:CC110:(F,180),CC,4:"O1DEDE":CC:"O1EEDDEEBBCCB":(F10,170)(F10,191),,BF5:8(200,180)111305RB(80,180)111305kL(120,180)111305V(160,180)111305`11905j O 540,680,8205t BS3M20011905~ BS2M011905M0 BS35M200 BS26M(221):N(120):O(3):113061(40,172)(60,190),S,G6AY160056[(40,Y)(60,Y18),S,6yĻ(40,Y18)(60,Y24),,BF6΋6؞4: PHS HSP:@224,"YOU HAVE HIGH SCORE!";:"WRITE YOUR NAME AND PRESS ENTER.";: H$ :12607[3:"HIGH SCORE":;H$;"=";HS;:I13:"T20L4CCGGAAL2GL4FFEEDDL2CL4GGFFEEL2DL4GGFFEEL2DL4CCGGAAL2GL4FFEEDDL2C":I78:@224,EA$;" WAS DESTROYED BUT YOU ESCAPED IN YOUR ROCKET ALIVE.DO YOU WANT TO TRY YOUR LUCK AT ANOTHER PLANET?"8A$:A$"Y"TATA1:180:A$"N"&* 350:0:4,1:1:(0,0)(255,160),,B&"C0BM2,25F4R12E4U2H4L12H4U2E4R12NF4BR14D20BR10NU20R16E4U12H4NL16BR14NR20D10NR16D10R20BR10NU20E10F10NU20BR10NU20BR10U20F20NU20BR10NU20R16E4U12H4NL16BR14NR20D10NR16D10R20BR10U20R16F4D2G4L6NL10F10'"C0BM12,55F4R12E4U2H4L12H4U2E4R12F4BR10ND12E4R12F4D12G4L12NH4BR26U10NR16U10R20BR10R10ND20R10BR10D20E10F10NU20BR10U10NR20U6E4R12F4D16BR10U20R16F4D2G4L6NL10F10BR10NR20U10NR16U10R20(o("C0BM12,135ND20R16F4D2G4NL16BR14BD10U20R16F4D2G4L6NL10F10BR10NR20U10NR16U10R20BD16BR10F4R12E4U2H4L12H4U2E4R12NF4BR14NR20D10NR16D10R20BR10U20F20U20BR10R10NR10D20BR20BU4F4R12E4U2H4L12H4U2E4R12F4)32"BM70,130NR70U4NR70M+20,-10NR60U45E2R56NR20F2NR20D45G10D4M+30,-20U40BL28BD5L44G2D30F2R44E2U30H2BF10BR10R20U6H4U4E4R4F4D4G4D16F4D4G4L4H4U4E4U6L20H2E2":(168,87),0,0:(175,87),0,0:(98,77),0,0): @ 100,GN$;" NOT FOUND"1| @ 448," TO DO ANOTHER - PRESS ELSE PRESS "1I$: I$"" 5001 I$"Q" :: 1001 I$(13) 3101 5002*5:@480,(32,"%");:@480,(9,255);"coco";(128);"scoreboard";(8,255);(32,"%");2R& N111:@480,(32,207);: 760:20A$"ALPHA":720:A$"TO":720:A$"ZAXXON":720:A$"SEE WHO'S BEST AT WHAT . . . ":7202: "D",#1,"GAMES/DAT",352D #1,15 G$, 10 N$, 10 S$3 N I1 (1): #1,I:GN$G$:NN$N$:SN$S$3DX GN$"" GN$(15," ") 6903wb (GN$,1)" " GN$(GN$,(GN$)1): 6103l (NN$,1)" " NN$(NN$,(NN$)1): 6203v (SN$,1)" " SN$(SN$,(SN$)1): 6304P192((32(GN$))2):@P,GN$;4%P256((32(NN$))2):@P,NN$;4IP320((32(SN$))2):@P,SN$;4` DY0 2000: DY4@192,(32,207);:@256,(32,207);:@320,(32,207);4 I4@202,"THAT'S ALL";:W02000:W4ƚ:1004S224:P255:D05څ D(A$) DD1:B$B$(A$,D,1)58 PS B$(B$,(B$)1) : PP15L@P,B$(207);5q"T25O"((5))"N"((12))5W110:W5 B$"" : 7305#2," <<< THE COCO SCOREBOARD >>>":#2," "6 #2,"GAME PLAYER SCORE":#2," "6!* "D",#1,"GAMES/DAT",356G4 #1,15 G$, 10 N$, 10 S$6> I1 (1): #1,I: #2,G$;" ";N$;" ";S$: I6H #1: 100 7305#2," <<< THE COCO SCOREBOARD >>>":#2," "6 #2,"GAME PLAYER SCORE":# & : MEMOCARDS VERSION 1.0&E: WRITTEN BY ALLAN J. BELANGER&`: COPYRIGHT (C) 1985&(: FOR 16K EXTENDED COLOR BASIC&2:'<200::A8:T161:Z():65495,0:C$(14),S$(4),I(52),CP(40),B(52),H(2),D(2):300:4,1:1:(7,7)(249,184),,B:178,1:(0,0),,2'F@71,"MEMOCARDS VER.1.0";:@199,"building";(128);(128);"graphics";:@358,"BY:ALLAN J. BELANGER":@393,"COPYRIGHT (C)1985"'PN0:Z0:U0:SP3:O0:TT1:X10:Y30:V0:360'ZZZ1(dQ(52):B(Q)1100:I(Z)Q:I(Z20)Q:B(Q)1:Z2090:360(nZZ1(jxQ(40):B(Q)1120:CP(Z)I(Q):B(Q)1:NN1:X1X4:Y1Y21:N10E1)QZ:R0:220:X1X4:Y1Y21:340:E2:Z40110:360:"C2S6BM41,150BU2R35D8L36U8BD2BR3NR4D2R4D2L4BR7NR4U4R4BR3R4D4L4U4BR7ND4R4D2L4R2F2BR3NR4U2NR4U2R4")U"BM157,150BU2R28D8L28U8BD2BR2R4L2ND4BR4D4R4U4BR3ND4R4D2L4R2F2BR3U4F4U4")Z12:"C2S12BM"(18Z)",12ND3F3E3D3BR4NR4UNR4UR4BR4BUND3F3E3D3BR4U2R4D2L4BR8NR4U2R4BR4ND2R4DNL4DBR4U2R4DL4R2FRBR4U2R3FGL3BR8R4UL4UR4"::270:280:1,1*P12*D(2)0:D$"":Z12*$A$*A$""180:A$"0" A$"9" (Z1A$"4")260:D$D$A$:"T50O4F":Z:D(P)(D$):D(P)40D(P)1D(1)D(2)260:B(D(P))1260:H(P)CP(D(P)):V1:210:P:V0:H(1)H(2)390:U1:270+ȀP1100A::P12:210::280:U0:160+7CH(P):QD(P):R0:U1B(D(P))1+m܅Q10RR1:QQ10:220:X10(20Q):Y30(28R)+uS1+C13SS1:CC13:240:1:(X,Y)(X16,Y19),,BF:V0250:"S4C2BM"(X3)","(Y2)C$(C):"BM"(X7)","(Y14)S$(S):,;U:(X,Y)(X16,Y19),,B:(X3,Y2)(X13,Y17),,BF:,O"T15O2D":170,O2:SP4:NSC:2:(93,147)(135,159),,BF:X196:Y1150:340:,O2:SP4:TT1:NT:X1202:Y1150:2:(200,147)(216,159),,BF:340-1"T0370:Z140:B(Z)0:Z:Z1T:"T10G":SCSC10:270:Z:T1T15:1,0:80-,C$(1)"BRNGR3FD2GL3GD2R5BU7BR":C$(2)"BRNGR3FDGNLFD2GL3HBR6BU6":C$(3)"BD4NE4R5LD3U7BR2":C$(4)"NR5D3R4FD2GL3HBR6BU6":C$(5)"BRR3FHL3GD5FR3EU2HL3GBU4BR5".6C$(6)"NDR5DG3D3BR4BU7":C$(7)"BRNGR3FDGNL3FD2GL3HU2EHUBEBR5":C$(8)"BRNR3GD2FR3EU2HFD5GL3NHBR5BU7":C$(9)"BLNGD7BR3HU5ER3FD5GL3":C$(10)"BLBD6NUR4U6LR2":C$(11)"R4D6NHL4NU6R5ND":C$(12)"D6U3RNE3F3":C$(13)"BDER3FHL3GD3NR5D3BR5U6"/@N$(0)"NR4D6R4U6":N$(1)"BR2ND6":N$(2)"R4D3L4D3R4BU6":N$(3)"R4D3NL4D3NL4U6":N$(4)"D3R4U3ND6":N$(5)"NR4D3R4D3NL4BU6":N$(6)"NR4D6R4U3NL4BU3":N$(7)"R4ND6":N$(8)"R4D6L4U3NR4U3R4":N$(9)"NR4D3R4U3D6NL4U6"0BJS$(1)"BLERFDGLHUBE3ERFDGLHUBF3ERFDGLHUBLD4LU4BR3D2E2L2BL5D2H2R2BE3D2H2R2":S$(2)"E4F4DGLH2ND4NU2G2LHUBRE3F3GH2G2HEND3R4D3E2BL6D2H2":S$(3)"E4F4G4H4":S$(4)"BUE2F2E2F2DG4H4U":0T178,O:Q$(N):QE (Q$):M((Q$,Q,1)):"S"(SP)"BM"(X1)","(Y1)N$(M):M1SP3X1X1SP2:X1X1(SP2)0^Q:0hZ152:B(Z)0::Z0:1MrZZ140:B(ZZ)0"T4AGAT1F":V1:Z140:CCP(Z):R0:QZ:220:Z:SC0:T161:ZZ:T1T15:1,0:801`|""380:701"T10O3AGDEFGDGEAAGDEGF":SCSC((C1)2):(Y1)N$(M):M1SP3X1X1SP2:X1X1(SP2)0^Q:0hZ152:B(Z)0::Z0:1MrZZ140:B(ZZ)0"T4????????? OHH???? OHH?? OHH????C J2C???<C J2C???? C J2C???<?C J2C?? TO CONTINUE";+bJX$:X$""330+rTX$" "370+^I114:X$B$(I)500+hI:330+r+|: " (XX)= PAGE NUMBER OF LISTING"++P1524:B$(P)A$(P),B$(10P)A$(P10):P,> " PRESS TO RETURN TO FIRST PAGE OF MENU",f " PRESS ^ (UP ARROW) FOR ";,~XX$: XX$""430,XX$(94) ::,…XX$" "240,̀I15 NP:XX$B$(I)500,֋I:430,XX$430,ꁥ240- Q$A$(I):(Q$,1)"*"540-P:@138,"SORRY, BUT"::8)Q$::" IS A MACHINE LANGUAGE PROGRAM."-:" THE MENU PROGRAM HAS NOW BEEN CLEARED SO YOU MAY THE PROGRAM BY ITS FILENAME."--Q(Q$):QQ6:SL$(Q$,Q)-& SL$,R- "AUGUST".L " (22) MEMOCARD"," (28) SNEAKY"," (37) SCOREBRD"," (45) BLASTER"," (52) COCOLERN". " (60) F15EAGLE"," (84) BLAKJACK"," (86) SPEEDSTR"," (88) THEATRE"," (88) MAGICSQR". " (89) HANGMAN"," (90) WORD1"," (91) MAPPER"," (91) JOYCHECK"," (93) COCOKEY2"/0𕚟𥪀 ꀰꀯ𥪀紀Я匆𯀥𠯥Я  $%'()+,-45789 FALSOFT PRESENTS! RAINBOW" ON # DISK  MENU BAS@MEMOCARDBASSNEAKY BAS&SCOREBRDBASBLASTER BAS'COCOLERNBAS*F15EAGLEBASBLAKJACKBAS.SPEEDSTRBAS/OTHEATRE BASMAGICSQRBAS0HANGMAN BAS1WORD1 BASMAPPER BAS`JOYCHECKBAS2COCOKEY2BAS3SHOOTN BASNUMREVUEBAS RESCUE BAS6 ߀߀셀߀ꀀڀ߀ڀ߀ڀ߀ꀀ ڀ߀ꀀڀ߀ꀀڀ߀ꀀ󀓟 ÀππĀ΀̀π̀ʀʀπʀππππʀʀπππڀ߀ꀀڀ߀ꀀ󀓟 ÀππĀ΀̀π̀ʀʀπʀππππʀʀππ???????????? 0 0 0? & :&:&0: SNEAKY SNAKE VR 2.1&7(:&>2:&X<: COPYRIGHT (C) 1982&rF: BY PETER KERCKHOFF&P: REV. 6/86 P.KERCKHOFF&Z:&d1390,&H7A9F:SP0:SR3:680:440:490:A(7)'GnXC,10:YC,10:A$(29)(28)(24):350:370:CH,30:XC,XP:YC,YP:Z3(Z):SP1370:CH,31:XC,XP:YC,YP:Z3(Z)'xX&H7AA0:X,10:X1,11:X2,12:X&H7B68:X,10:X1,10:X2,10:M,1:LN,2:A$'X(0):X(2):Y(3):A$:(J)0A$""150'(X5Y5X58Y58)(J)1150:130('"AG":Z1(Z):X050SR::(G)1150(G(G)170,180,260,300,310(i150::SHOULD NEVER GET HERE("L255V31O4BAGFEDC":LN,(LN)1:X&H7AA0(LN):Y&H7B68(LN):LX(X1):LY(Y1):(M)190,200,210,220(LXLX1:230)LYLY1:230)LXLX1:230)$LYLY1:230)X,LX:Y,LY:XC,(X2):YC,(Y2):CH,29:Z3(Z):370:XC,XP:YC,YP:CH,30:Z3(Z):SP1370:XC,XP:YC,YP:CH,31:Z3(Z))(LN)200150:: MAXIMUM SNAKE LENGTH = 200*TA$"YOU HAVE OBTAINED A MEGA-SNAKE":XC,0:YC,0:350:A$"THE SNAKE LENGTH IS 200!!!":XC,0:YC,0:350:540:110*A$"BFBFBFBF":"L100O1V31XA$;V15XA$;V7XA$;V3XA$;V2XA$;V1XA$;V0XA$;V31O4L255"*XP(&H7AA0(LN)):YP(&H7B68(LN)):XC,XP:YC,YP:CH,32:Z3(Z)+ X(LN)1:X2X2+"LN,X:150+_,A$"YOU HAVE TIED YOUR SNAKE INTO A":B$"KNOT...LENGTH WAS":320+6A$"YOU HAVE RUN YOUR SNAKE INTO A":B$"WALL...LENGTH WAS",F@XC,0:YC,0:350:A$B$((LN)1)".":XC,0:YC,1:350:XC,0:YC,3:A$"PRESS TRIGGER FOR SAME GAME":350:XC,0: YC,4:A$"OR PRESS ENTER FOR NEW SET-UP":350,JA$:Z(&HFF00)2:A$""Z2330 : Z0 620: 110 : 560:110,T: CHARACTER OUT RTN- ^L1(A$):CH,((A$,L,1)):Z3(Z):"O4V10L255AG":XC,(XC)1::"V31L255BFBF":-*h: RND RTN FOR RB OR SNK PIT-rXP(27)2:YP(18)2:AP&H0E00YP256XP:(AP)0370:A(0)AP1:A(1)AP256:A(2)AP256:A(3)AP1:A(4)AP2:A(5)AP512:A(6)AP512:A(7)AP2.|Y&H0600(&H7B68(LN))256(&H7AA0(LN)):X07:YA(X)370:X:.:.= A$:@0,A$;" ";:A$"*"400:.NA$:A$;"-";.d" "420:410.A$:A$""430:((A$)):430.:AD&H7DD0.D$:D$"*"AD,("&H"D$):ADAD1:450/5AD&H7C3A:1&H7C3E:3&H7D7E:YC&H7C37:XCYC1:CHXC1:LN&H7C31:LN1,0:MLN1:JM1:GJ1:J,1/d֍D$:D$"*"AD,("&H"D$):ADAD1:470/j/3,1:1,0::(0,0)(255,191),,B:(4,4)(251,187),,B:YC,2:XC,10:A$"SNEAKY SNAKE":3500XC,3:YC,4:A$"WELCOME TO THE GAME SNEAKY":350:XC,1:YC,5:A$"SNAKE. THE OBJECT OF THIS GAME":350:XC,1:YC,6:A$"IS TO GUIDE YOUR SNAKE ( "(29)(29)(28)(24)")":3501?YC,7:XC,1:A$"TO THE MUG OF ROOTBEER ( "(30)" ),":350:YC,8:XC,1:A$"AVOIDING THE SNAKE PITS ( "(31)" ).":350:YC,10:XC,1:A$"YOUR SNAKE WILL GROW LONGER AS": 3501YC,11:XC,1:A$"IT DRINKS THE ROOTBEER--BUT IF":350:YC,12:XC,1:A$"THE SNAKE FALLS INTO A SNAKE":350:YC,13:XC,1:A$"PIT THE SNAKE WILL SHRINK.":3502{YC,15:XC,4:A$"THE GAME ENDS IF YOU TIE":350:YC,16:XC,1:A$"YOUR SNAKE INTO A KNOT OR LEAD":350:YC,17:XC,1:A$"IT INTO A WALL.":350:TN$2YC,21:XC,4:A$"PRESS ANY KEY TO CONTINUE":350:A$2&Z(&HFF00)2: "" Z2 5503E0:XC,2:YC,21:A$"PRESS ENTER OR USE TRIGGER":350:YC,22:XC,2:A$"BUTTON TO ENTER VALUE":3503:XC,10:YC,2:A$"SNEAKY SNAKE":350:XC,2:YC,6:A$"SNAKE PITS (1=YES 0=NO) ":B$((SP),1):350:A$:640:B$"1"SP1:B$"0"SP04cDYC,8:XC,2:A$"SNAKE SPEED (1 TO 5) ":B$((SR),1):350:A$:640:B$"0"B$"6"SR(B$):YC,10:XC,2:A$"KEYBOARD (0) OR":3504NYC,11:XC,2:A$"JOYSTICK (1) ":B$(((J)),1):350:A$:640:J,0:B$"1"J,15XYC,14:XC,2:A$"** PRESS ANY KEY TO START **":350:A$5'bZ(&HFF00)2: "" Z2 6105l:CH,23:X031:XC,X:YC,0:Z3(Z):YC,23:Z3(Z)::X023:XC,0:YC,X:Z3(Z):XC,31:Z3(Z)::5v:KEYBOARD INPUT5CH,(B$):Z3(Z)64A$:Z(&HFF00)2: A$"" Z2 650 : Z0 : A$""650:A$"/"A$":""V31L255B":B$A$:640:6>6606Y: TITLE PAGE GRAPHICS64,1:1,1:1:"BM15,84C0S8F3R7E2U6H2L3H2U2E2R2E5R4E2U6H2L3H2UE2R2E2R2U3EUDRLGL3D2GL3G3D4F2R3F2D2G2L3G5L2G3D5F2R3F2D2G2L5H3D2"7"BM+14,+3U8R2F5U5R2D8L2H5D5L2BM+11,+0U6E2R2F2D6L2U2L2D2L2BM+2,-3R2U2L2D2BM+6,+3U8R2D4E4R2G4F4L2H3GD2L2BM+16,+0L6U8R6DL4D3R2DL2D2R4DBM-27,-21U8R2F5U5R2D8L2H5D5L2BM+11,+0U8R6DL4D3R2DL2D2R4DL6BM+8,+0U6E2R2F2D6L2U2L2D2L2BM+2,-3"8{"R2U2L2D2BM+6,+3U8R2D4E4R2G4F4L2H3GD2L2BM+13,+0U4H3UR2F2E2R2DG3D4L2":(180,100),20,0,.2:(160,100)(160,130),:(200,100)(200,105),:(180,130),20,0,.2,0,.5:(160,130)(160,140),98ƻ(200,130)(200,140),:(180,140),20,0,.2,0,.5:(195,108)(210,104),:(195,130)(210,126),:(210,104)(210,126),:(195,113)(205,110),:(195,125)(205,122),:(205,110)(205,122),9л(200,112)(200,122),:X9279:(159X,109)(159X,126),:(158X,111)(158X,124),::(55,12):(53,10)9ڀX110:XCX4160:YC100(10):(XC1,YC)(XC1,YC),:(XC,YC1)(XC,YC1),::"BM5,110S12RULU2D3BM+2,-1FUD2LBM+4,-1S8U5R2D2L2BM+5,+3L2URLUR2BM+2,+0R2LD2BM+5,+0L2URLUR2BM+3,+0LD2URFHUBM+7,+2H3D3U5D2E2BM+5,+5L2URLUR2BM+2,+2U2RDLRFBM+3,+0LU2RBM+3,+2HEGDU5BM+3,+0D5U2R2D2BM+2,+0U2R2D2L2BM+4,+0U5RBM+3,+0LD5BM-4,-3R6";"BM30,190S8HU3ER2FD3GL2BM+5,+0U5F5U5BM+5,+0L3D2R2L2D3R3BM+5,+0U5F2E2D5BM+3,+0HU3ER2FD3GL2BM+5,+0U5F2E2D5BM+5,+0L3U3R2L2U2R3BM+2,+5U5F5U5BM+2,+0R4L2D5BM+7,+0U5R3D3L3BM+5,-3D5R3BM+5,+0L3U3R2L2U2R3BM+2,+5U3E2F2DL4R4D2BM+2,+0R3U3L3U2R3BM+5,+0L3"y 10,4,4,4,4,4,10,0,0,11,4,15,4,11,0,0,0,0,4,15,4,0,0,0,0,0,0,0,1,1,4,0,0,0,0,15,0,0,0,0,0,0,0,0,0,4,4,0,1,4,4,4,4,4,10,0,4,11,11,11,11,11,4,0,4,14,4,4,4,4,15,0?2*15,1,1,15,10,10,15,0,15,1,1,5,1,1,15,0,11,11,11,15,1,1,1,0,15,10,10,15,1,1,15,0,15,10,10,15,11,11,15,0,15,1,1,1,1,1,1,0,15,11,11,15,11,11,15,0,15,11,11,15,1,1,15,0,0,4,4,0,4,4,0,0?40,1,1,0,1,1,4,0,0,1,1,4,4,1,1,0,0,0,15,15,0,0,0,0,0,10,10,4,4,10,10,0,4,11,11,1,4,0,4,0,0,0,0,0,0,0,0,0,15,11,11,11,15,11,11,0,14,11,11,14,11,11,14,0,5,10,10,10,10,10,5,0@>14,11,11,11,11,11,14,0,15,10,10,14,10,10,15,0,15,10,10,14,10,10,10,0,15,10,10,11,11,11,5,0,11,11,11,15,11,11,11,0,15,4,4,4,4,4,15,0,1,1,1,1,11,15,4,0,11,11,14,14,11,11,11,0,10,10,10,10,10,10,15,0AuH11,15,15,11,11,11,11,0,14,15,11,11,11,11,11,0,15,11,11,11,11,11,15,0,15,11,11,15,10,10,10,0,4,11,11,11,11,15,5,0,15,11,11,15,14,11,11,0,15,10,10,15,1,1,15,0,15,4,4,4,4,4,4,0,11,11,11,11,11,11,15,0AR11,11,11,11,11,11,4,0,11,11,11,11,15,15,11,0,11,11,11,4,11,11,11,0,11,11,11,11,4,4,4,0,15,1,1,15,10,10,15,0,*B\: MACHINE CODE FOLLOWSBfEF,DF,F7,BF,B6,7C,33,26,1B,C6,4,8E,7C,3A,A6,80,B7,FF,2,B6,FF,0,84,8,27,5,5A,26,F1,20,26,F7,7C,32,20,21,BD,A9,DE,B6,1,5D,C6,2,81,5,23,EF,C6,4,81,3A,24,E9,B6,1,5C,C6,3,81,5,23,E0,C6,1,81,3A,24,DA,CC,7A,A0CpF3,7C,30,1F,1,A6,84,B7,7C,36,CC,7B,68,F3,7C,30,1F,1,A6,84,B7,7C,35,B6,7C,32,81,1,26,5,7C,7C,36,20,19,81,2,26,5,7A,7C,35,20,10,81,3,26,5,7A,7C,36,20,7,81,4,26,3,7C,7C,35,CC,E,0,F3,7C,35,1F,1,A6,84,C6,5,81,28,27,10,5A,81,55,27,B,5A,81,3C,27,6D}z5A,81,A8,27,1,5A,F7,7C,34,8E,7A,A0,A6,84,B7,7C,38,8E,7B,68,A6,84,B7,7C,37,86,20,B7,7C,39,BD,7D,7E,CC,7A,A0,F3,7C,30,1F,1,A6,84,B7,7C,38,CC,7B,68,F3,7C,30,1F,1,A6,84,B7,7C,37Es86,1C,B7,7C,39,BD,7D,7E,7A,7C,31,CC,7A,A0,F3,7C,30,1F,1,A6,84,B7,7C,38,CC,7B,68,F3,7C,30,1F,1,A6,84,B7,7C,37,86,1D,B7,7C,39,BD,7D,7E,7C,7C,31,B6,7C,32,8B,17,B7,7C,39,B6,7C,36,B7,7C,38,B6,7C,35,B7,7C,37,BD,7D,7E,8E,7A,A0,10,8E,7B,68,F6,7C,31E12,A6,1,A7,80,A6,21,A7,A0,5A,26,F5,B6,7C,36,A7,0,B6,7C,35,A7,20,39,12,12,12F F6,7C,39,86,8,3D,C3,7D,18,1F,1,FC,7C,37,C3,E,0,1F,2,A6,80,A7,A4,A6,80,A7,A8,20,A6,80,A7,A8,40,A6,80,A7,A8,60,A6,80,A7,A9,0,80,A6,80,A7,A9,0,A0,A6,80,A7,A9,0,C0,A6,80,A7,A9,0,E0,39,*,80,A6,21,A7,A0,5A,26,F5,B6,7C,36,A7,0,B6,7C,35,A7,20,39,12,12,12F F6,7C,39,86,8,3D,C3,7D,18,1F,1,FC,7C,37,C3,E,0,1F,2,&:***********************&7:LEARN COCO LEARN &M:BY BILL ENGLISH&f: R. R. 1 BOX 407&: GREENFIELD, IN 46140&:***********************& 1000,30000&R()'E30000:LE: XL L100: X,0: X:MU$"O3L100A":MO$"L32G"'"( 2560::INITIAL QUESTIONS'@2 2440::DRAW GAME BOARD'K< 740'[F:*********'mP:STORE MOVES'ZNMMN: WF1 PB4 : PB4'dCC0:MLL:KM(0)0:FL0'n CCNM 'xP(ML)' PM(CC) 200'KM(CC)ML( CC2(CC2) NE2 : 180(NE3(4MZML: 640::STORE PROB(IMLMLNE:CCCC1(T 110(dPZ(ML1)(҅ PZ0 KIML:KM(CC)ML: 240(MLMLPZ(恥 120(KKCC(P(KM(KK)1)( P0 300(KKKK1( KK0 KME:FLE: 530:)" 250),FLPKM(KK))6EL0)0@ XCC NM1)QJ X2(X2) NE2 : NE3)^TELELNE)f^ X)|h XE1 FL 1)rPK(X))| XEL,PK) X)KMFL) XFL1EL FL 1: X,0: X):********) 530)BGL*… BGKI 520*PZ(BG1)**օ PZBGFL 490*; BG1,PZEL*q (BG)100 NE3 : NE2::FOUND COMPUTER MOVE*~BGBGNE* 450** XCC NM1* KM,M(X)*& KM1,0*0 X2(X2) NE2: 590*:NE3+DMZKM: 640::STORE PROB+NKMKMNE+XEENE+#b X+4l KI1,FLKI+:v+R:STORE PROBABILITY+bPM(MZ2)+{ PM1 PB4 710+ PM0 PM5+PMPMPB+ PM0 PM1+ PM99 PM99+ƒ MZ2,PM+А+:**************, :INITIALIZATION FOR EACH GAME,2@386,"###";TC;:@410,"###";TH;,X@483,"###";ZC;:@507,"###";ZH;, KD7 9: 1980:CL159: 2020: KD, KD4 6: 1980:CL143: 2020: KD, KD1 3: 1980:CL175: 2020: KD, P1 9:P(P)((P2)3)2: P-'*WF0:MN0::WIN FLAG AND MOVE NUMBER-S/ 0,1: JZ1 10:"L255GEC": JZ: 0,0-h4:GET HUMAN MOVE-z>H1254:H2286-H HR1 @153,"RANDOM";-R HR0 @153,"HUMAN";-W@185,(159)"YOUR"(159);-\@217,(159)"MOVE"(159);.f@H1,"";. p@H2,"";.-z@H1,(191);:@H2,(191);.] HR0 910 : PA(6)3:A$(PA): 920.uA$: A$"" 910.HF(A$). HR0 MU$.@H1,(A$,1);. P(HF)1 870.@H2,"";.ʅ HR0 980 : PA(6):A$(PA): 990/A$: A$"" 980/HT(A$)/2 HR0 MU$/A(A$,1);/Y HF7 HT3 870/q HF6 HT4 870/ HFHT3 P(HT)0 1070/ (HFHT4 HFHT2) P(HT)1 1070/$ 870/. 1410: MAKE MOVE08@217," ";:@185," ";0+BP(HF)0:P(HT)1::UPDATE GAME BOARD0PLM(MN)10HFHT::STORE MOVE AWAY0\VMNMN10` MN1 1600::CHECK FOR WINNER0j WF0 740::IF WINNER START OVER0t:COMPUTER MOVES AT RANDOM0~ 2080::SEE IF GAME IN MEMORY1C1230:C22621@194,"MOVE";19 RF1 CF(6):@129,"RANDOM";1a RF1 @129,"MEMORY";:"L255EC"1x P(CF)1 11801CF$(CF)1ć@C1,(CF$,1);1΅ RF1 CT(6)31؅ CT7 CF3 12301 CT6 CF4 11802 CTCF3 P(CT)0 13002/ (CTCF4 CTCF2) P(CT)1 13002; 11802E MU$2TCT$(CT)2h@C2,(CT$,1);2r( MU$221520::MAKE MOVE2<@194," ";2FP(CF)0:P(CT)12PM(MN)10CFCT1002ZMNMN12d MN1 1750::CHECK FOR WINNER3 n WF0 7403x 8203.:MAKE HUMAN MOVE3G Q1 ZT: Q: MO$3YKDHF: 19803dCL1433p 20203zKDHT3 Q1 ZT: Q: MO$3ȁ19803CL1593܁ 202033:MAKE COMPUTER MOVE3 Q1 ZT: Q: MO$3KDCF:19804CL143:20204) Q1 ZT: Q: MO$4:"KDCT:19804L,CL175:20204R64o@:CHECK FOR WINNER HUMAN4J:BLOCKED MOVE4T P(1)1 P(3)1 P(5)1 P(4)1 P(6)1 P(8)1 P(2)0 P(7)0 P(9)0 16905E^ P(2)1 P(5)1 P(1)0 P(3)0 P(4)0 P(6)0 P(7)0 P(8)0 P(9)0 16905bh:CHECK FOR OUTRIGHT WIN5pr P1 35| P(P)1 16905 P5 17405 XZ1 20:@89,"WINNER";:"L100A":@89," ";: XZ5THTH15ZHZH1:ZC05WF16 80::STORE GAME AWAY6̐69:CHECK FOR COMPUTER WIN6J:BLOCK MOVE6 P(1)1 P(5)1 P(4)1 P(8)1 P(2)0 P(3)0 P(6)0 P(7)0 P(9)0 19207 P(4)1 P(5)1 P(1)0 P(2)0 P(3)0 P(6)0 P(7)0 P(8)0 P(9)0 19207f P(5)1 P(6)1 P(1)0 P(2)0 P(3)0 P(4)0 P(7)0 P(8) 0 P(9) 0 19207 P(2)1 P(3)1 P(5)1 P(6)1 P(1)0 P(4)0 P(7)0 P(8)0 P(9)0 19208( P(1)1 P(2)1 P(4)1 P(5)1 P(3)0 P(6)0 P(7)0 P(8)0 P(9)0 19208 P(1)1 P(6)1 P(4)1 P(9)1 P(2)0 P(3)0 P(5)0 P(7)0 P(8)0 19208& P(3)1 P(4)1 P(7)1 P(6)1 P(1)0 P(2)0 P(5)0 P(8)0 P(9)0 19209F0 P(2)1 P(4)1 P(5)1 P(7)1 P(1)0 P(3)0 P(6)0 P(8)0 P(9)0 19209: P(2)1 P(6)1 P(5)1 P(9)1P(1)0 P(3)0 P(4)0 P(7)0P(8)0 19209D P(1)1 P(6)1 P(4)1 P(9)1 P(2)0 P(3)0 P(5)0 P(7)0 P(8)0 1920:]N P(3)1 P(5)1 P(6)1 P(8)1 P(1)0 P(2)0 P(4)0 P(7)0 P(9)0 1920:jX P7 9:b P(P)1 1920:l P:v 1970: XZ1 20:@65,"WINNER";:"L100;E":@65," ";: XZ:WF1:ZCZC1:ZH0; 80::STORE GAME AWAY;TCTC1;;CRO((KD1)3)::COMPUTE ROW(0 TO 2);ƅ KD3(KD3) CO3 : (KD1)3((KD1)3) CO2 : CO1;R4RO4:C5(CO1)9::COMPUTE PROPER ROW AND COLUMN TO DRAW PIECE IN;ڐ;:DRAW ACTUAL MOVE < R1R R1< C1C C3<*@R132C1,(CL);<6 C1,R1<<<\ :COMPUTER MOVE BY LEARNING P0 RF1:::NO MOVES STORED<H PM(CC) 2180<RPZ(ML1)<\ PZ0 RF1:::MOVE NOT STORED<fMLMLPZ=%p MLE RF1:::SET RANDOM MOVE FLAG=1z 2100=T CC2(CC2) NE2 : NE3=aMLMLNE=mCCCC1= CCNM 2230= 2100=K0:TP0=SM(K)(ML):SP(K)(ML2)=P(ML1)=ԅ P0 2300=KK1=MLMLP= 2240>( X0 K:TPTPSP(K): X::ADD UP PROBS> RP(TP): TP3 RF1:::IF NOT MUCH TO CHOOSE FROM GO BACK TO PICK MOVE AT RANDOM> TP0>  X0 K> $TPTPSP(K)> . TPRP 2370> 8 X> BCMSM(K)100:CF(CM10):CTCM10CF? LRF1:::SET RANDOM FLAG TO MEMORY?, V STORE GAME AWAY?6 `NMMN?g j WF1 PB4 : PB4::CHOOSE PROBABILITY?q t 80?w ~? :DRAW BOARD? ? B$(16,128):M$"MOVE":F$"FROM":T$"TO":TT$"TOTAL":W$"WINS"@ C$(8,175):O$(8,159):@56,O$;:@24,O$;:@32,C$;:@0,C$;@O @40,"LEARN COCO LEARN";:@8,(8,169);:@16,(8,153);@z @72,B$;:@200,B$;:@328,B$;:@456,B$;@ Ā R2 13: C8 23 5:@R32C,(128);: C,R@ ΀ R3 11 4: C10 20 5:II1:@R32C,I;: C,RA" ؇@98,"COCO";:@120,"OPPONENT";:@225,F$;:@249,F$;Ad @259,T$;:@283,T$;:@322,TT$;:@346,TT$;:@354,W$;:@378,W$;A @488,"CONSECUTIVE WINS";A A A @40,"LEARN COCO LEARN";B :"DO YOU WISH TO PLAY AGAINST THE COMPUTER YOURSELF OR TO WATCH THE GAME PLAYED AT RANDOM"BQ " TYPE H FOR HUMAN GAME OR R FOR RANDOM GAME"Be (@235,"H OR R";B~ 2Z$: Z$"" 2610B < Z$"H" HR0 : Z$"R" HR1 : 2600B F" ";: Z$"H" "HUMAN" : "RANDOM"C" P:" SELECT THE SPEED OF PLAY (1 THRU 5, 1 IS FAST 5 IS SLOW)"C8 Z@363,"1 THRU 5";CQ dZ$: Z$"" 2660C^ nZ(Z$)C x Z5 Z1 2650 : Z(Z)C " ";ZC ZT(Z1)80C ZZ1 1000: ZZC $"H" "HUMAN" : "RANDOM"C" P:" SELECT THE SPEED OF PLAY &D :BLAKJACK by Bill Bernico and George Aftamonow&OBA100'3:X1056147232:X,191::@0,(32,191);:X1087153532:X,191::@480,(31,191);:T0:CA1:@43,"CASH:";BA;:@75,"";:"O4T60B":"BET:";BE:PL1:@85,(10,175);:1119,191'( BEBA 30'd2CA1P354:CA2P359:CA3P364:CA4P369:CA5P374:CA6P379'm<90'FCA1P129:CA2P134:CA3P139:CA4P144:CA5P149:CA6P154'PPP1(ZX(13)49:X58X10:X59X74:X60X75:X61X81:X62X65(@dE(2):E1E$(128):E2E$(191)(n@P32," "E$" ";:X10@P,"10 ";:"O5T60B":@P64," 10";:U1350::R10:150(x@P,(X)" ";:@P64," ";(X);:"O5T60B":U1350:(RX48:R17RT27R1:R11)R25R10)$CACA1:TTR:CA2 PL150):T21 PL1 270)PT21 PL2 260)^PL1210)kCA370)PL(2)T:PL(2)PL(1) CA670:250)҇@258,"CARD TOTAL";T;:1295,96:43345:@290,"ANOTHER CARD ?";:F13141327:F,(F)64:::PL(1)T:240*I$:I$""220*:I$"Y"50:I$"N"PL(1)T :220*QPL2:CA1:T0:70*z(PL(2)PL(1) PL(2)PL(1))270:260*@277,"YOU WON";:"O3FGFGFG":BABABE:@309,"any key";:1336,32:44539:30+>@274,"COMPUTER WON";:BABABE:@306,"hit any key";:1333,32:1337,32:1341,32:"O2ABABAB":44539:BA1280:30+@258,"YOU'RE BROKE ";:@274,(12,175);:@306,(12,175);:@290,"ANOTHER GAME ?";:"O5BAGFEDCO4BAGFEDCO3BAGFEDCO2BAGFEDCO1BAGFEDC+"I$:I$"Y":I$"N"::290@306,"hit any keL& A$(20,32)&!B$(128)&0C$(191)&M(A$A$B$(A$,10)B$A$&V2L10&b>>>>>"A"")J 440)T@224,"FOUR")^@256,"CORNERS 6 +"A21"+ 12 + 3 ="A""*h@288,"EQUAL"A"*r 440*=|@480,"FOUR NUMBERS AT CENTER EQUAL "A""*H 390*PS5*b Z1 460S*j Z*p*xX1*€ Y1 460X*̋ Y*֐*X2* Y1 460X* Y*)^@256,"CORNERS 6 +"A21"+ 12 + 3 ="A""*h@288,"EQ&& & I1(10)&' W$&/ I&T( "O.K. I'M THINKING OF A WORD."&^2:F1&o< I1(W$)&}FD$D$"?"&P I&Z D$&d "YOU HAVE";M;"MISTAKES."&n"LETTER";L$&x&Ȃ PRINT CURRENT WORD STATUS&Ҁ I1(W$)'܅ (W$,I,1)L$ 240'9D$(D$,I1)L$(D$,(D$)I):F0'A I'S D$W$ 400'aMMF:F1'q M6 500'{, 90'6':"YOU GOT IT!!"' X12100' X' 1000' "YOU HAVE TOO MANY MISTAKES."': "THE WORD WAS ";W$;"."(  X12100( X(  1000(?&*************************(^+*****DATA STATEMENTS*****(}0*************************(X THE,RAINBOW,IS,THE,BEST(b MAGAZINE,FOR,YOUR,COLOR,COMPUTER(:"THANK YOU FOR PLAYING": "THE WORD WAS ";W$;"."(&$:JOYSTICK CHECKER BY RS ELLIS&r:@40,"joystick";(128);"checker":@448," (H=HORIZONTAL V=VERTICAL)"&U$"##":@226,"H V"'@130,U$;(0);:@135,U$;(1);:" right";:X(65280):X124X126X252X254" SWITCH closed":" SWITCH OPEN"'w@322,U$;(2);:@327,U$;(3);:" left ";:X124X125X252X253" SWITCH closed":" SWITCH OPEN"'426,"H V"'@130,U$;(0);:@135,U$;(1);:" right";:X(65280):X124X126X252X254" SWITCH closed":" SWI&8&' ************************&F * CO CO KEYS *&e " KEYBOARD SPELLER *& * A SPELLING GAME *& * BY FRED B.SCERBO *& * 60 HARDING AVE. *& * NORTH ADAMS,MA 01247 *' * COPYRIGHT (C) 1987 *' ************************'6 4,1:1:1,1:3:2'OX$:X$(13)15'y0:(32,172);:I1256:A:A0A16'(A112);::(32,172);(46,44,44,44,42,46,44,44,45,116,126,,,112,126,120,126,124,124,124,122,122,,,112,122,117,124,124,124,124,125(N#42,,,,,42,,,37,,122,,112,118,,,122,,,,120,122,,,112,122,117,,,,,((42,,,,34,42,,,37,,122,112,118,,,,122,,,,,122,,,112,122,117,,,,,(-44,44,44,44,40,44,44,44,44,,123,118,,,,,123,115,115,119,,121,112,,113,120,117,115,115,115,115,115)[2110,108,108,108,106,110,108,108,109,112,122,116,114,,,,122,,,116,112,,121,115,120,,,,,,,117)7106,,,,,106,,,101,,122,,116,114,,112,122,,,,,,,122,,,,,,,,117)<106,,,,98,106,96,96,101,,122,,,116,114,,122,,,112,114,,112,122,,,113,112,,,,117*fA108,108,108,108,104,108,108,108,108,116,124,,,,116,120,124,124,124,124,120,,116,124,,,116,124,124,124,124,124*F@357," KEYBOARD SPELLING ";:@389," (T)ALKING OR (N)OT ? ";*K@421," BY FRED B.SCERBO ";*P@453," COPYRIGHT (C) 1987 ";+UX$:X$"T"105+ZX$"N"100+!_85+*dNT1+1i0+InXX&HFF00:YY&HFF7E+_sXX1,52:XX3,63+mxXX35,60+}R(23),L$(26),Y(40),A(26,2),G$(26),K(100),L(100),SP$(100),PR$(100):C$(1)"C1":C$(2)"C2":C$(3)"C3":C$(4)"C4"+I126:L$(I):+265, AA$JK$,!A$(A):B$(B),<"BM"A$","B$C$(CL),R (JK$)24175,x T2401: (JK$,T,1)" "170, T:175,L$(JK$,T):W$L$:180:JK$" "(JK$,((JK$))T):145,W$JK$:BB14:180:-'SL(W$):I1SL:BB$(W$,I,1):C(BB$)64: C32 "BR6":200-D C18"BR2RBR9":200-gC20"BR2R2D2G2E4BR7":200-rL$(C)-ȋI:BB14:-ͅNT1-ҀII1(AA$)-ׅ (YY) 1280 215-ܒYY,((AA$,II,1))-II-(YY)1280230-YY,13.HH1600:HH:.. U6E2R2F2D2NL4D4BR6,U8R4F2G2NL4F2G2NL4BR8,U8R6ND2BD8NU2NL6BR6,U8R4F2D4G2NL4BR8,U8NR4D4NR4D4R4BR6,U8NR4D4NR4D4BR10,U8R6BD4NL2D4NL4BR6,U4NU4R6U4D8BR6/; R2U8L2R4L2D8R2BR2,NU4R4U8L4R6BD8BR6,U8D4R2NE4F4BR6,NU8R4BR6,U8F3ND2E3D8BR6,U8F6NU6D2BR6,U8R6D8NL6BR6,U8R6D4L6D4BR12,U8R6D8NL6NH4NF2BR6/ U8R6D4L4F4BR6,R6U4L6U4R6BD8BR6,BR4U8L4R8BD8BR6,NU8R6NU8BR6,BU8D4F4E4U4BD8BR6,NU8R4NU6R4NU8BR6,E8G4H4F8BR6,BU8D2F4ND2E4U2BD8BR6,NR8E8NL8BD8BR6/ 270/4,1:1:1,1:30(0,0)(256,92),,BF08"BM10,16":I113:495:(4(I18),12),3,3:0i"BM2,34":I114:495:((I18)6,28),3,3:0""BM4,52":I111:495:((I18)2,42),3,3::"C4U14R32D14NL32BR4":((I18)2,42),4,4:495:(242,42),3,3:(242,42),4,11e'"BM4,70U14R28D14NL28BR4":I110:495:((I18)6,60),3,3::"U14R28D14L28":((I18)6,60),3,3:(236,60),3,3:(236,60),4,11,(24,60),4,1:(10,32),4,1:(10,48),4,1:(248,32),4,1:(218,32),4,111CL1:A6:F110:JK$:AA18:B32:145:16 Q,W,E,R,T,Y,U,I,O,P2;A8:F19:JK$:AA18:B50:145:24@ A,S,D,F,G,H,J,K,L2]EA22:F17:JK$:AA18:B68:145:2qJ Z,X,C,V,B,N,M2O1,4:(60,74)(196,88),,BF2T(236,6),2,12Y4:"C0BM12,48NE3NH3U8BU10BL2U8NF3G3"3*^4:"BM6,64C0":I12:"R4U2L4U2R4BR2D4U2R4U2D4BR4U4BR4ND4NR2D2NR2U2BR4R2ND4R2BD4BR186":3c"BM204,46C0NR4U2NR4U2R4BR2ND4F4U4BR2R2ND4R2BR2NR4D2NR4D2R4BR2U4R4D2L4R2F2BR10NR2U4R2BR4D4NR2BU20NH2NG2L8BL10L8NE2NF2"3h3:"C1BD7BL14L2H2U6E2R4F2D4G2L2H2U4R2BG14BL2BDD2NR2NL2D2BD2DBD2DG2"4-m"BL19BD5G3F3BLBD2D2G2BR18BUU2BU3E3H3BR16R4D2L2D2BD2DBD5E44r3:"BM18,15C1U5NGBU2UBU2U2BR14ND2BR4D2BD4NL4D3L4D3R4BR14R4U3NL2U3L4BU2U2NL2NR6U2NL2NU2R6L2U2D6BR14R4U3L4U3R4L2NU2D8BL3D4R8U4D6"5w"BR12R4U3L4U3R4BU3NEBL4E4BL4LBR18R3DG2DR4H4BD7NR4D6R4U4NL4BU2BR14R6M-4,+6BU10U2BR20BUG2DF2BD2BL2R4D3L4U3D6R4NU3BR14R4U3L4U3R4ND3BU2BL2E2UH2BR14BD7D6NE4BRR4U6NL4BR14BD2NRBD2NRBU8NE2NH2NF2NG2NU2ND2BR16BDR4BU2L4BD8R4C4BR14U6NL2R4D3NL4D3NL6BR4U65|5I126:A(I,1),A(I,2):G$(I)(I64):6 J1100:SP$(J),PR$(J):SP$(J)"END"4006J6JJ16215:26:17:286=I1J6[K(I)(J):L(K(I))14156lL(K(I))1:I6(0,96)(256,134),,B:JK$" PRESS THESE CHARACTERS ON YOUR KEYBOARD.":A0:B112:CL2:1407AA$"PRESS THESE KARRECTERS ON YOUR KEY BOARD. YOUR WORD IS":2057|1,4:4,1:1,1:3:Y1J:AA$PR$(K(Y)):1,4:(0,150)(256,192),,BF:205:JK1400:JK:205:A48QW(SP$(K(Y))):I1QW:(26I4,150)(26I26,174),,B:I:I1QW:Z$(SP$(K(Y)),I,1):Z(Z$)64:3,5:(A(Z,1),A(Z,2))(A(Z,1)14,A(Z,2)14),,BF8.X$:X$(3)4458<51:628ODžX$(92)5158]71:828{хX$G$(Z)475:X$""4458րJL16:4,1:1,0:JK190:JK:1,1:JK190:JK,JL:NWNW1:445875:86943,1:AA$Z$:B170:CL3:"BM"(A)","(B)"S8C3"L$(Z)"S4":AA26:NRNR1:AA$G$(Z):205:I9cAA$PR$(K(Y)):205:JK1300:JK:205:Y9yWW1500::5159"C3U14R14D14NL14BR4":922,38,108,56,72,56,58,38,56,20,76,38,94,38,112,38,146,20,130,38,148,38:(166,38,144,56,126,56,164,20,182,20,20,20,74,20,40,38,92,20,128,20:L90,56,38,20,54,56,110,20,36,56::@101,"YOU TRIED"NRNW"TIMES AND":@165,"ANSWERED"NR"CORRECTLY":@229,"WHILE DOING"NW"WRONG.": NQNRNW:NQ0 NQ1:MS(NRNQ100);@293,"YOUR SCORE IS"MS"%.";%@357,"ANOTHER TRY (Y/N/C) ?";;9!X$:X$"Y";I&X$"N":;h+X$"C"4,1:1,1:3:445;r0545; SURVIVOR,SERVI VOR; LUCKY,LUCKY; RAINBOW,RAYN BOW; CHOCOLATE,CHAUK O LET; DANGEROUS,DAYN JUR US< HAMBURGER,HAMBURGUR<"$ DEPARTMENT,DEPARTMENT<;. NATIONAL,NASHUNNEL ((&HFF00) 1)1 62(A L1 BO1 : BO0)FY3(20)10L:Y4(20)10L)SPA$"D3R3NU3L3":L$"C0":M$"C1": X1 5:L$L$A$:M$M$A$:)ZZZ(0): (1)35 @262,"MOVE JOYSTICK TO TOP")dZZ(0): (1)35 100)n @262,"ONE MOMENT PLEASE...")x7000*5P$"L255;O1V31BV30FV29DV28GV27EV25CV23FV21CV19GV17BV15;L210;02;D#V13C#V11F#V9DV7AV5BV3EV1G"*E4,1:0,1:*\(7,5)(23,16),C,G*"BM7,16;R2E2R4D2R2L4R2U2R4F2R2L2H2E2U2L12D2F2H2U2R3H2U1E2R6F2D1G2"*(7,5)(23,16),V,G+0:(0,0)(255,191),,B:(0,169)(255,191),,BF:X11:Y1153:@448,"ALTITUDE","VELOCITY ","FUEL":@457,0;:@473,0;+LYF70(21)5:YCYF15+YY(40)+Ȼ(0,168)(35,168),:(220,168)(255,168),:"BM25,168": X65 205 5+YY(30)((4)2): Y1 Y1 : Y120 Y120:YY(20),L҅ XYF5 XYF10 XYF15 XYF20 XYF25 Y(5) : XYF YY3 : XYF30 YY4,a܅ XYF15 YMY,XMX: XYF5 XMXM(2) : XYF25 XMXM(2),(XM,167Y),,,(230,168),,"BM=YC;,"(167YM)";BL3E3NF3U2NR2NL2U2NR1NL1U1"-(128,167),0,0-"1,1-},S29:T.7:M100:G1.635:X1:FUEL(10L)5007500:FMFUEL:Y0:V0:GH0:TM0:T20:Q0:ML1:LU1-6@489,(FUEL);-@(&H1,&H9D)(&H11,&HA8),V,. JZZ(0): (1)35 330 : (1,168)(12,170),:(25,168),:(1,168)(24,168),:(5,169)(20,169),:S30.:T(1,157)(17,168),C,.^ZZ&H17(&H0):ZZ(ZZ(ZZ)330.75):F31.5(&H1):FF(F)&H2:FF((F&H0)&H1).h ML LU (&HFF00) &H1 370: TI1:0:@496,"TIME";:LU0/*rFUEL(FUEL(F&H5)T):FUELFUEL((FUEL&H0)&H1):FF((FUEL&H0)&H1)/~| FUEL ZZ FUELFUEL&H3(ZZ):XXZZ: X&H1 X&H1 : X&HED X&H1/AFM:VVATGT:SSVT: S&H1D 550/@&H1C9,(S&H1D);:@&H1D9,(V):@&H1E9,(FUEL)0 Y&HA6S(&HA6&H1F4):Y&H0 Y&H00o Y1&H1 (X1,Y1)(X1&H10,Y1&HB),C,: TI "BM"((X1)&H7)","((Y1)&HA)";XM$;"0 Y&H1 4700 (X,Y&HB)&H0 (X&H9,Y&HB)&H0 (X&H10,Y&HB)&H0 4901(X,Y)(X&H10,Y&HB),V,: TI "BM"((X)&H7)","((Y)&HA)";XL$;"1]̅ ML "BM=YC;,"(&HA7YM)";BL3E3NF3U2NR2NL2U2NR1NL1U1"1pօ TI 10001X1X:Y1Y: 3501ꁥ30001 4000:@0,"YOU CRASHED..."1"TOTAL SCORE ";SCR1" PRESS FIRE BUTTON TO TRY AGAIN "2  (&HFF00) 1 54021! ((&HFF00) 1)1 545 : 402C& X220 4902U+ S29 S2920@457,(S29);:@473,(V):@45732,(FUEL)2:V(V)2D V1 @0,"PERFECT LANDING":20002N V5 @0,"GOOD LANDING":20003 X V9 @0,"HARD LANDING":20003.b4000:@0,"YOU'RE DEAD":5203 &H3C&H1E TI0:@&H1F0,(&H10," ");:"BM"((X)&H7)","((Y)&HA)";"M$"C0": : @&H1F5,((&H1E&H3C)&HA)&HA;" ";3 XYF&H5 XYF&H1A 4c Y&H18(&HA7YM) : TMTM&H1: TM L T2&H1E&H3C:@&H1F0,(&H10," ");:@&H1F0,"GOT HIM";:GH1:M175:ML0:TI0 : 4"BM"((X)7)","((Y)10)";"M$4"BM=YC;,"(167YM)";C1BL3E3NF3U2NR2NL2U2NR1NL1U1"450ST(250T212000FUELFM(9V)5002000L)GH: ST BN25000BO(L1):BO0 : ST100005Mڇ"PERFORMANCE SCORE ";ST5y BN "***BONUS*** ";BN:STSTBN:BN05SCRSCRST5 "TOTAL ";SCR5 GH LL1: L10 L105 "LEVEL ";L5 DL1 5000:: 706~ ML XYF4 XYF27 Y24(167YM) @496,"YOU KILLED HIM";:TI0:"C1BM=YC;,"(167YM)";BL3E3NF3U2NR2NL2U2NR1NL1U1":ML0: 450 : 5006 SP SP1,06 P$: SP SP,06 RA1 31 2:(X8,Y6),RA,0:: RA31 1 2:(X8,Y6),RA,1:67 109,140,49,38,27,108,140,44,190,17I 104,175,140,39,48,140,104,191,1,1047r 190,1,155,175,140,30,48,140,29,1917 1,155,57,109,140,16,39,250,111,1407 11,174,140,9,191,1,104,174,140,67 32,233,0,130,115,0,130,185,52,78Ć 246,1,85,134,247,183,255,2,182,25587Ά 0,138,128,129,247,39,4,202,8,328]؆ 2,196,247,247,1,85,246,1,86,1348 239,183,255,2,182,255,0,138,128,1298 247,39,4,202,8,32,2,196,247,2478 1,86,53,7,50,98,28,175,126,1738 165,52,54,129,8,16,39,0,153,189 18,18,18,18,18,18,18,18,18,189B 18,18,18,198,45,49,141,0,147,1619i 160,39,48,49,39,90,38,247,198,369( 161,160,39,7,49,37,90,38,247,5392 182,141,34,198,1,231,141,0,57,1989< 57,231,141,0,91,23,2,173,18,231:F 141,0,43,198,167,231,141,0,77,32:-P 224,141,4,141,30,32,218,220,136,52:QZ 4,68,86,84,84,84,84,134,12,61:ud 134,32,61,31,1,53,4,196,31,58:n 220,188,48,139,57,198,3,79,18,18:x 18,18,18,18,18,18,18,167,132,48: 136,32,90,38,248,198,7,166,160,18; 18,18,18,18,18,18,167,132,48,136;: 32,90,38,239,134,0,167,132,167,136;` 32,57,23,255,178,48,31,49,141,1; 38,141,198,22,255,129,65,24,60,102; 102,126,102,102,66,124,102,102,124,102; 102,124,67,60,102,96,96,96,102,60< Ȇ 68,120,108,102,102,102,108,120,69,126<1҆ 96,96,124,96,96,126,70,126,96,96J 24,24,24,24,24,24,85,102,102,102>FT 102,102,102,60,86,102,102,102,102,102>q^ 60,24,87,102,102,102,102,126,126,102>h 88,102,102,60,24,60,102,102,89,102>r 102,60,24,24,24,24,90,126,6,12>| 24,48,96,126,48,60,102,110,126,118?  102,60,49,24,56,24,24,24,24,60?2 50,60,102,6,12,24,48,126,51,60?V 102,6,28,6,102,60,52,14,30,54?z 102,126,6,6,53,126,96,124,6,6? 102,60,54,60,102,96,124,102,102,60? 55,126,6,6,12,24,48,96,56,60?† 102,102,60,102,102,60,57,60,102,102@̆ 62,6,102,60,32,0,0,0,0,0@0ֆ 0,0,37,48,74,52,8,44,82,12@P 39,24,24,24,0,0,0,0,42,16@r 84,56,56,84,16,0,58,0,24,24@ 0,24,24,0,63,60,102,6,12,24@ 0,24,45,0,0,0,126,0,0,0@ 46,0,0,0,0,0,96,96,44,0@ 0,0,0,8,24,48,97,48,72,120A 72,72,98,112,72,112,72,112,99,48A?& 72,64,72,48,100,112,40,40,40,112Aj0 101,120,64,120,64,120,102,120,64,120A: 64,64,103,48,72,64,88,48,104,72AD 72,120,72,72,105,112,32,32,32,112AN 106,8,8,8,72,48,107,72,80,96BX 80,72,108,64,64,64,64,120,109,68B)b 108,84,68,68,110,72,104,88,72,72BSl 111,120,72,72,72,120,112,112,72,112Bzv 64,64,113,48,72,72,88,52,114,112B 72,112,80,72,115,56,64,48,8,112B 116,124,16,16,16,16,117,72,72,72B 72,120,118,68,68,68,40,16,119,68C 68,68,84,108,120,68,40,16,40,68C: 121,68,40,16,16,16,122,124,8,16C_ 32,124,47,48,72,72,72,48,33,16C 48,16,16,56,34,48,72,16,32,120CƆ 35,48,72,16,72,48,36,24,40,120CІ 8,8,61,120,96,16,72,48,38,48Cچ 64,112,72,48,43,120,8,8,16,32D 40,48,72,48,72,48,41,48,72,40D; 8,48,18,198,5,231,141,253,145,23De 253,121,198,7,231,141,253,136,198,3Dn 57Dp4,1:1: 0,1DzY191(20)D"BM0,191;"D X5 255 10DYY(20)((4)2)D Y190 Y190 : Y70 Y70:YY(60)E (X,Y),EE&(128,191),0,0E?(0,0)(255,191),,BE@108,"LUNAR":@144,"RESCUE":@239,"BY":@330,"CLYDE JOHNSON"Eʇ@483,"PRESS FIRE BUTTON TO BEGIN"EԿ1,1Eޅ (&HFF00) 1 6110E ((&HFF00) 1)1 6120EFX PA1 4: PA PA4::4,5:1,1:91),0,0E?(0,0)(255,191),,BE@108,"LUNAR":@144,"RESCUE":@239,"BY":@330,"CLYDE JOHNSON"Eʇ@483,"PRESS FIRE BUTTON TO BEGIN"EԿ1,1Eޅ (&HFF00) 1 6110E ((&HFF00) 1)1 6120EFX PA1