dk(@GAMES_01U<(ው<: snail pace'<::(C) ACTIVE SOFTWARE 1982'&0:@203,"SNAIL POS& ~Ԥ"MENU.BAS"O&450 %~q94:(170,96),4,4Nh(190,65),5,2,1.5:(169,65),5,2,1.5:(169,65),2,2:(190,65),2,2:(190,65),2,1:(169,65),2,1N(180,78),10,2,.5,0,.5N"BM170,55NH30R20E30":(140,25),5,4:(220,25),5,4O"T9L3O3BP9BP6BP8O3F#P6F#P6F#P8D#P6F#P6D#P4L1T4O2B": Z1 1000: ZO~(169,65),4,4:(169,65),6,2,.1: 255,2: Z1 100: Z:(169,65),4,4:(169,65),5,2,1.5:(169,65),3,1: Z1 1000: Z:O3,1:1O"BM40,40H1U2E1R2F2D3G2L5H3U4E4R7F3D5G4L9D2R12E6L2NG6R2U4L2ND4R2E1U2L2ND2R2H1L2G1D2":(39,42),2,4:(40,45),4,4P(17,31)(57,47),SN,GPP0 3,1:1: 1,0P"BM0,14C3R240D163L240BM0,35C4R238NU20D22NL238D21NL238D20NL238D20NL238D20NL238D20NL238D18P(0,0),3,3QE"BM243,30C2R9L4U12G3BM243,50NR9U6R9U6L9D2BM243,70R9U6L6E6L9BM248,90U12G5D3R9BM243,110R9U6L9U6R9D2BM243,130R9U6L9ND6U6R9D2BM243,138ND2R9D3G9BM243,170U12R9D6NL9D6L9QX"BM230,15D161Q Z1 SS:RA(S(Z))RA(S(Z))1:F$(S(Z),RA(S(Z)))" 0"Q S(Z)1 Y17 : Y20Q (0,YS(Z))(40,YS(Z)16),SN,Q ZR Z1 SS: GG(S(Z))1 GG(S(Z))1.25R& GG(S(Z))1 GG(S(Z))1R@GG(S(Z))(GG(S(Z)))RH ZR"T9L3O3BP9BP6BP8O3F#P6F#P6F#P8D#P6F#P6D#P4L1T4O2B"RZ1150:Z: 9216:9216S6"BM70,11C2U8L3R7BR4D8U4R6U4D8BR4NR6U4NR4U4R6BR4D4R4ND4R3U4BR4D2U2BR4ND8R6D4L6R2F4BR4NR6U4NR4U4R6BR9NR6D8R6U8BR4D8U4NR4U4R6BR4D8U4NR4U4R6BR4D5BD2D1"SRI(8): SS(I)0 284SII(40): O(I,II)1 284 : O(I,II)1S IC(I)IC(I)FM(I)8GG(I)S" I1 Y17 : Y20S$(IC(I),YI)(40IC(I),YI16),SN,S&"T225;O2;"(I)TG( (230,(I20)10)2 WN0 SS(I)0:WNWN1:RRRR1:WN(WN)I: 366: 300T* (230,(I20)10)2 SS(I)0: 150,4:WNWN1:RRRR1:WN(WN)IT, RR3 304T. 284T0 Z1 WN:F$(WN(Z),RA(WN(Z)))(Z): ZT2 Z1 2000: ZU741:X0: Z1 7:"BM"(X)",0C3RD50R31U50L31":(X5,5),3,3:XX36: ZU6"BM2,5C2ND40R26D20L26R6F20BM38,5NR26D20NR20D20R26BM74,5NR26D20R26D20L26BM110,5D40R26U40BM146,5D40R26BM182,5R26L13D40BM218,5NR26D20R26D20L26"U8"BM0,102C2R60U34L60D34":(5,90),2,2VV:"BM2,100C4R16L8U30L3G3": 150,1:"BM22,100R16U15L16U15R16": 150,1:"BM50,100U30NR8L8": 150,1Vj< Z1 500: ZW >"BM82,100R16U15L16U15R16": 150,1:"BM102,100U30D7F16D7U30": 150,1:"BM122,100U30R16D15NL16D15": 150,1:"BM147,100U30": 150,1:"BM157,100NR16U30": 150,1:W<@ WN(1) 350,352,354,356,358,360,362,364WXB"BM200,100"S$: 200,4WiD WN1 348WF"BM0,142C2R60U34L60D34":(5,130),2,2XH"BM2,140C4NR16U15R16U15L16D2": 175,1:"BM22,140U30D7F16D7U30": 175,1:"BM42,140U30R12F4D22G4L12": 175,1: Z1 500: ZXJ"BM82,140R16U15L16U15R16": 175,1:"BM102,140U30D7F16D7U30": 175,1:"BM122,140U30R16D15NL16D15": 175,1:"BM147,140U30": 175,1:"BM157,140NR16U30": 175,1XL WN(2) 350,352,354,356,358,360,362,364XN"BM200,140"S$: 200,4YP WN2 348Y:R"BM0,182C2R60U34L60D34":(5,170),2,2YT"BM2,180C4R16U15L12E12U3L16": 200,1:"BM22,180U30R16D15L16R1F15": 200,1:"BM42,180U30R12F4D22G4L12": 200,1: Z1 500: ZZ_V"BM82,180R16U15L16U15R16": 200,1:"BM102,180U30D7F16D7U30": 200,1:"BM122,180U30R16D15NL16D15": 200,1:"BM147,180U30": 200,1:"BM157,180NR16U30": 200,1ZX WN(3) 350,352,354,356,358,360,362,364ZZ"BM200,180"S$: 230,4Z\ Z1 2500: Z: 390Z^S$"C2R20L10U30L4G4":[`S$"C2NR20U15R20U15L20D2":[bS$"C2R20U15L15E15L20":[;dS$"C2BR10U30G15D5R20":[[fS$"C2NU3R20U15L20U15R20":[|hS$"C2R20U15L20ND15U15R20":[jS$"C2E20U10L20D2":[lS$"C2BR3R14E3U9H3L14H3U9E3R14F3D9G3L14G3D9F3":[n WN(1) 374,376,378,380,382,384,386,388\p"BM70,189C2R6U4L6U4R6BR4ND8D1F6D1U8BR4ND8R6D4NL6D4BR4U8BR4D8R6BR7"S$"BR7NU8R4U3D3R4U8BR4D8BR4U8D1F6D1U8BR4NR6D4R6D4L6BR10U1BU2U5"\r"O1;V25": Z1 4:"T200;V+;O+;1;1;5;2;2;6;3;3;7;4;4;8;5;5;9;6;6;10;7;7;11;8;8;12": Z\t]vS$"R6L3U8L1G2E2R1D8R3":]xS$"BU6U2R6D4L6D4R6":]8zS$"BU8R6G4R4D4NL6":]R|S$"BR3U8G4D2R6BD2":]q~S$"BU8R6ND2L6D4R6D4NL6":]S$"BU8NR6D4NR6D4R6NU4":]S$"BU8R6D2G6BR6":]S$"NR6U4NR6U4R6D8":^+:"################################# DRAGON TURF ACCOUNTANTS LTD. #################################"^U Z1 4:WI(Z)ST(Z)(OD(WN(1))): Z^ Z1 4:WIWIWI(Z): Z: WI0 404_  Z1 NP: CH(Z)WN(1) ST(Z)0 FE1:FG(Z)1::" "NP$(Z)" YOU HAVE COLLECTED:-":WI(Z)ST(Z)"POUNDS!!": ZZ1 5: Z40,1: ZZ_ Z_2 Z1 NP: FG(Z)0 403 _NCA(Z)CA(Z)WI(Z)ST(Z)_V Z_ FE0 @256,"SORRY, NO RETURNS IN THIS RACE": 1,10_ Z1 3000: Z: 46`:"########################################## GAME OVER ##############"BM165,187;N;R4;U12;R4;BM170,184;N;R8;U8;R8;BM185,187;N;L4;U12;L4"H"BM200,187;N;R4;U12;R4;BM206,184;U8;R8;D8;N;L8;N;H3;F3;BM222,187;N;L4;U12;L4"HC$: C$"" COCO1: CO15 311 : 241H C$"H" 200,5:CO0:EO0: 128I C$"L" 1,5:CO0:EO0: 128I1 C$"C" CO0:EO0: 253IW C$"Q" P1 CO0:EO0: 262Ib 241IpN2(12)I"BM190,91;C6;N;R6;U5;R6;U3;L6;BM202,91;U8;F8;U8;BM217,91;U8;R3;F3;G3;BM229,91;U8;F8;U8;BM239,87;U4;R4;D4;L4"J$W0:C5: Z1 EE: R1 4: (W6,60),C,8:CC1: C7 C5J] (W206,60),C,8:WW15:"O5;L50;"(C): R:W0: ZJK200:"S3;": N2 212,214,216,218,220,222,224,226,228,230,232,234JJJ(50):STST(STJ)100JST(ST)J"V10": Z1 20K "V+;O4;2;1;3;2;1;3": ZK( CA(ZZ)ST 0 291K3 123K_ P0 246 : 285::TEST FOR WINNERKj 305KCA(ZZ)CA(ZZ)ST: 130K N1 N2 C$"L" 273K N1 N2 C$"H" 273K N1N2 325K ST0L  "BM128,123;C4;N;E40;N;F40;N;G40;N;H40"LB"L50;O1;12;11;10;L40;9;8;7;L30;6;5;4;L20;3;2;L2;1"Ln Z1 500: Z:CA(ZZ)CA(ZZ)ST: 291Ly 130LSTST2L ST1000000 ST1000000L"BM128,123;C8;N;E40;G40;H10"M"O3;T100;1;2;3;4;5;6;7;8;9;O4;1;2;3;4;5;6;7;8;9;O5;1;2;3;4;5;6;7;8;9"M A1 3Ml 1,1:"O5;T100;12;9;6;3;04;12;9;6;3;O3;12;9;6;3;O2;12;9;6;3;O1;12;9;6;3"M 1,0:"O5;T100;12;9;6;3;O4;12;9;6;3;O3;12;9;6;3;O2;12;9;6;3;O1;12;9;6;3"M AM 285M 123M " " M 283N CA(ZZ)ST T 286 : N1 313: TEST FOR WINNERN=: 0,0Ne :"PRESS ANY KEY FOR ANOTHER GAME"Nw! "" 289 N}"N# CA(ZZ) 0 : 5N$"BM108,6;C2;R40;D40;R60;D40;L60;D100;L40;U100;L60;U40;R60;U40N%(110,30),2,2O&"BM52,50;C5;N;D32;R10;D16;L10;F10;D6;BM67,50;D32;BM73,50;N;D32;R10;D16;L10;BM93,50;N;D32;R10;D16;L10;BM108,50;D32;R10;BM123,50;N;D32;R10;D16;N;L10;D16;BM138,50;D5;F5;N;D22;E5;U5O'"BM153,50;N;R10;D16;N;R8;D16;R10;BM168,50;N;D32;R10;D16;L10;F10;D6P ( ZZ 297,298,299,300P.)"BM190,82;R10;L5;U32;G5": 301P[*"BM190,82;N;R10;U20;R10;U12;L10": 301P+"BM190,82;R10;U16;N;L8;U16;L10": 301P,"BM196,82;U32;L6;D20;R10"Q-"O1;V31;T3;L2;3;P25;3;P29;L5;2;P25;L2;3;P25;6;P25;L7;5;P50;L2;5;P25;L7;3;L2;P50;3;P25;L4;2;P25;L1;3"Q%. Z1 1000: ZQ// 1,1Q<0"S4;":Q1:"O1;V26": TQ1 4:"O+;V+;T255;12;11;10;9;8;7;6;5;4;3;2;1;2;3;4;5;6;7;8;9;10;11;12": TQQ2:Z$;Z$;Q3:N$(ZZ)" YOU GAINED:- "STS1::" CREDITS IN THAT TURN !!!"RJ4 STCA(ZZ)CA(ZZ) :" WELL DONE!" : " COULD HAVE BEEN BETTER!"R5:"YOU NEED"T(STCA(ZZ))"CREDITS TO HIT":"YOUR TARGET OF";T"CREDITS"R6Z$;Z$;: Z1 3500: Z:SG7PP15:CO0: 222EO,1: 212EO,1: 201EO,1: 191EO,1:PQEO2.5:(PPPQ,16)(PPPQ,4),:EOEO10: EO100 ST(ST2): ST0 130 : 123SR8 241Sf9 3,1: 1,0: 2S:"BM118,50;C4;R20;D40;R60;D20;L60;D40;L20;U40;L60;U20;R60;U40;BM113,50;C3;D35;H35;R35;BM68,50;C4;F35;L10;H35;R10TB;"BM58,85;C3;R25;H25;D25;BM58,115;R25;G25;U25;BM58,150;C4;E35;R10;G35;L10;BM113,150;C3;U35;G35;R35T<"BM143,150;C3;U35;F35;L35;BM188,150;C4;H35;R10;F35;L10;BM198,140;C3;U25;L25;F25;BM198,85;L25;E25;D25;BM198,50;C4;G35;L10;E35;R10;BM143,50;C3;R35;G35;U35U*=(128,96),4,4:(69,53),4,4:(69,147),4,4:(187,53),4,4:(187,147),4,4U>(108,53),3,3:(148,53),3,3:(70,75),3,3:(185,75),3,3:(108,148),3,3:(148,148),3,3:(70,118),3,3:(185,118),3,3U?"BM57,49;C1;R142;D102;L142;U102":(1,1),1,1V@"O3;T4;L3;4;P30;L10;4;P30;5;P30;5;P5;4;P30;L8;5;P50;L10;4;P50;L10;2;P40;L10;O2;12;P40;L3;11;P4;O3;L4;7;P40;5;P40;T9;L8;4;P90;O2;12;P90;O3;5;P90;2;P90;L4;7;P20;L3;5;P20;L2;4;P10;L2;2;O2;L1;P5;12VA A1 3VB Z1 250: Z: 1,1: Z1 250: Z: 1,0: A: 1,1VC Z1 1000: ZW D Z1 1000: Z:WEZ(2)WRF"BM128,123;L20;N;D30;R20;E20;H20;L20":(108,161),2,4WG"O1;8;6;8;10;8;4;8;12;O2;8;6;8;10;8;4;8;12;O3;8;6;8;10;8;4;8;12;O4;8;6;8;10;8;4;8;12;O5;8;6;8;10;8;4;8;12"WH AA1 6WI"O3;A;P2;A;P2;A;P2;A"WJ AAX2K(108,161),2,5:"BM128,123;C5;L20;N;D30;R20;E20;H20;L20"XEL Z 268,273U$,"$0 "NITEFLITE"BY E.RATCLIFFE COPY WRITE1983.$73$A1500$_(I1160:D$D$(128):I$f03$1"FOR JOYSTICK CONTROL PLACE IN SOCKET(R) ONE JOYSTICK ";$2A$(133):B$(175):C$(252)$3"JOYSTICKS Y OR N";J$% 4J$"N" J$"Y"60:51%4=power off/on M =map";*4ȇ" press m for map or any key to start"*IZ$:Z$""210*\܅Z$"M"2990*c0*n1210*I0(287X):@XI1,(128);:I*X63X63*I0X:@0I,B$;:I*X255S1002730*"X255X255*,P0P0*-FX0+6P6P6+@Q0Q0+ JQ5Q5+-TS0S0+ErK1HH1(S90)+^|K2HH10(S50)+nK3HH30+K1HH1(S90)+K2HH10(S50)+K3HH30+S300:@51,"1";3260+SQ65A51,1:AA50,…A10D12D12.2:@51,"2";:3260,<̅A0S140S125:@51,"4";:3260,^օV1S150:@51,"3";:3260,BRG185BRG190A2000D151,1:@32,"you have entered matz ";:MAMA1,MA50:"you have collided with a jaguar";:,1600-(BRG)270(D)5A585:@51,"13";:3260-N(BRG)40(D)9A561:@51,"13";:3260-xA5D10D5SC0:@51,"5";:3260-S150Q0:@51,"6";:3260-&A0V0:@51,"7";:3260-0A5VS20:@51,"8";:3260.:FLAG1A50:@51,"9";:3260.)DS60A10A30:@51,"10";:3260.NS0A10"O2L4EEEC#"::@160,"you are not flying a helicopter suggest you return to flying school":.XA20K0:@51,"11";:3260.bS1760.lSO(S):SO220SO220.v1SO,1/LA0H355H5"O2L4EEEC#"::@160,"you have landed pity its not on the runway!!!":/ZH1H57.3/hV1S1800/}W10W2.005W1/A50TCTCW2:TSTSW2/TCTC((H1)V1)/TSTS((H1)V1)/B1TS(TCD1)3.14/BRG(B157.3)0 D((TS2)(TCD1)2)0!TC11BRGBRG1800:BRG360BRGBRG3600OX159AT0:FA00gX191AT1:FA.030 X223AT2:FA.060X255AT9:FA.120 X127AT1:FA.030*X95AT2:FA.0604X63AT6:FA.120>P0ATAT51HS80DR(((S80)801)2)118RS50S80DR(((S80)801)2)11G\S50DR21[fSSDRATPQV1rpVS(FAS)1.69QV1zP0VSVS31P1VSVS21P2VSVS11P4VSVS1P5VSVS11P6VSVS21A1S60VS01AAVS2 ʅS60A10VSVS502%ԅS601,1:1405,19123ޅA1FA02GA1P1SS102(BRG)359D2D4A1S1:"congratulations you have landed at hethel";:2A1S1AT02FF(P200)2F0F02FLAG1P02$F0P02.F01295,2463 8F01264,2463&BF0X1911233,24633LA0A03@VS0S03R`A0S0VS03ajA10SC13wtD12D1024803~D2D4.236103V0@372,(252);3V1@372,(140);3@419,WI$;:@451,WI$;:@483,WI$;3(BRG)1793540412804"@388,"ils";:@395,"ah";4Nć@327,"alt";:@334,"vsi";:@343,"fuel";4k·@321,"asi";:@339,"uc";4w؀I0314OS$OS$(131112)4I44@348,(F);4 @353,(S);:@359,(A);:41503,143:1534,14341533,143:1535,1435 (P1P210005>2@375,"stall";:@381,(128);(128);(128);5P<@366,(VS);5dF@407,"rpm";P1;5xKH360HH3605LH0HH3605P@439,"hdg";(H);(143);5Z@471,"brg";5[@474," ";5d(BRG)100@474,(BRG);6n(BRG)10(BRG)100@475,(BRG);6Ax(BRG)0(BRG)10@476,(BRG)6k(BRG)100(BRG)9(1024475),796(BRG)101499,79:1500,796@288,OS$;6@479,"";6@503,"dme";(D);6@402,"f";:@434,"l";:@466,"a";:@498,"p";7QU$4F$  3,1$ 5$ 1,1$C"C7;BM30,14;R198;D111;L195;U111"$h"C7;BM26,9;R208;D121;L208;U121"$"BM36,60;U40;R18;D40;L4;U17;L9;D17;L5"$"BM40,39;U15;R11;D15;L11"$"BM60,60;U21;R18;D4;L13;D13;R13;D4;L16% "BM91,60;U17;L7;U4;R7;U19;R4;D19;R7;D4;L7;D13;R7;D4;L11%P "BM108,60;U21;R4;D21;L4;BM 108,35;U4;R4;D4;L4"% (120,39)(127,60),:"BM127,60;R4": (131,60)(138,39),% "BM138,39;L4;BM120,39;R4": (124,39)(129,54),: (129,54)(134,39),& "BM144,60;U21;R17;D12;L13;D5;R13;D4;L17;BM148,47;U4;R9;D4;L9"&0 (110,33),7,7&TY2:X36: Z1 6: Z4 Y74& Z5 (X86,40),7,7: (X88,46),7,7: (X100,40),7,7: (X98,46),7,7:Y92&(XY,58),7,7:YY28& Z'"BM36,105;U4;R13;U12;L13;U20;R17;D4;L13;D12;R13;D20;L17"'<"BM59,105;U20;R17;D20;L17;BM63,101;U12;R9;D12;L9"'m"BM82,105;U20;R17;D4;L13;D5;R7;D4;L7;D7;L4"'"BM111,105;U16;L7;U4;R7;U20;R4;D20;R7;D4;L7;D12;R7;D4;L11"'"BM128,105;U20;R4;D16;R6;U16;R4;D16;R6;U16;R4;D20;L24"(*"BM158,105;U20;R17;D20;L4;U8;L9;D8;L4;BM162,93;U4;R9;D4;L9"(Q"BM181,105;U20;R17;D4;L13;D16;L4"("BM204,105;U20;R17;D11;L13;D5;R13;D4;L17;BM208,92;U3;R9;D3;L9"(X36:Y3: Z1 8: Z6 Y124( (XY,87),7,7:YY23: Z: (28,11),7,7)%"C8;BM38,170;U20;R17;D12;L13;D8;L4;BM42,158;U4;R9;D4;L9")N"C8;BM61,170;U20;R17;D4;L13;D16;L4")"C8;BM84,170;U20;R17;D11;L13;D5;R13;D4;L17;BM88,157;U3;R9;D3;L9") "C8;BM107,170;U4;R13;U4;L13;U12;R17;D4;L13;D4;R13;D12;L17*!"C8;BM130,170;U20;R17;D11;L13;D5;R13;D4;L17;BM134,157;U3;R9;D3;L9"*L""C8;BM153,170;U20;R17;D20;L4;U16;L9;D16;L4"*#"C8;BM181,170;U12;L5;U4;R5;U4;R4;D4;R5;D4;L4;D8;R5;D4;L9*$"C8;BM199,170;U4;R13;U4;L13;U12;R17;D4;L13;D4;R13;D12;L17"*%X38:Y2: Z1 8: Z7 Y145+& (XY,168),8,8:YY23: Z+(' 1,1: Z1 500: Z+<( Z1 100: Z+E) 4+P* 1000+X+ 5+,"BM19,127;U64;R11;D24;R22;U24;R12;D64;L12;U24;L22;D24;L11"+-"BM73,127;U64;R11;D64;L11"+."C7;BM94,101;U11;R33;D11;L33",/"C6;BM137,127;U64;R11;D53;R33;D11;L44",A0"BM191,127;U64;R44;D64;L44;BM202,116;U42;R22;D42;L22,j1 Z1 2: (24Y,95),8,8:YY54: Z,|2 (96,98),7,7,3Y0,4 Z1 2: (139Y,125),6,6:YY54: Z,5 Z1 2: 3,1,6 1,1,7 "O2;L18;T30;V25;12;11;10;9;8;7;6;5;4;3;2;1"-18V25: E1 18: "V"(V)";L8;1":VV1: E-;9 1,2-E: 1,0-w; "O4;T30;V25;L18;1;2;3;4;5;6;7;8;9;10;11;12"- Z1 700: Z-?"V31"-@Z$(32,255)-A-B:Z$;.&C (12,255);" HI-LO ";(13,255);(32,255);.iD(32,255);(2,255)" A GAME FOR UP TO 4 PLAYERS ";(2,255);.xEZ$;Z$;Z$;.F"DO YOU WANT INSTRUCTIONS (Y/N)?";: Z1 5:Z$;: Z.GY$: Y$""71.H "V31".I Y$"N" 76/J Y$"Y" 136/ K 71/tL:"************************************** PLAYER INFORMATION **************************************"/M"HOW MANY PLAYERS ";NP/N NP 1 NP 4 76/O/P P1 NP/Q"NAME OF PLAYER";P" ";/R N$(P):N$(P)(N$(P),10)0S P0 T:03U"WHAT TARGET (1000 - 1000000)";0NV:::" ";T$0[WT(T$)0yX T1000 T 1000000 850Y:@32,Z$;0Z" THERE ARE "NP" PLAYERS:-"0[0\ Z1 NP:L (N$(Z)):X10L:X$(Z)(X," ")1 ]N$(Z)X$(Z)" YOU HAVE 50 CREDITS"1^ Z1_:1=`"YOUR TARGET IS";T;"CREDITS"1ya:" *** ORAC ***":" WISHES YOU LUCK!"1b @448,Z$;1c Z1 2000: Z1d 1011e::Z$1f@263,"LET THE GAME BEGIN"1g@448,Z$;1h Z1 900: Z2i Z1 NP:CA(Z)50: Z2jZZ12)k: START '21lP02Gm CA(ZZ) 1 1302Vn::Z$;Z$2toN$(ZZ)" IT IS YOUR TURN"2p::"YOU HAVE "CA(ZZ)" CREDITS"2q@416,Z$;Z$;2r TQ1 22s"V25;T8;L3;O4;L8;CF;P8;CF;P8;CF;P12;CFGFE;P8;FG;P12"2t TQ3u"L6;E;L2;E+"3-v@320,"YOUR STAKE ";:ST3Dw ST CA(ZZ) 1103RxST(ST)3\yS1ST3szCA(ZZ)CA(ZZ) ST3{{Q03| 158::DRAW ST3} 185::DRAW "PLACED"3~ 199::CACL + DRAW N13 236::PLAYERS CHOICE4P1: 247::CALC + DRAW N24 265::CHECK FOR WIN49ZZZZ1: ZZNP ZZ14D 1074OQQ204"BM"(15Q)",40;U15;R8;D8;L8;BM"(27Q)",40;N;U15;R8;BM"(39Q)",40;U15;R8;D7;N;L8;D8;BM"(51Q)",40;N;R8;U15;R8;BM"(63Q)",40;N;R8;U8;N;R4;U7;R8"5$ "BM"(75Q)",40;U15;R4;F4;D7;G4;L4"5/ 1355a:Z$;:"********* INSTRUCTIONS *********";Z$6"*** ORAC ***, THE COMPUTER, WILLGENERATE A NUMBER BETWEEN 1 AND 12. THE PLAYER HAS TO DECIDE IFTHE NEXT NUMBER GENERATED BY ORAC WILL BE HIGHER OR LOWER THAN THE PRESENT ONE."6z:"A PLAYER BEGINS WITH 50 CREDITS IN THE BANK. A CORRECT DECISIONDOUBLES THE STAKE."6:"..PRESS SPACEBAR TO CONTINUE...";6 2837E:"THE FIRST PLAYER TO REACH A BANKBALANCE OF ONE MILLION CREDITS WINS THE GAME. ANY PLAYER WHO SHOWS A MINUS BALANCE DROPS OUT OF THE GAME."7:"PLAYERS MAY,IF THEY WISH, CHOOSETHEIR OWN TARGET OF BETWEEN 1000AND 1000000 CREDITS."8:"AFTER A STAKE HAS BEEN PLACED, ORAC WILL GENERATE A NUMBER. THEPLAYER THEN HAS 4 OPTIONS:-"8;::"..PRESS SPACEBAR TO CONTINUE...";: 2838:"1. PRESS THE 'H' KEY.":"2. PRESS THE 'L' KEY.":"3. PRESS THE 'C' KEY.":"4. PRESS THE 'Q' KEY."9/:"PRESSING THE 'H' KEY MEANS THE PLAYER EXPECTS THE NEXT NUMBER WHICH ORAC GENERATES WILL BE HIGHER THAN THE PRESENT."9:"PRESSING THE 'L' KEY MEANS THE PLAYER EXPECTS THE NEXT NUMBER WHICH ORAC GENERATES WILL BE LOWER THAN THE PRESENT."9:"..PRESS SPACEBAR TO CONTINUE...";: 283::"PRESSING THE 'C' KEY WILL INSTRUCT ORAC TO GENERATE A NEW NUMBER TO REPLACE THE PRESENT ONE. HOWEVER THERE IS A PENALTYFOR THIS FACILITY, COSTING UP TO 50% OF THAT PLAYERS STAKE."; :"PRESSING THE 'Q' KEY WILL END A PLAYERS GO AND PUT ANY CREDITS INTO THAT PLAYERS ACCOUNT.";:"ONLY 10 SECONDS ARE GIVEN FOR THE PLAYER TO MAKE A DECISION. THE PENALTY FOR EXCEEDING THE LIMIT IS A LOSS OF 50% OF THE STAKE..... PRESS SPACEBAR";; 283S$(Z)"R8;L4;U15;G4">>,S$(Z)"R8;L8;U8;R8;U7;L8">2>PS$(Z)"R8;U8;L4;R4;U7;L8">V>xS$(Z)"C5;R5;C8;U15;L5;D9;R8">~>S$(Z)"R8;U9;L8;U6;R8">>S$(Z)"R8;U8;L8;D8;U15;R8">>S$(Z)"C5;R8;C8;U15;L8">?S$(Z)"R8;U15;L8;D7;R8;L8;D8"??*S$(Z)"R8;U15;L8;D8;R8"?0?8 5?B 1,1?t"BM0,20;C7;R255;D25;L255;U25;BM0,75;C8;R255"? A15 250 25: (A,16)(A,4),: A@"BM0,75;D95;R70;U95;BM255,75;D95;L70;U95;BM0,97;R70;BM255,97;L70;BM0,171;R255;D20;L255;U20"@w"BM5,91;C6;R6;L3;U8;G3;BM17,91;R6;U4;L6;U4;R6;BM29,91;U8;N;L3;R3;BM48,91;U8;F8;U8;BM57,87;U4;R4;D4;L4;BM48,87;R4"@ Y1 (ST$)@"C8;"@"BM"(Q)",40;"S$(Y)@QQ12: Y@QQ20Avĵ"BM"(15Q)",40;U15;R8;D8;L8;BM"(27Q)",40;N;U15;R8;BM"(39Q)",40;U15;R8;D7;N;L8;D8;BM"(51Q)",40;N;R8;U15;R8;BM"(63Q)",40;N;R8;U8;N;R4;U7;R8"Aŵ"BM"(75Q)",40;U15;R4;F4;D7;G4;L4"AƑADž EO100 EO0: 204AN3(2): N31 203AN1(12)Aʁ 204BN1(3)4B4W6:K18: Z1 4:(W,60),6,8:WW15: ZB`W206: Z1 4: (W,60),6,8:WW15: ZCε"BM60,70;C7;U20;R20;D20;L20;BM85,70;U20;R20;D10;L20;F10;BM110,70;U20;R20;D10;N;L20;D10;BM135,70;N;R20;U20;R20;BM160,50;R10;G5;H5;BM175,70;R20;U10;L20;U10;R20"CEE(7)3CTW0:C5: Z1 EE: R1 4:(W6,60),C,8:CC1: C7 C5CѲ (W206,60),C,8:WW15:"O5;L50;"(C): R:W0: ZCҵ"S3;": N1 212,214,216,218,220,222,224,226,228,230,232,234CӑCԵ"BM"(K)",155;R50;L25;U60;G20"D յ"S4":D6ֵ"BM"(K)",155;N;R50;U35;R50;U25;L50"DB׵"S4":Doص"BM"(K)",155;R50;U30;N;L25;U30;L50"D{ٵ"S4":Dڵ"BM"(K)",155;C5;R25;C8;U60;L25;D35;R50"D۵"S4":Dܵ"BM"(K)",155;R50;U35;L50;U25;R50"Dݵ"S4":E ޵"BM"(K)",155;N;U60;R50;U30;L50;U30;R50"E,ߵ"S4":EU"BM"(K)",155;C5;R50;C8;U60;L40"Ea"S4":E"BM"(K)",155;R50;U30;N;L50;U30;L50;D59"E"S4":E"BM"(K)",155;R50;U60;L50;D30;R50"E"S4":F"BM"(K)",155;R20;L10;U60;G10;BM"(K25)",155;R20;U60;L20;D60"F+"S4":Fu"BM"(K)",155;R20;L10;U60;G10;BM"(K25)",155;R20;L10;U60;G10"F"S4":F"BM"(K)",155;R20;L10;U60;G10;BM"(K25)",155;N;R20;U35;R20;U25;L20"F"S4":Ga"C6;BM5,187;U12;R8;D6;L8;BM18,187;U12;R8;D6;L8;F6;BM31,187;N;R8;U6;N;R4;U6;R8;BM44,187;R8;U6;L8;U6;R8;BM57,187;R8;U6;L8;U6;R8"G"BM95,187;N;R4;U12;R4;BM100,184;U8;D4;R8;N;U4;D4;BM115,187;N;L4;U12;L4"G"BM130,187;N;R4;U12;R4;BM136,184;N;U8;R8;BM150,187;N;L4;U12;L4"H;59,96;N;E10;N;F10;N;G10;H10;BM75,96;U10;N;R20;D10;R15;L15;D10;R20;BM101,96;U10;N;R20;D20;R20;BM127,96;N;U10;D10;R20;U20;BM153,96;C1;U10;C0;R20;L10;D20;BM179,96;U10;D20I$@"BM186,96;U10;R20;D20;L20;U10;BM212,106;U20;F20;U20;BM238,106;U5;R5;D5;L5;BM238,97;U11;R5;D11;L5":(240,104),0,0:(240,95),0,0IAJ Z1 1000: Z: 1760IOT"V6;L80"I^ Z1 24:"T50;V+;L-;O1;1;3;5;7;9;11;9;7;5;3;1": ZIhIrA11I| Z1 10IAA1I ZZ1 AI(230X,8)(250X,48),M1,J"L200;T200;O5;12": W1 20: WJE(230X,8)(250X,48),M0,:XX9:(230X,8)(250X,48),M2,Jk"L200;T200;O5;12": W1 20: WJ´(230X,8)(250X,48),M0,JXX9: ZZ:(230X,8)(250X,48),M1,: W1 50: W:(230X,8)(250X,48),M3,: A$: A$:X0: ZJ֑K(60,174),10,0:(60,174),6,0,1,.2,.8K"BM75,184;U20;R10;D10;N;L10;D10;BM90,184;N;R10;U20;R10;BM110,184;U20;L5;R10;BM120,184;U20;BM125,164;D15;F5;E5;U15;BM140,184;N;R10;U10;N;R6;U10;R10Lg"BM160,184;R10;U10;L10;U10;R10;C1;R4;C0;D5;R1;U5;C1;R4;C0;D20;R5;N;U8;R5;U20;C1;R5;C0;N;D20;R10;D10;N;L10;D10;C1;R5;C0;U20;R10;D10;L10;F10;C1;R5;C0;N;R10;U10;N;R6;U10;R10L Z1 3000: Z: 50L 4,1: 1M(30,30),4,0,1.8:(35,30),1,1:(30,27),4,0,1.8,.5,0:(30,24),1,0:(30,24),2,0:"BM25,27;C0;R10;U1;L10;BM26,31;R1;BM28,33;E2MF(31,36,0):(30,20,1):(29,29,0):(22,39),1,0,1.2M&"BM30,36;F2;N;E3;H2;G4;D5;R1;D2;R5;U2;R1;N;L7;U6":(30,46),0,0:"BM32,38;L8;D1;R8;D1;L8":(27,48)(25,56),:(22,55),:(22,56),:(26,58),:(28,48),N90(32,48)(35,56),:(31,58),:(31,56),:(33,55),:(30,48),:(32,56,0)NJ:(32,43),0,0ND M1(5,10): M2(5,10): M0(5,10): M3(5,10): M4(5,10): M5(5,10)NN(49,19)(69,59),M0,GNX(19,19)(39,59),M1,GOb"BM28,36;C1;G3;D3":(23,39),1,1:"BM30,38;C0;F6;G1;H6":(37,46),1,0,1.7O+l(19,19)(39,59),M2,GOv(60,30),4,0,1.8:(60,27),4,0,1.8,.5,0:(60,20,1):"BM55,27;C0;R10;U1;L10;BM59,36;R5;F2;D8;L2;U6;D6;L1;D13;L2;U11;L2;D11;L2;U13;L1;U6;D6;L2;U8;E2;R5;BM68,47;N;D12;U5"P(60,30),0,0:(60,25),0,0:(62,40),0,0:(67,47),1,0:(55,47),1,0P5(52,19)(72,59),M3,GP"BM68,47;C1;N;D12;U5;BM64,36;D14;R1;U14;R1;D14;R1;U14;BM64,38;C0;R5;D1;L5;D1;R5;L1;U3;L4;U1;R3;U1;L2;U1;R1;U1;BM56,39;C1;D9;L1;U9;L1;D9;C0;BM56,36;L1;D1;R1;D1;L1;D1;R1;D1;L2;U2Q(52,19)(72,59),M4,GQ!(102,19)(122,59),M3,Qv"BM118,39;C1;D20;L1;U20;L1;D20;L1;U20;L1;N;D20;C0;D1;R2;L2;R2;U1;L2;U1;R1;U1;L1Q"BM104,39;C1;D12;R1;U12;R1;D12;U11;C0;L5;U1;R5;U1;L5;R1;U1;R4;U1;L3;U1;R2;U1;L1;U1QƳ(102,19)(122,59),M5,GQЫ1:RI$"######### INSTRUCTIONS #########"R:I$:"THE COMPUTER WILL CHOOSE A WORD FROM ITS DATA BANK AND DISPLAY ANUMBER OF DASHES ON THE SCREEN. EACH DASH CORRESPONDS TO A LETTER IN THE CHOSEN WORD."S:"THE PLAYER HAS TO DISCOVER THE CHOSEN WORD BY GUESSING THE LETTERS THAT MAKE UP THE WORD. IF A CORRECT GUESS IS MADE, THE COMPUTER WILL WRITE THAT LETTER IN ITS CORRECT POSITION IN THE WORD."S".....PRESS ANY KEY.....";S "" 2050T~ :I$:"IF A WRONG GUESS IS MADE, THEN WAIT AND SEE... !"::"FOR EACH CORRECT LETTER, FIVE POINTS ARE SCORED, AND A BONUS OF TEN POINTS IS EARNED WHEN THEWORD IS COMPLETED."U :"A PLAYER HAS ABOUT 5 SECONDS TO TAKE A TURN. IF THIS LIMIT IS EXCEEDED IT IS TAKEN AS A WRONG GUESS, HOLDING THE USUAL PENALTY":"PRESS ANY KEY......";U3 "" 2080V*:I$:"WITH EACH WORD THERE IS ONE CLUEAVAILABLE, BUT SEEING THE CLUE MEANS FORFEITING THE TEN POINT BONUS."::"TO MAKE A GUESS SIMPLY PRESS THEDESIRED KEY AND WAIT FOR THE COMPUTER TO ANSWER."V4:"THERE ARE NO SPECIAL SYMBOLS OR PUNCTUATION MARKS. THE COMPUTER WILL NOT RECOGNISE KEYS USED IN CONJUNCTION WITH THE SHIFT KEY.":"PRESS ANY KEY......";V> "" 2110WH:I$:"IF ANY OF THE LATTER KEYS ARE SELECTED THE COMPUTER WILL COUNT IT AS A WRONG GUESS."WR:"ALTHOUGH POINTS ARE SCORED FOR CORRECT GUESSES, THE OVERALL WINNER WILL BE JUDGED ON PERCEN-TAGE, SINCE SOME WORDS WILL BE LONGER THAN OTHERS."W\:"PRESS ANY KEY TO START.....";Wf "" 2150Wp 90X-z0:@256,"WANT TO USE YOUR OWN WORDS (Y/N)";:0,1XFA$: A$"" 2180X[ A$"N" S0:Xo A$"Y" 2220X{ 2180X P1$(L): P2$(L): C1$(L): C2$(L): ZZ1 LY:"######################################## WORD INSERTION #######################################"Y4NP$(1)" ENTER WORD "ZZYAʉP1$(ZZ)Yԅ (P1$(ZZ))12 @256,"YOUR WORD IS TOO LONG! (MAX 12)": H1 500: H:@256," ": 2230Yއ@256,"YOUR CLUE (MAX 30 INC. SPACES)"Y C1$(ZZ)Y (C1$(ZZ))30 2270Z ZZZ  ZZ1 LZy :"######################################## WORD INSERTION #######################################"Z NP$(2)" ENTER WORD "ZZZ $ P2$(ZZ)[ . (P2$(ZZ))12 @256,"YOUR WORD IS TOO LONG! (MAX 12)": H1 500: H: @256," ": 2320[0 8@256,"YOUR CLUE (MAX 30 INC. SPACES)"[> B C2$(ZZ)[Z L (C2$(ZZ))30 2360[i V ZZ:S1:[~ ` Z1 3000: Z[ j WL0 2435 : "BM125,9;C1;D6;R1;U6;BM131,9;D6;L1;U6"\ t Z1 5:"BM127,9;C0;L6;D1;R6;BM129,9;R6;D1;L6":"T100;L200;O4;2;4;6;8;10;12;P10;12;10;8;6;4;2":"BM127,9;C1;L6;D1;R6;BM129,9;R6;D1;L6;C0;D4;R1;U6;L1;BM127,9;D6;L1;U6;R1":"T100;L200;O4;2;4;6;8;10;12;12;10;8;6;4;2"]2 ~"BM127,9;C1;D6;L1;U6;R1;BM129,9;R1;D6;L1;U6": Z:"BM127,9;C0;L6;D1;R6;BM129,9;R6;D1;L6;BM129,9;D6;L3;U6":(128,7),3,0:(128,7),2,1: Z1 2000: Z] TR1 0:@74,"THE WORD WAS";:@272((W$)2),W$;: 0,1: 200,2: Z1 3000: Z] :"########################################## SCOREBOARD ##########################################"^ NP$(P)" IN ROUND"T"YOU SCORED:-"^. :"POINTS:- "Q^I TR1 BO0 : BO10^_ :"BONUS :- "BO^w :"TOTAL:- "QBO^ PC(W$)WL:PCPC(W$)^ PCBO(PCQ):PC(PC)^ ؇:"% POINTS:-"PC^ QQ(P)QQ(P)PC: Z1 26:AL(Z)0: Z_ @480,"PRESS ENTER....";: B$_| :"######################################## SCORES TO DATE ########################################"_ Z1 NP::NP$(Z)":- "QQ(Z): Z_ @480,"PRESS ENTER....";: B$_  210_ 3:@238,"GAME";:@270,"OVER";:`= ("T9;O2;L8CFP8CFP8CFP8CFP8CFGFEP8FGP8CFP8CFP8CFP8CFP8CFGFEP8FGP8EL2F` 2:"######################################### final scores ########################################"` < Z1 NP::NP$(Z)":- SCORED"QQ(Z): Z` F@480,"ANOTHER GAME (Y/N)";a PB$: B$"" 2640a Z B$"Y" a0 d B$"N" a< n 264020A(7)20(A(7))7/R(A(8))10A(8)10(A(8))7C\A(4)0A(4)07XaA(4)10A(4)107kfA(2)0A(2)07iA(2)10A(2)107p7z(0)10(0)54(1)10(1)54(2)20(2)54(3)10(3)54((65280)255(65280)127)2180:8(1)10A(7)A(7)2:40008?(2)10A(4)A(4)1:43008`(2)54A(4)A(4)1:43008(3)10A(2)A(2)1:43008(3)54A(2)A(2)1:43008((65280)253)(A(13)1)22008((65280)125)(A(13)1)22009((65280)253)(A(13)0)A(13)1:40009J((65280)125)(A(13)0)A(13)1:40009r(65280)254(65280)12650009(1)54A(7)A(7)2:40009(0)10A(8)A(8)2:40009(0)54A(8)A(8)2:40009230,19JE1:2120: A(13)0:4000:2189: PT0:5 CX2510((C(1)1000)PI5):W CY8010((C(1)1000)PI5): DX2518(((C(1)1000)(C(1)1000))PI2): DY8018(((C(1)1000)(C(1)1000))PI2): PT12580: (25,80)(CX,CY),:(25,80)(DX,DY),; PT1:C(1)A(1):2510;: (25,80)(CX,CY),:(25,80)(DX,DY),;@ ;S A(6)6A(6)1;{ (B(2,A(6))A(12))0A(12)A(12).1; O((B(1,A(6))A(11))(B(2,A(6))A(12)))180PI; (B(2,A(6))A(12))O180O; A(10)OA(9); (A(10)C(10))1< CX7518(C(10)PI180)<7 CY8018(C(10)PI180) >$ CX17518(C(5)PI2500)>B CY8018(C(5)PI2500)>a DX17518(A(5)PI2500)> DY8018(A(5)PI2500)> Ԫ(175,80)(CX,CY),:(175,80)(DX,DY),> C(5)A(5)> >tA(11)199A(11)199>uA(11)0A(11)0?vA(12)199A(12)199?wA(12)0A(12)0?H}CX225(C(11)100)5:CY80(C(12)100)5?Y~(CX,CY0.5)?CX225(A(11)100)5:CY80(A(12)100)5?S1(CX,CY)?(CX,CY0.5,1)?C(11)A(11):C(12)A(12)?(223,80)(227,80),??CY140(C(7)1030)@S1(C(8)PI180)@,S2(C(8)PI180)@CS3(A(8)PI180)@ZS4(A(8)PI180)@(258S2,CY20S1)(258S2,CY20S1),:(25,CY)(2510S1,CY4S2),A(254S2,CY10S1)(254S210S1,CY10S14S2),:(254S2,CY10S1)(254SU$==$ 3000$ AL(26)$BZ3148831539:K$:Z,("&H"K$):Z$N 1800$Z( 1550$20:@228,"DO YOU WANT INSTRUCTIONS";:@301,"(Y/N)";:0,1$ Z1 400: Z: 4802H W$(400)2R Z1 400: W$(Z): Z:2\W(275):WW(125):W$W$(W)2fWL(W$)3p Z1 26:AL(Z)0: Z37z W41 C$"A PLANT OR A TREE":3U W81 C$"AN ANIMAL":3q W121 C$"A BIRD":3 W161 C$"AN ITEM OF FOOD":3 W180 C$"A BRITISH CITY":3 W281 C$"A VERB":3C$"A NOUN":3:PLANTS'4ņ 34,12,B6,FF,23,8A,08,B7,FF,23,7F,01,47,8E,B7,98,A6,80,8D,14,A6,80,8D,10,7A,01,47,26,F3,B6,FF,23,84,F7,B7,FF,23,35,12,39,B4,01,47,B7,FF,20,86,11,4A,26,FD,395?ʆ WILLOW,FERN,BIRCH,CARNATION,CLEMATIS,ASPIDISTRA,LUPIN,PANSY,HYDRANGER,SNOWDROP,HYACINTH,PETUNIA,HONEYSUCKLE,LAVENDER,ORCHID,FREESIA,HEMLOCK,FUCHSIA,CACTUS,TULIP5Ԇ DANDELION,LARCH,CHESTNUT,LOBELIA,YEW,YUCCA,CHRYSANTH,PINE,DORRIT,ROSE,DAFFODIL,TULIP,CROCUS,GERANIUM,PELARGONIUM,DAISY,BEECH,ELDER,HEATHER,ELM5:ANIMALS'6 RACOON,JAGUAR,POLAR BEAR,SHREW,BEAVER,ANTELOPE,POSSUM,HEDGEHOG,KANGAROO,ALLIGATOR,TORTISE,GERBIL,GIRAFFE,KOALA BEAR,BISON,LLAMA,ELEPHANT,HIPPOPOTAMUS,RHINOCEROS,BUFFALO7$ LEOPARD,CHIMPANZEE,MONKEY,OXEN,GOAT,WALLABY,WOLF,WOMBAT,WALRUS,ZEBRA,WEASEL,FERRET,POLECAT,STOAT,TURTLE,HAMSTER,SQUIRREL,GORILLA,GOPHER,FOX71:BIRDS'7 CYGNET,SWAN,HAWK,EAGLE,PUFFIN,OWL,FALCON,WOODPECKER,PARTRIDGE,MUDLARK,KIWI,EMU,OSTRICH,TURKEY,SEAGULL,PIGEON,PENGUIN,FLAMINGO,STORK,THRUSH8b MAGPIE,KINGFISHER,CUCKOO,OSPREY,ALBATROSS,STORK,PARROT,WAGTAIL,GOOSE,PHEASANT,VULTURE,SPARROW,RAVEN,BLACKBIRD,CROW,STARLING,CANARY,DOVE,PEACOCK,CHAFFINCH8w:THINGS TO EAT'9$ AUBERGINE,ARTICHOKE,TURNIP,POTATO,CARROT,PARSNIP,BEETROOT,TOMATO,LETTUCE,RADISH,CUCUMBER,PUMPKIN,ONION,CAULIFLOWER,BEANS,EGGS,CABBAGE,SWEDE,MUSHROOMS,SPINACH9. CHEESE,PEPPERS,MELON,MARROW,CELERY,PEACH,TANGARINE,GRAPEFRUIT,MANGO,COCONUT,NECTARINE,GRAPE,PINEAPPLE,ORANGE,SUGAR,LEMON,LIME,MANDARIN,GARLIC,SAUSAGE98:BRITISH CITIES':B BRISTOL,BIRMINGHAM,EXETER,LINCOLN,NOTTINGHAM,SWANSEA,CHELTENHAM,ABERDEEN,GLASGOW,MANCHESTER,LEICESTER,SHEFFIELD,SWINDON,TAUNTON,BELFAST,READING,LIVERPOOL,IPSWICH,DERBY,BATH:L:VERBS';%V ABANDON,CONQUER,LEAVE,ARGUE,TRANSLATE,PROFESS,REVIEW,JOSTLE,SMELL,THROW,DEVISE,CONSTRUCT,BUILD,ATTEND,DRESS,COVER,FINISH,ARRANGE,CROUCH,ENTERTAIN;` SHUFFLE,BELIEVE,RECOVER,CREATE,DISTURB,KNEAD,UNDERTAKE,UNIFY,UNITE,USURP,URGE,UTTER,VACCINATE,QUAKE,QUARREL,QUALIFY,QUELL,QUENCH,QUIVER,QUOTE<[j KNEEL,EDIFY,PROCEED,PROCLAIM,PROFESS,PRUNE,PULVERIZE,ASPIRE,ASCERTAIN,BARRICADE,BARTER,CAUTION,PERCEIVE,OBVIATE,OCCUPY,OPERATE,OPINE,ORDAIN,REPLENISH,REPLY<t REPOSE,REPULSE,REPROACH,SALVAGE,SEIZE,SPECULATE,SPLAY,SPRAWL,SPREAD,SPURN,SQUASH,SQUAWK,SQUEAK,SQUEAL,SQUEEZE,SQUINT,SQUAT,SQUIRM,SQUIRT,STAGNATE=~ SQUELCH,THROTTLE,THROW,THRUST,TICKLE,WAGER,WAIL,CULTIVATE,DECIPHER,CYCLE,DEVISE,BROWSE,STRUGGLE,CONSIDER,MOTIVATE,ENCLOSE,SWITCH,COLLIDE,KNOCK,INSTRUCT=:NOUNS'>C TELEVISION,VASE,STATUE,PORTRAIT,SPHINX,BASKET,APERITIF,APOSTLE,ARTICHOKE,AERIAL,FLAGON,FREESIA,GANDER,GROCER,GARBAGE,INFANT,RAIMENT,BACHELOR,BALLERINA,BANQUET> BARBEQUE,CHASSIS,DOMINO,DRAUGHT,DUNGEON,ELECTRON,ATOM,NEUTRON,LAW,EMERALD,YACHT,RESIN,LEDGE,LEGION,LOLLIPOP,MACARONI,MAMMAL,MANACLE,MARQUEE,MOLECULE? MOSQUE,NOZZLE,OINTMENT,PADLOCK,PATRIOT,PENTAGON,OCTAGON,TRIANGLE,QUADRANGLE,RAFTER,RAFFIA,RETINA,SAILOR,SALMON,SALVAGE,SAUSAGE,SCIENCE,SECTION,SEQUEL,SHAFT@ SHALE,SHIELD,SHOAL,SISTER,SKITTLE,BROTHER,NIECE,DAUGHTER,FATHER,UNCLE,MOTHER,NEPHEW,SKITTLE,SLEIGH,SUBWAY,SUNDAE,SWITCH,TABLE,TACKLE,TADPOLE@ TANKARD,JEWEL,VEIN,VOODOO,WAGON,WAIST,WARRANT,WATCH,WHEAT,WINDOW,YOKE,YODEL,ZEAL,ZERO,ZODIAC,PUDDING,PUDDLE,PULPIT,PUZZLE,QUAILA-Ć PRINCESS,QUARTZ,QUEEN,PLUME,SLIPPER,PENCIL,CLOCK,BISCUIT,RADIO,CUSHION,BUTTON,RECORD,GARAGE,COFFEE,CARAVAN,PLOUGH,PLUMBER,DOUGH,DIARY,DIAMONDAΆ DIALECT,DEW,CROSS,CRIME,CREAM,CORRIDOR,LOUNGE,TOILET,KITCHEN,CONGENIAL,CHAUFFEUR,CHARACTER,CARNIVAL,ALCOHOL,COUNTESS,FINGER,THUMB,GREASE,GRAVY,EMULSIONBp؆ SHOULDER,MARKET,LOGIC,SPATULA,SPHERE,SPICE,SPINDLE,STAKE,FLOWER,CHALK,MOUNTAIN,JUMPER,BREAKFAST,STRAW,PARAFFIN,CASSETTE,BRIEFCASE,ARCHER,WICKET,CANDLE,CEILINGC TYPIST,DICTIONARY,TRANSFORMER,DISCIPLE,GOSPEL,CENTRE,SPIDER,INSECT,AMPHIBIAN,ELECTRIC,PACKAGE,PENCIL,BICYCLE,FLASK,BEAKER,COMPUTER,MEMORY,SHRUB,VACUUM,WAITRESSC PHYSICIAN,SURGEON,VACCINE,VALVE,VANILLA,VAULT,VEHICLE,YODEL,EXIT,EPISODE,SERIAL,JACKET,SKIRT,JUDGE,JUNCTION,JUNIOR,KNUCKLE,KNOWLEDGE,KRAAL,ORNAMENTD[ OBSTACLE,OXYGEN,PADDOCK,PETITION,FURNITURE,MACKINTOSH,GALAXY,ZONE,HAZARD,SHEMOZZLE,SKELETON,ELBOW,THIGH,CONTAINER,INSTRUMENT,JUNCTION,SIGNAL,RODENT,APARTMENT,POLISHDk:ALPHABET'D L$"U7E3R3F3D2NL9D5": :ADL$"U10R7F2D1G2L7R7F2D1G2L7": :BDL$"C1R2C0R5E2G2L5H2U6E2R5F2": :CD(L$"U10R7F2D6G2L7": :DE2L$"NR9U5NR6U5R9": :EE+L$"NU10E4R1F4U10": :WGXL$"E10G5NF5H5": :XG{L$"C1R5C0U5H4NU1F4E4U1": :YGL$"NR10E9U1L10": :ZG 4,1:1: 1,0G:G" 1650G, 1620H6"BM8,184;C0;U176;N;R40;D88;N;R35;D88;R40;BM REPORT";:IMIMMI:EMEMME:SHSHHSH/ IM0 IM0HA EM0 EM0HS SH0 SH0I &@100,"FIREPOWER:- "FP"%";:@164,"INTERNAL MNT:- "IM"%";:@228,"EXTERNAL MNT:- "EM"%";:@292,"SHIELDS:- "SH"%";:@356,"COMPUTER:- "CO"%";: 150,1: Z1 3000: ZI0 IM20 CL1I8: EM0 SH10 3650I[D EM20 SH20 BL1: 2030IgN 1950IXDU(12)6::C$:COCO(8):::"A DETOUR WILL ADD"DU"DAYS ONTO":"THE DURATION OF THE JOURNEY"Jfb@256,"WILL YOU DETOUR, OR WILL YOU CONTINUE YOUR PRESENT COURSE?":@416,"TYPE 'D' TO MAKE A DETOUR.":"TYPE 'C' TO CONTINUE THE PRESENTCOURSE";J~lA$: A$"" 1900Jv A$"C" 100,1: 1750J A$"D" 1940J 1900JEXEXDU: 150,2: 1840J:MAGNETIC STORMS'K RR98 (2)1 1990K. (PP)5 (2)2 1990K: 2020KA:KР0:C$;:COCO(15):@228,"MAGNETIC STORM DETECTED!";: Z1 4:"T100;L2;O4;10;10;10;5;5;5;1;1;1;P1;1;1;1;5;5;5;10;10;10;": ZLWڀ Z1 2000: Z:0:C$;:@229,"PROTEUS HAD TO DETOUR!";: 150,2: Z1 2000: Z:@229,"THAT COST YOU"NNB"DAYS!";: 150,2: Z1 2000: ZLj EX0 3670L:COMING IN TO LAND'L CL0 2110L I(1)I(2)I(3)I(4)0 2110L Z1 4: I(Z)2 CL(Z)(I(Z)):I(Z)I(Z)CL(Z)L ZM 0:@37,"TROUBLE IN YOUR HOLD";:@98,"YOU HAVE HAD TO DITCH:-";:@162,"GENERAL CARGO:- "CL(1);:@226,"LASER ARMS:- "CL(2);:@290,"ZARIUM CRYSTAL:-"CL(3);:@354,"URANIUM X :-"CL(4);:@453,"DUE TO INTERNAL DAMAGE";M* 185,10: Z1 5000: ZM4CL0N`> BL0 0:C$;:COCO(10):@228,"ARRIVING AT "DE$;:0,1: 180,2: Z1 2000: Z: 2230NH0:C$;:COCO(15):@101,"DUE TO EXTERNAL DAMAGE";: 150,4: Z1 300: Z:@259,"CRASH LANDING UNAVOIDABLE!";: 190,12: Z1 3000: Z:BL0O'R 120,2:@458,"YOU CRASHED!";: Z1 2000: ZO`\FP65:SH65:IM65:EM65:CO65: CABA120000 2200 OqfII120000CAPYp CA120000 :" **********************":@160,"IT HAS COST YOU 120000 CREDITS TO GET THE PROTEUS UP TO 65% EFFICIENCY. SINCE YOU ONLY HAD"CA"READY CASH,"II"HAS":"BEEN TAKEN OUT OF YOUR BANK TO SETTLE THE BILL!"Pz CA120000 @486,"**********************";: 150,2: Z1 8000: Z:BABACA120000:CA0: 2230Q:" **********************":@192,"IT HAS COST YOU 120000 CREDITS TO GET THE PROTEUS UP TO 65% EFFICIENCY. THIS HAS BEEN TAKEN OUT OF YOUR CASH.":@480," **********************";:CACA120000: 180,1: Z1 6000: ZQ 2230R:" **********************":@128,"IT HAS COST YOU 120000 CREDITS TO GET THE PROTEUS UP TO 65% EFFICIENCY. SINCE YOU COULD NOT PAY THIS WITH YOUR PRESENT FINANCES, THE BANK STEPPED IN AND PAID FOR YOU."R"YOU OWE THE BANK THE 120000 CREDITS."S@486,"**********************";: 180,2: Z1 8000: Z:BABA120000: 2230S@ CA10 BA10 IT0 3660So BA0 RA0 BABA(BARA)150:BA(BA)S} 1000Sޅ BA0 RA0 BABA(BARA)100:BA(BA)SLO$DE$T:D$;: Z32 224 32:@Z1,(191);(191);: Z:@224,D$;:@160,D$;:@207,(191);(191);TZZ1: Z34 130 32:@Z,G$(ZZ);:@Z15,I(ZZ);:ZZZZ1: Z:@193,"CASH"CA;:@208,"BANK"BADB;T  LL1 2510U9  PP60 CA5 DM(CARR2)100:DM(DM)1:@416,Z$;:@416,"A RUTHLESS SPACE PIRATE ASKS YOUFOR"DM"CREDITS PROTECTION":"MONEY!! WILL YOU PAY? (Y/N)";: 2340UE  2400U^ $A$: A$"" 2340Uw . A$"Y" 2380:PI0U 8 A$"N" PI1: 2390U B 2340U LCACADM:PI0:@197,CA;U V@416,Z$;V ` SS NN80 @416,Z$;: (8) 2420,2430,2440,2450,2460,2470,2480,2490V% j 2510V t@416,"THERE IS A WAR ON "LO$:"LASER ARMS ARE SELLING AT SKY HIGH PRICES!!!";:LALA10: 2500W ~@416,"THERE IS A GLUT OF GENERAL CARGOON "LO$". PRICES ARE VERY":"VERY LOW HERE!!";:GCGC10:GC(GC)1: 2500W| @416,"PIRATES HAVE FLOODED THE MARKET WITH LASER ARMS ON "LO$".":"PRICES ARE LOW HERE!!";:LALA5:LA(LA): 2500W @416,"THE GENERAL CARGO IS IN SHORT SUPPLY ON "LO$". IT IS":"SELLING AT A VERY HIGH PRICE!!";:GCGC15:GC(GC): 2500Xs @416,"URANIUM X IS BEING SOLD AT LESS THAN MARKET VALUE ON "LO$:"BY RIVAL TRADERS!!";:UXUX5:UX(UX): 2500X @416,"THE INTERGALACTIC ARMY ARE REBUILDING THE FLEET. URANIUM X IS IN GREAT DEMAND ON "LO$;:UXUX10: 2500Yo @416,"PIRATES HAVE DUMPED ZARIUM CRYSTAL ON THE MARKET ON "LO$;:"THEY ARE A LOW PRICE HERE!!";:ZCZC5:ZC(ZC): 2500Y @416,LO$" HAS BEEN RAIDED BY REBELS":"ZARIUM CRYSTAL IS VERY SCARCE!!";:ZCZC10: 2500Z Ģ 160,1: 180,1: 200,1: Z1 2500: Z:@416,Z$;Z+ LL1:@256,"PRICES AT "LO$" ARE:-Zp ؇:"G.CARGO"GC;14)"Z.CRYSTAL"ZC:"L.ARMS ";LA;14)"URANIUM X"UXZ @416,"DO YOU WANT TO BUY, SELL, QUIT ?"Z 150,2Z A$: A$"" 2550Z A$"B" R$"BUY": 2600[ A$"S" R$"SELL": 2600[(  A$"Q" 25,1: 120,2: 3500[4  2550[c (@416,Z$;:@416,"WHAT DO YOU WANT TO "R$"?[| 2A$: A$"" 2610[ < A$"G" R$"BUY" 2670 : A$"G" R$"SELL" 2750[ F A$"L" R$"BUY" 2690 : A$"L" R$"SELL" 2770\6 P A$"Z" R$"BUY" 2710 : A$"Z" R$"SELL" 2790\t Z A$"U" R$"BUY" 2730 : A$"U" R$"SELL" 2810\ d 2600\ n CAGC 3570\ xCSGC: 3560:I(1)I(1)W: 2290\ CALA 3570\ CSLA: 3560:I(2)I(2)W: 2290] CAZC 3570]4 CSZC: 3560:I(3)I(3)W: 2290]J CAUX 3570]p CSUX: 3560:I(4)I(4)W: 2290] I(1)0 3530] AMI(1):CSGC: 3540:I(1)I(1)W: 2290] ҅ I(2)0 3530] AMI(2):CSLA: 3540:I(2)I(2)W: 2290^ I(3)0 3530^? AMI(3):CSZC: 3540:I(3)I(3)W: 2290^V I(4)0 3530^ AMI(4):CSUX: 3540:I(4)I(4)W: 2290^ :COMPUTER REPORT'^  CO0 FL1: 3090^ "Q(0)10:QQ(ITDI)100:Q(Q):COCO((Q))_ ,0:@40,"computer"Q$"report";: @458,"your"Q$"choice";:@133,"1";:@138,"maintenance";:@197,"2";:@202,"planets";:@261,"3";:@266,"all"Q$"other";:0,1_ 6A$: A$"" 2870_ @A(A$): A1 A3 2870_ J A 2900,2950,3030` T 150,2:0:@39,"MAINTENANCE REPORT";` ^@484,"PRESS ANY KEY TO RETURN";:@130,"FIREPOWER";14)FP;"%";21)"EFFICIENT";:@194,"INTERNAL MNT";14)IM;"%";21)"EFFICIENT";:@258,"EXTERNAL MNT";14)EM;"%";21)"EFFICIENT";a h@322,"SHIELDS";14)SH;"%";21)"EFFICIENT";:@386,"COMPUTER"14)CO"%"21)"EFFICIENT";a- rA$: A$"" 2930a9 | 2830aT CO55 FL1: 3090a 150,2::@42,"PLANET DATA"::: Z1 6: P$(Z)LO$ DI(Z)0 : 2);Z;7)P$(Z)15)DI(Z)"M. MILES"b+ Z:@353,"WHERE DO YOU WANT TO GO NEXT? (SELECT NUMBER), OR PRESS 'R' TO RETURN TO THE COMPUTER.";bD A$: A$"" 2980bP 150,2bd A$"R" 2830b A(A$): A1 A6 2980b ̅ DI(A)0 2980 : DE$P$(A):DIDI(A): 830b օ CO45 3090b 150,2::@40,"COMPUTER REPORT";c# @98,"DAYS EXP.";300EX:@113,"REMAINING";EXc @162,"CASH IN HAND";CA;29)"CR":@194,"CASH IN BANK";BA;29)"CR"::" CONTENTS OF HOLD:-":: Z1 4:" "G$(Z)20)I(Z): Zc @485,"PRESS ANY KEY TO RETURN";c A$: A$"" 3080 : 2850d :COMPUTER BREAKDOWN'dz  Z1 3: 3:@106,"UNAVAILABLE";:"T4;L8;O4;10;L6;10;P4": 3:@394,"MALFUNCTION";:"T4;L8;O3;10;L6;10;P4": Zd & FL1 FL0: 830d 0 2830d :0:@41,"STATUS REPORT";:@129,"LOCATION:- "LO$;:@193,"DESTINATION:- "DE$;e, D@257,"WARP SPEED:- 3 ";:@321,"DAYS ELAPSED:-"DL;:e NEXEXDL: LO$DE$ Z1 1000: Z:@417,"PROTEUS WITHIN SOLAR SYSTEM...";: 175,2: 470e X Z1 500: Zf b"T31": Z1 29:"T-L7AA#A-AA#A-": Z:LO$DE$:2190: 3520: Z1 500: Z: 3130f l:f< "T3;V31;L3;O3;1;3;O2;L2;11;P10;L3;O1;11;L1;O2;6fX ƀ Z1 2000: Z: 150f Ѕ V85 120,2:@416,Z$;:@416,"SORRY, THE MAINTENANCE CREW ARE TOO BUSY.. TRY THE NEXT PLANET";: Z1 2000: Z: 790gw ڠ:C$:"MAINTENANCE COSTS ON "LO$::"1) FIREPOWER"16);(100FP)MN;"CR.":"2) INTERNAL MNT"16);(100IM)MN;"CR.":"3) EXTERNAL MNT"16);(100EM)MN;"CR."g "4) SHIELDS"16);(100SH)MN;"CR.":"5) COMPUTER"16);(100CO)MN;"CR."h{ TC(500FPIMEMSHCO)MN::"TOTAL MAINTENANCE COST";TC::"CASH"CA;15)"BANK"BA::"PRESS 'T' FOR TOTAL REPAIRS":"'ITEM NO.' FOR A SINGLE REPAIR":"PRESS 'E' FOR NO REPAIRS";h 170,1h A$: A$"" 3330h A$"T" 220,4: 3370h  A$"E" 790h A(A$): A1 A5 3330 : 3390i? * CATC CACATC:FP100:IM100:EM100:SH100:CO100: 790i 4@416,Z$;:@448,"YOU DON'T HAVE THE MONEY!!": 120,2: Z1 2000: Z: 3290i > A 3400,3420,3440,3460,3480i H CA(100FP)MN CACA(100FP)MN:FP100: 120,2: 3290j R 3380jC \ CA(100IM)MN CACA(100IM)MN:IM100: 120,2: 3290jO f 3380j p CA(100EM)MN CACA(100EM)MN:EM100: 120,2: 3290j z 3380j CA(100SH)MN CACA(100SH)MN:SH100: 120,2: 3290j 3380k* CA(100CO)MN CACA(100CO)MN:CO100: 120,2: 3290k6 3380ka ITI(1)I(2)I(3)I(4): IT1001 670l IT1000 @416,Z$;:@416,"YOU'RE OVERLOADED !!":"YOU CAN ONLY CARRY 1000 ITEMS !!YOU WILL HAVE TO SELL"IT1000;: 150,12: Z1 2500: Z:@41U$Mŋ$ :INTERPLANETARY TRADER'$?:COPYRIGHT ACTIVE SOFTWARE'$S:OCTOBER 1982'$f(:VERSION 2.6'$m2:$t<:$F 500: P$(10): G$(6)$PC$"COMPUTER REPORTS.....":D$(32,191):Z$(95," "):E$(32,255):S$"PROTEUS":Q$(128)%RZ PHOBOS,AMMERON,XOERUS,VOGAN,AARION,CORVUS,GENERAL CARGO,LASER ARMS,ZARIUM CRYSTAL,URANIUM X%_ 34,12,B6,FF,23,8A,08,B7,FF,23,7F,01,47,8E,B7,98,A6,80,8D,14,A6,80,8D,10,7A,01,47,26,F3,B6,FF,23,84,F7,B7,FF,23,35,12,39,B4,01,47,B7,FF,20,86,FF,4A,26,FD,39&` 34,32,B6,FF,23,8A,08,B7,FF,23,8E,00,01,86,FD,B7,FF,20,8D,17,7F,FF,20,8D,12,30,01,8C,00,6B,25,ED,B6,FF,23,84,F7,B7,FF,23,35,32,39,1F,12,31,3F,26,FC,39&d Z1 6: P$(Z): Z: Z1 4: G$(Z): Z:Z3200032101:K$:Z,("&H"K$):Z'n0:@260,"interplanetary";:@276,"trader";'1 120,2: Z1 1200: Z'^0:@261,"SET COURSE - WARP 3";: 120,2's Z1 2000: Z'0:CA300:BA4000:EX300:SH100:FP100:IM100:EM100:CO100:DI230:IT1:WP3' 3620'DE$"THE THIRD SYSTEM"'LO$"SPACE"(TR1: 550(cNN(8):MN(8):SHSH((DIWP)75):EMEM(SH.05):IMIM((DIIT1)2500)(x Z1 3000: Z(0:@40,"STATUS REPORT";(@99,"LOCATION:-"LO$;:@164,"CASH:- "CA;:@178,"BANK"BA;){@228,"1) PHOBOS"16)"2) AMMERON";:@260,"3) XOERUS"16)"4) VOGAN ";:@292,"5) ARRION"16)"6) CORVUS ";: Z1 2500: Z:@419,"ENTER DESTINATION (NUMBER)";)A$: A$"" 175,1: 520)A(A$): A1 A6 520 : DE$P$(A)) 2240*& NN 560,570,580,590,600,610,620,630*+0UX15000:ZC1300:LA150:GC10: 640*S:UX16000:ZC1400:LA160:GC11:640*|DUX14000:ZC1500:LA100:GC12: 640*NUX13000:ZC1600:LA110:GC13: 640*XUX12000:ZC1000:LA120:GC14: 640*bUX10000:ZC1100:LA130:GC15: 640+ lUX11000:ZC1200:LA140:GC16: 640+GvUX17000:ZC900:LA170:GC9: 640+UX(UX2)(3):ZC(ZC2)(3):LA(LA2)(3):GC(GC2)(3):GC(GC)+ TR1 TR0: 3130+ 690+ 3610+ 550+:,@416,Z$;:@416,"VISIT INTERSTELLAR BANK (Y/N)";:,&A$: A$"" 710,<Ѕ A$"Y" 890,Rڅ A$"N" 750,]䁼 710,@416,Z$;:@416,"MAINTENANCE REQUIRED (Y/N)";,A$: A$"" 760, A$"Y" 3280, A$"N" 790 : 760-- Z1 750: Z:0:C$;:@66,"LOCATION:- ORBITING "LO$;: 174,4: Z1 400: Z- DL(365):0:EXEXDL:RAEX(1)EX:EX(1)EX:@130,"DAYS SPENT ON "LO$":-";DL;: 174,4: Z1 400: Z:@418,"LOGGING ON TO MAIN COMPUTER";: 174,4-* Z1 6:DI(Z)(100)350: Z. 4 Z1 2200: Z: 2830.x> CO55 940 ::C$::"LOCATION:- ORBITING "LO$:"DESTINATION:- "DE$::"DISTANCE"DI"MILLION MILES".H:ZZ6: Z1 6:TT(ZZ)((DI135)Z):"WARP SPEED"ZZ"WILL TAKE"TT(ZZ)"DAYS":ZZZZ1: Z::"WHAT WARP SPEED?"/ R0:A$: A$"" 850/0\A(A$): A1 A6 850 : WPA/@fEXEXTT(A)/Lp 1010/z VV85 @416,Z$;:@416,"SORRY, THE BANK THAT IS HERE WASRAIDED AND IS PRESENTLY CLOSED DOWN. TRY ON THE NEXT PLANET";: Z1 2500: Z: 150,2: 7500 CA0 @416,Z$;:@416,"HOW MUCH WILL YOU DEPOSIT": DP$:DP(DP$):DP(DP): DPCA @416,Z$;:@416,"YOU DON'T HAVE THAT MUCH!!": 120,2: Z1 1500: Z: 9000CACADP:BABADP: 120,2:@197," ";:@212," ";:@197,CA;:@212,BA;1 BA0 @416,Z$;:@416,"HOW MUCH WILL YOU WITHDRAW?": WD$:WD(WD$):WD(WD): WDBA @416,Z$;:@416,"YOU DON'T HAVE THAT MUCH!!": Z1 2000: Z: 9201CACAWD:BABAWD: 120,2:@197," ";:@212," ";:@197,CA;:@212,BA;: 7502m:@6,"computer malfunction":"DUE TO A LOW EFFICIENCY LEVEL, THE COMPUTER CANNOT PROVIDE ANY FURTHER INFORMATION."2:"YOU WILL HAVE TO MAKE DECISIONS WITHOUT IT UNTIL THE FAULT HAS BEEN RECTIFIED. WHERE WILL YOU GO NEXT?"3: Z1 6: P$(Z)LO$ 8);Z;13);P$(Z) : Z: 9803&ʋ Z3>A$: A$"" 9803A(A$): A1 A6 P$(A)LO$ 980 : DE$P$(A):DIDI(A):WP6:TT(WP)(DI135):EXEXTT(WP): 10103聼 9804%MN(((CABA)625)):SHSH((DIWP)95):EMEM((100SH).2):IMIM((DIIT1)5850): MN0 MNNN48 SH0 SH04K EM0 EM04^ IM0 IM04q IM20 CL14$ EM20 SH10 BL15*.0:@40,"STATUS REPORT";: 180,1: Z1 400: Z:@196,"LOCATION:- SPACE";: 180,1: Z1 400: Z:@260,"DESTINATION:- "DE$;: 180,1: Z1 400: Z58@324,"WARP SPEED:- ";WP;:180,1: Z1400:Z:@388,"DISTANCE:- "DI;: 180,1: Z1400:Z:@452,"DURATION:- "TT(WP);: 180,1:Z1400:Z: ZZ1TT(WP): Z1 300: Z: 90,1: ZZ6B MM20 PI1 MM0: 11306+LMMMMNN: MM35 MM0: 11306AV (SS)5 11306M` 16106`j CO50 13006t0:C$;:@225,"COMPUTER HAS DETECTED PIRATES!";: Z1 4:"T100;L2;O4;10;10;10;5;5;5;1;1;1;P1;1;1;1;5;5;5;10;10;10": Z79~ Z1 500: Z:@293,"THERE ARE"NN(B2)"OF THEM!!";:"T8;L6;O3;6;P6;6;P6;6;P6;6;P6;6"7JCOCO(12)7v@449,"SHALL WE DETOUR OR FIGHT? D/F";7~Z07A$: A$"" 1200 : 12107ZZ1: Z200 1290 : 11907 A$"D" 12407ą A$"F" 13107΁ 11908؅ EM40 SH40 0:@39,"EVASIVE MANOEUVRES";: Z1 250: Z: 180,1:@100,"WARP FACTOR:- 9";: Z1 250: Z: 180,1:@164,C$;:@258,"EXTERNAL STRUCTURE:-"EM;:@322,"SHIELDS:- "SH;9^ EM40 SH40 Z1 1000: Z: Z1 22:EMEM(4):SHSH(4):@278,EM;: 160Z2,1:@342,SH;: 120Z,1: ZZ1 100: ZZ: Z: Z1 1000: Z: 16109:C$;:::"THE PROTEUS WOULD BREAK UP UNDERTHE STRAIN!! HER HULL AND HEAT SHIELDS ARE ALREADY REACHING CRITICAL LEVELS!!!.........":F@448,"YOU WILL HAVE TO CONFRONT THEM!!";:"T4;L6;O4;4;P4;4;P4;4;P4;4;P4;4;P4;4;P4;4":R 1310: :C$:@224,"YOU TOOK TOO LONG TO DECIDE.. THEY ARE ALREADY UPON US.. PREPARE TO DEFEND YOUR CARGO...": 180,6: Z1 2000: Z: 1310;N3:@44,"PIRATES!";:@232,"TOO LATE TO RUN!";:@453,"YOU WILL HAVE TO FIGHT";: Z1 50: 160,1: Z; PI0 (3)1 1360 : 4,1:0: Z1 35:X(200)10:Y(180)5:(X,Y),1,1: Z;((0,0)(80,148),:PI1 d ZA1 300: ZA>DnNS0:XX(2)2:YY(3):XXXX(2)2:YYYY(3)>x"BM"(X)","(Y)";C1S"(SI)";U4D2L4NE3NF3R8NG3H3"> FP0 SH0 EM0 3640: END OF GAME>(0,170)(XX,YY),:(255,170)(XX,YY),> 32052:FPFP.5?,(0,170)(XX,YY),:(255,170),: XXX YYY 1490?GZZ1: Z5 1480:?"BM"(X)","(Y)"C0S"(SI)"U4D2L4NE3NF3R8NG3H3":SISI2:XXX:YYY: NS1 X128:XXX:Y66:YYY:SI4:Z1: 1390? 1390@<Ȫ(X,Y)(118,146),:(X,Y)(138,146),: 1,1: 255,5:(X,Y)(138,146),:(X,Y)(118,146),:NS1: 1500@ұ(X,Y),Z4,1,1.3:(X,Y),1,1: AZ1 10: AZ:(X,Y),0,0: 32000: 1370@SHSH(7):EMEM(7):IMIM(5): 1,0: ZA1 50: ZA: 1460AI Z1 500: Z:0:@39,"MISSION SUCCESSFUL";:@130,"SHIPS DESTROYED:-"NN(B2);:@194,"CARGO RECOVERED IN DEBRIS:-";A (2)1 CR(1)(B)6:CR(2)(8):CR(3)(4)1B\@258,"LASER ARMS "CR(1);:@322,"ZARIUM CRYSTAL "CR(2);:@386,"URANIUM X "CR(3);: CR(1)CR(2)CR(3)IT1000 @450,"BUT YOU CAN'T CARRY THEM!!"; : I(2)I(2)CR(1):I(3)I(3)CR(2):I(4)I(4)CR(3): 220,1Bn FP0 FP0B IM0 IM0BFP(FP): EM0 EM0B" Z1 6000: Z: SH0 SH0C,0:@41,"DAMAGE REPORT";:@98,"FIREPOWER "FP"% EFFICIENT";:@162,"INTERIOR MNT."IM"% EFFICIENT";:@226,"EXTERIOR MNT."EM"% EFFICIENT";:@290,"SHIELDS "SH"% EFFICIENT";:@354,"COMPUTER "CO"% EFFICIENT";C6 Z1 3000: ZC@ IM20 CL1 : EM20 SH10 BL1CJ:METEORS'D T (SS)5 (20) 10 1650D-^ PP90 (20) 10 1650D9h 1950DLr CO50 1730D|0:C$;:@225,"COMPUTER HAS DETECTED METEORS!";: Z1 4:"T100;L2;O4;10;10;10;5;5;5;1;1;1;P1;1;1;1;5;5;5;10;10;10": Z:COCO(15)E@450,"DO YOU WANT TO DETOUR? (Y/N)";:Z0E%A$: A$"" 1690 : 1700E>ZZ1: Z200 1740ER A$"N" 1750Ef A$"Y" 1880Er 1680E 0:@44,"METEORS!";:@230,"TOO LATE TO DETOUR!";:@451,"YOU ARE GOING THROUGH THEM!";:0,1: Z1 25: 160,1: Z: 1750F)̠0:@235,"TOO LATE!!";:0,1: 150,1: Z1 1000: ZFր Z1 2000: Z:0:C$;:@100,"ENTERING METEOR STORM...";: 150,1: Z1 200: ZF@196,"EXTERNAL DAMAGE";ME"%";:@260,"SHIELD DAMAGE ";HS"%";:@324,"INTERNAL DAMAGE";MI"%";GE(35)5: Z1 E:ZZ(3): ZZ1 Z : MEME(2):HSHS(2):MIMI(2):@212,ME;: 90Z,1:@276,HS;: 90Z,1:@340,MI;: 90Z,1: H1 (500): H: ZE 1780 : ZG Z1 600: Z:@100,"LEAVING METEOR STORM.";: 150,1: Z1 3000: ZH0:@40,"DAMAGE U$y$ :INTERPLANETARY TRADER'$?:COPYRIGHT ACTIVE SOFTWARE'$S:OCTOBER 1982'$f(:VERSION 2.6'$m2:$t<:$F 500: P$(10): G$(6)$PC$"COMPUTER REPORTS.....":D$(32,191):Z$(95," "):E$(32,255):S$"PROTEUS":Q$(128)%RZ PHOBOS,AMMERON,XOERUS,VOGAN,AARION,CORVUS,GENERAL CARGO,LASER ARMS,ZARIUM CRYSTAL,URANIUM X%_ 34,12,B6,FF,23,8A,08,B7,FF,23,7F,01,47,8E,B7,98,A6,80,8D,14,A6,80,8D,10,7A,01,47,26,F3,B6,FF,23,84,F7,B7,FF,23,35,12,39,B4,01,47,B7,FF,20,86,FF,4A,26,FD,39&` 34,32,B6,FF,23,8A,08,B7,FF,23,8E,00,01,86,FD,B7,FF,20,8D,17,7F,FF,20,8D,12,30,01,8C,00,6B,25,ED,B6,FF,23,84,F7,B7,FF,23,35,32,39,1F,12,31,3F,26,FC,39&d Z1 6: P$(Z): Z: Z1 4: G$(Z): Z:Z3200032101:K$:Z,("&H"K$):Z'n0:@260,"interplanetary";:@276,"trader";' x 3180'h"S4":180,2:0:@263,"instructions"Q$;(123)"y"(124)"n"(125);'A$: A$"" 160' A$"Y" 190' A$"N" 400 : 160(_:" ********************** YOU ARE A SPACE TRADER IN THE YEAR 2283, TRADING IN THE 3RD NEAREST SOLAR SYSTEM TO EARTH WHICH CONTAINS SIX INHABITED PLANETS."(ȇ:"IN YOUR SPACE CRUISER, THE "S$", YOU TOUR THE PLANETS")m҇"BUYING AND SELLING CARGO."::"YOU HAVE BEEN GRANTED A LICENCE TO TRADE FOR 300 DAYS, AFTER WHICH YOU WILL BE AUTOMATICALLY RECALLED TO EARTH. **********************";: 120,2)܀ Z1 12000: Z*:" *********************":"DURING YOUR VENTURE, YOU ARE LIKELY TO ENCOUNTER MAINTENANCE PROBLEMS, SPACE PIRATES, AND METEOR STORMS."+:"YOUR SHIP NEEDS TO BE IN GOOD SHAPE TO OVERCOME THESE HAZARDS AND IT IS WISE TO KEEP IT WELL MAINTAINED. THIS SERVICE IS OFFERED ON THE MAJORITY OF THE PLANETS, ALTHOUGH CHARGES DO DIFFER QUITE CONSIDERABLY FROM"+M"ONE PLANET TO ANOTHER."::" ********************* ";: 120,2+c Z1 12000: Z+i,M" **********************":"AN ON-BOARD COMPUTER WILL ASSISTYOU ON YOUR TRAVELS, INFORMING YOU OF DISTANCES TO PLANETS, MAINTENANCE REPORTS,ETC., ETC. IT WILL ALSO CONSTANTLY SCAN THE SOLAR SYSTEM FOR PIRATES,",""METEORS, AND OTHER HAZZARDS."::"HOWEVER, IF THE COMPUTER IS NOT KEPT REGULARLY MAINTAINED IT WILL MALFUNCTION AND SOME OF ITSFUNCTIONS WILL CEASE TO OPERATE."-$,:" *********************";: 120,2-:6 Z1 12000: Z-@:"THE INTERSTELLAR BANK HAS GIVEN YOU A CREDIT OVERDRAFT OF 4000 WHICH HAS ALREADY BEEN SPENT, BUT YOU STILL HAVE 300 CREDITS OF READY CASH TO BEGIN WITH.".J:"ANY DEBTS OUTSTANDING WILL ATTRACT INTEREST CHARGES.YOU MAYVISIT THE INTERSTELLAR BANK AFTER TRADING AND MAKE DEPOSITS OR WITHDRAWALS. REMEMBER, MONEY CARRIED AROUND ATTRACTS PIRATES!"/ T"BUT YOU DO NEED SUFFICIENT CASH TO MAKE THOSE BIG DEALS WHICH DOCOME ALONG ON OCCASIONS.";/)^ 120,2: Z1 12000: Z0h:" ********************* ":"THE WEAR AND TEAR ON YOUR SHIP WILL DEPEND MOSTLY ON THE WAY YOU TOUR THE SOLAR SYSTEM. THE CARGO, THE SPEED,AND THE DISTANCE WILL AFFECT THE WAY THESHIP PERFORMS."0r:"A LARGE CARGO, A LONG DISTANCE, AND A FAST SPEED WILL MEAN YOUR SHIP REQUIRES MORE MAINTENANCE THAN NORMAL. BUT, IF YOU CAN DO BUSINESS THAT WAY AND SURVIVE, YOU WILL GO HOME MUCH RICHER!"0|:" **********************";1 120,2: Z1 12000: Z1 "IGAME.BAS"1. l 4,1: 01n v Z1 20:X(250)2:Y(180)5:XX(2):(X,Y),XX,1: Z1 (18,26),50,5:(18,26),5,51 "BM0,0C0ND80R80":(88,20),10,1:(88,20),1,11 Z1 592 "BM150,100S"(Z)"C5NH2L2NH3G1D1F2R4E2U1H2L3H3"2 Z: 1,12' Z1 1000: Z2\ "T3;V31;L3;O3;1;3;O2;L2;11;P10;L3;O1;11;L1;O2;62x ƀ Z1 2000: Z: 15099,"LOCATION:-"LO$;:@164,"CASH:- "CA;:@178,"BANK"BA;3Y@228,"1) PHOBOS"16)"2) AMMERON";:@260,"3) XOERUS"16)"4) VOG5(38,29,8)7"ȅQ4(38,28,8):(38,29)7?҅Q3(38,27,8):(38,28)7\܅Q2(38,26,8):(38,27)7yQ1(38,25,8):(38,26)7Q0(38,25)7D12.5D1022607D9D1034207(BRG)1791477,737(BRG)1791478,738"(BRG)1791476,738,32008617308N@X223K0(24,26,8):(25,26,8):(26,26,8):8~JX159K0(24,27,8):(25,28,8):(26,29,8)8TX191K0(24,27,8):(25,27,8):(26,27,8)8^X159K0(24,28,8):(25,29,8):(26,30,8)9hX159K0(24,26,8):(25,27,8):(26,28,8)9>rX127K0(24,29,8):(25,29,8):(26,29,8)9n|X159K0(26,27,8):(25,28,8):(24,29,8)9X159K0(26,28,8):(25,29,8):(24,30,8)9X159K0(26,26,8):(25,27,8):(24,28,8)9X95K0(24,30,8):(25,30,8):(26,30,8):.X159K0(24,28,8):(25,28,8):(26,28,8):H(22,28,1):(28,28,1):N:`…BRG179Y17:o̅K0YY1:~օK0YY1:FL0:Z$:Z$(70)QQ1:300:Z$(10)XX32:FL0: K0250:Z$(68)QQ1:300;Z$(94)XX32:FL0:FX1:K0250;2Z$(71)V0:300;J&Z$","PP1:300;b0Z$"."PP1:300;{:Z$(72)V1:300;DZ$(9)KK1:K0250;NZ$(8)KK1:K0250;RJ$"Y"5000;S;XK5K4;bK5K4< cJ$"Y"J0FX0300< dJ$"N"Z$""300<5lK4K42930X255X255=?JJ1=H@0,D$;:@128,D$;=RI0X132:@0I,B4$;:I>\I0X332:@4I,B4$;:I>'f@X5,P4$;>EpI0X732:@8I,B4$;:I>ezI0X3232:@12I,B4$;:I>x@X1332,P4$;>I0X3232:@16I,B4$;:I>I0X6432:@20I,B4$;:I>@X2164,P4$;>I0X9232:@24I,B4$;:I? I0X9632:@28I,B4$;:I?@X2592,P4$;?(ʁ300??ԅH40H3202460?Xޅ(BRG)1792460?aY16?vK1K12460?X2232460?D10D11.5@XY3,(244);? D10D11.5@XY3,(248);? D11.5@XY3,(128);:@XY3,(128);@/ D11.5D12@XY38,(252);:@XY27,(252);@] $D12@XY38,(128);:@XY27,(128);@s .H350H10ST32@ 8H350H320ST33@ BH10H40ST31@ LI0(224X)ST@ V@XYI,(194);@ `@XYI32,(194);@ j@XYI,(194);A tJ1(100(S)):JA% ~@XYI,(128);A= @XYI32,(128);AD IAJ AP Aa SC02500A A0S0:"CONGRATULATIONS YOU HAVE COMPLETED A LANDING";:A ā1160A ·@0,D$;:@128,D$;A JJ1B ؇@0,B4$B4$B4$B4$B4$B$(168);B' @32,B4$B4$B4$B4$B4$(168);BS @64,B4$B4$B4$B4$B$B$B$(168);;B{ @96,B4$B4$B4$B4$B$B$(168);B @128,B4$B4$B4$B4$B$(168);B @160,B4$B4$B4$B4$(168);B @192,B4$B4$B4$B$B$B$(168);C @224,B4$B4$B4$B$B$(168);C4 (@256,B4$B4$B4$B$(168);C> 2300C_ <@0,D$;:@128,D$;:Q$(164)Ci =JJ1C F@10,Q$B4$B4$B4$B4$B4$B$;C P@43,Q$B4$B4$B4$B4$B$B$B$B$;C Z@76,Q$B4$B4$B4$B4$B$B$B$;D d@109,Q$B4$B4$B4$B4$B$B$;D! n@142,Q$B4$B4$B4$B4$B$;D? x@175,Q$B4$B4$B4$B4$;Db @208,Q$B4$B4$B4$B$B$B$;D @241,Q$B4$B4$B4$B$B$;D @274,Q$B4$B4$B4$B$;D 300D @0,D$;D @128,D$;D X63D ȑD ҇@0,D$;D JJ1D ܇@128,D$;E B8$B4$B4$E B16$B8$B8$E' I025532E: @0I,B16$;:IED X159EN 300EZ "@0,D$;Ed #JJ1Er ,@128,D$;E 6B8$B4$B4$E @B16$B8$B8$E JI025532E T@15I,B16$;:IE ^X159E h300E r@0,D$;E sJJ1E |I09632F @160I,B16$B16$;:IF X159F FL1F' 300F9 :@109,"X ";FM @77,"NORWICH";F^ ‡@449,"(X)";Fs Ç@224,"(X)=A/F";F ć@256,"DISUSED";F ̇@453,"TIBENHAM";F և@237,"*";F @244,"##(585)";F @205,"BCN(A)";F @0,"KEY";F @32,"X=AIRFIELD";G @64,"#=HIGHMAST";G( @96,"*=BEACON";G< @390,"#(561)";GQ @269,"XHETHEL";Gk @468,"(X) HARDWICK";G} #@192,"ZONE";G $@128,"MATZ=MILITARY";G %@160,"AIR TRAFFIC";G &L$(134)G 0@18,L$;:@51,L$;:@84,L$;:H :@86,(141);:@88,(141);:@90,(141)H DL2$(137)H? N@92,L2$;:@61,L2$;:@30,L2$;HP X@24,"MATZ";Hf b@52,"GND-2000'";H vZ$:Z$""3190:H (24,26):(25,26):(26,26)H (24,27):(25,27):(26,27)H (24,28):(25,28):(26,28)H (24,29):(25,29):(26,29)I (24,30):(25,30):(26,30):I! I? @32,"reason for crash";I[ Ƈ@64,"1 exceeded vne.";I Ї@96,"2 overshot or failed climb";I ڇ@128,"3 v.u.c.exceeded with uc down";I @160,"4 speed to high on ground";I @192,"5 undershot ";J @224,"6 v.f.e.exceeded with flaps down";J@ @256,"7 u.c raised on ground";Ji @288,"8 rate of descent too high ";J @320,"9 inverted flight too low";J @352,"10 stalled and spun";J *@384,"11 turn too low";J 4@416,"12 hit the ground";K >@448,"13 crashed into high mast";Kl H "P2;O2;T2;L3;C;L4;C;O1;L8;B;O2;L4;L4;C;L6;4;L8;D;L6;D;L8;C;L6;C;L8;O1;B;O2;L3;C;"Kr RK \K1K13530K f(BRG)1793530K pH20H3403530K zY16K @XY2,(136)(136)(136)(136)(136);L @?8(MBASYINTRDBASEBAS$lFHBASH$$OSBAS$zWMBAS$lIGAMEBAS$$WBAS)>ABAS.AABASRTCARBASv DTBASHF FLYBAS5 P+FLIGHTBASU 2FLI2BAS   DTREKBAS~DISKDATADATBCHARBASBFCONTROLBAS~TEXTDUMPBINKCONTROLBINSCRDUMPBAKJTSCRDUMPBASNSHI-DRAWBASnwSCRDMP2BAS210S1,CY10S14S2),A)CY140(A(7)1030)At(258S4,CY20S3)(258S4,CY20S3),:(25,CY)(2510S3,CY4S4),AÅA(13)1(254S4,CY10S3)(254S410S3,CY10S34S4),:(254S4,CY10S3)(254S410S3,CY10S34S4),A8000B C(8)A(8):C(7)A(7)BB̀F24B(рI13B֪(55((F2)50),130I)(58((F2)50)2.5C(F),130I),:(55((F2)50),130I)(58((F2)50)2.5A(F),130I),BIBC(F)A(F)BFBBCX22518(C(9)PI180)BCY14018(C(9)PI180)C DX22518(A(9)PI180)C6DY14018(A(9)PI180)Cd (225,140)(CX,CY),:(225,140)(DX,DY),Cr*C(9)A(9)Cx4C~CPR1C0CI1500:ICI16:((B(1,I)64200),(B(2,I)32200),2)CID(B(1,A(6))64200,B(2,A(6))32200,(8))D'(A64200,0.5(B32200))D?(344)2475090DoJOY1((65280)254(65280)126)5090DĞ(B(1,A(6))64200,B(2,A(6))32200,(8))DΞ(A(11)64200,0.5(A(12)32200),8)DAA(11):BA(12)EӞ(31,16,5):(32,16,5):(33,16,5)E ؁160E4,1:PR0:1,0E#E@pCX(182(C(20)18)2)ESzCY8018C(20)Er(125CX,CY)(125CX,CY),ExECYC(19)2ECX((182CY2))E(125CY,80CX)(125CY,80CX),EEXEb"********basics of flying*******"Fl:"power-AIRCRAFT SPEED CONTROL"F{v"flaps-USED ON LANDING TO GIVE":"MORE CONTROL OF HEIGHT AND":"REDUCES STALLING SPEED"F"stall speed-AIR SPEED TO SLOW":"AS TO KEEP AIRCRAFT IN FLIGHT"G"d*f-DIRECTION FINDER GIVING":"BEARING OF INDICTED BEACON FROM":"AIRCRAFT"G:@453,"press a key for more info."GL""7056GRG"beacon numbers-":"1*EAST OF R/W":"2*WEST OF R/W":"3*NW 4*NE 5*SW 6*SE"G"alt-GIVES HEIGHT OF A/C"G"hdg-GIVES COMPASS BEARING OF A/C"H&"ba*cl-GIVES POSITION OF A/C":"RELATIVE TO HORIZON"Hj"pos-GIVES POSITION OF AIRCRAFT,":"WITH RUNWAY IN THE MIDDLE"HƇ@453,"press a key for more info."HЅ""7120HڠH"ils-2 METERS IN ONE**LEFT TO":"RIGHT INDICATION AND UP/DOWN":"INDICATION"IW"IF THE UP/DOWN NEEDLE IS IN THE UPPER HALF OF THE METER THEN FLYUP***AND VISA VERSA."I"IF THE LEFT/RIGHT NEEDLE IS TO":"THE RIGHT IN THE METER THEN FLY":"RIGHT***AND VISA VERSA."JS"IF YOU HAVE A CROSS OF THE 2":"NEEDLES IN THE CENTRE OF THE":"METER THEN YOU HAVE THE CORRECT":"GLIDE SLOPE AND YOU ARE ON THE":"CENTRE LINE"Jz @453,"press a key for more info."J""7190J J*"***hints and tips***"J4:"ON TAKE OFF AQUIRE ENOUGH":"AIRSPEED TO AVIOD STALLING"KE>"TAKE GEAR UP AFTER TAKE OFF TO":"AVOID THEM BEING RIPPED OFF AT":"HIGH SPEED"KH"DO NOT USE FLAPS AT HIGH SPEED":"OR THEY WILL BE RIPPED OFF"KR"WATCH FOR LOSS OF SPEED WHEN":"BANKING OR CLIMBING"K\@450,"press a key for controls list"Lf""7270LpL.z"**function** **control key**"LH"POWER OFF";25);"O"La"POWER ON";25);"P"L{"GEAR DOWN";25);"G"L"GEAR UP";25);"H"L"FLAPS DOWN";25);"D"L"FLAPS UP";25);"F"L"BEACON SEL";25);"B"Lʇ" MAP";25);"M"Mԇ"MAP OFF";25);"N"M6އ"UP/DOWN/RIGHT/LEFT**USE ARROWS"Ma"are you using joysticks,y or n":JO$M(JO$,1)"Y"JOY1:JOY0M@453,"press key to start"M ""7410: M@D((A(11)100)2(A(12)100)2(A(1)50)2)MEI1NJY125C(7)75(C(8)PI60)N3OY225C(7)75(C(8)PI60)N`PY16Y26Y149Y249UC(8):I0:8100N}TI1(51,Y1)(199,Y2),N^Y125A(7)75(A(8)PI60)NhY225A(7)75(A(8)PI60)NmY16Y26Y149Y249UA(8):I1:8100Or(51,Y1)(199,Y2),O |O$X51:X2199:U0U.1OKY16X51(6Y1)(UPI60):Y16OuY149X51(Y149)(UPI60):Y149OY26X2199(6Y2)(UPI60):Y26O…Y249X2199(Y249)(UPI60):Y249O̅I0(X,Y1)(X2,Y2),PхI1(X,Y1)(X2,Y2),P֑P'#(:@(832)9,"FUEL SHORTAGE"P2#210,10P@#<4,1:1,0PF#FP\#A$:A$""9100P#A$"S":I120000:I:"FLIGHT"P#A$"N"P#A$"F"P#9100U001=$ A1 255$(A);$) 500:$/$62$<U 0u4'0hƝH@vK3R 0uYO7 q&N'Y&ݑ'0- ׉ NO TEXT PJCcġ0&94' & 54w5 6809 EDITOR - ASSEMBLER (C) M J KERRY 1982 U$$P:DOS DETACH ROUTINE$&Z 1: 4$3d 1541,2$Zn I0 146: 3073I,(46010I):$hx 3072,18$u 3197,0$Ì I1 3: S,F: JS F: A$$Ö 3072J,("&H"A$)$à J,I$ê 148,156,8E,0C,9C,BD,90,E5,7E,83,71,157,188%Rô 44,4F,53,20,44,45,54,41,43,48,20,28,43,29,20,31,39,38,35,20,44,52,41,47,4F,4E,20,55,53,45,52,00%mþ 13,17,8E,7F,FE,20,0E%ȓ 114,12:115,0%҇@224,(32,140);%܇@256," PRESS RESET TO DETACH D.O.S."%@288,(32,131);% 0,1% 50170:"I"& 471lSSST:BH5BH81 STST(100):ENEN(1000):SHSH(500):@449," ####.## YEARS INTO THE PAST ";(SSST)100;:487:lمBH5 WL1:@449,"TO THE BEGINNING OF TIME......";:487:@385,"WE ARE STRANDED HERE FOREVER.."WH$WH$;:487:m STST(2000)mHۇ@449," ####.## YEARS INTO THE FUTURE";(STSS)100;:487mW܅STNW mKE(DI1)5(DI1):NWNW1500DI100(100):478:476mޅKLKE((DI2)3)(6LN2)2WL5:m߀II1KEmJJ(62LN)1:KK(62LN)1nGL(JJ,KK)(DI23)100480naGL(JJ,KK)GL(JJ,KK)100:GL(JJ,KK)709UF4:BDST20:BF1:BXJJ:BYKKngnKBKBKE:KLKLKE:nQQ110:DA(QQ)100:nnOO300nOO488nnSF6:(70,168),2,3:(100,185),2,3:(240,168),2,3oB"BM240,168C4"NO$(EY1)"BL4BD4D2BD4D2BU12BL12"NO$(EX1)"BM100,182"oOII1TRod"C4D4R2U4BR9":ojoAF0:1,1:1,0:o3:@166,"ANOTHER GAME (Y/N) ?";o381:IN$"N":0,0::IN$"Y":497p998,1,129,131,131,131,130,998,34,138,128,128,132,130,129,131,131,128,128,129,131,130,128,128,131,131,130,128,128,131,131,130,128,130,128,128,128,130,998,66,138,128,128,128,133,133,128,128,137,129,136,128,132,130,134,128,128,132,130,134,128,128q132,130,142,130,128,128,138,998,98,138,128,128,128,133,133,131,131,134,133,131,131,131,138,138,128,128,128,136,138,128,128,128,138,138,132,130,128,138,998,130,138,128,128,128,134,133,128,137,128,133,128,128,128,138,138,128,140,140,138,138,128r128,128,138,138,128,132,130,138,998,161,129,139,131,131,134,128,133,128,128,137,133,128,128,128,138,132,131,131,134,128,132,131,131,134,128,138,128,128,132,138,998,199,131,131,131,131,131,130,998,233,133,128,128,131,131,130,128,131,131,131,130s130,128,129,998,265,133,128,128,138,128,132,130,138,128,128,128,138,129,136,998,297,133,128,128,139,131,131,136,139,131,131,128,139,138,998,329,133,128,128,138,132,130,128,138,128,128,128,138,132,130,998,361,133,128,128,138,128,132,130,139,131t131,130,138,128,132,130,999,D16R8U16L8,BR6ND16BL6,BD8D8R8BU8NL8U8L8,BD16R8U8NL6U8L8,D8R8ND8U8BL8,D8BD8R8U8NL8BU8L8,D16R8U8NL8BU8L8,R8ND16BL8,D16R8U8NL8U8L8,D8BD8R8U8NL8U8L8,41,100,42,84,66,77,66,78,66,79,69,70,83,84,80,71,85,88,66,83,70,50,58,57t51tII:II999:II998II:@II,;:504:(II96);:504厇@XY26,(196)(196)(196);LA @XY35,(196)(196)(196);LQ J1150:JL @XY2,(128)(128)(128)(128)(128);L @XY26,(128)(128)(128);L @XY35,(128)(128)(128);L ʑL DX11(D)L ޅDX03600M IL(A)DXM. IL120IL1501476,45:1478,45ML IL1501508,45:1510,45MjIL1201444,45:1446,45MpMH40H3203800M$(BRG)3593800M.Y16M8K1K13800MBD2D3.5X160@XY3,(244);:@XY3,(248);N"LD3.5@XYS,(128);:@XY3,(128);NOVD4@XY27,(252);:@XY38,(252);N|`D4@XY27,(128);:@XY38,(128);NjH350H10ST32NtH350H320ST33N~H10H40ST31NI0(255X)STN@XYI,(194);O@XYI32,(194);O@XYI,(194);O/J1(150(S)):JOD@XYI,(128);O\ć@XYI32,(128);Oc΋IOiؑOzJ1((0))OJ2((1))OJ20XX32:FL0:FX1:K0250OJ263XX32:FX1:FL0:K0250OJ163KK1:J0:K0250PJ10KK1:J0:K0250P!1875U$,$ 500$&HFFD7,0$#7000$34,1::1,0$<PR0$H R(4,7)$v 25,80,75,80,125,80,175,80,25,140,225,140% 40,5,50,50,50,5,200,50,200,5,210,50,55,120,95,140,105,120,145,140,155,120,195,140,57,124,93,136,107,124,143,136,157,124,193,136,205,60,245,100%40,5,0,10,40,50,0,55,210,5,252,10,210,50,252,55,0,55,252,55,5,140,45,140,57,128,93,128,107,128,143,128,157,128,193,128,0,180,48,180,48,180,100,160,100,160,150,160,150,160,202,180,202,180,252,180&100,52,44,22,204,22,76,138,120,138,168,138&(A(20):B(2,7):C(20)&T20,0,10,0,0,2,0,0,90,0,95,100,1,150,100,100,0,0,0,0&F70,100,130,100,30,50,170,50,30,150,170,150'WP8,110,U4NR8U2E2R4F2D6BR4NU8R6BR4U8NL6R6,62,110,U8R4F2D4G2L4BR10BU4R6BR4NR4ND4U4R6,114,102,D8BR4NU8R6BR4BU2F2R2E2H2L2H2E2R2F2,156,106,ND4NR8U2E2R4F2D6BR4U8BR4ND8R4F2G2NL4F2D2BR2BU4R4BR2BD2F2R2E2H2L2H2E2R2F2(*Z214,110,U8R4F2G2L4BR8U2E2R4F2D4G2L4H2U2BR12NR2H2E2R2F2BD4NH2G2L2H2,8,170,U8R4F2G2NL4F2G2L4BR8U6E2R2F2D2NL6ND4BR2R4BR2U2E2R4BD8L4H2U2BR8NU4D4R6,210,166,NU4ND4R6NU4D4BR4U8R4F2D4G2L4BR18U2NR2NL2G2L4H2U4E2R4F2)_60,150,U8R4F2G2L4BR10U2E2R4F2D4G2L4H2U2BR12NU4D4E4F4U8,116,144,H2L4G2D4F2R4E2NL2NR2D2BR4U4NR8U2E2R4F2D6BR6NH2R2E2H2L2H2E2R2F2,156,150,U4NR4U4R6BR2D8R6BR2U4NR6U2E2R2F2D6BR2U8R4F2G2L4BR10NR2H2E2R2F2BD4NH2G2L2H2)w`BR2R8L4U10G4,BR2NR8E6U2H2L2G2,BR2R4E2U2H2NL2E2U2H2L2G2,BR6U10G6R10,BR2R4E2U2H2L4U4R6,BR8BU8H2L2G2D6F2R2E2U2H2L2G2)dI16)eA,B)fF023.1423.1426)g(A19(F),B19(F),1):F)h(A20,B20)(A20,B20),,B)iI5I3(A,B),20*jI*.nI110:A,B,C,D:(A,B)(C,D),,B:I*UxI114:A,B,C,D:(A,B)(C,D),:I*oI16:A,B:(A,B):I*I120:A(I):I*S2*(13,140)(37,140),*I16:B(1,I),B(2,I):I*C(11)100:C(12)100*C(10)80+I110:X,Y,D$:"BM"(X)","(Y)";"D$:I+0I16:B$(I):I+=PI3.142+2500:230,4:2700:220,4:3500:210,4:3700:200,4:4000:190,4:4300:180,4:4600:170,4+R4+ST1+I255110:I,1:I:I125510:I,1:I,(337)255230,1:2000,(337)255160,"JE0,4JOY12170,DJE1162,A(5)A(5)((A(2)225(ST1))A(5)(A(4)A(7)(A(8)))50)10(A(13)A(17))100(ST1)300,A(9)A(9)A(8),A(9)A(9)360((A(9)360)(A(9)0))-A(11)A(11)A(5)(A(7)PI180)(A(9)PI180)10000-VA(12)A(12)A(5)(A(7)PI180)(A(9)PI180)10000-}܅B(2,A(6))A(12)0A(12)A(12)0.1-A(10)A(9)(((B(1,A(6))A(11))(B(2,A(6))A(12))))PI180-A(1)A(1)0.2A(5)(A(7)PI180)ST(ST1)(300(100)).ST1.lA(5)(A(4)100)1500A(17)1A(18)0ST0:A(7)A(7)2:A(8)A(8)R:30,1:4000:(A(8))9RR.D((100A(11))2(100A(12))2).D0D0.1.A(20)3((((100D)1.3105A(1))D)180PI)."A(11)1000A(11)100.1/1,A(19)(100A(11))((100A(12))(A(11)100))180PI/H6A(3)A(3)A(2)900/[;A(1)0A(1)0/@A(1)30A(17)0A(17)1:A(18)0/JA(1)0A(17)1A(18)1/TA(5)0A(5)0/^A(1)0A(18)11000/hA(13)1A(5)2600CR8:12000rA(4)0A(5)2600CR7:120002|A(13)0A(17)0CR5:12000CPR150100\A(1)9700A(1)97000g25000r35000(A(2)C(2))0.9(A(3)C(3))0.9(A(4)C(4))0.943000(A(9)C(9))546000(S)3700,37201…(A(10)C(10))527001T̅((A(20)C(20))0.1(A(20))0.99)((A(19)C(19))1(A(19))10)29001օ(A(19)C(19))1(A(19))1030001(A(20))0.9960001(A(19))9.99604011601ST0CR4:12001A(3)0CR3:12002A(13)0CR5:12002=A(11)95A(11)105A(12)98A(12)102CR1:12002VC(1)50CR2:12002fCR6:12202q.10702I120:(50,5(45))(199,5(45)),:U(12):"O1T40;"(U):1,(2)12I2F110002F22ā13003!Έ(CR)1240,1250,1260,1270,1280,1290,1292,12943,πF1537Ё19003>ыF3`҇"press key S to start again"3vӅ"S":12353P$"missed runway position"3ݑ3P$"high rate of decent"33P$"out of fuel"33P$"you stalled the aircraft"44P$"landing gear up"4!4I P$"successful landing well done !"4O 4w P$"flaps ripped off at high speed"4} 4P$"gear ripped off at high speed"44:"flight report box"4P$"flight report box"4-425 lI1(P$):(P$,I,1);5!v"T50O1A":"T50O5G"5(I52" ",585OЂ key scan routine5sڅ(341)223A(7)A(7)2:40005(342)223A(7)A(7)2:40005(344)223A(8)A(8)2:40005(343)223A(8)A(8)2:40005(338)247A(13)0:40006(343)247500067 (345)251A(13)1:40006[(342)251A(4)A(4)1:43006 (344)251A(4)A(4)1:43006*(338)239A(2)A(2)1:430064(345)247A(2)A(2)1:43006>(340)251A(6)A(6)1:27007 H(A(7))@?8(MBASYINTRDBASEBAS$lFHBASH$$OSBAS$zWMBAS$lIGAMEBAS$$WBAS)>ABAS.AABASRTCARBASv DTBASHF FLYBAS5 P+FLIGHTBASU 2FLI2BAS   DTREKBAS~DISKDATADATBCHARBASBFCONTROLBAS~TEXTDUMPBINKCONTROLBINSCRDUMPBAKJTSCRDUMPBASNSHI-DRAWBASnwSCRDMP2BAS############################"`f:: Z1 NP:NP$(Z)" YOU LEFT THE RACE TRACK":"WITH";15);CA(Z)"POUNDS"` 150,2: ZZ1 500: ZZ` Z`@416,"ANOTHER GAME (Y/N)?"a"O1;V25": Z1 4:"T200;V+;O+;1;1;5;2;2;6;3;3;7;4;4;8;5;5;9;6;6;1;7;7;11;8;8;12": Za A$: A$"" 420a1 A$"N" aB A$"Y" aM 420aw:"********* INSTRUCTIONS *********"b+"THE OBJECT OF THE GAME IS TO LEAVE THE RACE TRACK A RICH MAN!":"8 SNAILS BATTLE IT OUT ON THE RACE TRACK AND YOU HAVE TO PLACEYOUR MONEY ON WHAT YOU THINK WILL WIN.b:"YOU ARE ASSISTED BY A CHART THAT KEEPS A RECORD OF A SNAILS FORM, NUMBER OF RACES, AND IDEALGROUND CONDITIONS. THESE WILL HELP YOU DECIDE ON A WINNER!!"b@480,"PRESS ANY KEY....";c "" 436c-:"********* INSTRUCTIONS *********"c"THE COMPUTER WILL ALSO SUGGEST A WINNER OR A NUMBER OF POSSIBLEWINNERS. THE SNAIL OR SNAILS WITH THE LOWEST ODDS ARE THOSE WHICH THE COMPUTER FAVOURS."d:"THE COMPUTERS CHOICE IS NOT A RANDOM CHOICE, BUT A CALCULATED CHOICE. DO NOT BE SUPRISED TO SEE AN OUTSIDER CHOSEN AS A FAVOURITE! THE COMPUTER HAS ACCESS TO MORE INFORMATION THAN YOU DO!!d@480,"PRESS ANY KEY TO BEGIN...";d "" 446 : 34U$/$ 5000$/:"START OF FLIGHT SIMULATION"$T(ZX115:"V20T255AGFDEFDBC":ZX$j2"O1GABO+1CT4EDC"$<:"DO YOU WANT JUST THE FINAL APPROACH-(Y/N)"$FKC$$PKC$"Y" KC$"N"70$ZKC$"Y"A1$d $n"O1V20L7GABO2CL4EDC"%xA$"U4E2F2D2NL3D2BM+4,+0;"%FB$"E1U4H1R3F1D1G1NL1F1D1G1L2BM+7,+0;"%nC$"BM+4,-5;H1L2G1D4F1R2E1BM+4,+1;"%D$"R3E1U4H1L3F1D5BM+7,+0;"%E$"BM+4,+0;L4U3NR3U3R4BM+4,+6;"%F$"U3NR3U3R4BM+4,+6;"%G$"BM+4,-6;L3G1D4F1R3U2L1BM+5,+2;"&H$"U3NU3R4NU3D3BM+4,+0;"&;I$"BM+2,+0;NL1NR1U6NL1R1BM+5,+6;"&YK$"U3NU3R1NE3F3BM+4,+0;"&pL$"NU6R4BM+4,+0;"&M$"U6F2E2D6BM+4,+0;"&N$"U6F4NU4D2BM+4,+0;"&O$"U6R4D6NL4BM+4,+0;"&P$"U6R3F1D1G1L2BM+7,+3;"&R$"U6R3F1D1G1L2F3BM+4,+0;"'&S$"BM+0,-1;F1R2E1H4E1R2F1BM+4,+5;"'G"T$"BM+2,+0;U6NL2R2BM+4,+6;"'k,U$"BM+0,-6;D5F1R2E1U5BM+4,+6;"'6V$"BM+0,-6;D2F1D1F1ND1E1U1E1U2BM+4,+6;"'@W$"NU6E2F2NU6BM+4,+0;"'J'TN1$"BM+2,+0;NR1NL1U6NG1BM+6,+6;"( ^N2$"BM+0,-5;E1R2F1D1G1L2G1D2R4BM+4,+0;"(?hN3$"BM+0,-5;E1R2F1D1G1NL1F1D1G1L2H1BM+8,+1;"(`rN4$"BM+3,+0;U6G3R4BM+4,+3;"(|N5$"BM+0,-1;F1R2E1U2H1L3U2R4BM+4,+6;"(N6$"BM+3,-6;L2G1D4F1R2E1U1H1L2BM+7,+3;"(N7$"BM+0,-6;R4D1G4D1BM+8,+0;")N8$"BM+0,-1;U1E1H1U1E1R2F1D1G1NL1F1D1G1L2BM+7,+0;")@N9$"BM+1,+0;R2E1U4H1L2G1D1F1R3BM+4,+3;")iN0$"BM+0,-1;U4E1R2F1D4G1L2BM+7,+0;")o)u‚)ć:"COLOUR OR BLACK AND WHITE? PRESS B OR C")CL$)ȅ CL$"B" CL$"C" 454)ʅ CL$"B" CL1 : CL0*̷4,1:1,CL:1,0:*7֌ D(3,3):(100,100):(99,99)(101,101),D,G*I"BM0,9;R255"*]DF$T$I$M$E$*r"BM170,7;XDF$;"*"BM0,100;R255"*"BM170,100;D91"*"BM86,100;D91"*"BM112,174;R32U4L32D4":(114,172),5,5*&"BM0,150;R255"+0"BM210,7;XN0$;"+%:"BM118,150;D92BM138,150;D92"+6DDF$A$L$T$+LN"BM32,108;XDF$;"+fXDF$R$U$D$D$E$R$+zb"BM55,7;XDF$;"+l"BM86,125;R5BM170,125;L5"+v"BM111,0;D9BM+36,+0;U9BM130,0;D9BM126,0;D9"+(128,1),5,5+"BM211,125;R5","BM89,159;XE$;","BM89,169;XL$;",."BM89,179;XE$;",C"BM89,189;XV$;",Y"BM163,159;XF$;",oƵ"BM163,169;XU$;",е"BM163,179;XE$;",ڵ"BM163,189;XL$;","BM98,156;R8D33L8U33","BM158,153;L8D36R8U36",DF$H$D$G$,"BM173,159;XDF$;"-  DF$D$S$T$-""BM173,179;XDF$;"-6 DF$N0$N0$N0$-R*"BM171,171;R25NU21D21"-d4(226,171),19->(226,171),15,5,1,0.74,0.76-H"BM226,171;NL12NR12NU10D8NL5NR5D4"-RDF$N0$N0$N0$N0$N0$-\"BM24,118;XDF$;"-fDF$K$N$T$.p"BM5,131;XDF$;".zDF$N0$N0$N0$.-"BM5,141;XDF$;".>DF$F$L$P$.T"BM54,131;XDF$;".p"BM54,134;R22D7L22U7;"."BM0,171;R86"."BM48,150;D42".DF$G$E$A$R$.ʵ"BM7,163;XDF$;".DF$B$R$K$.޵"BM56,163;XDF$;"/!"BM128,125;L28H3BM128,125;R28E3BM128,125;U3NL3NR3U2"/4(156,154),5,5/EDF$O$F$F$/["BM56,184;XDF$;"/iDF$U$P$/"BM17,184;XDF$;"/$"BM98,175;R7BM+0,-5;L7":(99,173),5,5/./8A111000_BB72:TT0:LB124:RB132:LF114:RF142:TR0:MX((80))172:MY((45))102:BK0:FP1:KN350:AL7000:GR0:EV4:FL3000:HD90:DS0:0:PR4:RD4:11100LB72:TT0:LB124:RB132:LF114:RF142:TR0:L1:MX189:MY125:BK0:FP1:KN200:AL4000:GR0:EV4:FL3000:HD90:DS0:0:PR4:RD40V0`KC$1 U$8c$  6$ 20$! 1,1: 1$w(0,0)(128,70),:(255,0)(128,70),:(0,171)(128,106),:(255,171)(128,106),$(0,96),2,4:(255,96),2,4:(0,191)(128,108),%f(51,191)(128,108),:(102,191),:(153,191)(128,108),:(204,191),:(255,191)(128,108),:(22,160)(234,160),:(53,144)(204,144),:(76,132)(180,132),:(88,126)(168,126),&"(13,164)(13,48),:(13,48)(52,59),:(52,59)(52,144),:(28,128),4,4:(24,104),5,2,1.5:(128,0),4,4:(128,20),14,2,.5:(128,20),2,2:(128,40),9,2,.5:(128,40),2,2:(128,60),3,2,.5&(242,164)(242,48),:(204,59),:(204,144),:(212,128),4,4:(212,104),4,2,1.5:(128,52),5,2,.5:(128,66,2)& (68,136)(68,64),:(88,69),:(88,126),:(78,96),4,4:(74,100),2,2,1.5'< (184,136)(184,64),:(166,70),:(166,126),:(170,96),4,4:(171,100),2,2,1.5' (98,121)(98,72),:(108,75),:(108,117),:(101,96),4,4:(100,96),1,2,1.5' (158,121)(158,72),:(148,75),:(148,117),:(152,96),4,4:(151,96),1,2,1.5' 1 5: 2 6( 1,0: Z1 1000: Z((128,96),18,3,1.3:(128,96),3,3: 1,0:(118,88),4,2:(138,88),4,2:(114,118),10,3,.6:(142,118),10,3,.6:(114,118),2,3:(142,118),2,3("O1;L8;T3;12;P70;12;P70;12;P70;L1;8;L4;V25;P3;10;P40;10;P40;10;P40;L1;T2;7) Z1 250: Z:(128,96),15,2,1.3,0,.5)/ Z1 1000: Z)9 25)@0)[@73,"WUMPUS MANSION";)~@198,"A GAME FOR 4 PLAYERS";:)@321,"ALL INSTRUCTIONS ON DATA SHEET";)@452,"(C) ACTIVE SOFTWARE 1982";:0,1:) 800*:(38,"#")" player information "(38,"#");*<:" how many players";NP:NP(NP)*S NP1 NP4 26* Z1 NP::" name of player"Z;: NP$(Z): Z:NP$(Z)(NP$(Z),8)*@416,"":" how many rounds";R:R(R): R1 R9 30*ROUND1+ A(28): B(16): Q(28,16): TR$(24): TR(22)+-!A(19)6:B(8)8+4":+;#:+K$B(B2)2+`% Z1 1000: Z+&GSGS1: GSNP ROUNDROUND1:GS0: 33+' ROUNDR1 327 : :@0,"********** statistics **********";,(:NP$(GS)" IN THE WUMPUS MANSION":"THERE ARE:-",B):"LEVELS -";A:"ROOMS PER LEVEL -";B,b*"TOTAL ROOMS -";AB,j+K1,z, Z1 A1,-I(B),.Q(Z,I)1,/ITEMITEM1,0 Z,1"KEYS -";ITEM:ITEM0,2 Z1 24: TR$(Z): Z:-3 Z1 A -4LL(2): LL2 Z-&5I(B)-<6 Q(Z,I) 0 53-I7Q(Z,I)2-Y8ITEMITEM1-o9 ZA 58 : Z-:"TIMEBOMB TRIGGERS -";ITEM:ITEM0-;I(A):II(B)-< Q(I,II) 0 59-=Q(I,II)6->"BOMBS - 1"-? Z1 A.)@YY(400)300:YYYY1000:YBYY:Y(Y).8A ZZ1 Y.DBI(B).YC Q(Z,I) 0 66.fDQ(Z,I)3.vEITEMITEM1.F ZZ.G Z.HMM(ROUND2)(ITEM.075)5:MM(MM).I"PIECES OF TREASURE -";ITEM:ITEM0.J Z1 A/KLL(2): LL2 Z/ LI(B)/!M Q(Z,I) 0 76/.NQ(Z,I)4/>OITEMITEM1/TP ZA 81 : Z/|Q"MAPS -";ITEM:ITEM0/R Z1 A/S ZZ1 B/T Q(Z,ZZ)0 Q(Z,ZZ)5/U ZZ: Z/V Z1 A/WGG1: G100 92 : I(B)0X IB3 920Y Q(Z,I) 5 870'ZQ(Z,I)707[ITEMITEM10C\G0: Z0k]"WUMPUS BLASTERS -";ITEM:ITEM00^: "PRESS ENTER TO CONTINUE........";E$1D_:NP$(GS)":- YOUR INSTRUCTIONS":"===============================":"RAID THE WUMPUS MANSION OF AS MUCH TREASURE AS YOU CAN. YOU WILL BE ABLE TO CARRY"MM"ITEMS."1`:"THE TREASURES ARE VALUED BETWEEN$25 AND $1100, SO BE SELECTIVE."2 a:"IF YOU TRIGGER THE BOMB AND WISHTO LEAVE, PRESS THE 'E' KEY.":"IF YOU NEED TO SHOOT THE WUMPUS,PRESS THE 'F' KEY."20b@480,"PRESS ANY KEY TO CONTINUE";2Ac "" 992bd 0:@267,"GOOD LUCK";:0,13 e"T13;O2;L2;G;L4;C;D;E;F;L2;G;C;P16;C;L2;A;L4;F;G;A;B;O3;L2;C;O2;C;P16;C;F;L4;G;F;E;D;L2;E;L4;F;E;D;C;L2;O1;B;O2;L4;C;D;E;C;L2;E;L1;D;L2;G;L4;C;D;E;F;L2;G;C;P16;C"3gf"L2;A;L4;F;G;A;B;O3;L2;C;O2;C;P16;C;F;L4;G;F;E;D;L2;E;L4;F;E;D;C;D;E;L2;F;O1;B;L1;O2;C"3vgF1:GG2553h 0:D5003i 148:SET WUMPUS'3jJ(6)2:JJ103k:"LEVEL:-"F" ROOMS:-"B"3lC03m Z1 B 24n@96C,Z:@352C,Z1:CC3: Z4oC047p Z1 B 2 : ZZ1 34q 102464C,128: 1024192C,131: 1024384C,128: 1024256C,140:CC1: ZZ: Z4rC0:CC04s Z1 B 2: ZZ1 35t 102496CCC,133:"T20;L50;O5;1": 1024288CCC,133:"T20;L50;O5;1":CC32: ZZ:C0:CCCC3: Z5,u Z1 55av102464CCC,133: 1024256CCC,133:CC32: Z5kwX2255vx 2135y@X,"#";5z@416,"ROUND:-"ROUND"/ ITEMS ALLOWED:-"MM:"SO FAR:-"AM"/ VALUE $";PT;5{A$: A$"" 124 : 1276| TG1 @22,GG60} TG0 COCO1: CO80 CO0: 1366R~ TG1 GG1 226 : 1236l TG1 A$"E" 2846 A$(9) XX3: 1526 A$"F" 2616 A$(8) XX3: 1526 A$(10) (1024X32)140 1527 A$(10) (1024X32)140 1,5: 1217G A$(94) (1024X32)131 1527z A$(94) (1024X32)131 1,5: 1217 1217:TEST FOR WUMPUS'7TI:TM(TI60)7 TM WP 276:WUMPS STRIKES!'7 TM WPJ WS1: 1428 1228. Z1 500: Z:@416,(95," ");: 1228KKK(2): KK 143,1448@416,(32," ")"********* WUMPUS ALERT *********";:"T100;L100;O1;2;4;6;8;10;12;O2;2;4;6;8;10;12;O3;2;4;6;8;10;12;O4;2;4;6;8;10;12;O5;2;4;6;8;10;12": 1419@416,(32," ")"****** WUMPUS APPROACHING ******";:"T100;L100;O1;2;4;6;8;10;12;O2;2;4;6;8;10;12;O3;2;4;6;8;10;12;O4;2;4;6;8;10;12;O5;2;4;6;8;10;12": 141:u "GOLD SOVEREIGNS","SILVER SOVEREIGNS","CASKET OF DIAMONDS","CASKET OF EMERALDS","A LARGE DIAMOND","A LARGE PEARL","A DIAMOND SCEPTRE","A DIAMOND TIARRA","A STRING OF PEARLS","A GOLDEN CHAIN","A SILVER CHAIN","PRECIOUS STONES": "A GOLD STATUE","PRECIOUS STONES","GOLD INGOTS","SILVER INGOTS","A PRECIOUS RUBY","A TUSK OF IVORY","BOX OF JADE";L"A DIAMOND NECKLACE","A GOLDEN BROACH","A CHEST OF GOLD","SILVER BULLION","GOLD BULLION";^:SET WUMPUS';oWP(20)38;u; Z1 A: ZZ1 B:Q(Z,ZZ)0: ZZ: Z:; X225 F1 X225:FF1:@0,"LEVEL:-"F" ROOMS:-"B: 213: 121< X225 F1 X225: 1210"T255;L100;O5;12;7;2;O4;12;7;2;O3;12;7;2;O2;12;7;2;O1;12;7;2">\@480,"YOU CAN'T GO WITHOUT THE KEY!!";> Z1 1000: Z:@480,(31," ");:XX3: 121>@416,"THIS ROOM CONTAINS:-":YX222:YY3:YY21: Q(F,Y) 174,177,181,190,199,201,203? AMMM TG0 336?! AMMM TG1 284?9 Z1 D: Z:D500?J BO1 226?g@416,(95," ");: 161?@448,"THE KEY TO THE NEXT FLOOR";:KK1:Q(F,Y)5? TG1 @22,GG?@ TG1 @448,"NOTHING AT ALL!!" : @448,"THE TRIGGER TO THE TIME BOMB!!"@_ TG1 : TG1:"O3;T25;L1;5;P3;2;P3;5;P3;2;P3;5;P3;2;P3;5;P3;2;P3;5;P3;2"@p0:GG5000@v@W(24):TR(1076)25:@448,TR$(W)" WORTH $"TR;:D1@@480,"DO YOU WANT IT (Y/N)?";@A$: A$"" 184 : 187A TG1 @22,GG : 183ACOCO1A0 GG0 226Ac A$"Y" PTPTTR:AMAM1: AMMM 226 : At A$"N" A 183A@448,"A USEFUL MAP OF THIS LEVEL"A Z1 B: Q(F,Z)1 Q(F,Z)2 Q(F,Z)7 MA1B/ MA1 Q(F,Z)1 @480,"IN ROOM "Z" THERE IS A KEY";:ZB:MA0:D1000: 196B MA1 Q(F,Z)7 @480,"ROOM "Z" HOLDS A WUMPUS BLASER";:ZB:MA0:D1000: 196B… MA1 Q(F,Z)2 @480,"ROOM "Z" HOLDS A BOMB TRIGGER";:ZB:MA0:D1000: 196BÅ ZB MA0 198Bċ ZCMA0:CBƇ@480,"NOTHING OF INTEREST HERE..";:MA0:D1000: 196C`LJ@448,"NOTHING AT ALL!!";CfȑCɇ@448,"THE BOMB....."CBO1:Cˇ"THE WUMPUS BLASTER"CWUWU1Cͅ TG1 @22,GGCΑD,χ@416,"THIS ROOM CONTAINS:-":YX222:YY3:YY2: Q(F,Y) 174,177,181,190,199,201,203DEЅ AMMM TG1 284D^х AMMM TG0 336DvҀ Z1 D: Z:D500DӅ BO1 226Dԇ@416,(95," ");: 163DC0: Z1 B 2Dօ TG0 Q(F,Z)6 FL2Dׅ TG0 Q(F,Z)2 FL1E؅ TG0 Q(F,Z1)6 FL2E2م TG0 Q(F,Z1)2 FL1Eiڅ Q(F,Z)10 1024193C,131 : 1024193C,143E}۸"O5;L50;1;2;3"E܅ Q(F,Z1)10 1024257C,140 : 1024257C,143Eݸ"O5;L50;1;2;3"ECC3: ZFz߅ FL2 FL0:@416,"********** WARNING! **********";:"O1;T5;L10;5;P5;5;P5;5;P5":"THE TIMEBOMB LIES ON THIS LEVEL!";: ZZ1 1000: ZZ:@416,(95," ");G FL1 FL0:@416,"********** WARNING! **********";:"O1;T5;L10;5;P5;5;P5;5;P5;":"A TRIGGER LIES ON THIS LEVEL !!";: ZZ1 1000: ZZ:@416,(95," ");G"G4:**KABOOM!**G;:Gj2:@256," ** KABOOOOOMM! ** "Gy"V1;L200"G Z1 30:"V+;T255;L-;O1;4;P5;3;P5;1;P5;1": ZG 1,3G 1GBO1G Z1 200 10G(128,170),Z,2,.05G6,Z$;: 2530l DL(365):0:l ʢ 25,4:@416,Z$;:@416,"YOU DON'T HAVE ANY TO SELL!!";: Z1 1500: Z: 120,2:@416,Z$;: 2530l ԇ@416,Z$;:@416,"YOU HAVE"AM" TO SELL":"SELL HOW MANY";W$:W(W$):W(W): W0 WAM 3550 : 120,2: 3540m! ޢ 120,2:CACA(CSW):AMAMW:m] AM(CACS):@416,Z$;:@416,"YOU CAN AFFORD"AM: 3580m 25,4:@416,Z$;: @416,"YOU CAN'T EVEN BUY 1 OF THEM!!";: Z1 1500: Z:@416,Z$;: 120,2: 2530n "HOW MANY DO YOU WANT";W$:W(W$):W(W): W0 WAM 3600 : 3590n|@416,Z$;: 25,2:@416,"YOU CAN'T AFFORD THAT MANY!!": Z1 1500: Z:@416,Z$;: 120,2: 3560nCACA(CSW):nB(1)B:PP(1)PP:SS(1)SS:VV(1)VV:V(1)V:NN(1)NN:RR(1)RRoR$ME0:MI0:HS0:CL(1)0:CL(2)0:CL(3)0:CL(4)0:GS0:B(8):LL0:PP(100):SS(100):VV(100):V(100):NN(8):RR(100)o. SSSS(1) BB(1) PPPP(1) VVVV(1) VV(1) NNNN(1) RRRR(1) 3620 : p 8 Z1 2000: Z:0:@43,"GAME OVER";:@226,"YOU GOT SHOT OUT OF THE SKY!";: 165,2: 3680pYB0:@43,"GAME OVER";:@227,"THE PROTEUS FELL APART!!!";: 165,2: 3680pL0:@43,"GAME OVER";:@231,"YOU ARE BANKRUPT!";: 165,2: 3680qYV0:@43,"GAME OVER";:@104,"YOUR TIME IS UP!";:@163,"YOU HAVE RETURNED TO EARTH";:@226,"YOU RETURNED WITH"CABA"!!";:@293,"YOUR RATING IS:-"((CABA)999999)"%";: 165,2: 3680q{`@454,"ANOTHER GAME? (Y/N)";qjA$: A$"" 3690qt A$"Y" q~ A$"N" :q 3690AME? (Y/N)";qjA$: A$"" 3690qt A$"YU$$ 200,&H7FCF$* ON=POKE&H167,&H7E$C OFF=POKE&H167,&H39$^(I&H7FD0 &H7FEE:A$$x2A("&H"A$):I,A:I$<&H168,&H7F:&H169,&HD0$F 81,3A,27,01,39,D6,6F,C1,FE,27,01,39,34,36,86,0D$P BD,80,0F,C6,06,86,20,BD,80,0F,5A,26,FA,3jKC$"B" 12101tKC$"G"132015~KC$"F"KC$"D"14401UKC$(94)KC$(10)15201cL111901KC$(8)KC$(9)17201KC$"P"KC$"O"18501206011BKBK1:BK1BK01΅BK112801ت(50,173)(84,190),,BF1DF$O$F$F$2"BM56,184;XDF$;"2 20602<(50,173)(84,190),,BF2J DF$O$N$2`"BM60,184;XDF$;"2k20602q(22AL020602(24,112)(66,118),,BF;BHDF$"";XRAL10000DF$N0$;q\AL1000DF$N0$N0$;fAL100DF$N0$N0$N0$;pAL10DF$N0$N0$N0$N0$;zAL$(AL);X2 (AL$)< ((AL$,X,1))1 2220,2230,2240,2 ZH_ 1,1: Z1 500: Z:"O1;1": 1,0: Z1 25: Z:"O1;1": 1,1: Z1 25: Z:"O1;1": 1,0Hu Z150 1 25H(128,170),Z,3,.05H Z: 1,0: Z1 55 5H(128,148Z),10Z6.5,2,1.7H(128,150Z),10Z7.5,3,1.9H ZI Z1 100 5I(128,64),Z,2,.4I3"V22;T255;L255;O1;1IH(128,66),Z,4,.6IP ZIW:IWS0:WU0:WP0:AM0:TG0:GG0:PT0: Z1 2000: Z: 151J 342::"########################################## SCOREBOARD ##########################################";JTT(GS)TT(GS)PTJ:"PLAYER:- "NP$(GS)::"ROUND:- "ROUND::"ITEMS TAKEN:- "AM::"TOTAL VALUE:- $"PT::"VALUE INCLUDING":"PREV. ROUNDS:-$"TT(GS);J:: "PRESS ENTER..";E$K<:"########################################## SCOREBOARD ##########################################"KX@128,"SCORE TO DATE:-"K Z1 NP::NP$(Z)" HAS:- $"TT(Z): ZK: "PRESS ENTER...";E$KWS0:WU0:WP0:AM0:PT0:TG0:BO0:MM0:GG0K 325: 34K:WUMPUS BLASTER'L WS0 @416,"WHAT DO YOU WANT TO SHOOT ??":"FRESH AIR ......":"O2;L150;T150;2;6;10;12;O3;2;6;10;12;O4;2;6;10;12;O5;2;6;10;12;T4;L50;P20;12;P20;12;P20;12;P20;12":WUWU1: WU0 WU0L WS0 Z1 1500: Z:@416,(95," ");: 121M WU0 @416,"WHAT WITH ???":"YOU CAN'T KILL THE WUMPUS WITH IDLE THREATS !!!";:"L50;T10;O1;1;P10;1;O2;2;P10;2;O3;3;P10;3;O4;4;P10;4;O5;5;P10;5": Z1 1500: Z:@416,(95," ");: 121M 1 3: 2 4: 1,3: 1,0M C2N! "O2;L150;T150;2;6;10;12;O3;2;6;10;12;O4;2;6;10;12;O5;2;6;10;12N Z1 4:"BM92,191;C"(C)";U9;R4;U9;R4;U9;R4;U9;R4;U9;R4;U9;R4;U9;R4;U9;R4;U18;BM164,191;U9;L4;U9;L4;U9;L4;U9;L4;U9;L4;U9;L4;U9;L4;U9;L4;U18N "T4;L50;12"N Z1 Z3 C1 : C2N ZNC0N 1,1O WUWU1Ou Z1 300: Z: 1,5: Z1 300: Z: 1,0: Z1 1300: Z: 148:J(6)2:JJ10:0:WS0: 121OKK(5)P@"T255;L255;O5;12;12;12;12;12;P1;6;6;6;6;P1;1;1;1;P1;O3;12;12;12;12;12;P1;6;6;6;6;P1;1;1;1;P1;O1;12;12;12;12;12;P1;6;6;6;6;P1;1;1;1;P1;O1;1;1;1;P1;6;6;6;6;P1;12;12;12;12;12;P1;O3;1;1;1"P"P1;6;6;6;6;P1;12;12;12;12;12;P1;O5;1;1;1;P1;6;6;6;6;P1;12;12;12;12;12"P KK5 283P@416,"THE WUMPUS GOT YOU! HE HAS TAKENBACK ALL THE TREASURE YOU HAVE TAKEN!!";Q Z1 1000: ZQZ 148:J(6)4:JJ10:0:@416,(95," ");:PT0:MMMMAM:AM0:WS0: 122Q@416,"SAY YOUR PRAYERS ";NP$(GS):"THE WUMPUS HAS TRIGGERED THE BOMB!!!!!";: Z1 3000: Z: 226Rw:"******** READ CAREFULLY ********";:"THE TIMEBOMB COUNTDOWN HAS BEEN INCREASED BY 500 TO GIVE YOU TIME TO READ THESE INSTRUCTIONS.":"THE ESCAPE ROUTE LEADS THROUGH"R"A MAZE OF TUNNELS. USING THE 4 ARROW KEYS, MOVE THROUGH THE MAZE UNTIL YOU REACH THE EXIT."S-:"IF YOU TOUCH ANY OF THE WALLS YOU MUST BEGIN AGAIN FROM THE START."S;GGGG500S[ :"TIME IS RUNNING OUT!!!"S{!@480,"PRESS ANY KEY.....";S" "" 290S# 1,3: 1S$G2(GG)S%"BM0,0;C3R255D191L255U191"S& Z12 244 12T'"BM"(Z)",191;C3U191;R1;D191": Z: 1,0T'( Z12 244 12T7)X(168)8TI* Z120 300Ty+"BM"(Z)","(X)";C1;D4;R1;U4": 301T,"BM"(Z)","(X)";C1;D3;R1;U3T- ZT."BM0,90;C1;D12;BM255,90;D12"T/X6:Y96:(X,Y,2)T0 TG1 GG0 228U1 TG0 GG0 251U;2 (342)223 YY2: 311U]3 (341)223 YY2: 312U4 (344)223 X255 XX2: 313U5 X255 323U6 306U7(X,Y2):(X,Y,2): 315U8(X,Y2):(X,Y,2): 317U9(X1,Y):(X,Y,2): 319V:(X2,Y):(X,Y,2): 321V0; (X,Y2)1 306VI<(X,Y): 50,1: 303Va= (X,Y2)1 306Vz>(X,Y): 50,5: 303V? (X2,Y)3 306V@(X,Y): 50,5: 303VA (X2,Y)1 306VB(X,Y): 50,5 303WC"T15L4O4DEDDEDDEDDEF+GDO3BGT10DO2BGT7DO1T5BL4P2V30L1G"W#D 251W<E Z1 A: ZZ1 BWUFQ(Z,ZZ)0: ZZ: Z:WxG8:@238,"GAME";:@270,"OVER";WH:"***************************************** final scores *****************************************"XI Z1 NP::NP$(Z)" SCORED:- $"TT(Z): ZXJ"O3;T4;L3;4;P30;L10;4;P30;5;P30;5;P5;4;P30;L8;5;P50;L10;4;P50;L10;2;P40;L10;O2;12;P40;L3;11;P4;O3;L4;7;P40;5;P40;T9;L8;4;P90;O2;12;P90;O3;5;P90;2;P90;L4;7;P20;L3;5;P20;L2;4;P10;L2;2;O2;L1;P5;12"XK:"ANOTHER GAME (Y/N)"YLA$: A$"" 332Y M A$"N" Y1N A$"Y" Y<O 332YP:"WELL DONE "NP$(GS)::"YOU GOT THE MAXIMUM AMOUNT OF TREASURE IN THIS ROUND.":"YOU NOW HAVE THE OPPORTUNITY TO INCREASE YOUR SCORE WITH A BONUS"ZLQ:"JUST MOVE THROUGH THE MAZE IN ASQUICK A TIME AS POSSIBLE AND YOUWILL RECEIVE YOUR JUST REWARD ONCOMPLETION"ZR:"YOUR TIME STARTS WHEN YOU PRESS ANY KEY....";:"T15L4O4DEDDEDDEDDEF+GDO3BGT10DO2BGT7DO1T5BL4P2V30L1G"ZS "" 339ZTGG4500:0ZU 284[V BO1 : GGGG250[!W TG0 GG300 346[2X TG1 347[Y:@224,"YOU EARNED $"GGROUND" BONUS!!": Z1 2000: Z:PTPTGGROUND:[Z:@224,"YOU WERE TOO SLOW !!":"YOU EARNED $0.00 BONUS!!": Z1 2000: Z:[[GGGG5000:GG(GG5)ROUND\b\:@224,"DURING YOUR RUSH ROUND THE MAZE YOU LOST $"GG" WORTH":"OF TREASURE": Z1 2000: Z:PTPTGG:&a  x|{{ xx||H&x{v0vK x|&!H& {YJ' |&'0|L|Q250,2260,2270,2280,2290,2300,2310DF$DF$N0$:( PR 2480,2490,2500,2510,2520,2530,2540>E KNKN15:ALAL15:2550>b KNKN10:ALAL10:2550>u KNKN5:2550> ΁2550> KNKN5:2550> KNKN10:2550> KNKN15:2550> EV 2560,2570,2580,2590,2600,2610,2620? ALAL15:KNKN15:2630?# ALAL7:KNKN10:2630?> ALAL3:KNKN5:2630?I 2630?d (ALAL3:KNKN5:2630? 2ALAL7:KNKN10:2630? X2(DS$)F H ((DS$,X,1))1 2220,2230,2240,2250,2260,2270,2280,2290,2300,2310F RXF \"BM173,189;XDF$;"F fA5DSF pF zSP2500: L1 SP5000F HD903500F HD90 HD1803580G HD180 HD2703660G% HD2703740G+ G: MH(HD90)GF MC1MHGV MHMHKNSPGf MCMCKNSPGs MXMXMHG MYMYMCG 3810G GMH(HD90)90GMC1MHGMHMHKNSPG$MCMCKNSPG.MXMXMCG8MYMYMHGB3810GLH VMH(HD180)90H`MC1MHH)jMCMCKNSPH9tMHMHKNSPHF~MXMXMHHSMYMYMCH^3810HdHwMH(HD270)90HMC1MHHMCMCKNSPHMHMHKNSPHMXMXMCHMYMYMHHCX(MX)HCY(MY)H(CX1,CY1)(CX1,CY1),D,II TM(3000)I"TM$(TM)I8TR3000 3950IC(DF$""I]2(210,1)(230,8),,BFIn' KEY MOVES * RIGHT *"'N@480,"PRESS SPACEBAR TO CONTINUE..";:'f"A$: A$"" 290', A$" " 310 : 290'6:"########################################### remember ###########################################";(L@"1) ONCE YOU PRESS THE KEYS YOU CANNOT RELEASE THEM UNTIL YOU HAVE HIT ALL THE TARGETS."(J"2) STUDY THE SCREEN BEFORE YOU MAKE YOUR MOVE.(T"3) DON'T BACKTRACK OR CROSS THE YELLOW LINE OR YOU WILL END YOURTURN.")W^"4) IF A TARGET GETS PLACED IN A POSITION THAT IS IMPOSSIBLE TO REACH, IT IS JUST BAD LUCK.... MAKE THE MOST OF WHAT YOU HAVE!";)h@480,"SEE INSTRUCTIONS AGAIN? (Y/N)";)rA$: A$"" 370)| A$"Y" 250) A$"N" 400 : 370)6:@237,"GOOD";:@269,"LUCK";:*e"T4L8O2DP12L16FP12L8DP8DP12L16FP12L8DP8D#E#D#CP8CD#DO1A#P8L8O2DP12L16FP12L8DP8DP12L16FP12L8DP8D#E#D#CP8L7E#P4O1L1A#"+ : NP$(T)", WHEN THE GAME BEGINS,":"YOUR MARKER WILL APPEAR IN THE MIDDLE OF THE SCREEN AS A YELLOWDOT. TO BEGIN PLAY, JUST PRESS ANY ONE OF THE SPECIAL KEYS"+/:"THE GAME WILL THEN BEGIN."+P@480,"PRESS ANY KEY......";+hA$: A$"" 450+ś 800+SC0: 870:"BM95,22"V$(1)+X128:Y96: 500+ 1,0: 1,3: 760+ 740+ "" 510,A$: A$"1" A$"@" A$"Q" A$(9) 530 : 520,)A(337),: NT0 490,z& A239 (X,Y2)2 610 : A239 (X,Y2)2 690,0 A254 (X,Y2)2 630 : A254 (X,Y2)2 690,: A223 (X2,Y)2 650 : A223 (X2,Y)2 690-:D A251 (X2,Y)2 670 : A251 (X2,Y)2 690-tN A236 A254 A223 A251 CDCD1 : CD0-X CD15 690 : 530-bYY2: (X,Y1)1 (X,Y)1 (X,Y,2):YY2:(X,Y,2): 150,1:NTNT1:SCSC5: 870: 730: 530.l(X,Y,2): 530.{vYY2: (X,Y1)1 (X,Y)1 (X,Y,2):YY2:(X,Y,2):NTNT1: 150,1:SCSC5: 870: 730: 530.(X,Y,2): 530.XX2: (X1,Y)1 (X,Y)1 (X,Y,2):XX2:(X,Y,2):NTNT1: 150,1:SCSC5: 870: 730: 530/(X,Y,2): 530/yXX2: (X1,Y)1 (X,Y)1 (X,Y,2):XX2:(X,Y,2):NTNT1: 150,1:SCSC5: 870: 730: 530/(X,Y,2): 530/ 1,10: Z1 500: Z/ SCHS H1/ƀ Z1 2000: Z: 1300/Ё 72006ڲ(100,5),0,1:V95: Z1 (SC$)1:"BM"(V)",22S4"V$(Z):VV14: Z:V95:0zCD0: 1,0:1,1: 870: 730:(X,Y,2):NUNU1:NTNU: Z1 NU1"XX(116)5:YY(70)18:XXXX2:YYYY2: (XX,YY)4 (XX1,YY)4 (XX1,YY)4 (XX,YY1)4 (XX,YY1)4 750 : (XX,YY,1): 120,1: Z: 51018SCSC((NU2)10)1"O1;V26": Z1 3:"O+V+T255;12;11;10;9;8;7;6;5;4;3;2;1;1;2;3;4;5;6;7;8;9;10;11;12": Z1 Z1 300: Z:1,0: 1,3: 1,0: 1,3: Z1 2000: Z: 1,0: 1,11 7401 :STARTS HERE'2* 1,1: 1: 1,02[4"BM0,0C2R80D24L80U24":(5,5),2,2:"BM90,0C0R60D25L60U25":(100,5),0,02>A$"SCORE": 990:X5: Z1 5:"BM"(X)",22S4"A$(Z):XX14: Z:A$"HS": 1000:X160: Z1 2:"BM"(X)",22S4"A$(Z):XX14: Z38H"BM0,28C2R255D163L255U163BM4,32R247D155L247U155":(10,36),4,2:(2,30),2,23RSCHS: 870:X190: Z1 (SC$)1:"BM"(X)",22S4"V$(Z):XX14: Z:SC0:3\:SCORES'4fSC$(SC): Z1 (SC$)1: ((SC$,Z1,1))1 890,900,910,920,930,940,950,960,970,980: Z4p4(zV$(Z)"C2R10U20L10D20": :04IV$(Z)"C2R10L5U20L2G3": :14oV$(Z)"C2NR10U12R10U8L10D2": :24V$(Z)"C2R10U12L8E8L10": :34V$(Z)"C2BR5U20L6D12R10": :44V$(Z)"C2R10U12L10U8R10D2": :55V$(Z)"C2R10U12L10ND12U8R10D2": :65"V$(Z)"C2E10U10L10D2": :75PV$(Z)"C2R10U8H2E2U8L10D8F2NR6G2D8": :85vV$(Z)"C2NU2R10U20L10D12R8": :95:ALPHABET'5 Z1 (A$):(A$,Z,1)"A"(A$,Z,1)"Z"(A$,Z,1)" "5A((A$,Z,1))64:A321280:Z:6 A 1020,1030,1040,1050,1060,1070,1080,1090,1100,1110,1120,1130,1140,1150,1160,1170,1180,1190,1200,1210,1220,1230,1240,1250,1260,1270: Z:6A$(Z)"C3U20R10D10NL10D10": :A6A$(Z)"C3U20R8F2D6G2NL8F2D6G2L8": :B6A$(Z)"C3BR2NR8H2U16E2R8": :C7A$(Z)"C3U20R8F2D16G2L8": :D7A$A$(Z)"C3NR10U10NR6U10R10": :E7b.A$(Z)"C3U10NR6U10R10": :F78A$(Z)"C3BR10U6NL3D6L8H2U16E2R8D2": :G7BA$(Z)"C3U20D10R10U10D20": :H7LA$(Z)"C3R10L5U20R5L10": :I7VA$(Z)"C3NU2R6U20R4L10": :J8`A$(Z)"C3U20D10NE10F10": :K85jA$(Z)"C3NU20R10": :L8WtA$(Z)"C3U20R5ND8R5D20": :M8z~A$(Z)"C3U20D5F10ND5U15": :N8A$(Z)"C3BR2R6E2U16H2L6G2D16F2": :O8A$(Z)"C3U20R8F2D6G2L8": :P8A$(Z)"C3BR2R6E2NH3NF2U16H2L6G2D16F2": :Q9A$(Z)"C3U20R8F2D6G2L8F10": :R9DA$(Z)"C3NU2R10U10L10U10R10D2": :S9dA$(Z)"C3BR5U20NL5R5": :T9A$(Z)"C3BU2NU18F2R6E2U18": :U9A$(Z)"C3BU5NU15F5E5U15": :V9A$(Z)"C3NU20R5NU8R5U20": :W9A$(Z)"C3U5E10U5BD20U5H10U5": :X:A$(Z)"C3BU20D4F5ND11E5U4": :Y:>A$(Z)"C3NR10U5E10U5L10": :Z:[A$(Z)"BR10": :NOTHING:m :SCOREBOARD': H1 1760:SC(T)SC(T)SC:SC0:NU2:CD0: 1,7: 1: 1,0;("BM0,0S4C2R255D191L255U191D15R255":(128,5),2,2:"BM0,176R255":(128,188),2,2;"2A$"SCOREBOARD": 1000;k+(33,138),2,4:X73: X73 223 30:(X,53),2,4: X>A$"BY ACTIVE SOFTWARE": 990:X2: Z1 (A$):"BM"(X)",191S4"A$(Z):XX14:"T100;L100;O3;1;5;9": Z> Z1 2000: Z: 60?2ȷ 1,1:1: 3,1:(0,0)(255,96),:(0,191),:(128,0),:(255,191),:(0,96),:(255,0),:(128,191),:(0,0),?Ҳ(128,96),2,3:(30,20),3,3:(225,20),3,3:(30,171),3,3:(225,171),3,3:(235,96),3,3:(10,96),3,3:(128,10),3,3:(128,181),3,3:(105,52),3,3:(152,52),3,3:(192,80),3,3:(192,116),3,3@*ܲ(152,144),3,3:(104,144),3,3:(60,116),3,3:(60,80),3,3@rA$"BONUS":X93: 990: Z1 5:"BM"(X)",88"A$(Z):XX15: Z@A$"POINTS":X84: 990: Z1 6:"BM"(X)",116"A$(Z):XX15: Z@ 1 3: 2 4@ 80@:INSTRUCTIONSAI$"********* INSTRUCTIONS *********"A!":I$Av,"-WIPEOUT- IS A SIMPLE GAME, FOR 1 TO 4 PLAYERS, THAT DEMANDS FAST REACTION.B!6:"USING SPECIAL KEYS (THESE WILL BE SHOWN BEFORE EACH TURN), A PLAYER GUIDES A MARKER AROUND THE SCREEN, THE OBJECT BEING TO HIT THE RANDOM SPOTS WHICH SCORE";C @"POINTS. AS THE MARKER IS MOVED AROUND THE SCREEN, IT WILL LEAVEBEHIND A YELLOW TRAIL.": 1740:"DURING PLAY, A PLAYER MUST NOT CROSS THE YELLOW TRAIL OR GO BACK ON HIMSELF. IF THIS HAPPENSTHE PLAYER'S TURN WILL BE ENDED.";CJ"THIS ALSO APPLIES IF THE PLAYER HITS ANY OF THE 4 WALLS,ALTHOUGHIT IS PERMITTED TO GO ALONGSIDE A WALL OR A TRAIL."::"FIVE POINTS ARE SCORED FOR EACH"DT"TARGET HIT. IF A PLAYER HITS ALLTHE TARGETS THEN A BONUS OF AT LEAST 10 POINTS WILL BE AWARDED.";: 1740E^"AFTER THE BONUS POINTS HAVE BEENSHOWN, PLAY WILL RESUME WITH MORE TARGET POINTS APPEARING ON THE SCREEN. THE YELLOW TRAIL WILL REMAIN ON THE PLAY AREA, THUS MAKING IT A LITTLE MORE DIFFICULT AS PLAY CONTINUES."Eh:"THIS IS REPEATED UNTIL A PLAYER INEVITABLY HITS EITHER A WALL OR THE YELLOW TRAIL. THE NEXT PLAYER THEN TAKES HIS TURN.": 1740Fvr:"THERE ARE 2 POINTS TO REMEMBER."::"1) WHEN A TARGET IS HIT, PLAY WILL PAUSE FOR A SHORT TIME TO UPDATE THE PLAYERS SCORE. THE DELAY WILL BE VERY SHORT AND IT IS IMPORTANT THAT NO KEYS BE RELEASED DURING THIS TIME."F| 1740:"2) KEEP YOUR MARKER MOVING!! IF YOU TAKE YOUR FINGER OFF THE KEYS IT WILL COUNT AS A FAULT AND YOUR TURN WILL END!!"G:"HERE IS A TIP...."::"BEFORE YOU START PLAY, STUDY THESCREEN AND DECIDE WHICH WAY YOU WILL MOVE. THERE WILL BE NO TIMETO STUDY ONCE PLAY HAS BEGUN!G 1740H "YOU WILL HAVE TIME TO STUDY IF YOU HIT ALL THE TARGETS ON THE SCREEN AND SCORE A BONUS."H:"WHEN THIS HAPPENS, THE COMPUTER WILL ALLOW YOU TO STOP PLAY WHILE IT PLACES NEW TARGETS ON THE SCREEN. PLAY WILL NOT RESUMEUNTIL ONE OF THE SPECIAL KEYS ARE PRESSED. SO, THAT IS A GOOD TIME TO STUDY THE NEXT ROUTE TO TAKE."I@480,"PRESS ANY KEY....";I7A$: A$"" 1720 : 120IẎ@480,"PRESS ANY KEY......";:I}A$: A$"" 1750 : :I$:I 1,1:1: 1,0IA$"WELL DONE": 1000:V15: Z1 9:"BM"(V)",80S8"A$(Z):VV25: 200,1: ZJ?A$NP$(T):V15: 1000: Z1 (A$):"BM"(V)",160S6"A$(Z):VV20: 200,1: ZJT Z1 2000: ZJ 1,7:1: 1,0:A$"NEW":V0: 1000: Z1 3:"BM"(V)",40S6"A$(Z):VV20: 180,1: ZKA$"HIGH":V0: 1000: Z1 4:"BM"(V)",80S6"A$(Z): 200,1:VV20: ZKWA$"SCORE":V0: 1000: Z1 5:"BM"(V)",120S6"A$(Z):VV20: 220,1: ZK& 870:V0: Z1 (SC$)1:"BM"(V)",190S10"V$(Z):VV40: ZK0 AA1 5K: Z1 100: Z: 200,2: 1,1: Z1 100: Z: 100,2: 1,0KD AALNHSSC:H0L(X 1,0: Z1 1000: Z: 1310L4b 1890 HD88 HD92 MY123 MY127 L1K-6L04190KC@L1 RD4:1760KsJ(226,171),17,0:(226,171),17,5,1,0.74,0.76KTL1MY125K^DS04210KhDSC9 4500KrL14520K|DS0DS0KA9A91KA924290K(0,HL)(255,HL),L(C1,HLB7)(C3,SL),L((C2,HLB7)(C4,SL),LB(C1,HLB7)(C3,99),LXHL(50(AL50))LeHL90HLLvօHL70HL70LHR70HR70LHL20HL20LHR20HR20LSL89DS10LSL100SL100LD220DSLC1LB(0.5D2)L&C2RB(0.5D2)M0C3LF(2.5D2)M%:C4RF(2.5D2)M>DDS0 L1 B7B72MWNDS0 L1 C1C14MpXDS0 L1 C2C24MbB7HL95B795HLMlMv(0,HL)(255,HL),M(C1,HLB7)(C3,SL),M(C2,HLB7)(C4,SL),MC9DSMC8HLMNAL0AL0NKN0KN0N(ƅFP1 KN1804690N@ЅGR1 KN1804700N`څAL0 KN130(10FP)4710N GR0 AL0 DS0 L1 4720NMX254 MX171 MY148 MY1024730N BK1 AL5 AL15 4740 NAL0 L1 4750N AL0 DS04750O%AL20 DS0 AH1 FP3 4760O8 FL0 4770OP*TT20 AL0 4780Og4KN0 AL0 4790Or>1110OxHOR4810::"YOU USED FLAP WHILST GOING TOO FAST YOUR WINGS WERE RIPPED OFF":4920PF\4810::"YOUR GEAR WAS RIPPED OFF!!! YOU WERE GOING TOO FAST WITH IT DOWN":4920Pf4810::"YOU STALLED THE AIRCRAFT AND CRASHED!!!":L6$:4920Pp4810::"A VERY DANGEROUS LANDING!!! YOU LANDED WITH YOUR GEAR UP":4920Q&z4810::"YOU FLEW OUTSIDE THE MAP AREA AND CRASHED":4920Q4810::"YOU SKIDDED AND CRASHED ON LANDING:YOU LANDED WITH YOUR BRAKE ON!!!":4920Q4810::"YOU CRASHED!!! TRY LANDING ON THE RUNWAY NEXT TIME!":4920R54810::"A DANGEROUS LANDING! USE MORE FLAP NEXT TIME":4920R`4810::"YOU RAN OUT OF FUEL":4920R4810::"YOU OVERSHOT THE RUNWAY":4920R0,0:3:"A SUCCESSFUL LANDING":TT20 "YOU TAXIED OFF THE RUNWAY THOUGH!!!"S0S51240 5 :S5,1:S5:S5114:"T255V22L1ADEFBBDEBA":S5:4920S6ʂSBԮ0,0:0SOހC5135S[C418SkC4:C4:C5SwC518SS5501 3SS5,1SS5S$C5S.S8L6$:@288,"PRESS ANY KEY TO START AGAIN"SBRP$SLRP$""4930SV5,B6$0Ĥ!'_'HZ 5Z9 ' Z Km'L94v $f'4%Cm'O_0 50 ύ}ol}u.OrN4594vSQI$4:%ATTTTTFGTFGTFGTFGCm('OU}B}P ?#`$ Z& /9$` ぀$@ ؆  R& 5M'` ' 'm1'j+  ! '542b9M'_' 4- 'w5~"Y"&H7D06V&w+*% & x& w z& yU}}0/k~jhg0xh~g99jgOM}o&L46QmR& 5M'` ' 'm1'j+  ! '542b9M'_' 4- 'w5~NL.";$(@32,"MODE: ";:510:@64,"CHR$=";SC32%2C$;"DNL.":M73U$-ʋ$ :INITILIZATION'$$ 2500:4$,R1$f( A$(26): V$(10): V(10): B(10,10): G(50): G1(50)$r2 1840$<0:@262,"INSTRUCTIONS (Y/N)?";:0,1$AA$:A$""65:A$"Y"70:A$"N"65$B90$F4,1:1,1:5:0,0:(0,0)(255,14),,BF%PGY15:Z4520520:(Z,Y)(Z,Y160),:Z:Z45:Y1517520:(Z,Y)(Z160,Y),:Y%HA$"SEE CASSETTE INSERT":X12:1550:Z119%I"BM"(X)",13S3"A$(Z):XX12:Z&=J(115,165),5,0:(115,165),0,0:(115,125),5,0:(115,125),0,0:(115,105),5,0:(115,105),0,0:(195,85),5,0:(195,85),0,0:(75,45),5,0:(75,45),0,0&K"BM115,191C0U10G4R8H4U10BM20,140R25U4F4G4U4R75F4D4G4L100R14U4G4F4U4BM20,105R100U55R105U50G4R8H4BM230,70L45H4U4E4R45H4D8E4'FLA$"ABCDE":1550:Z15:(A$(Z),1)"C0":Z:"BM100,191S2"A$(1)"BM30,100"A$(2)"BM30,130"A$(4)"BM193,30"A$(3)"BM215,90"A$(5)'TP""80'uZ:@38,"player information";'d@130,"how many players ";: NP'nNP(NP): NP1 NP4 100'x Z1 NP':" name of player"Z;:NP$(Z)( NP$(Z)(NP$(Z),10): Z(/@450,"how many rounds ";: RR(RRR(RR): RR1 RR10 150( 220:::::::"******** NUMBER OF ATOMS *******(" 2 = EASY 3 = NORMAL 4 = HARD"(:"HOW MANY:-")A$: A$"" 200)=NA(A$): NA2 NA4 200 : 1230)ZTT1: TNP T1:RR1)l RRR 2480)SC0:I0:P0:PP0:X0:Y0:K0:L0:SC$"":G0)::NP$(T)" ITS YOUR TURN."):"THIS GAME DEMANDS YOUR MAXIMUM CONCENTRATION."*o:"A GOOD SCORE FOR A GAME WITH 4 ATOMS IS 20 - 25 POINTS. YOUR RATING WILL BE PRINTED AT THE END OF THE GAME"*:" .... GOOD LUCK ...."*"@480,"PRESS ANY KEY.....";*, "" 300+6:@256,"DO YOU WANT TO SEE THE LIST OF THE SPECIAL FUNCTION KEYS (Y/N)"+*@A$: A$"" 320+;J A$"N" +ST A$"Y" 690:+^^ 320+jh 1230+yrK93:L158+|(K,L),2,2+A$"COMMENCE PLAY": 1400+Z$: Z$"" I0 400+ Z$"F" GG1:G(G)K:G1(G)L: 610,  Z$"@" 690: 1,0,# Z$"G" 2050,H I1 Z1 500: Z: 2030,w… Z$"R" (125,38),0,2:(125,38),1,2:I1,̅ Z$"Q" 1920,օ Z$(12) 490, 400, K88 L136 KK10: 530, K163 L56 LL10: 550- K88 L56 KK10: 570-6 K88 L56 LL10: 590-x K163 (K10,L),2,1:K188:L131:(K,L),2,2: 200,1: 400-(K10,L),2,1:(K,L),2,2: 200,1: 400-& L61 (K,L10),2,1:K163:L36:(K,L),2,2: 200,1: 400.0(K,L10),2,1:(K,L),2,2: 200,1: 400.O: K88 (K10,L),2,1:K68:L61:(K,L),2,2: 200,1: 400.{D(K10,L),2,1:(K,L),2,2: 200,1: 400.N L136 (K,L10),2,1:K93:L158:(K,L),2,2: 200,1: 400.X(K,L10),2,1:(K,L),2,2: 200,1: 400/b K88 L136 650/l K163 L56 660/2v K88 L56 670/J K88 L56 680/Q1:QQK83:QQQQ10:A$"FIRING RAY": 1400: Z11 22:(K,LZ,3):"T255L255O5A": Z: 7600QQ8:Q141L:QQ10:A$"FIRING RAY": 1400: Z1 11:(KZ9,L,3):"T255L255O5A": Z: 8300qQ8:QQK83:QQQQ10:A$"FIRING RAY": 1400: Z1 11:(K,L9Z,3):"T255L255O5A": Z: 9700QQ1:Q141L:QQ10:A$"FIRING RAY": 1400: Z1 11:(K9Z,L,3):"T255L255O5A": Z: 9000:"######## FUNCTION KEYS ########"1<"'CLEAR KEY' MOVES RAY GUN ANTI- CLOCKWISE."1\Ƈ:"'F' KEY FIRES THE RAY."1Ї:"'G' KEY PUTS GAME INTO THE GUESS MODE.1ڇ:"'4 ARROW KEYS', IN THE GUESS MODE ALLOWS CHOICE OF SUSPECT SQUARE."2(:"'R' KEY COMMENCES REPLAY. 'Q' KEY=QUIT +50 POINT PENALTY";2? Z1 9000: Z:2V B(Q,QQ)1 10402u B(Q,QQ1)1 Q1 10502 B(Q,QQ1)1 Q1 10502 B(Q1,QQ1)1 B(Q1,QQ1)1 10502 B(Q1,QQ1)1 9002* B(Q1,QQ1)1 83034QQ1: Q9 1060 : 7603(> B(Q,QQ)1 10403HH B(Q1,QQ)1 QQ8 10503hR B(Q1,QQ)1 QQ8 10503\ B(Q1,QQ1)1 B(Q1,QQ1)1 10503f B(Q1,QQ1)1 7603p B(Q1,QQ1)1 9703zQQQQ1: QQ0 1060 : 8303 B(Q,QQ)1 10404 B(Q1,QQ)1 QQ1 10504? B(Q1,QQ)1 QQ1 10504f B(Q1,QQ)1 B(Q1,QQ)1 10504 B(Q1,QQ1)1 9704 B(Q1,QQ1)1 7604QQQQ1: QQ9 1060 : 9004ʅ B(Q,QQ)1 10404ԅ B(Q,QQ1)1 Q8 10505ޅ B(Q,QQ1)1 Q8 10505; B(Q1,QQ1)1 B(Q1,QQ1)1 10505U B(Q1,QQ1)1 8305o B(Q1,QQ1)1 9005QQ1: Q0 1060 : 9705A$"ABSORBED": 1400: I1 400 : SCSC1: 1380: 4006A$"REFLECTED": 1400: I1 400 : SCSC2: 1380: 4006'$A$"EMERGED": 14006C. Q1 QQ9 1110 :B6_8 Q8 QQ0 1140 :T6|B Q0 QQ1 1170 :LS6L Q0 QQ8 1200 :RS6V ((QQ10)83,137)4 CL3 : CL47` Z1 12:((QQ10)83,135Z,CL):"L255;T255;O5;1": Z: I0 SCSC2: 1380: 4007)j 4007Rt ((QQ10)83,54)4 CL3 : CL47~ Z1 12:((QQ10)83,57Z,CL):"T255;L255;O5;1": Z: I0 SCSC2: 1380: 4007 4007 (85,141(Q10))4 CL3 : CL48: Z1 11:(89Z,141(Q10),CL):"L255;T255;O5;1": Z: I0 SCSC2: 1380: 4008E 4008o (172,141(Q10))4 CL3 : CL48 Z1 10:(168Z,141(Q10),CL):"L255;T255;O5;1": Z: I0 SCSC2: 1380: 4008ā 4008η3,1:1: 1,08ص"BM0,30C4R255"9"BM0,31C2R255L57ND132L141D1329"BM0,164C4R255BU1C2L255":(88,136)(168,56),,BF: X88 168 10:(X,136)(X,56),: X: Y56 136 10:(88,Y)(168,Y),: Y9 13809 NA3 A$"THREE ATOMS PLACED"9 NA4 A$"FOUR ATOMS PLACED": NA5 A$"FIVE ATOMS PLACED":I Z1 8: ZZ1 8:B(Z,ZZ)0: ZZ: Z:Y( BB1 NA:2Z(8):ZZ(8):B(Z,ZZ)1 1330:V$(Z)"C2NU2R10U20L10D12R8": :9>:ALPHABET'>R Z1 (A$):A((A$,Z,1))64: A32 1830: Z> A 1570,1580,1590,1600,1610,1620,1630,1640,1650,1660,1670,1680,1690,1700,1710,1720,1730,1740,1750,1760,1770,1780,1790,1800,1810,1820: Z:? "A$(Z)"C3U20R10D10NL10D10": :A?5,A$(Z)"C3U20R8F2D6G2NL8F2D6G2L8": :B?Y6A$(Z)"C3BR2NR8H2U16E2R8": :C?|@A$(Z)"C3U20R8F2D16G2L8": :D?JA$(Z)"C3NR10U10NR6U10R10": :E?TA$(Z)"C3U10NR6U10R10": :F?^A$(Z)"C3BR10U6NL3D6L8H2U16E2R8D2": :G@hA$(Z)"C3U20D10R10U10D20": :H@5rA$(Z)"C3R10L5U20R5L10": :I@W|A$(Z)"C3NU2R6U20R4L10": :J@yA$(Z)"C3U20D10NE10F10": :K@A$(Z)"C3NU20R10": :L@A$(Z)"C3U20R5ND8R5D20": :M@A$(Z)"C3U20D5F10ND5U15": :NAA$(Z)"C3BR2R6E2U16H2L6G2D16F2": :OA&A$(Z)"C3U20R8F2D6G2L8": :PAVA$(Z)"C3BR2R6E2NH3NF2U16H2L6G2D16F2": :QA{A$(Z)"C3U20R8F2D6G2L8F10": :RAA$(Z)"C3NU2R10U10L10U10R10D2": :SAA$(Z)"C3BR5U20NL5R5": :TAA$(Z)"C3BU2NU18F2R6E2U18": :UB A$(Z)"C3BU5NU15F5E5U15": :VB/A$(Z)"C3NU20R5NU8R5U20": :WBVA$(Z)"C3U5E10U5BD20U5H10U5": :XB{A$(Z)"C3BU20D4F5ND11E5U4": :YBA$(Z)"C3NR10U5E10U5L10": :ZB&A$(Z)"BR10": :NOTHINGB0:INTRO'B:P$"T255;255;O1;1;1;1"BD 3,1: 1: 1,0CcN(88,136)(168,56),,BF: X88 168 10:(X,136)(X,56),: X: Y56 136 10:(88,Y)(168,Y),: YCXA$"ATOM HUNT":X20: 1550: Z1 9:"BM"(X)",48S8"A$(Z):XX25: ZDbA$"GAME OF DEDUCTION":X5: 1550: Z1 (A$):"BM"(X)",165S4"A$(Z):XX15: ZD|l Z1 500: Z:(123,91),2,1: 200,3:(153,71),2,1: 200,3:(133,101),2,1: 200,3:(103,131),2,1: 200,3Dv Z1 3000: Z:DA$"QUIT Y OR N": 1400DC$: C$"" 1930D C$"Y" 1970E C$"N" A$"CONTINUE PLAY": 1400: 400E 1930E;A$"ATOMS REVEALED": 1400E Z1 8: ZZ1 8: B(Z,ZZ)1 (83(ZZ10),141(Z10)),4,1: 200,4EƋ ZZ: Z:SC50: 1380ENA0Eڀ Z1 1500: ZE䁼 2370EDD1: DG D0:I0: 400FKG(D):LG1(D): 610F)A$"INSTRUCTIONS Y N": 1400FB C$: C$"" 2060FV C$"Y" 2110Fj C$"N" 2100Fv* 2060F4A$"USE ARROW KEYS": 1400: 2240F>:"######### INSTRUCTIONS #########"GMH"USE THE 4 ARROW KEYS TO MOVE THEMARKER ONTO THE DESIRED SQUARE. TO MAKE THE GUESS PRESS THE ***** ***** KEY.GR:"IF YOUR GUESS IS CORRECT, THE SQUARE WILL BE MARKED FOR THE REMAINDER OF THE GAME, AS A VISUAL REFERENCE."G\:"A WRONG GUESS SCORES A PENALTY OF 5 POINTS";Hf@480,"PRESS ANY KEY......";H2p "" 2160H\z:"######### INSTRUCTIONS #########"H"AS MANY GUESSES AS ARE DESIRED MAY BE MADE DURING THIS TIME."H:"IF ALL THE ATOMS ARE DISCOVERED THEN THE TURN WILL END."Iz:"THE MARKER WILL APPEAR IN THE BOTTOM LEFT HAND CORNER OF THE GRID TO BEGIN WITH. "::"TO RETURN TO THE GAME, PRESS THE'E' KEY AT ANY TIME."I@480,"PRESS ANY KEY TO BEGIN...";I "" 2220I 1,0IP1:PP1Iʱ(83(P10),141(PP10)),1,4JC$: C$"" 2260J}ޅ C$(9) P8 (83(10(P1)),141(PP10))2 (83(P10),141(PP10)),1,2:PP1:(83(P10),141(PP10)),1,4J C$(8) P1 (83(10(P1)),141(PP10))2 (83(P10),141(PP10)),1,2:PP1:(83(P10),141(PP10)),1,4Ks C$(10) PP1 (83(P10),141(10(PP1)))2 (83(P10),141(PP10)),1,2:PPPP1:(83(P10),141(PP10)),1,4K C$(94) PP8 (83(P10),141(10(PP1)))2 (83(P10),141(PP10)),1,2:PPPP1:(83(P10),141(PP10)),1,4L  C$(13) 2340LU  C$"E" (83(P10),141(PP10)),1,2:A$"CONTINUE PLAY": 1400: 400La  2260L $ B(PP,P)1 A$"CORRECT": 1400:NANA1: NA0 2360 : 2240L .A$"INCORRECT": 1400:SCSC5: 1380: 2260M 8A$"YOU GOT THEM ALL": 1400: Z1 1000: Z: 2370M& B:SCOREBOARD'M9 LSC(T)SC(T)SCMM V 3,1: 1: 1,0M `"BM0,0C2R255D191L255U191D15R255":(128,5),2,2:"BM0,176R255":(128,188),2,2M jA$"SCOREBOARD": 1550N tX5: Z1 10:"BM"(X)",60S8"A$(Z):XX25:"T250L250O4CEG": ZN ~X5:Y88N ZZ1 NP:A$NP$(ZZ):SCSC(ZZ): 1550: Z1 (A$):"S4BM"(X)","(Y)A$(Z):"T250L250O4CFB":XX14: Z:X185: 1410: Z1 (SC$)1:"BM"(X)","(Y)V$(Z)N XX14: Z:X5:YY27: ZZN Z1 3000: ZO 170O 1: 1,0Op A$"GAME OVER": 1550:X15: Z1 9:"BM"(X)",116S8"A$(Z):XX25: Z: Z1 2000: ZO RR1: Z1 NP:AV(Z)SC(Z)R:AV(Z)(AV(Z)): ZO ΀ Z1 NPO ؅ AV(Z)35 RA$(Z)"POOR"O AV(Z)30 RA$(Z)"FAIR"P AV(Z)27 RA$(Z)"AVERAGE"P5 AV(Z)24 RA$(Z)"GOOD"PY AV(Z)20 RA$(Z)"EXCELLENT"P AV(Z)15 RA$(Z)"OUTSTANDING"P  AV(Z)35 RA$(Z)"AWFUL"P  ZQ, (:"######################################## PLAYER RATINGS ######################################## (BASED ON A 4 ATOM GAME)Qa 2 Z1 NP::NP$(Z)"("AV(Z)")";:18)RA$(Z): ZQ <@480,"ANOTHER GAME (Y/N)";Q FA$: A$"" 2630Q P A$"Y" Q Z A$"N" Q d 260000: Z:@416,Z$;: 2530u DL(365):U$K$ < 3,1$F 1,0$#P 65495,0$.Z 170$sd 65494,0::"DO YOU WANT ANOTHER COPY OF THE SAME SCREEN [Y/N]"$nI$: I$"" 110$x I$"Y" 1,0: 80$$:PRINT ROUTINE$Z1$#2,(18)$ȇ#2,"R48,512"$҇#2,"I"%܅ Z2 Z3%X0:Y0:F0:L0%;A$: A$"R" #2,"A":%M Y192 410%[C(X,Y)%k F1 320% PX 255 2:U(P,Y): UZ P%" Y192 Y0: 430%, UZ F1: 320%6X0:YY1:LL1: 240%@ CZ TEN S1: 380&J C2 S1: 410&)T C1 C2: 370&@^ C3 C1: 370&Ph C4 C3&_r#2,"C";C&v| S1 S0: 410&#2,"M";L;",";X2&#2,"J0,2":F0: 410& Y192 Y0:L0:X0: 440& X255 YY1:LL1:X0: 240'XX1: 240'ZZ1: Z5 460'/‡#2,"M0,0": 220'J̇#2,"M0,0":#2,"A":0,95),,BF:@96,"";("FILENAME ";F$:"(C)ASS OR (D)ISK ";CD$( CD$"C" AA:M""F$( CD$"D" AA:""F$".BIN"(" CD$"C" CD$"D" 250),(0,36)(U$J$ < 3,1$F 1,0$#P 65495,0$.Z 170$sd 65494,0::"DO YOU WANT ANOTHER COPY OF THE SAME SCREEN [Y/N]"$nI$: I$"" 110$x I$"Y" 1,0: 80$$:PRINT ROUTINE$Z1$#2,(18)$ȇ#2,"R48,-512"$҇#2,"I"%܅ Z2 Z3%X0:Y0:F0:L0%<A$: A$"R" #2,"A":%N Y192 410%\C(X,Y)%l F1 320% PX 255 2:U(P,Y): UZ P%" Y192 Y0: 430%, UZ F1: 320%6X0:YY1:LL1: 240%@ CZ S1: 380&J C2 S1: 410&(T C1 C2: 370&?^ C3 C1: 370&Oh C4 C3&^r#2,"C";C&u| S1 S0: 410&#2,"M";L;",";X2&#2,"J0,2":F0: 410& Y192 Y0:L0:X0: 440& X255 YY1:LL1:X0: 240'XX1: 240'ZZ1: Z5 460'.‡#2,"M0,0": 220'İ#2,"M0,0":#2,"A": 500,@38,"SELECT";:@96,"A = ALTER ";:@128,"S = SAVE TABLE";:@160,"L = LOAD TABLE ";:@192," ";:@224," ";:-p@38,"ALTERU$Ћ$ 6:500$s H1(10,10): H2(10,10): H3(10,10),H4(10,10),H5(10,10),H6(10,10),H7(5,5),H8(3,5),H9(5,5),HH(3,5)$0:@202,"AIR ASSAULT";:0,1%7 34,12,B6,FF,23,8A,08,B7,FF,23,7F,01,47,8E,B7,98,A6,80,8D,14,A6,80,8D,10,7A,01,47,26,F3,B6,FF,23,84,F7,B7,FF,23,35,12,39,B4,01,47,B7,FF,20,86,AF,4A,26,FD,39%`Z3200032051:A$:Z,("&H"A$):Z%1040: Z1 BM:V(Z)0:VV(Z)0:BM0:@263,"INSTRUCTIONS (Y/N)";:0,1%(A$: A$"" 40%2 A$"N" 190%< A$"Y" 80%F 40&P:"********* INSTRUCTIONS *********"&Z"YOU ARE IN CONTROL OF A CRIPPLEDHELICOPTER THAT IS SLOWLY LOSINGALTITUDE. YOUR ONLY HOPE IS TO BLAST A CLEARING WITH HIGH EXPLOSIVE BOMBS IN THE DESERTED CITY OF KROYWEN."'d:"AS YOUR HELICOPTER CIRCLES THE CITY, SELECT YOUR TARGET AND DROP YOUR BOMBS BY PRESSING THE 'B' KEY. WHEN YOU HAVE CLEARED ASPACE, WAIT UNTIL THE HELICOPTERIS POSITIONED OVER THE SPACE ANDTHEN PRESS THE 'L' KEY.";'n Z1 18000: Z'x:"********* INSTRUCTIONS *********"("YOUR HELICOPTER WILL THEN ATTEMPT TO LAND. PROVIDING YOUR HELICOPTER COMES DOWN WITHOUT COLLIDING WITH ANY BUILDINGS, YOU WILL SURVIVE.") :"YOU CAN ONLY HAVE ONE BOMB IN ACTION AT A TIME, SO MAKE SURE YOUR AIM IS GOOD. A BOMB THAT MISSES A BUILDING WILL NOT EXPLODE."):"IF YOUR HELICOPTER IS TOO CLOSE TO A BOMB BLAST IT MAY EXPLODE TOO, SO KEEP YOUR DISTANCE!)@480,"PRESS ANY KEY....";) "" 170)4:@267,"GOOD LUCK";: Z1 1000: Z) 3,1)Ȱ 4,2)ҫ1*ܮ 1,0*F16* Z1 20*8X(2)1:H(50)70*BXX4*Y FX3 247 490*s(F,191)(FX,H),,BF*"(F2,H)(FX2,H3),,BF*, X12 (F4,H)(FX4,H7),,BF*6 X12 (F6,H)(FX6,H12),,BF+@ X8 (F4,H)(FX4,H7),,BF+J X6 360+&T X8 400+7^ X12 450+Oh AH 5 191 4+kr(F2,A)(F4,A2),,BF+s| A+~ 490+ AH 5 191 4+(F2,A)(F3,A2),,BF+(F6,A)(F7,A2),,BF+ A+ 490+€ AH5 191 4,̪(F2,A)(F4,A2),,BF,0֪(F8,A)(F11,A2),,BF,8 A,HFFX8: Z,TX0:Y0,]0,y(X,Y)(X35,Y11),H1,, (337)251 1020: 520, (337)247 1530-& B1 (V,VV,3): (V,VV1)1 (V,VV2)1 (V,VV3)1 1290- 0XX3: X35255 860-<:(X,Y)(X35,Y11),H2,-_D (337)251 1020: 520-xN (337)247 1530-X B1 (V,VV,1)-bXX3: X35255 860-l(X,Y)(X35,Y11),H3,-v (337)251 1020: 520. (337)247 1530. B1 VV:VVVV9.4XX3: X35255 860.i (X33,Y12)1 (X15,Y13)1 680 :1430.t 520.(X,Y)(X35,Y11),H4,. (337)251 1020: 690.ƅ (337)247 1660/:Ѕ B1 (V,VV,3): (V,VV1)1 (V,VV2)1 (V,VV3)1 (V,VV2)1 (V,VV3)1 1290/PXX3: X0 940/l(X,Y)(X35,Y11),H5,/ (337)251 1020: 690/ (337)247 1660/ B1 (V,VV,1)/ XX3: X0 940/(X,Y)(X35,Y11),H6,0 (337)251 1020: 6900,* (337)247 16600D4 B1 VV:VVVV90Z>XX3: X0 9400H (X6,Y12)1 (X15,Y13)1 850 : 14300R 6900\X220:(X,Y)(X35,Y11),H1,0f(254,Y4),1,10p(234,Y5),1,11z B1 900 : X220:YY5:B0: 1390: 6901(B0:X220:YY51R(V,VV,1):VV:VVVV9: V255 V2551(V,VV,3): (V,VV1)1 1290: 1390: 6901 Z1 95: Z: 9101X2:(0,Y)(35,Y11),H4,1(0,Y4),1,11(1,Y5),1,12ʅ B1 980 : X0:YY4:B0: 1390: 5202%B0:X0:YY42Kެ(V,VV,1):VV:VVVV9: V0 V02(V,VV,3): (V,VV1)1 1290: 1390: 5202 Z1 95: Z: 9902 B1 2B1:VX17:VVY14:2 1,3:12 1,1:13S$(120,100),7,2:(120,100),2,2:"BM120,100C2U8C4R15L30R15C2U1BM127,100U2D5L4D3C1L8U1C2U3L10U4R1D3R8U2D2L10U1C4E2G43l."BM120,100C1NR5U2R238(100,85)(135,105),H1,G3B(100,85)(120,105),H9,G3L(100,85)(106,105),HH,G3V"BM120,92C1R15L30R15C4H4F84`(106,99,1):(102,103,1):(106,103,4):(102,99,4)46j(100,85)(135,105),H2,G4Kt"C1H12F8C4E4G8"4~(106,103,1):(102,99,1):(102,101,4):(106,101,4)4(100,85)(135,105),H3,G5(120,50),7,2:(120,50),2,2:"BM120,50C2U8C4L15R30L15C2U1BM114,50U2D5R4D3C1R8U1C2U3R10U4L1D3L8U2D2R10U1C4E2G45)"BM120,50C1NL4U2L25F (107,35)(142,55),H4,G5c (107,35)(127,55),H7,G5 (107,35)(113,55),H8,G5ĵ"BM120,42C1L15R30L15C4H4F85ά(138,49,1):(134,53,2):(134,49,4):(138,53,4)5س(107,35)(142,55),H5,G6"C1H12F8C4E4G8"69(138,53,1):(134,49,1):(138,51,4):(134,51,4)6U(107,35)(142,55),H6,G6[6z VV190 (V,VV,1):B0:6BMBM1:V(BM)V:VV(BM)VV6 VV(Y14)11 (V,VV12)2 HC16( VV(Y14)11 (V,VV14)2 HC172 VV(Y14)11 (V,VV15)2 HC17@< VV(Y14)11 (V,VV13)2 HC17WF(V,VV3),12,1,1.77P(V,VV3),11,2,1.7:(V,VV),2,2:"T255L255O1C": 1,3: 1,1: 1,0: 3,1: Z1 5: 1,1:ZZ110:ZZ: 1,0: Z7Z32000:(V,VV),1,17dB0: HC1 1500 : 8Yn Z1 BM: V(Z)0 VV(Z)0 1400 : ZZ1 30:(V(Z),VV(Z)ZZ),12,1,1.7,.55,.95: ZZ8x Z: Z1 BM:V(Z)0:VV(Z)0: Z:BM0:8B0:8 1,1: Z1 999: Z:9Q"T255L255O1CDP1P1ED":(X15,Y5),40,1,.5:(X15,Y5),38,2,.5:(X15,Y5),1,1:"CP1C":(X15,Y5),2,2: Z1 10: 1,1:"C": A1 15: 1,0:::(X15,Y5),1,19 Z1 110:(X(25),Y(25),(3)1): Z: 14509 HC1 1510 : Z1 2000: Z::@266,"YOU CRASHED!":@480,"ANOTHER TRY (Y/N)?";: 150,5:A$: A$"" 1460: A$"N" :'ȅ A$"Y" 30:3ҁ 1460:b܀ Z1 BM:V(Z)0:VV(Z)0:BM0: Z: 1430::HC0: Z1 2000: Z:"YOUR HELECOPTER GOT CAUGHT IN THE BLAST. YOU WENT UP WITH THEBOMB TOO!":@480,"ANOTHER TRY (Y/N)?";: 150,5: 1460;(X,Y)(X35,Y11),H1,;C Z2 35 3: (XZ,Y12)1 1430;K Z;gYY1: Y11190 1790;"(X,Y)(X35,Y11),H2,;, Z2 35 3: (XZ,Y12)1 1430;6 Z;@YY1: Y11190 1790;J(X,Y)(X35,Y11),H3,<T Z2 35 3: (XZ,Y12)1 1430<#^ Z^"BM10,10C3D20R8U5D5R8U20BR5NR16D10NR10D10R20BR5NU20R16BR5NU20R16BR20U20R10F6D8G6L10BR21U20R16D20NL16BR5U20D2F16D2U20BR5NR16D10R10L10D10R16BR15U2BU3U15BR5D15BD3D2? "BM10,50F8ND12E8BR5D20R16U20L16BR21D14F6R4E6U14BR20ND20F8E8D20BR5U20R16D10NL16D10BR5U20R10F6D8G6L10BR25NR16U10R10L10U10R16BR20D20BR13U20L8R16BR15D15BD3D2BR5U2BU3U15"?2 Z1 9: 1,1: ZZ1 80: ZZ: Z?G& Z1 2000: Z?V0RA3600?m:RARA10:RA125RA?D0:@256,"YOUR RATING WAS:- ";RA"%";?N@480,"ANOTHER TRY (Y/N)?";:0,1: 1460?X 1880@=Ȫ(X,Y)(118,146),:(X,Y)(138,146U$ n$ D$(128):$$:HI-RES DRAW$F:(C) 20/12/85 STEPHEN KNIGHT$i(0:" **hi-res draw**"$2:10);"instructions ------------"$<"THIS IS A HI-RES DRAW PROGRAM."%F:"R.H. JOYSTICK=MOVEMENT FIRE=LEAVE NO TRAIL"%PP"@=SCREEN DUMP TO EPSON PRINTER S/L SAVE LOAD SCREEN ON/OFF TAPE";%Z"C=CIRCLE WITH CENTRE AT CURSOR V=VERIFY THAT SCREEN SAVED "%d"CLEAR=CLEAR THE SCREEN"%n"I=GO BACK TO INSTRUCTIONS P=PAINT AT CURSOR IN WHITE"&6xD$;D$;D$;"press";D$;"any";D$;"key";D$;"to";D$;"continue";&NQ$: Q$"" 130&U0&n@10,"instructions";& @42,"============";&@128,"E=ELLIPSE WITH CENTRE AT CURSOR"&"M=MODE/COLOUR SET CHANGING"&"T=TEXT FEATURE"'ȇ"Q=QUIT PROGRAM"'(҉"MODE(0,2,4)";M: M0 M4 210'T܉"COLOUR SET(1/0)";C: C1 C0 220'o"BACKGROUND COLOUR";T'"FOREGROUND COLOUR";S'@483,"press"D$"any"D$"key"D$"to"D$"continue"D$;'A$: A$"" 260'X128:Y96' M,1:S,T:1,C:("A(0):B(1)(&, A0X0 XX1(@6A63 X255 XX1(U@B0Y0 YY1(oJ B63 Y191 YY1(zT(X,Y)(^ (65280)126 (65280)254 (X,Y)(hA$: A$"" 290(r A$(12) :X128:Y96(| A$"@" 640) A$"S" 490) A$"L" 540)2 A$"V" 590)G A$"I" 40)h A$"P" (X,Y):(X,Y),S,S)} A$"E" 760)… A$"C" 820)̅ A$"M" 0: 210)օ A$"Q" 0:) 290):SAVE SCREEN)0::*4 "POSITION TAPE FOR SAVING THEN TYPE FILE NAME AND PRESS ENTER";A$*UA$,15361536,76791536,6143*f::1,C:*x:LOAD SCREEN*&0::*0"TYPE IN FILENAME AND PRESS ENTER";A$*:1,C: A$".BIN":*D*N:VERIFY*X0::++b"POSITION TAPE FOR VERIFYING AND TYPE IN FILENAME THEN ENTER"+=lA$: A$:1,C+Cv+]:SCREEN DUMP ROUTINE+0:"SET PRINTER ONLINE. THEN PRESS ENTER Q=QUIT";A$: A$"Q" 1,C: 290+:+155,64:154,64:328,0:330,2+#2,(27);"A";U$$ &HFFD7,0$0$7"TURBO CAR -BY SHERSOFT.."$G( D1 1000$M*$Y2: 100$q "D$:%D:"input"X$"which"X$"file (A-";(I63)") ?";%p(G$:G$""40:G$"*"220:G$"Q"%2 (G$)65 (G$)I63 40 :G$%<((G$)64) 70,80,90,100,110,120,130,140,150,160,170,180,190%F"TCAR.BAS": TURBO CAR&#P"INTRD.BAS": INTERPLANETARY TRADER&<Z"E.BAS": EXECUTION&[d"DTREK.BAS": DRAGON TREK&zn"WM.BAS": WUMPUS MANSION&x"W.BAS": WIPEOUT&"A.BAS": ATOM HUNT&"AA.BAS": AIR ASSAULT&"FLIGHT": FLIGHT SIMULATOR&:&:&:':' Ȇ **'Ҋ'/܇:"DISK NUMBER >";DISK$'\(DISK$)3 "3 DIGITS PLEASE":220'n"DISKDATA",5'"DISKDATA",1,3;DISK$:' 160 0 :"THIS DISK IS NOT NUMBERED DO YOU WANT TO NUMBER IT ?";:: 520'Y$:Y$""505(%Y$:Y$"Y" 220 :DISK$"NEW":5(:"ERROR CODE="(O"ERROR LINE="$aP 65495,0$lZ 170$d 65494,0::"DO YOU WANT ANOTHER COPY OF THE SAME SCREEN [Y/N]"$nI$: I$"" 110$x I$"Y" 1,0: 80$$:PRINT ROUTINE%Z1%#2,(18)%)ȇ#2,"R48,-512"%6҇#2,"I"%F܅ Z2 Z3%ZX0:Y0:F0:L0%zA$: A$"R" #2,"A":% Y192 410%C(X,Y)% F1 320% PX 255 2:U(P,Y): UZ P%" Y192 Y0: 430&, UZ F1: 320& 6X0:YY1:LL1: 240&8@ CZ S1: 380&OJ C2 S1: 410&fT C1 C2: 370&}^ C3 C1: 370&h C4 C3&r#2,"C";C&| S1 S0: 410&#2,"M";L;",";X2&#2,"J0,2":F0: 410' Y192 Y0:L0:X0: 440'- X255 YY1:LL1:X0: 240'>XX1: 240'UZZ1: Z5 460'l‡#2,"M0,0": 220'̇#2,"M0,0":#2,"A":ALACTIC ARMY ARE REBUILDING THE FLEET. URANIUM X IS IN GREAT DEMAND ON "LO$;:UXUX10: 2500Yp @416,"PIRATES HAVE DUMPED ZARIUM CRYSTAL ON THE MARKET ON "LO$;:"THEY ARE A LOW PRICE HERE!!";:ZCZC5:ZC(ZC): 2500Y @416,LO$" HAS BEEN RAIDED BY REBELS":"ZARIUM CRYSTAL IS VERY SCARCE!!";:ZCZC10: 2500Z Ģ 160,1: 180,1: 200,1: Z1 2500:U$P$* COPYRIGHT SALAMANDER SOFTWARE 1982$W0:4:300:504:DR$(239):BL$(128)$@421,"by"BL$"salamander"BL$"software";$487:KP(7,2),GL(9,9),DA(10),E1(15),K1(15),B1(15),QQ(16,10),NO$(10)$II110:NO$(II):%WH$"":BL$"":BU$""%@II132:WH$WH$(207):BL$BL$(128):BU$BU$(175):%q3:@160,"ENTER DEGREE OF DIFFICULTY (0-9)";% 381:DI(IN$)48:DI0DI99% 20DIF20,1% 3:@162,"ENTER LENGTH OF GAME (0,1,2)";% 381:LN(IN$)48:LN0LN212& 20DIF20,1&r3:@101,"LT. UHURA REPORTING...";:@261,"YOUR ORDERS ARE COMING";:@293," IN NOW SIR.... ";&1,1:2,3::(0,0)(15,7),B1&"BM0,0R6L2D4R6U2R4":(0,0)(15,7),E1&4,3::"BM12,0D2R2L12R2D2R4D2R2L4":(0,0)(15,7),K1'1,3:2,3:'.LH16:LW20:LX23:LY17: LN2 22'VLH18:LW26:LX28:LY21: LN1 22'rLH24:LW28:LX37:LY27' IILW 250 LX:(II,LH)(II,186),:' IILH 186 LY:(LW,II)(250,II),:'II052LN("C2S2BM"(((LX4)2)LWIILX)",4"NO$(II1)(J"C2BM8,"(((LY8)2)LHIILY)NO$(II1)"S4"(P(`1,1:2,3:(EM5000:EX(62LN)1:EY(22LN)1:KE((5)(DI2)4DI19)(LN1):KL0:WF0:AF0:WL0:DF0:BA(6(DI3.99)):ST2000(2000):TM10)RSO$"":HF0:UF0:X(16):Y(10):NW(ST15DI(0))100:CK0:GG0:QF0:KB0:SBST100)nDI2KC(DI) : KC0)x 485)!DI7GL((62LN)1,(62LN)1)2000)"II1BA)#JJ(62LN)1:KK(62LN)1)$GL(JJ,KK)035)%GL(JJ,KK)10:*&STST100:478*Q'II052LN:JJ052LN:GL(II,JJ)GL(II,JJ)(8):JJ,II*(BA1DR$"STARBASE IS " : DR$"STARBASES ARE "+^)3:@68,"TO : CMDR USS ENTERPRISE";:@100,"FROM : STARFLEET COMMAND";:@164,"A FORCE OF ### KLINGONS ";KL;:@196," HAS INVADED FEDERATION ";:@228,"SPACE.YOUR MISSION IS TO";:@260," RID THE GALAXY OF THIS ";+*@292,"MENACE.";BA;DR$;:@324," STANDING BY ";:@393,"STARFLEET OUT";:@453,"PRESS ANY KEY TO START";:381:0, +1,1:2,3:(0,162)(255,191),,BF:1,0,;,"BM2,164C3R82D24L82U24BM220,164R32D24L32U24",-"BM90,162R122D30L122U30BM94,162D30BM208,162D30BM94,178R19NU16R19NU16R19NU16R19NU16R19NU16R19",.SF6:138,/429,081,1112,2138,3WL0384,4AF056,5IN$-"6 AF 155,196,207,216,226,244,246-+760-C8IN$: IN$""59-i9PP(65280):PP126PP254248-r:60-|;270-350-?WL0384-@ DI7 (100)DI2 49.AKZ(62LN)1:KW(62L)1:GL(KW,KZ)999 GL(KW,KZ)100 49.*BKU0:KV0.OCEXKW KU1 : EXKW KU1.tDEYKZ KV1 : EYKZ KV1.E GL(KWKU,KZKV)999 49.FKR((GL(KW,KZ)100))/G(GL(KWKU,KZKV)100)KR(DI23) KR(DI2)(GL(KWKU,KZKV)100)3/JHGL(KW,KZ)GL(KW,KZ)100KR:GL(KWKU,KZKV)GL(KWKU,KZKV)100KR/IGL(KWKU,KZKV)709BDST20:BF1:UF4:BXKWKU:BYKZKV/JKWKUEX KZKVEY KR0 49/K1,1:II13:200,3:100,3:/LII1KR0MJJ(16):KK(10):QQ(JJ,KK)0 770MNKXJJ:KYKK:KP(KQII,1)KX:KP(KQII,2)KY:GG0:377:QQ(JJ,KK)10SO0ePKQKQKR:490QEX0EX5LN2EY0EY5LN24180RGL(EX,EY)1000WL1:TX127:TY95:0SGL(EX,EY)1999 465:WL10T1,1:1,0:2,31U(0,0)(255,161),,BF1V(240,168),2,31%W1381dX"BM240,168C4"NO$(EY1)"BL4BD4D2BD4D2BU12BL12"NO$(EX1)1YKQ(GL(EX,EY)100):BQ((GL(EX,EY)KQ100)10):SQGL(EX,EY)KQ100BQ101ZII116:JJ110:QQ(II,JJ)0:JJ,II1[QQ(X,Y)1:3801\II1SQ2']JJ(16):KK(10):QQ(JJ,KK)0932S^"C2BM"((JJ1)16)","((KK1)16)2c_QQ(JJ,KK)12`"BR6BD6NU4NR4ND4NL4NE2NF2NG2NH2"2a2bBQ01032cJJ(16):KK(10):QQ(JJ,KK)0992d"C1BM"((JJ1)16)","((KK1)16)3eQQ(JJ,KK)23'f"BR4R6F2D6G2L6H2U6BR4BD2R2D2L2"33gKQ03OhII13:200,3:100,3:3riCK1(0)KCKL CK(KQ)3jII1KQ3kJJ(16):KK(10):QQ(JJ,KK)01073lCKII GG1 : GG03mKXJJ:KYKK:KP(II,1)KX:KP(II,2)KY:377:QQ(JJ,KK)14n4 o4pSF04!q50 42rSTST1:SF14;s04ntSTHS HF1HF0:UF1:AAHX:BBHY:CC0:4404u(ST100)ST100 DI2 (100)5DI 1234vUF2:SX(62LN)1:SY(62LN)1:GL(SX,SY)9991185(wKLKL(GL(SX,SY)100):BN(GL(SX,SY)10):BN10(BN10)BABA15RxAASX:BBSY:CC0:GL(SX,SY)1000:4405ayKL0WL25|zSXEX SYEY WL15{STNW 1305|KSKQ:KE5DI(DI2):478:UF3:NWST1500DI100(100):DI2KCKC(3)6 }KQ(GL(EX,EY)100):KSKSKQ:KS01316'~II13:200,3:100,3:64II1KS6^JJ(16):KK(10):QQ(JJ,KK)01286KXJJ:KYKK:KP(KQ1II,1)KX:KP(KQ1II,2)KY:377:QQ(JJ,KK)1:6BF1 STBD GL(BX,BY)GL(BX,BY)10:UF5:BF06(ST10)ST107SF2:(ST100)ST10071SF3:(ST1000)ST10007USF4:(ST10000)ST10000 7{SF5:(ST100000)ST100000 7SF6771,1:2,3:DA(9)90QF1:(70,168),2,3:7QF1490:QF07SF01507"BM70,168"7II1SF8 "C2"NO$((((ST1),8II,1))1)8G"C1"NO$((((ST),8II,1))1)8VII21478k"BL4BD14D2BU16"8yII61498"BL12"88"C1BM108,166L10D4NR8D4R10":EN350"C4BU8L10D4NR8D4R10"9"C1BM127,166L10D4R10D4L10":SH300"C4R10U4L10U4R10"9A"C1BM146,166D8L10U8":UF0(146,166),2,3:"C4D8R10U8"9y"C2BM193,166D8R8E2U4H2L8":DF1 "C1D8R8E2U4H2L8"99IX0:IY0:ZZ19JH(0):JV(1)9JH16IX19JH48IX19JV16IY19JV48IY19II1:@(TX,TY):TXIX20 TXIX2255 TYIY20 TYIY2156AF0:50,5::rTXTXIX2:TYTYIY2:PP(TX,TY):PP3168:IIII2:II8162:(TX,TY,2):220,1:ZZZZ1:ZZ4156::AF0:(TX,TY),4,4:(TX,TY),4,3:50,5:(TX,TY),3,3:380;T2(TX16)1:T3(TY16)1;,PP4182;gQQ(T2,T3)0:GL(EX,EY)GL(EX,EY)100:KLKL1:KL0WL2;pII0;|IIII1; KP(II,1)T2 KP(II,2)T3 174;XX(KP(II,1)1)16:YY(KP(II,2)1)16:383;KP(II,1)KP(KQ,1):KP(II,2)KP(KQ,2)<CKII KCKC1:CK0<(CKKQ CKIITM5:HF0:EM3000:429:487:487:>0T2X T3Y WL3:>oGL(EX,EY)GL(EX,EY)1:QQ(T2,T3)0:GL(EX,EY)1GL(EX,EY)1>(2)1 DI2 >(TX,TY),12,4:(TX,TY),4,4:1,8:(TX,TY),3,3>…(2)2 DI3 WL1>Ñ>ā455>ŅIN$""?ƅIN$" "495:? IN(IN$):IN13204?2ȅIN8464:?LININ48:IN0IN9?mDDDD10IN:DD9999464:?ˢ150,1:@PR,DD;:?̅DDENSH 464:?ENENSHDD:SHDD:455?·@PR4,"SHIELDS SET SIR";:120,5:?ρ455?ЅIN$" "495:@=IJ0:II01:JJ15:DA(JJII5)100 DA(JJII5)40 211@҇@312,"UNDERWAY";:IJ1:DA(JJII5)DA(JJII5)19DF:DA(JJII5)100DA(JJII5)100@ӅDA(7)90213@ԇ@332JJ32II16,"###";DA(JJII5);@ՋJJ,II@օIJ0@312,"COMPLETE";AבA؁455:IN$""A*مIN$" "495:ARIN(IN$):IN13EE10FF10224AdۅIN8464:AININ48:IN0IN52LN A݅EE10EEIN:150,1:@PR,IN;",";:AޅFF10FFIN:150,1:@PR4,IN;:AߑB;HXEE:HYFF:HSST100(100):HF1:@454,"HYPERPROBE LAUNCHED";:120,5:GL(HX,HY)1999HS999999BABK⁽455BYIN$""BnIN$" "495:B}IN(IN$)BIN13EE10FF10236BIN8464:BININ48:IN0 IN52LN BEE10EEIN:150,1:@PR,IN;",";:CFF10FFIN:150,1:@PR4,IN;:CC>WE((EXEE)2(EYFF)2)4CWEEN @486,"insufficient"(128)"energy";:464:464:464:@479,BU$;:CAAEX:BBEY:CC0:440:EXEE:EYFF:WF1:ENENWE:AF0:1,1CKC0 DI6 (100)DI3 1,0:DBEX(62LN)1:EY(62LN)1:GL(EX,EY)100 GL(EX,EY)1000 240DCC5:447:@322,"MR. SPOCK ....";:@388,"IT APPEARS THAT WE ARE";:@420,"CAUGHT IN A KLINGON ";:@452,"TRACTOR BEAM CAPTAIN ";:120,5D487:CK1D1,0:EIN$" "1,3:"C3BM14,4L10D8R10":495EE6455:IN$" "495E<EEN20DA(2)90"C4BM175,166R8L4D8R4L8":200,5:"C2R8L4U8R4L8":EDF1E2,3:AAEX:BBEY:IX0:IY0EJH(0):JV(1)EXX(X1)16:YY(Y1)16:383EJH16257FX1EXEX1:X16:WF1:260F-QQ(X1,Y)1IX1F7260FFJH48260FgX16EXEX1:X1:WF1:260F~QQ(X1,Y)1IX1FJV16264FY1EYEY1:Y10:WF1:267FQQ(XIX,Y1)1IY1F267FJV48267G Y10EYEY1:Y1:WF1:267G QQ(XIX,Y1)1IY1GD 255,1:ENEN20:WF1CC0:440:Gl QQ(XIX,YIY)2DF1:429:380:G QQ(X,Y)0:XXIX:YYIY:QQ(X,Y)1:380:GIN(IN$)GIN49276GIN52305GININ48G IN 282,282,282,300,305,306GHIN$"*"H& EM3000 WL2:HcDF0:AAEX:BBEY:CC0:440:X(16):Y(10):WF1:485HEX(62LN)1:EY(62LN)1:GL(EX,EY)999 279IlCC5:447:@289," LT. UHURA REPORTING...";:@353,"MESSAGE FROM STARFLEET COMMAND";:@385," DUE TO COWARDICE UNDER FIRE ";:@417,"YOU HAVE BEEN DEMOTED TO CAPTN";:@449," OF THE USS FAERIE QUEEN ";IEM3000:HF0:TM5:429487:487:IPH500IN: DF1 PHEN DA(3)90 KQ0 "C4BM165,166ND4L10D4NR10D4":200,5:"C2U8R10D4L10":J II1:IJ0JA ((XKP(II,1))2(YKP(II,2))2)IN4293:IJ1JDR$"BM"((X1)16)","((Y1)16)"M"((KP(II,1)1)16)","((KP(II,2)1)16)J"C2"DR$:170,3JXX(KP(II,1)1)16:YY(KP(II,2)1)16:383K! QQ(KP(II,1),KP(II,2))0:KP(II,1)KP(KQ,1):KP(II,2)KP(KQ,2)K;!CKII KCKC1:CK0KN"CKKQ CKIIK#KQKQ1:IIII1:GL(EX,EY)GL(EX,EY)100:KLKL1: KL0 WL2K$"C3"DR$:380K%IIII1: IIKQ 284K&BXEX BYEY IJ1 BF0K'IJ1299L.(II(16):JJ(10):QQ(II,JJ)0((XII)2(YJJ)2)IN4296L})DR$"BM"((X1)16)","((Y1)16)"M"((II1)16)","((JJ1)16)L*"C2"DR$:170,3:"C3"DR$:380L+ENENPH:L,DA(4)90TR0DF1"C4BM164,166L8R4D8":200,5:"C2U8L4R8":M!-"BM"(8911TR)",182C2D4R2U4":TRTR1M7.X1AF0:50,5:Mq/TX(X1)164:TY(Y1)16:AF1:X1(TX,TY,2):220,1Mw0M1IN$"L"310M21,3:1,0:AF6M3DA(6)90 "C2BM14,4L10D8R10":200,5:309M4433M5M6 IN$"S"318M7CC4:447N8DA(5)90317Nt9DF1 AF7:@321," CHEKOV : ";:@390," SHIELDS ARE DOWN ";:@422,"WHILE DOCKED CAPTAIN";:N:AF2:@321," CHEKOV : WE HAVE";ENSH;"UNITS ";:@353,"OF ENERGY LEFT.HOW MUCH SHALL ";:@385,"I DIVERT TO THE SHIELDS SIR ? ";O ;PR460:464O<OY=AF7:@321," CHEKOV : ";:@387,"SHIELD CONTROL IS DAMAGED";:200,5:Ol> IN$"W"326O{?CC3:447O@DA(1)90325OADF1AF7:@321," LT. SULU ";:@390,"WARP DRIVE DISABLED ";:@422,"WHILE DOCKED CAPTAIN";:PMBAF@@8@321," LT. SULU : ";:@357,"WARP DRIVE ENGAGED SIR";:@389,"WHERE WE GOING CAPTAIN";P^CPR460:464PdDPEAF7:@321," LT. SULU : ";:@387,"WARP ENGINES ARE DAMAGED";:200,5:PFIN$"D"331PGCC7:447QaH@288,"DAMAGE CONTROL: REPAIRS UNDERWAY";:@353,"WARP DRIVE";:@385,"IMPULSE DR";:@417,"PHASER CTL";:@449,"TORP. CTL";:@481,"SHIELD CTL";QI@369,"LR SCANNER";:@401,"DAMAGE CTL";:@433,"COMPUTER ";:@465,"STATUS DSP";:@497,"HYPERPROBE";QJAF3:QKIN$"H"335RhLCC6:447:DA(10)90 @321," LT SULU : ";:@388,"THE HYPERPROBE LAUNCHER ";:@420," IS DAMAGED CAPTAIN ";:AF7:200,5:RMHF1@321," LT. SULU : ";:@386,"HYPERPROBE ALREADY LAUNCHED";:AF7:200,5:S9NAF4:@321," LT. SULU : ";:@353,"HYPERPROBE LAUNCHER READY SIR ";:@385," WHICH QUADRANT IS THE TARGET ";:PR460:464:SKOIN$"U"343SPCC8:447:@321,"LT. UHURA REPORTING...";:AF7:UF0@389,"NOTHING TO REPORT SIR ";:SQUF1 UF0:@391," THE HYPERPROBE ";:@423," HAS RETURNED SIR ";:ToRUF2 UF0:@388,"STARFLEET COMMAND REPORTS";:@420," A SUPERNOVA IN QUADRANT ";:@452,SX;",";SY;": CAUTION ADVISED ";:TSUF3 UF0:@385,"MESSAGE FROM STARFLEET COMMAND";:@417," A NEW WAVE OF KLINGONS HAS ";:@449," ENTERED THE GALAXY ";:UTUF4 UF0:@385,"MESSAGE FROM STARBASE QUADRANT";:@417,BX;",";BY;": WE ARE UNDER ATTACK. ";:@449,"IMMEDIATE ASSISTANCE REQUIRED.";:UU UF5 UF0:@386,"SIR, I'VE LOST CONTACT WITH ";:@418," STARBASE AT QUADRANT";BX;",";BY;:UVVWIN$"C"348VXAF7:CC2:447VY@289,"1 LOW PHASER ";:@321,"2 MED PHASER ";:@353,"3 HIGH PHASER";:@385,"4 TORPEDOES ";:@417,"SP TACTICAL ";:@449,"L L.R. SCAN ";:@481,"* ABANDON SHP";WfZ@306,"S SHIELD CTL";:@338,"D DAMAGE RPT";:@370,"H HYPERPROBE";:@402,"U LT. UHURA ";:@434,"C COMPUTER ";:@466,"W WARP DRIVE";:@498,"@ UNDOCK ";Wl[W|\IN$"@"W]207,1:DF0:W^1,1W_II1KQW`GG0Wa (0)1(KQ1) DF1 364X2bDR$"BM"((KP(II,1)1)1615)","((KP(II,2)1)162)"M"((X1)16Ia,☛a,Aڑ!a)Q%e”%$,a%$,,LB$塥_%eb,fڑ!a)%e$%奨$B夤_#嘀,n@ޙ@ޙ,eb%Bf_"eaH:SH0Yh EN0 WL3:364YGiD1(10):KH100SH0DA(D1)DA(D1)(20)Y^jDA(D1)0DA(D1)0Yhk375Yl(100)15DI DI5 375YmXX(KP(II,1)1)16:YY(KP(II,2)1)16:383YnMX0:MY0YoXKP(II,1) MX1 : XKP(II,1) MX1ZpYKP(II,2)MY1:YKP(II,2)MY1ZEqQQ(KP(II,1)MX,KP(II,2)MY)0 372ZrQQ(KP(II,1)MX,KP(II,2)MY)1:QQ(KP(II,1),KP(II,2))0ZsKP(II,1)KP(II,1)MX:KP(II,2)KP(II,2)MYZtKXKP(II,1):KYKP(II,2)ZuIICK GG1Zv377ZwIIZx[.y((KX1)16,(KY1)16)((KX1)1615,(KY1)167),K1,[WzGG1 ((KX1)166,(KY1)164,2)[]{[|((X1)16,(Y1)16)((X1)1615,(Y1)167),E1,:[}IN$:IN$""381[~[(XX,YY)(XX15,YY7),B1,:[WL0409\(WL) 386,391,397,402,407\1,1:1,0\#II42564\=(TX,TY),II,4:II1,1\C\4:@228,"YOU HAVE BEEN DESTROYED ";:@260," BY A SUPERNOVA ";:487:496\7: (4) 392,393,394,395\DR$" DISHONOURABLE DISCHARGE ":396]DR$" DEATH BY FIRING SQUAD ":396]<DR$" LIFE IMPRISONMENT ":396]II(50):DR$" "(II)" YEARS HARD LABOUR ":II10 DR$DR$" "^ @227," FOR CONDUCT UNBECOMING ";:@259," AND GROSS INCOMPETENCE ";:@291,"YOU HAVE BEEN SENTENCED TO";:@323,DR$;:487:496^1,1:1,0^(II167^uX(200)20:Y(20020):C(4):(X,Y),(4)8,C:(X,Y),C,C:1,(2)1^{^4:@228,"YOU HAVE BEEN DESTROYED ";:@260," THE FEDERATION WILL BE ";:@292," CONQUERED!!! ";:487:496^1,1_ II196_T1,(2)1:(4),1:(0,96II)(255,96II),:(0,95II)(255,95II),_Z_0:@228,"YOU HAVE BEEN DESTROYED ";:@257,"CROSSING THE GALACTIC BARRIER ";:487:496`r8:0,0:@100,"THE KLINGONS HAVE OVERRUN";:@132," THE GALAXY AND YOU HAVE ";:@164,"BEEN CAPTURED AND BROUGHT";:@192,"TO TRIAL FOR WAR CRIMES. ";:@228," YOUR BRILLIANT KLINGON ";`@2$g̑ϘςτO@8DτρOOρO@8D̙Oϐ@@>A@>A@>@|~"3 496,410a3:@72,"CONGRATULATIONS!";:@130," YOU HAVE DESTROYED ### ";KB;:@162,"KLINGONS IN ###.## STARDATES";(STSB)100;aRA(KB10000)((DI3)1)(STSB):@232,"RATING = ###### ";RA;aRA1000417bDR$"FLEET COMMANDER":RA2500DR$" COMMODORE "b1RA2000DR$" ADMIRAL "bSRA1500DR$" REAR ADMIRAL "b@290," YOU HAVE BEEN PROMOTED TO ";:@418,"THE RANK OF ";DR$;b487:496bII110:200,1:bEX0EX0:X1bEX52LN EX52LN:X16cEY0EY0:Y1c!EY52LN EY52LN:Y10c7ENEN500(100)cyOO1(5):D1(10):DA(D1)DA(D1)(30):DA(D1)0DA(D1)0ccEN0 WL4 :d*CC5:447:@321,"SCOTTY HERE CAP'N...";:@389,"THE GALACTIC WALL'S TOO";:@421," STRONG. I DINNA THINK ";:@453," SHE'LL TAKE IT AGAIN. ";:487d0dk1,1:2,3:ENEM:SH0:TRTM:(100,185),2,3:"BM100,182"dxII1TMd"C4D4R2U4BR9":ddIIEX1EX1:JJEY1EY1dII0II5LN2 JJ0 JJ5LN2 438dCC0eFIIEX JJEY 2,3:(LW4IILX,LH4JJLY)(LW4(II1)LX,LH4(JJ1)LY),,BF:CC1e\AAII:BBJJ:440egJJ,IIeme DRAW STARS;BASES;KLSe1,3:4,3: CC0 (LW2AALX,LH2BBLY)(LW2(AA1)LX,LH2(BB1)LY),,BFfFGL(AA,BB)1000"C4BM"(LWAALX(LX2))","(LHBBLY(LY2))"NU4ND4NR4NL4NE2NF2NG2NH2":fGL(AA,BB)10GL(AA,BB)1999 "C2BM"(LWAALX(LX2))","(LHBBLY(LY2))"NU4ND4NL4NR4NE2NF2NG2NH2":gBX(GL(AA,BB)10):(BX10)BX10 (LW2AALX,LH2BBLY),1,2gOBX9 (LW6AALX,LH6BBLY)(LW6(AA1)LX,LH6(BB1)LY),,BFgUgbCC:0,0gBL$:BL$:NM$"enterprise":EM3000NM$"faerie"(128)"queen"g@8,"uss"(128)NM$;g‡@64,"DATE":"QUAD ";EX;",";EY::"STATUS":"KLINGONS"hGÇ@82,"ENERGY":@114,"SHIELDS":@178,"TORPEDOES":@210,"HYPERPROBE "hSć:WH$;h]Ł455hcƑhsDžDA(8)90hȇ@70,"####.##";ST100;:@90," ####";EN;:@122," ####";SH;:@188," ##";TR;:@201," ###";KL;iDR$" GREEN":EN350 SH300DR$"YELLOW"iʅDF1DR$"DOCKED"i4˅KQ0DR$" RED"iĊ@167,DR$;iaDR$"IN ":HF1DR$"OUT"ip·@221,DR$;ivϑiЇ@PR," ";:DD0:EE10:FF10:20,5:iт BLACK HOLEjiCC5:447:@321," MR. SPOCK ";:@385,"UNUSUAL SCANNER READINGS SIR. ";:@417,"THERE IS A ##.###% PROBABILITY";98(0);:@449,"OF A BLACK HOLE IN THE AREA...";:120,5:487j}QF1:BH(100)kԇ@321," SCOTTY HERE ";:@385,"ITS NO USE CAP'N. THE ENGINES ";:@417,"ARE ON THE VERGE OF BREAKING ";:@449,"UP.WE CAN'T BREAK FREE FROM...";:120,5:487kJՀII14:JJ08:(55)200,1:JJ:JJ,IIkCC5:447:@321," MR. SPOCK ";:@385,"HMMM..ILLOGICAL..IT SEEMS WE ";:@417,"HAVE BEEN THROWN THROUGH TIME ";:120,5kEX(6LN2)1:EY(6LN2)1:GL(EX,EY)999