257,197,443,769,501,680,513,578,725,1441,822,974,1160,1070,870,1170,686,542,1435,1233Jfа:ГNEW ORLEANSJЁбЖ 2278,1858,2536,1277,1775,1496,517,839,0,417,698,982,1346,1070,802,915,701,532,346,860,480,722,1039,1135,1138,1229,206,919,1507,1335Kв:ГLITTLE ROCKKЙгЖ 1987,1687,2189,941,1438,1325,316,423,417,0,396,560,825,877,609,728,514,346,427,1161,552,778,1023,1042,898,1136,264,657,1507,1250KШд:ГST LOUISLеЖ 2118,1836,2057,863,1362,1481,655,257,698,396,0,370,630,534,244,422,256,321,512,1226,565,731,903,828,609,904,497,289,1207,976L,ж:ГDES MOINESL┤зЖ 1825,1709,1816,671,1070,1432,703,197,982,560,370,0,245,587,479,662,588,693,826,1591,955,1061,1146,1039,776,1094,825,344,1337,1118L╞и:ГMINNEAPOLISMRйЖ 1979,1857,1724,917,1186,1677,949,443,1346,825,630,245,0,685,593,778,705,833,1068,1769,1121,1151,1232,1113,887,1195,1055,410,1390,1217M`к:ГDETROITMхлЖ 2399,2288,2384,1283,1671,2008,1156,769,1070,877,534,587,685,0,284,193,382,543,756,1385,732,630,727,514,296,609,957,275,799,649M°м:ГINDIANAPOLISN{нЖ 2289,2063,2237,1063,1566,1725,892,501,802,609,244,479,593,284,0,177,114,283,478,1186,527,551,705,569,364,659,672,185,929,731NНо:ГCOLUMBUS OHOпЖ 2426,2242,2441,1241,1682,1903,1049,680,915,728,422,662,778,193,177,0,214,383,574,1171,585,435,563,425,186,477,800,358,801,556O"░:ГLOUISVILLEOе▒Ж 2346,2182,2313,1119,1618,1751,828,513,701,514,256,588,705,382,114,214,0,174,360,1088,415,456,647,639,393,706,586,297,962,766O╡▓:ГNASHVILLEP8│Ж 2325,2011,2369,1184,1703,1674,659,578,532,346,321,693,833,543,283,383,174,0,194,910,246,421,672,702,567,787,414,466,1092,900PI┤:ГBIRMINGHAMP═╡Ж 2365,2052,2586,1325,1791,1677,635,725,346,427,512,826,1068,756,478,574,360,194,0,754,150,391,708,771,788,868,245,657,1226,978P▄╢:ГMIAMI FLQn╖Ж 3093,2716,3257,2107,2566,2348,1343,1441,860,1161,1226,1591,1769,1385,1186,1171,1088,910,754,0,663,740,971,1094,1180,1230,912,1397,1520,1334Q|╕:ГATLANTAR╣Ж 2483,2191,2664,1430,1934,1827,822,822,480,552,565,955,1121,732,527,585,415,246,150,663,0,240,557,654,683,748,399,708,1108,854R║:ГCHARLOTTE RЦ╗Ж 2721,2412,2779,1580,2083,2034,1058,974,722,778,731,1061,1151,630,551,435,456,421,391,740,240,0,310,418,495,512,632,737,848,618Rз╝:ГNORFOLK VAS/╜Ж 3001,2685,2968,1766,2223,2349,1351,1160,1039,1023,903,1146,1232,727,705,563,647,672,708,971,557,310,0,228,421,265,949,865,581,365S?╛:ГBALTIMORES╚┐Ж 2823,2647,2797,1643,2067,2312,1357,1070,1135,1042,828,1039,1113,514,569,425,639,702,771,1094,654,418,228,0,245,96,1012,717,427,199S┘└:ГPITTSBURGHT^┴Ж 2609,2430,2549,1427,1924,2087,1208,870,1138,898,609,776,887,296,364,186,393,567,788,1180,683,495,421,245,0,308,943,476,574,379Tr┬:ГPHILLIDELPHIAT√├Ж 2902,2703,2859,1739,2154,2374,1443,1170,1229,1136,904,1094,1195,609,659,477,706,787,868,1230,748,512,265,96,308,0,1106,785,315,106U ─:ГJACKSON MSUУ┼Ж 2151,1818,2446,1198,1656,1458,407,686,206,264,497,825,1055,957,672,800,586,414,245,912,399,632,949,1012,943,1106,0,745,1455,1224Uб╞:ГCHICAGOV%╟Ж 2173,2048,2117,1021,1417,1742,921,542,919,657,289,344,410,275,185,358,297,466,657,1397,708,737,865,717,476,785,745,0,1004,809V2╚:ГBOSTONV┴╔Ж 3128,3017,3144,1998,2376,2670,1753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208V╦╩:ГNYCWU╦Ж 2930,2794,2914,1794,2189,2445,1559,1233,1335,1250,976,1118,1217,649,731,556,766,900,978,1334,854,618,365,199,379,106,1224,809,208,0753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208V╦╩:ГNYCWU╦Ж 2930,2794,2914,1794,2189,2445,1559,1233,1335,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                INE"8'OЗ:Зд3)"(2) 2 YR OLD PETERBUILT"8MPЗ:Зд3)"(3) 4 YR OLD FREIGHTLINER"8jQЗ:Зд7)"WHICH ONE <1-3>";8ЛRI$│ Т:ЕI$│""з82 :Д TK│ Й(I$)8йSЕ TK┤1 ▒ TK▓3 з ╔M2$:Бе778▀TЕTK│1 з TP│3000 :ДЕTK│2 зTP│2500 :ДЕTK│3 зTP│20009UЕ TK│1 зMP│6 :Д Е TK│2 зMP│5:ДЕTK│3 зMP│4.59JVЕ TK│1 зTR│100000 :ДЕTK│2 зTR│80000 :ДЕ TK│3з TR│600009iW:Г***PUT MUSIC HERE*******9ЁXЮ:З:З"OK "NM$:З"WE WILL START YOU OUT IN KANSAS CITY MO. THIS WILL BE YOUR HOMETERMINAL THROUGHOUT THIS SESSION GOOD LUCK!!":YЗ:Зд3)"PRESS TO CONTINUE":(ZA$│ Т:ЕA$┤▓"C"з90:;[╔M5$:╔M3$:╔M4$:[\:Г*******MAIN LOOP*********:t]╔ M5$:ЕMN▓│12 з Бе41:¤^Ю:З"MONTH:";MN$(MN);" DAY OF WEEK:"DA$(DA):Зд7)"CASH=";:З═"$##,###.##";MO:Зд5)" MN";MN;" WK";WK;" DA";DA:ЗNM$" YOU ARE IN ":ЗCT$(A); _З"******LOADS AVAILABLE******";Г`J│ Д(9):Е J┤4 з З" no loads available today":АX1│1е1500:ЛX1:ZZ│ZZл25:╔M2$:DA│DAл1:Бж118:Бе92<$aDB│Jм4:АY│1еDB:B│ Д(30):ЕDB┤2 ░ A│B з З" no loads available today":АX1│1е1500:ЛX1:ZZ│ZZл25:╔M2$:DA│DAл1:Бж118:Бе92 :ДЗY">";CT$(B);:Зд24)DT(A,B):D(Y)│B:ЛY%mBB│ Д(TR):ЕBB┤100 з З"YOU BLEW A TIRE!!":J│ Д(100)л300:MO│MOмJ:З"NEW TIRE COST $"J:TR│TRл40000:╔M2$:АX1│1е500:ЛX1>+nР>▓oBB│ Д(200):ЕBB┤10 з З"YOU HAD A BREAK DOWN!!":J│ Д(500)нTK:З"COST TO FIX $"J:MO│MOмJ:АJ│1е500:ЛJ:а150,1:а10,1:а150,1:АX1│1е500:ЛX1?pBB│ Д(200):ЕBB┤10 зЗ"PERMITS TO BUY";:J│ Д(100):MO│MOмJ:З"$"J:АJ│1е500:Л:╔M2$:АX1│1е500:ЛX1?АqBB│ Д(200):ЕBB┤10 зЗ"YOU HAD A SPEEDING TICKET":╔M2$:J│ Д(50)л50:З"IT COST $"J:MO│MOмJ:АJ│1е500:ЛJ:Р :Д Р?Юr:Г***DAYS ON THE ROAD****?╬sЕ DA▓6 з DA│DAм7:WK│WKл1:Бж116:Бж136:Р :Д Р@ftЕ WK▓│4 з WK│0:MN│MNл1:MO│MOмTP:а125,10:а10,15:З"TRUCK PAYMENT OF $"TP" PAID!":╔M2$:АJ│1е500:ЛJ:З"INSURANCE PAID $";850:╔M2$:MO│MOм850:АJ│1е1000:ЛJ@xuАJ│1е1000:Л:Р@Цv:Г****YOU SAT ONE DAY****ACwЮ:З NM$:З"YOU DIDN'T GET LOADED TODAY SO YOU HAD TO SIT. IT STILL COST $25 FOR EXPENSES THIS DAY. PERHAPS YOU WILL GET LOADED TOMORROW. YOU BETTER HOPE SO "APxMO│MOм25ApyАJ│1е1500:ЛJ:а125,3:Бж114:РAСz:Г*****REM TRIP REPORT******Aп{З"******TRIP REPORT*****"A╕|╔M5$A▀}З"INCOME :";:З═"$#,###.##";(MIнRT)A■~DF│( Б(MIоMP))н( Д(50)л80)B DF│DFо100B9АЗ:З"FUEL COST ";:З═"$###.##";DF:MO│MOмDFBWБTR│TRм(MIн2):ЕTR┤0зTR│100BgВБж109:Бж111BВГZA│ Б(MIо500):ZA│ZAн20BПДMO│MOмZAB╡ЕЗ"MEALS ETC";:З═"$###.##";ZA:ZA│0B┼ЖАJ│1е1500:ЛB╦ЗРB┘И╔M1$:╔M5$B▀ЙРCHКЖ SAN FRANCISCO CA.,LOS ANGELES CA.,PORTLAND OR.,DENVER CO.,SALT LAKE CITY UT.,PHOENIX AZ.,DALLAS TXC╚ЛЖ KANSAS CITY MO.,NEW ORLEANS LA.,LITTLE ROCK AK.,ST. LOUIS MO.,DES MOINES IA.,MINNEAPOLIS MN.,DETROIT MI.,INDIANAPOLIS IN.DTМЖ COLUMBUS OH.,LOUISVILLE KY.,NASHVILLE TN.,BIRMINGHAM AL.,MIAMI FL.,ATLANTA GA.,CHARLOTTE NC.,NORFOLK VA.,BALTIMORE MD.,PITTSBURGH PA.DЬНЖ PHILLIDELPHIA PA.,JACKSON MS.,CHICAGO IL.,BOSTON MA.,NEW YORK NY.DюОЖ PAPER,45,CANNED GOODS,45,CLOTHING,15,MACHINE GOODS,45,APPLIANCES,15,MAIL,20E@ПЖ jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec,sun,mon,tue,wed,thu,fri,satETР:ГSAN FRANCISCOEщСЖ 0,387,637,1255,752,762,1752,1861,2278,1987,2118,1825,1979,2399,2289,2426,2346,2325,2365,3093,2483,2721,3001,2823,2609,2902,2151,2173,3128,2930E√Т:ГLOS ANGELESFРУЖ 387,0,962,1031,691,389,1399,1577,1858,1687,1836,1709,1857,2288,2063,2242,2182,2011,2052,2716,2191,2412,2685,2647,2430,2703,1818,2048,3017,2794FЯФ:ГPORTLANDG5ХЖ 637,962,0,1261,763,1268,2043,1820,2536,2189,2057,1816,1724,2384,2237,2441,2313,2369,2586,3257,2664,2779,2968,2797,2549,2859,2446,2117,3144,2914GBЦ:ГDENVERG╙ЧЖ 1255,1031,1261,0,534,813,784,606,1277,941,863,671,917,1283,1063,1241,1119,1184,1325,2107,1430,1580,1766,1643,1427,1739,1198,1021,1998,1794GшШ:ГSALT LAKE CITYH|ЩЖ 752,691,763,534,0,646,1257,1105,1775,1438,1362,1070,1186,1671,1566,1682,1618,1703,1791,2566,1934,2083,2223,2067,1924,2154,1656,1417,2376,2189HКЪ:ГPHOENIXIЫЖ 762,389,1268,813,645,0,1002,1235,1496,1325,1481,1432,1677,2008,1725,1903,1751,1674,1677,2348,1827,2034,2349,2312,2087,2374,1458,1742,2670,2445I,ЬВ DALLASI╖ЭЖ 1752,1399,2043,784,1257,1002,0,505,517,316,655,703,949,1156,892,1049,828,659,635,1343,822,1058,1351,1357,1208,1443,407,921,1753,1559I═Ю:Г KANSAS CITY MOJTЯЖ 1861,1577,1820,606,1105,1235,505,0,839,423, AMOUNT PAYED L. LIST TRANSACTIONS H. PRINT TRANSACTIONS Q. QUIT"yдK$│ Т:ЕK$│"" Бе 420ОжP│ Ю("BPLHQ",K$)ЮзЕP│0 Бе 420╗йИ P Бе430,440,450,460,70щоЮ:З@228,"AMOUNT: ";:╗ Й A$:Е A$│"" Бе 410,пЮ:З@228,"DATE (MM/DD/YY): ";:╗ Й D$:M│ Й( О(D$,2)):Е M┤1 з M│19░A│ Й(A$)K▒Е M▓12 з M│12_▓BL(ZZ)│BL(ZZ)лAj│Бж 850Т┤T$(ZZ,PP)│"BILLED ON "лD$л" "л И(A)к╡MN(ZZ,M)│MN(ZZ,M)лA╡╖Бе 410с╕Ю:З@228,"AMOUNT: ";:╗Й A$:ЕA$│"" Бе 410╣Ю:З@228,"DATE (MM/DD/YY): ";:╗Й D$║A│ Й(A$))╝BL(ZZ)│BL(ZZ)мA4╜Бж 850]╛T$(ZZ,PP)│"PAYED ON " лD$л" "л И(A)h┴Бе 410p┬Ю:Зy─LC│0И┼А I│1 е ME░╞Е T$(ZZ,I)┤▓"" з З T$(ZZ,I):LC│LCл1╧╟Е LC│12 з Бж 9000:Ю:З:LC│0╒╚Лш╔Е LC з Бж 9000є╦Бе 410¤╠PD│м2 ╬А I│1 е ME /╤Е T$(ZZ,I)┤▓"" з З#PD,T$(ZZ,I) <╒Л:Бе 410 f Ю:З@226,"PLEASE ADD A COMPANY FIRST." r"Бж 9000 x)Р нRPP│ME:А II│1 е ME:Е T$(ZZ,II)│"" з PP│II:II│1000 │SЛ ╣TР ╫▐Ю:З@232,"OK TO QUIT? Y/N" ярK$│ Т:ЕK$│"N" Бе 70!сЕK$┤▓"Y" Бе 992! чЮ:К!╨Ю!╥FF│1!)╘А I│1 е 26!C╓Е FF з З:FF│0:Бе 2010!L╪FF│1!u┌З═"(!) % % "; Л(Iл64);CN$(I);!{▄Л!Ц▌З@482,"";:Z$│ Л(NCл64)!▐▐Е AF з З" SELECT (A-"Z$") SPACE=ALL"; :Д З" SELECT (A-"Z$")";!ўфK$│ Т:ЕK$│"" Бе 2020"цЕ K$│" " ░ AF│1 з Р"1юЕ K$▓│"A" ░ K$┤│ Л(NCл64) з Р"=ўБе 2020"d#(З@484,"PRESS ANY KEY TO CONTINUE";"w#*Е Т│"" Бе 9002"}#,Р"а'Ю:З@228,"FILENAME: ";:╗ Й F$:Р"нъ`└1:Бе 50Z$") SPACE=ALL"; :Д З" SELECT (A-"Z$")";!ўфK$│ Т:ЕK$│"" Бе 2020"цЕ K                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                м(121,139),╜:╗м(121,122),╜:╗м(111,122),╜:╗(121,130)м(111,130),╜:╗(135,139)м(135,131),╜:╗м(142,122),╜/╥"╗(129,122)м(135,131),╜:АJ│1е500:Л:╗(51,160)м(38,160),╜:╗м(38,171),╜:╗м(51,171),╜:╗м(51,183),╜:╗м(36,183),╜0I#╗(59,184)м(59,160),╜:╗м(72,160),╜:╗м(72,184),╜:╗(72,171)м(59,171),╜:╗(79,184)м(79,160),╜:╗м(86,160),╜:╗м(86,181),╜0┤$╗(87,160)м(93,160),╜:╗м(93,184),╜:╗(119,184)м(119,160),╜:╗(134,160)м(134,184),╜:╗(134,173)м(119,173),╜10%╗(146,184)м(158,184),╜:╗(152,183)м(152,160),╜:╗м(145,160),╜:╗м(158,160),╜:╗(165,160)м(165,184),╜:╗(178,184)м(165,160),╜1╛&╗(179,160)м(179,184),╜:╗(188,160)м(202,160),╜:╗(195,160)м(195,184),╜:╗(214,184)м(228,184),╜:╗(227,161)м(214,184),╜:╗(214,160)м(227,160),╜2V'╔"T9O2L2GL4CDEFL2GCP16CL21L4FGABO3L2CO2CP16CFL4GFEDL2EL4FEDCL2O1BO2L4CDECL2EL1DL2GL4CDEFL2GCP16CL2AL4FGABO3L2CO2CP16CFL4GFEDL2EL4FEDCDEL2FO1BL1O2C"2`(Бе 632В):Г****HIGH SCORE ROUTINE*****2Ъ*Ю:З@235,"GAME OVER"2░+╔"V15T3L4CDCL1D#"2└,АJ│1е500:ЛJ2с-Ю:ЗNM$:З"YOUR SCORE WAS $"MO3.АT│1е10:Е S(T)▓MO з Л:Бе553/З"YOUR SCORE PLACES #";T3=0A$│"***":З"ENTER INITIALS:"3R1АG│1е3:З@340,A$;3f2Z$│ Т:ЕZ$│""з503z3╔"T255L15O3AA-"3П4 Р(A$,G,1)│Z$:ЛG3Э5З@340,A$;3▄6АF│10 е T йм1:I$(F)│I$(Fм1):S(F)│S(Fм1):Л:S(T)│MO:I$(T)│A$47З@480,"PRESS TO SEE HI SCORES";48Е Т┤▓ Л(13)з564B9Ю:З" *** BEST SCORES TO DATE ***"4Р:З:АT│1е10:Зд7)"";:З═"## % % ###,###";T,I$(T);S(T):Л:З:Зд8)"PRESS "4г;Е Т┤▓ Л(13)з594─:Г******INITIALIZATION******4°?:ГCLS5@Х15005(AMO│0:WK│0:DA│0:MN│0:MI│0:A│8:RT│05hBМ CT$(30),PD$(6),PD(6),WT(6),RT(6),DT(30,30),MN$(12),DA$(7)5ЧCА J│1е30:Н CT$(J):Л::ГREAD IN CITY STRING$5╙DАJ│1е6:НPD$(J),WT(J):Л::ГREAD IN PROCUCT$,WEIGHT$,RATE$5¤EАJ│0е11:НMN$(J):ЛJ:АJ│0е6:Н DA$(J):ЛJ6CFАJ│1е30:АX│1е30:Н DT(J,X):ЛX:ЛJ::Г READ IN MILAGES BETWEEN CITIES6└GM1$│"O3T200L10CC#DE-EFF#GGG#AA#BO4CC#DE-EFF#":M2$│"V31T10O1L4CL200O4BA#AG#GF#FEE-DCO3BA#AG#GF#FEE-DCO2BA#AG#GF#FEE-DC#C"72HM3$│"T15V15L4O4ED#ED#EO3BO4DCL4O3AP4":M4$│"T2P4V25L16O4CDGL8O5CL16O4AL4O5C":M5$│"T2O3V31L10AV16AV8AV3AV1L20A"7?IТ65494,07kJАJ│1е5:АY│1е20:╔"V31T25L25O1ABAB":ЛY:ЛJ7ЛK:Г***START MAIN PROGRAM****7╕LЮ:Зд4)"YOUR NAME PLEASE":Зд7);:ЙNM$:╔M5$7█MЮ:З:Зд6)"< TRACTOR SELECTION>"8NЗ:З:Зд3)"(1) NEW KENWORTH AREODR150M194,155M110,72"A(fч3:ю(6,20),"T&D"AДgу11,32:ч11:ї"S2BM240,160;D1F6D4F8R4U2L2H2E6F2R2U2H2U2R2E2U2H4L2G2L2G8":ш(246,163),11,11Aбhч11:ю(1,1),"YOUR SCORE:"A░iю(13,1),SCA╨jч10:ю(20,1),"YOU HAVE WON!"BJkАX│1е3:╔"T255O1FA+FA+FA+FA+F+AF+AF+AF+ACFCFCFCFC+F+C+F+D+G+D+G+DGDGDGDG":Л:АX│1е3:╔"T255O3CD+CD+C+EC+EDFDFD+F+D+F+":ЛBvlч4:ю(4,4),"GOPHER HAS FOUND A PYRAMID!"BЭmч9:ю(4,6),"TO BE CONTINUED ??????"BмnИ Ё Бе 112B╖oБе 111B╤pт32:Ю:З"the end?":К:ОBцqф2:у10,7:у3,0:ц3C7rч10:ї"BM30,6;R30F4D2G4L10G4D30F4R8U12E4R6F4D16G4L32H4U46H6R6":ш(35,10),10,10C|sї"BM80,10;E4R20F4D48G4L20H4U48BR6BD6R12D40L12U40":ш(83,15),10,10C╦tї"BM114,10;E4R28F4D16G4L14D28G4L8H4U50BR14BD4R10D10L10U10":ш(117,15),10,10D$uї"BM158,10;E4R4F4D20F4R10E4U20E4R4F4D48G4L4H4U12H4L10G4D12G4L2H4U50":ш(162,15),10,10Dyvї"BM208,10;E4R14F4D4G4L8H4D12F4R8F4D6H4L8D10F4R10F4D4G4L18H4U50":ш(215,12),10,10D▄wї"BM244,10;E4R30F4D18G4L10D4F10D12G4L4H4U8H8L2D16G4L2H4U50BR14BD6R10D10L10U10":ш(250,12),10,10EGxу11,32:ч11:ї"BM20,120;S12D1F6D4F8R4U2L2H2E6F2R2U2H2U2R2E2U2H4L2G2L2G8H7L1D1S4":ъ(84,120)м(86,122),╜,BFE▌yч11:ю(4,10),"(C) 1989 BY T&D SOFTWARE":ю(14,13),"BY MIKE SNYDER":ю(19,15),"AND":ю(15,17),"FRAYNE BLACK":ю(16,20),"CHRYSTALIS":ю(17,21),"SOFTWARE"Fгz╔"T3O3L4CL8.O2GL16O3CL8O2BAL4GL8ECP255CFL4ECL8O1AP255ABP255BO2CP255CL4DL8GFEDCP8CP8O3L4CL8.O2GL16O3CL8O2BAL4GP8O3L8CO2GO3CO2BAL4GL8EP8CP8FFL4GO3L8CO2CO3CO2BO3CP8CP8L16O2GP255GP255GP255GP255L8C"F▓{АX│1е600:ЛF¤|ф0:т32:З"******************************** DO YOU NEED INSTRUCTIONS?"G}A$│ Т:ЕA$│"" з125G#~ЕA$│"N" з РG6ЕA$┤▓"Y" з 125G■АЮ:З"YOU ARE A GOPHER. AS A GOPHER, YOU ARE ALWAYS HUNGRY. TO SCORE POINTS, MANUEVER YOURSELF IN THE UNDERGROUND MAZE. EAT THE RED NUTRIENTS, BUT AVOID THE YELLOW SNAKE. GO UP TO THE"H─БЗ"TOP TO EAT THE ROOTS OF THE PLANTS. YOU CAN'T MOVE LEFT AND RIGHT ON THE TOP ROW. TO HELP IN YOUR ONGOING QUEST FOR FOOD, YOU CAN PRESS THE JOYSTICK BUTTON TO DIG THROUGH"H¤ВЗ"SOME ROCKS.":З@480,"PRESS PLEASE-";:╗ЙA$:ЮI┼ГЮ:З"TO DIG THROGH A ROCK, PUT THE GOPHER AGAINST IT, POINT THE JOYSTICK TOWARD IT, AND PUSH THE BUTTON. YOU CAN DO THIS 5 TIMES PER LEVEL. BE CAREFUL. IF YOU ARE NOT AGAINST A ROCK,"J▒ДЗ"OR YOU DON'T HAVE THE JOYSTICK PUSHED IN THE RIGHT DIRECTION, YOU MAY WASTE THE DIG. SOME- TIMES YOU WILL DIG THROUGH A NUTRIENT. IF YOU DO THIS, YOU CAN'T COMPLETE THE LEVEL. YOU WILL HAVE TO LET A SNAKE KILL YOU."J█ЕЗ@480,"PRESS PLEASE:";:╗ЙA$:ЮJ·ЖЗ"GOOD LUCK.":АX│1е600:Л:РKФЗЖ XPPPXPPPXPPPXPPXXDDDXDDDDDDDDDDXXDXXXXXXDXDXDXDXXDDX2DDDDXXXXXDXXXDXXXDXDDDXDXDXXDDDDDDXXXDXDDDXXXXDXDDDXDDXXXDXX1DDXDXDDDDDDDDXXXXXXXXXXXXXXXXX,71L.ИЖ XPPPXPPPXPPPXPPXXDDDXDDDXDDDXDDXXDXDXXXDXXXXXDXXXDXDXDXDXXDDDDDXXDDDDDDDDDDXXXXXXDXXXDXXXDXXXXXXX2XDXDXDXXXXXXXXXDDDDDDD1XXXXXXXXXXXXXXXXXXXXXXX,57L╚ЙЖ XPXPXPXXPXPXPXPXXDXDXDXXDXDXDXDXXDDDDDXX2DDDDDDXXXXDXXXXXXDXDXXXXDDDDDXXDDDDDXDXXDXXXDXXDXXXDDDXXDXXXDXXDXXXDXXXXDDDDDXXDDDDDD1XXXXXXXXXXXXXXXXX,60MbКЖ XPXPXPXPXPXPXPXXXDXDXDDDDDXDXDXXXDXDXXXX2XXDDDDXXDDDDXDDDDDDXXXXXDXDDDDDXDDDDDDXXDDDXXXDXDDDDXDXXDXDX1XDXXXDXXDXXDXDXDDDDDDDDDDXXXXXXXXXXXXXXXXX,70M№ЛЖ XXXXPXPXXPXPXXXXXDXDDDDXXDDDDX2XXDXXXDXXXXDXXXDXXDDDDDDDDDDDDDDXXXXXXXXXXXXXXXXXXDDXDXDDXDDDDDDXXXDDDDDDDDXDXDXXDDDXDXXDDDDXD1XXXXXXXXXXXXXXXXXX,61NЦМЖ XPXPPXPXPXXPXPPXXDDD2DDDDDDDXDDXXXXXXXDXXDXDXXDXXDDDXDDXXXXDDDDXXDXDXDXXDDDDXXXXXDDDXDDDDDDXXDDXXXXXXXXDXXDXXDXXXDDDXDDDX1DDDDXXXXXXXXXXXXXXXXXX,64O0НЖ XPPXPPPPXPPXPPPXXDDDDDDDDDDDDDDXXDXDDDDXX2XDDDDXXDXXDXDDDDXDXXDXXDDDDXXDXXXDXX1XXXXDDXDDXDDDDXXXXXXXXXDXXDXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX,58O╩ОЖ OPOOPOOPOOPOOOPOODODDDODOODDDODOODDDDDDDDDDODDDOOODODODOOD2ODOOOODDODODODDOODDDOOODDDODDDDDDDDOOOOODDODOODOODOOOOOOODDDODDODDD1OOOOOOOOOOOOOOOOO,65PdПЖ OPOPPOPOPPOPOOPOODODDODOODODOODOODODDODDDDODDDDOODOODODOOOOOODOOODDDDDDODDDDDDDOOOOODOOOOODODOOOODODDD2DODDODO1OODDDODODDDDODDDOOOOOOOOOOOOOOOOO,65P■РЖ OPOPOPPOOPPOPOPOODODODDOODDODODOODODDDD2DDOODDDOODODODOOODODDOOOODDDODODDDDDDDDOOOOOOOOOODOODODOODDDODODODOODODOODODDDDDDDDDDO1OOOOOOOOOOOOOOOOO,66QШСЖ OPPOPPOPPOPPOPPOODDODDODDODDODDOOODODOOODODOOODOODDDDDDODODD2ODOOOODOODODDDOOODOODDDOOOOODDDDDDOODODOODDDDOODOOOO1ODDODODDDODDDOOOOOOOOOOOOOOOOO,66R2ТЖ OPOPOOOPOOPPOPOOODOODOODOODDDDOOODODDODDDOOOODDOODDDDOODOODODDOOOOOODDODDDDODDDOO1ODDDDDODDDDDDOODOODODOOODOOODOODDDDODDDODO2DDOOOOOOOOOOOOOOOOO,64ODDDDDDODODD2ODOOOODOODODDDOOODOODDDOOOOODDDDDDOODODOODDDDOODOOOO1ODDODODDDODDDOOOOOOOOOOOOOOOOO,66R2ТЖ OPOPOOOPOOPPOPOOODOODOODOODDDDOOODODDODDDOOOODDOODDDDOODOODODDOOOOOODDODDDDODDDOO1ODDDDDODDDDDDOX,YY)м(XXл14,YYл14),2/b$Е Р(LO$(LO),X,1)│"D" зч1:ъ(XX,YY)м(XXл1,YY),╜:у14,7:ч14:ї"BR6BD6D4U2R2L2"03%Е Р(LO$(LO),X,1)│"P" зу0,1:ч0:ъ(XXл6,YYм12)м(XXл6,YYм11),╜,BF:ч7:ї"BU2BR2C3E2R2L1G1H2L2R2F2D2E2R2L2G2H2L2R2F2D2R4U2D2L8U2D2R4D2F4H4G4E4D2L2R2L1D4L2R2L1D4L2R4L2C1U10R4L8R4D10":у15,20:ї"U4C15F3D4G2L2H2U2E4"0v&Е Р(LO$(LO),X,1)│"P" зї"D2F1D1L2U1D4R2L4D2RD2U4BU2BR2D2R2U2D4"0У'ЕXX▓270 з YY│YYл16:XX│160╧(Е Р(LO$(LO),X,1)│"1" зX1│XX:Y1│YY:F1│X:F2│X:X2│XX:Y2│YY1 )Е Р(LO$(LO),X,1)│"2" зX3│XX:Y3│YY:F3│X:F4│X:X4│XX:Y4│YY1*Л1~+ЕLO┤8 зАY│48е192й16:ь(0,Y)м(14,Yл14),1:ь(16,Y)м(30,Yл14),1:ь(304,Y)м(318,Yл14),1:ь(288,Y)м(302,Yл14),1:Л1ы,ЕLO▓7 зАY│48е192й16:ь(0,Y)м(14,Yл14),2:ь(16,Y)м(30,Yл14),2:ь(304,Y)м(318,Yл14),2:ь(288,Y)м(302,Yл14),2:Л2+-ы(X2,Y2)м(X2л14,Y2л14),5:ы(X4,Y4)м(X4л14,Y4л14),6:DD│1:EE│02[.ЕGL│MX(LO) з LO│LOл1:Бе18 :ДX│ Н(0):Y│ Н(1)2k/ЕY2│48 з 542л0ЕX┤1 ░( Р(LO$(LO),F1м1,1)│"X" ▒ Р(LO$(LO),F1м1,1)│"O") з 552ъ1ЕX▓60 ░( Р(LO$(LO),F1л1,1)│"X" ▒ Р(LO$(LO),F1л1,1)│"O")з553+2ЕY┤1 ░( Р(LO$(LO),F1м16,1)│"X" ▒ Р(LO$(LO),F1м16,1)│"O") з553n3ЕY▓60 ░( Р(LO$(LO),F1л16,1)│"X" ▒ Р(LO$(LO),F1л16,1)│"O") з 553м4ЕX┤1 зX1│X1м16:F1│F1м1:Бе55::ДЕX▓60зX1│X1л16:F1│F1л1:Бе553═5ЕY┤1 зY1│Y1м16:F1│F1м16:Бе553ю6ЕY▓60зY1│Y1л16:F1│F1л16:Бе554С7EE│EEл1:ЕLO┤3 ░ EE┤5 з 59 :Д ЕLO┤9 ░ EE┤4 з 59 :Д ЕLO┤15 ░ EE┤3 з 59 :Д EE│0:ЕX1▓X3 ░  Р(LO$(LO),F3л1,1)┤▓"X" ░  Р(LO$(LO),F3л1,1)┤▓"O" зF3│F3л1:X3│X3л16:Бе594ц8ЕX1┤X3 ░  Р(LO$(LO),F3м1,1)┤▓"X" ░ Р(LO$(LO),F3м1,1)┤▓"O" зF3│F3м1:X3│X3м16:Бе595?9ЕY1▓Y3 ░  Р(LO$(LO),F3л16,1)┤▓"X" ░  Р(LO$(LO),F3л16,1)┤▓"O" зF3│F3л16:Y3│Y3л16:Бе595а:ЕY3▓48 зЕY1┤Y3 ░  Р(LO$(LO),F3м16,1)┤▓"X" ░  Р(LO$(LO),F3м16,1)┤▓"O" зF3│F3м16:Y3│Y3м16:Бе596 ;ь(X2,Y2)м(X2л14,Y2л14),5:ь(X4,Y4)м(X4л14,Y4л14),6:X2│X1:X4│X3:Y2│Y1:Y4│Y3:ы(X2,Y2)м(X2л14,Y2л14),5:ы(X4,Y4)м(X4л14,Y4л14),66W<ь(X4,Y4)м(X4л14,Y4л14),7:ЕX┤1 зDD│1 :Д ЕX▓60 зDD│26Э=ЕDD│1 зь(X2,Y2)м(X2л14,Y2л14),4 :ДЕDD│2 зь(X2,Y2)м(X2л14,Y2л14),36╥>Е Р(LO$(LO),F1,1)│"D" з Р(LO$(LO),F1,1)│" ":Бж717?Е Р(LO$(LO),F1,1)│"P" з Р(LO$(LO),F1,1)│" ":Бж727B@ЕPB▓0 ░ к(0)│1зЕX1▓48 ░ X1┤290 ░ Y1┤160 ░ Y1▓48 з Бж737^AЕ Д(60)│1 ░ JW│0 з Бж777nBЕJW│1 зБж787ЗCЕJW│1 ░Y5▓170 з Бж797иDЕJW│1 зЕX1│X5 ░ Y1│Y5 з Бж807┐EЕX1│X3 ░ Y1│Y3 з817╚FБе4685GGL│GLл1:╔"T255O2;1;2;1;2;3;2;O3;3;2;1":SC│SCл5:ч1:ъ(X1,Y1)м(X1л14,Y1л14),╜,BF:ы(X1,Y1)м(X1л14,Y1л14),5:Р8ЯHGL│GLл1:╔"T55O1GA+GA+AD+AD+GA+GA+":SC│SCл25:ч1:ъ(X1,Y1)м(X1л14,Y1л14),╜,BF:ы(X1,Y1)м(X1л14,Y1л14),5:Р8─I╔"T255O1;1;2;1;1;2;1":PB│PBм1:ч19GJЕX┤1 зъ(X2м16,Y2)м(X2м2,Y2л14),╜,BF: Р(LO$(LO),F1м1,1)│" ":Р::Д ЕX▓60 зъ(X2л16,Y2)м(X2л30,Y2л14),╜,BF: Р(LO$(LO),F1л1,1)│" ":Р9╦KЕY┤1 зъ(X2,Y2м16)м(X2л14,Y2м2),╜,BF: Р(LO$(LO),F1м16,1)│" ":Р::ДЕY▓60 зъ(X2,Y2л16)м(X2л14,Y2л30),╜,BF: Р(LO$(LO),F1л16,1)│" ":Р9╤LР:дMJW│1:X5│( Д(13)н16)л48:Y5│м16:Y6│0:ы(X5,0)м(X5л14,14),9:╔"T255O2;1P255;1;P255;1;P255;2;P255;2;P255;2;P255;3;P255;3;P255;3;P255;4;P255;4;P255;4;P255;5;P255;5;P255;5;P255;6;P255;6;P255;6;P255;7;P255;7;P255":Р; NY5│Y5л16:ь(X6,Y6)м(X6л14,Y6л14),9:X6│X5:Y6│Y5:ы(X6,Y6)м(X6л14,Y6л14),9:ь(X6,Y6)м(X6л14,Y6л14),8:Р;@Oь(X5,Y5)м(X5л14,Y5л14),9:JW│0:╔"T255O1;A;E;C;D":Р;КPч1:ъ(X5,Y5)м(X5л14,Y5л14),╜,BF:JW│2:SC│SCл10:╔"T255;O4AEAEFCFCDGDG":Р;шQч1:ч3:ъ(X1,Y1)м(X1л1,Y1),╜,BF:ї"BR3BD2R2BD2L6D2BR4R4":у7,17:ч7:ъ(0,36)м(320,40),╜,BF:Бе82<аRу10,7:ч10:ї"BM34,20C10R16D12L16U12R16D4R4F2D2R4D2L2D2R2L14BM35,20C10R16D12L16U12R16D4R4F2D2R4D2L2D2R2L14BM34,20R16D4R4D4R8L10R10D2":у9,62:ш(40,26),9,10:ш(52,30),9,10:ч9:щ(39,32),4<▐SЕLO┤8 зч3:щ(39,32),4:ш(39,33),3,3:щ(50,32),4:ш(50,33),3,3<ўTЕLO▓7 зч9:щ(50,32),4=1Uч10:ї"BM34,20;BR8BD2D6U3R3L6R3U3BU2BR2R3U1L3U1R3U1L3"=xVы(34,14)м(64,38),1:АX│34е190 й 10:ь(X,14)м(Xл30,38),1:╔"O1T3L8A+F"=ЪWЕLO▓7 зч3 :Д Е LO┤8 зу5,60:ч5=╦Xъ(X,14)м(Xл30,35),╜,BF:Л:ь(X,14)м(Xл30,38),1=юYч1:ъ(X1,Y1)м(X1л14,Y1л14),╜,BF>jZMN│MNм1:╔"T2O1L6A+AG+GF+":АX│1е600:Л:П:АX│1е12:НLO$(X):НMX(X):Л:ЕMN▓0 з 18:Е MN▓0 зП:АX│1е12:НLO$(X):НMX(X):Л:GL│0:Бе18>ю[ц3:у7,3:ч7:ъ(0,192)м(320,170),╜,BF:АX│0е310:ъ(X,174)м(Xл Д(8),174м Д(18)),╜:Л:у11,32:ч11:щ(165,130),100,11,1.5:ш(165,100),11,11?U\ч3:ї"S4BM120,30;D30U30E4R10F4D10G4L10F12D10BU10BR14R20L10U30R10L20R20BR14BD4D30U30E4R10F4D10G4L10"?y]ч3:ю(12,10),"G A M E O V E R"?а^ю(14,15),"YOU SCORED:":ю(25,15),SC?└_ю(13,18),"GOPHER IT AGAIN?"?╒`A$│ Т:ЕA$│"" з96@aЕA$│"N" зф0:т32:Ю:З"BY. THANKS FOR PLAYING gopher":К:О@LbЕA$│"Y" зП:АX│1е12:НLO$(X):НMX(X):Л:GL│0:MN│3:SC│0:Бе18@VcБе 96@`dБе100Aeф2:ч6:ц3:ъ(0,192)м(320,140),╜,BF:у11,32:ч11:ї"BM10,172;E100M160,172L150R150M194,155M110,72":ш(110,75),11,11:ш(117,80),11,11:ч3:ї"BM10,172;E100M160,172L150 1V&C:ГCOPYRIGHT (C) T&D SOFTWARE 1991 coast to coast ISSUE #111&Щ X│ Д(м Я)::ГPOKE65497,0 HI SPEED POKE FOR COCO3 CHANGE TO 65495,0 FOR COCO 1 OR 2&й ╚4,1:╝:┐1,1&№ ╗(12,89)м(49,89),╜:╗м(49,71),╜:╗м(51,71),╜:╗м(51,67),╜:╗м(53,67),╜:╗м(53,71),╜'Q ╗(55,71)м(52,71),╜:╗(56,71)м(56,89),╜:╗м(49,89),╜:╗(57,89)м(59,89),╜:╗м(59,69),╜'й╗м(79,69),╜:╗м(79,71),╜:╗м(77,71),╜:╗м(77,88),╜:╗м(79,88),╜:╗м(79,90),╜:╗м(75,90),╜'┴╞"BM75,90;H4L2G3D1"(.╗(66,90)м(59,89),╜:╗(62,90)м(12,90),╜:╗м(12,89),╜:╗(23,88)м(23,87),╜:╗м(20,87),╜:╗м(20,85),╜:╗м(29,85),╜(Ф╗м(29,87),╜:╗м(27,87),╜:╗м(27,89),╜:╗(59,69)м(59,63),╜:╗м(67,63),╜:╗м(75,69),╜:╗(68,72)м(74,72),╜(·╗(68,72)м(74,72),╜:╗м(74,77),╜:╗м(68,77),╜:╗м(68,72),╜:╗(61,72)м(64,72),╜:╗м(64,79),╜:╗м(76,83),╜)k╗(76,85)м(63,82),╜:╗м(62,82),╜:╗м(61,76),╜:┬(19,92),5:┬(19,92),3:┬(32,92),3:┬(32,92),5:┬(70,93),5:┬(70,93),3)▀╗(149,93)м(149,79),╜:╗м(167,79),╜:╗м(167,71),╜:╗м(165,71),╜:╗м(165,69),╜:╗м(181,69),╜:╗м(181,94),╜:╗м(164,94),╜*Q╞"BM164,94;H4L3G4L1":╗(152,94)м(149,94),╜:╗(183,90)м(229,90),╜:╗м(228,93),╜:╗м(181,93),╜:╗(171,78)м(177,78),╜*╕╗м(177,72),╜:╗м(171,72),╜:╗м(171,78),╜:╗(169,70)м(178,70),╜:╗м(178,88),╜:╗м(169,88),╜:╗м(169,70),╜+/╗(181,69)м(181,65),╜:╗м(183,65),╜:╗м(183,70),╜:╗(181,70)м(188,70),╜:╗м(188,90),╜:╗(215,90)м(215,87),╜:╗м(211,87),╜+д╗м(211,84),╜:╗м(221,84),╜:╗м(221,87),╜:╗м(218,87),╜:╗м(218,90),╜:┬(222,96),3:┬(222,96),5:┬(206,96),3:┬(206,96),5,┬(158,96),3:┬(158,96),5:╗(149,84)м(182,84),╜:╗м(188,74),╜:╗(149,87)м(181,87),╜:╗м(187,83),╜:╗(19,35)м(19,15),╜,q╗м(31,15),╜:╗(31,35)м(19,35),╜:╗(38,35)м(38,15),╜:╗м(48,15),╜:╗м(48,35),╜:╗м(38,35),╜,Ў╗(54,35)м(54,15),╜:╗м(64,15),╜:╗м(64,35),╜:╗(64,25)м(54,25),╜:╗(71,35)м(82,35),╜:╗м(82,26),╜:╗м(71,26),╜:╗м(71,15),╜:╗м(82,15),╜-m╗(87,15)м(100,15),╜:╗(93,15)м(93,35),╜:╗(120,15)м(134,15),╜:╗(127,15)м(127,35),╜:╗(141,35)м(141,15),╜:╗м(151,15),╜-■╗м(151,35),╜:╗м(141,35),╜:╗(171,35)м(185,35),╜:╗(171,35)м(171,15),╜:╗м(184,15),╜:╗(190,15)м(190,35),╜:╗м(199,35),╜:╗м(199,15),╜:╗м(190,15),╜.П╗(205,35)м(205,15),╜:╗м(216,15),╜:╗м(216,35),╜:╗(216,25)м(205,25),╜:╗(224,35)м(233,35),╜:╗м(233,26),╜:╗м(224,26),╜:╗м(224,15),╜:╗м(233,15),╜.╥╗(239,15)м(248,15),╜:╗(243,15)м(243,35),╜:╗(243,15)м(243,35),╜.т АJ│1е500:ЛJ/c!╗(111,123)м(111,139),╜:╗ ,3&=:ГCOPYRIGHT (C) T&D SOFTWARE 1991 gopher 3 ISSUE #111&Ч└1:Х6500:у1,4:у2,14:у4,2:у3,0:у5,60:у7,17:у0,1:у15,20:у9,62:у10,7:у6,20:у11,32:ИЁБе91&оX│ Д(м Я):Т65497,0&╕Бж113'?МLO$(15),MX(15),SS$(15):э1,400:э2,400:э3,400:э4,400:э5,400:э6,400:э7,400:э8,400:э9,400:Т65497,0:АX│1е12:НLO$(X):НMX(X):Л:LO│1:MN│3(9 SS$(1)│"T3O1L4FGO2CP255CP255O1L8BO2L4CO1L8BO2L4CFC":SS$(2)│"T3O1GL4.EL16GL8L4.DL8CDEFL4E":SS$(3)│"T3O2L8FP255FP255D+P255D+P255L4CGA+L12AGFL8AFL4G":SS$(4)│SS$(1):SS$(5)│SS$(1):SS$(6)│SS$(2):SS$(7)│SS$(2):SS$(8)│SS$(3):SS$(9)│SS$(3):SS$(10)│SS$(2)([ SS$(11)│SS$(3):SS$(12)│SS$(1)(j ф2:у1,4:ц1(y у11,32:ч11(ъ ї"S2BM16,19;D1F6D4F8R4U2L2H2E6F2R2U2H2U2R2E2U2H4L2G2L2G8":ш(22,22),11,11:у3,0:ч3:є(26,19):ы(16,16)м(30,30),3)zц1:ч11:ї"S2BM31,17;D3G6D4G8L4U2R2E2H6G2L2U2E2U2L2H2U2E4R2F2R2F8":ш(25,25),11,11:ч3:є(20,18):ы(16,16)м(30,30),4:ь(100,100)м(114,114),4:ї"S4")Бц1)╨у6,20:ч6:ї"BM16,16;BR4R4D1L4R4D2R1D1R1D2L2D2L2D2R2D2R4":ы(16,16)м(30,30),7*2ц1:у6,20:ї"BM22,16C6F4D6G4H4U6E4":у14,7:ш(22,18),14,6:ї"C6BD4F2D2G2H2U2E2":ы(16,16)м(30,30),8*тЕLO▓12 з101 :Дч6:PB│5:GL│0:JW│0:ц1:ю(4,4),"ENTERING LEVEL:":ю(4,6),LO:ю(4,8),"GOPHERS REMAINING:":ю(4,10),MN:ю(4,12),"YOUR SCORE IS NOW:":ю(4,14),SC:╔SS$(LO):АX│1е800:Л:ц1*ыу1,4*Єц1*№у2,14+ч2+ у4,2+у3,0+░ч3:АX│0е10й16:АY│48е70й16:АZ│1е18:ч3:є(Xл Д(14),Yл Д(14)):Л:ч4:АZ│1е8:є(Xл Д(14),Yл Д(14)):Л:АZ│1е8:ч4:є(Xл Д(14),Yл Д(14)):Л:Л:Л:ы(0,48)м(14,62),1:ц1, у8,11:ч8:ъ(0,48)м(14,62),╜,BF:АZ│1е60:ч1:є(0л Д(14),48л Д(14)):Л:ы(0,48)м(14,62),2:ц1,у5,60,]ЕLO┤8 зч5:ъ(0,0)м(320,46),╜,BF:у6,20:ч6:щ(280,20),10,6:ш(280,20),6,6-!ЕLO▓7 зч3:ъ(0,0)м(320,46),╜,BF:ч4:АZ│1е80:X│ Д(320):Y│ Д(44):є(X,Y):Л:у6,20:ч6:ї"BM30,14;L2D1L1D2L1D4R1D2R1D1R2BM30,15;L2D1L1D2L1D4R1D2R1D1R3BM30,16;L2D1L1D2L1D4R1D2R1D1R2BM30,15L3D1L1D1L1D4"-Dу7,17:ч7:ъ(0,46)м(320,40),╜,BF-сЕLO▓7 зу9,62:ч9:ъ(310,22)м(290,39),╜,BF:у10,7:ч10:ъ(310,22)м(290,39),╜,B:ъ(308,23)м(292,38),╜,B:ъ(309,23)м(291,38),╜,B:ї"BM291,23;E8F8R":ш(295,20),10,10.Д ЕLO▓7 зч6:ъ(295,25)м(298,28),╜,BF:ч1:ъ(301,26)м(304,36),╜,BF:у11,32:ч11:ї"BM276,40M280,14M284,40L8R4U4L2R4L2U4L2R4L2BU8U2":щ(280,14),8:щ(280,14),6:щ(280,14),9.о!XX│16:YY│48:АX│1е З(LO$(LO)):XX│XXл16.с"Е Р(LO$(LO),X,1)│"X" зь(XX,YY)м(XXл14,YYл14),1/#Е Р(LO$(LO),X,1)│"O" зь(XX│8е180й12:ь(2,X)м(9,Xл6),3:ь(310,X)м(317,Xл6),4:ЛADвАX│1е6:уXл5,63AЛгчXл5:ъ(9лX,8лX)м(310мX,182мX),╜,B:ъ(50лX,50лX)м(270мX,130мX),╜,B:ЛAЎдч4:ю(12,9),"CONGRATULATIONS!":ю(12,11),"YOU HAVE CLEANED":ю(12,13),"THE COMPUTER OUT!":АX│6е12:уX,12:ЛBеАX│1е40000BжY│Yл1:ЕY▓6зY│0:Бе4006B:зуYл5,24:чYл5:уYл5,12:ЛBEйБе4009B_ИЕM1мM3│┤0 з 4000 :Д РBК'ф0:Ю:Т65496,0:З"THANKS FOR PLAYING.":КЎдч4:ю(12,9),"CONGRATULATIONS!":ю(12,11),"YOU HAVE CLEANED":ю(12,13),"THE COMPUTER OUT!":АX│6е12:уX,12:ЛBеАX│1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 о>:ГCOPYRIGHT (C) T&D SOFTWARE 1991 mr. bill ISSUE #111N╚0:Бе 60000Б2Е  Ж(116)│&H7F з Х 4000:ME│100 :Д Х 2000:ME│20▓4М CN$(26),T$(26,ME),BL(26),MN(26,12),MN$(12)╗6NC│0╒8А I│1 е 12:Н MN$(I):Л09ЖJANUARY,FEBRUARY,MARCH,APRIL,MAY,JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER,NOVEMBER,DECEMBERT:Е  Ж(&HC000)│68 з DN│1 :Д DN│м1t<Ю:З:З" mr bill":З=З" MR BILL IS A PERSONAL BILL TRACKING SYSTEM. WITH IT, YOU CAN GET QUICK BALANCES LIST- INGS FOR ALL OF THE COMPANIES YOU GET BILLED BY."Г>З" IT CAN ALSO PROVIDE A QUICK MONTH BY MONTH ANALYSIS SO YOU SEE TRENDS IN YOUR SPEND- ING HABITS."▐?З" MR BILL WORKS EQUALLY WELL WITH TAPE OR DISK. PRINT-OUTS ARE ALSO SPPORTED."ъAБж 9000╚FЮ:З@96:З" L. LOAD DATA FILE S. SAVE DATA FILE A. ADD NEW COMPANY B. SHOW BALANCE M. MONTHLY BILLS T. TRANSACTIONS Q. QUIT"▀KK$│ Т:ЕK$│"" Бе 75LP│ Ю("LSABMTQ",K$):ЕP│0 Бе 75&MИ P Бе 80,90,100,200,300,400,990@PБж 10000:ЕF$│"" Бе 70XQЩ"I",#DN,F$:Й#DN,NCgRА I│1 е NCyS╗ Й#DN,CN$(I)ИTЙ#DN,BL(I)жUА J│1 е 12:Й#DN,MN(I,J):Л┼VА J│1 е ME:╗Й#DN,T$(I,J):Л╦WЛ┌YЪ#DN:Бе 70ЇZБж 10000:ЕF$│"" Бе 70 [Щ"O",#DN,F$:З#DN,NC\А I│1 е NC6]З#DN,CN$(I):З#DN,BL(I)S^АJ│1 е 12:З#DN,MN(I,J):Лq_А J│1 е ME:З#DN,T$(I,J):Лw`ЛЖcЪ#DN:Бе 70ТdЮ:З@196└fЗ" COMPANY NAME: ";:╗ Й NC$:ЕNC$│"" Бе 70╪hNC│NCл1:CN$(NC)│NC$iЗ" CURRENT BALANCE: ";:╗ Й N$:BL(NC)│ Й(N$)%jА I│1 е ME:T$(NC,I)│"":Л/wБе 70I╚Е NC│0 з Бж 800:Бе 70R╔AF│1^╩Бж 2000d╥Юj╘Зs╓TL│0м▄Е K$│" " з А I│1 е NC:Бж 280:Л :Д I│ К(K$)м64:Бж 280▀сЕK$│" " з З:I│0:CN$(I)│"TOTAL":BL(I)│TL:Бж 280ёцБж 9000:Бе 70"З═" % % #####.##";CN$(I);BL(I)2TL│TLлBL(I)8РR,Е NC│0 з Бж 800:Бе 70c.AF│1:Бж 2000w0Е K$│" " Бе 350И5ZZ│ К(K$)м64О6Юа:З" ";CN$(ZZ)ж<З╡@А I│1 е 12цBЗ═" % % #####.##";MN$(I);MN(ZZ,I)ьDЛ■JБж 9000:Бе 70 ^А I│1 е 12`MN(0,I)│0*bА J│1 е NCFcMN(0,I)│MN(0,I)лMN(J,I)NdЛ JUfЛ thCN$(0)│"TOTAL":ZZ│0:Бе 310ОРЕ NC│0 з Бж 800:Бе 70ЯХAF│0:Бж 2000░ЧZZ│ К(K$)м64╠ЪЮ:З:З" ";CN$(ZZ):З@160aЬЗ" B. ADD AMOUNT BILLED P. ADD:АX│1е49й9:ъ(150,25)м(1,X),╜:ъ(150,25)м(310,X),╜:АY│1е5:ї"BM=B1(Y);,=B2(Y);BH2ER34F2D46G2L34H2U46E2":Л:Y│0/▀)Л:ч1:ъ(46,16)м(255,41),╜,BF:ч0:ю(12,4),"COMPUTER POKER":Бж3000:ч4:ю(2,15),"POT=":ю(2,17),"YOUR MONEY=":X│0:Y│0:ч10*Бж2000:АY│1е5:ч1:ъ(B1(Y),B2(Y))м(B1(Y)л32,B2(Y)л44),╜,BF:ч005-P3(Y)│A(Y):ЛY:X│50k.АY│1е5:P$│ И(P3(Y)):U│ Й( О(P$,2)):K│ Й( П(P$,2))0Я/ЕP3(Y)│301зE│B1(Y):F│B2(Y):ї"BM=E;,=F;"лA$:Бе601&0ЕK│11зE│B1(Y):F│B2(Y):ї"BM=E;,=F;"лJ$:ї"BM=E;,=F;"лJ1$:ь(B1(Y)лP1(11,1),B2(Y)лP2(11,1))м(B1(Y)лP1(11,1)л7,B2(Y)лP2(11,1)л6),U:Бе601н1ЕK│12зE│B1(Y):F│B2(Y):ї"BM=E;,=F;"лQ$:ї"BM=E;,=F;"лQ1$:ь(B1(Y)лP1(12,1),B2(Y)лP2(12,1))м(B1(Y)лP1(12,1)л7,B2(Y)лP2(12,1)л6),U:Бе60242ЕK│13зE│B1(Y):F│B2(Y):ї"BM=E;,=F;"лK$:ї"BM=E;,=F;"лK1$:ь(B1(Y)лP1(13,1),B2(Y)лP2(13,1))м(B1(Y)лP1(13,1)л7,B2(Y)лP2(13,1)л6),U:Бе602Е3АL│1е K:ь(B1(Y)лP1(K,L),B2(Y)лP2(K,L))м(B1(Y)лP1(K,L)л7,B2(Y)лP2(K,L)л6),U:Л2╪4ч4:ЕK│1зю(B1(Y)о8л2,B2(Y)о8л1),"A":Бе60:ДЕK│10зю(B1(Y)о8л2,B2(Y)о8л1),"X":Бе602ї5ю(B1(Y)о8л2,B2(Y)о8л1),K2 <ч2:ЛY3ЕFч4:I│0:ю(2,19),"THROW CARDS UNWANTED":ї"BM24,109U2L2E2F2L3ND2R2ND2":ы(22,105)м(26,109),5:ч0:ъ(22,105)м(26,109),╜,BF:ч4:I│24:V│1053ЩGI$│ Т:ЕI$│""з773иHЕI$│"T"з803║IЕI$│ Л(13)з993╘JЕI$│ Л(8)зI│Iм56:Бе773юKЕI$│ Л(9)зI│Iл56:Бе774LЕI$│"S"з700:ДЕI$│"L"з750:Д71:Д7140MЕI┤24зI│248:ДЕI▓248зI│244rNы(I,V)м(Iл4,Vл4),6:ь(I,V)м(Iл4,Vл4),5:ь(I,V)м(Iл4,Vл4),6:Бе714╬PT│Tл1:ЕT▓3зч0:ъ(P4(1)м4,105)м(P4(1)л4,105),╜:P4(1)│I:Бж83:P4(2)│0:P4(3)│0:T│1:Бж82:Бе714фQP4(T)│I:Бж82:Бе715 Rч4:ъ(P4(T)м4,105)м(P4(T)л4,105),╜:Р5SSч0:ъ(P4(2)м4,105)м(P4(2)л4,105),╜:ъ(P4(3)м4,105)м(P4(3)л4,105),╜:Р5ДcЕT│0зч0:ю(2,19),"THROW CARDS UNWANTED":Бе1355╔dч1:АZ│1е T:ч1:ЕP4(Z)│0 зЛ:Дъ(P4(Z)м16,60)м(P4(Z)л16,104),╜,BF:ч05▌eI│P4(Z)м16:V│605ўfЕI│8зP3(1)│A(Xл1):G│16gЕI│64зP3(2)│A(Xл2):G│26.hЕI│120зP3(3)│A(Xл3):G│36JiЕI│176зP3(4)│A(Xл4):G│46fjЕI│232зP3(5)│A(Xл5):G│56ХkP$│ И(P3(G)):U│ Й( О(P$,2)):K│ Й( П(P$,2))6╩lЕP3(G)│301зE│B1(G):F│B2(G):ї"BM=E;,=F;"лA$:Бе1307 mЕK│11зE│B1(G):F│B2(G):ї"BM=E;,=F;"лJ$:ї"BM=E;,=F;"лJ1$:Бе1207LnЕK│12зE│B1(G):F│B2(G):ї"BM=E;,=F;"лQ$:ї"BM=E;,=F;"лQ1$:Бе1207НoЕK│13зE│B1(G):F│B2(G):ї"BM=E;,=F;"лK$:ї"BM=E;,=F;"лK1$:Бе1207▐pАL│1е K:ь(B1(G)лP1(K,L),B2(G)лP2(K,L))м(B1(G)лP1(K,L)л7,B2(G)лP2(K,L)л6),U:Л83qч4:ЕK│1зю(B1(G)о8л2,B2(G)о8л1),"A":Бе130:ДЕK│10зю(B1(G)о8л2,B2(G)о8л1),"X":Бе1308Vrю(B1(G)о8л2,B2(G)о8л1),K:Бе1308Нxь(P1(K,1)лE,P2(K,1)лF)м(P1(K,1)лEл7,P2(K,1)лFл6),U8УВЛ8├Гч0:АZ│1е T:ъ(P4(Z)м4,105)м(P4(Z)л4,105),╜:Л8▀ЗZ│0:I│0:V│0:E│0:G│0:F│09Ию(2,19),"THROW CARDS UNWANTED":ч19ц:ГDETERMINE WINNER9`чАZ│1е5:P$│ И(P3(Z)):U(Z)│ Й( О(P$,2)):K(Z)│ Й( П(P$,2)):Л:P$│""9ВшАZ│1е5:АT│1е5:ЕT│Z ▒ Z│T з2349йщЕK(T)│K(Z) зX(Z)│X(Z)л1:Q1(Z)│K(T)9▓ъЛT,Z9╜ыАZ│1е59╓ьЕX(Z)│1зO$(Z)│"PAIR"9ЁэЕX(Z)│2зO$(Z)│"THREE": юЕX(Z)│3зO$(Z)│"FOUR":-яЕX(Z)┤1 ▒ X(Z)▓3 зO$(Z)│"":Л:ДЛ:SЁАZ│1е5:ЕO$(Z)│"PAIR"з241:ДЛ:Бе242:АёАZ│1е5:ЕO$(Z)│"THREE"зP$│"FULL":Бе276:ДЛ:зЄАZ│1е5:ЕO$(Z)┤▓""зP$│P$лO$(Z):Л:ДЛ:╓єЕP$│"PAIRPAIRPAIRPAIR"зP$│"TWO PAIR":Бе276;fЇЕP$│"PAIRPAIR"зP$│"PAIR":Бе276:ДЕP$│"THREETHREETHREE"зP$│"THRE":Бе276:ДЕP$│"FOURFOURFOURFOUR"зP$│"FOUR":Бе276:ДT│0:Z│0:MA│0:A│0:B│0:O│0:M│0;зїA│Aл1:ЕA▓5 ░O│5зБж500:Бе250:ДЕA│┤O з245 :Д Е A▓5 з A│0:Бе245;█ЎB│Bл1:ЕB▓5 з 249 :Д Е B│A з 246 :Д Е B│┤O з 246;ёўЕ K(A)┤K(B) з 246<°B│0:Бе 245<0∙O│Oл1:M│K(O):K(O)│K(A):K(A)│M:B│0:A│0:Бе245 -ЕB│0 зч0:ю(2,20),"YOU LOST" :Дч0:ю(2,20),"YOU HAVE WON $":ю(18,20),C(B)>I.ч1:ю(12,2),"PRESS ANY KEY.":B│0:Бе42>СЇЕK(1)│K(2)м1 ░K(2)│K(3)м1 ░K(3)│K(4)м1 ░K(4)│K(5)м1 зP$│"STRA":Р:ДР>▀╝Т65496,0:ф0:Ю:З"SAVE ROUTINE:":╬:Й"FILENAME TO SAVE UNDER";F$:F$│ О(F$,8)>ю╜Щ"O",#1,F$?╛З#1,M1:З#1,M2:Ъ#1:ф2:Т65497,0:Бе760?MюТ65496,0:ф0:Ю:З"LOAD ROUTINE":╬:Й"FILE TO LOAD";F$?\яЩ"I",#1,F$?~ЁЙ#1,M3:Й#1,M4:Ъ#1:ф2:Т65497,0?╚°ч0:ю(9,15),M1:M1│M3:ю(14,17),M2:M2│M4:ч4:ю(9,15),M1:ю(14,17),M2:Бе300?╘╨АX│1е10?ъ╤R│ Д(4):ЕR┤1з2001?Ў╥R│Rн100@ ╙M│ Д(13):M│MлR@-╘АY│1е X:ЕA(Y)│M зY│0:Бе2001 :ДЛ@:╒A(X)│M:Л@@╓Р@R ╕:ГSCORE PRINT@и ╣ч0:ю(9,15),M1:ю(14,17),M2:M1│M1лM3:M2│M2лM4:M3│0:M4│0:ч4:ю(9,15),M1:ю(14,17),M2:Р@┼а:ГBEAT COMPUTER ENTIRELYA1бАX│2е313й14:ь(X,1)м(Xл7,7),1:ь(X,182)м(Xл7,188),2:Л:АALLS DOWN!!YOU HEAR SHUFFLING UNDER THE BONES.SOME- THING APPROACHES YOU!":Й"WHAT NOW";I$:Е О(I$,3)│"CLI"▒ О(I$,2)│"UP"▒ О(I$,2)│"GO"з1210:Д1220KW║З"YOU SCRAMBLE UP THE LADDER, AN EVIL CLIMBING UP BEHIND YOU. YOU REACH THE TOP JUST AS UNSEENTEETH SNAP THE LADDER IN TWO WHERE YOU STOOD A SECOND AGO. PRESS A KEY.":в44539:Y│43:Бе240Kа─З"A STRANGE DARKNESS LOOMS ABOVE YOU AND ENGULFS YOU! THE END.":Х:КK┴╬П:└1:Х:╙M"MUSIC":АG│1е1900:ЛK┘╪ЕCD$│""зК:Дв20100:КREACH THE TOP JUST AS UNSEENTEETH SOUS POISON ENGULFED YOU, DRIVING YOU TO A TORMENTED DEATH.":К_IЕL│97░VZ$│"TOX" ░RC│1░GT│1зБж2124:З"YOU EMPTIED THE TOXENS INTO THE STYX.BODIES OF HELL PIRANHA RISETO THE SURFACE, DEAD.THE TOXENS THEN WASH SAFELY AWAY.":ET│2:GT│0:O$(9)│"AN EMPTY BOTTLE":OD$(9)│"IT'S EMPTY":Бе2020_&JБе2152_lLЙ"INTO WHAT";IW$:Е О(IW$,3)┤▓"RIV"зЗ"I DON'T THINK SO.":Бе2020:ДР`RЕL│118░ZCT│0░VZ$│"TRE"зЗ"I CLIMBED IT AND FOUND ONE OF THE BIRDS TAKING ROOST ON A NEARBY BRANCH.":ZCT│1:Бе100:ДЕVZ$│ О(KO$(1),3)з2131:ДЗ"I CAN'T":Бе2020`cSЕL│106░RTW│1зL│126:YM│0:O(1)│L:Бе40:ДЕL│126░RTW│1зYM│0:L│106:O(1)│L:Бе40:Д2152`n\Бе2152`─fЕL│79░VZ$│"SLA"░BT│1зЗ"IT ROLLS AWAY REVEALING AN EAST PASSAGE.":T(L,3)│21:Бе2020a@gЕL│20░VZ$│ О(KO$(28),3) ░PH│1зЗ"THE WALL DISSOLVES INTO NOTHING-NESS BEFORE YOU.":O(27)│499:T(20,2)│65:O(28)│499:Бе2020aYhЗ"YOU CAN'T.":Бе2020a┤ОЕL│20░VZ$│ О(KO$(28),3)░PH│1 зЗ"THE WALL EXPLODED, CRUSHING YOU BENEATH ITS DEBRIS.":КbВПЕL│82 ░SS│1░VZ$│"ARM"зЗ"THE EAST PASSAGE OPENS!":T(82,3)│26:OD$(22)│"JUST A STATUE":OD$(24)│"AN ARM TO ONE SIDE":Бе2020:ДЕL│82░SS│0░VZ$│"ARM" зЗ"THE STATUE'S ARM BREAKS YOUR HOLD AND BEHEADS YOU.":КbЪРЗ"YOU CAN'T":Бе2020b╦ШЕFFG┤▓1зЗ"THE TORCH IS WITHOUT FIRE.":Бе2020c(ЩЕL│91░VZ$│"WOR" ░WOB│0░ MHP(17)▓0 зЗ"THE WORMS RECEDE!PRESS A KEY.":в44539:WOB│1:Бе30000cРЪЕL│79░BT│0░VZ$│ О(KO$(30),3)зЗ"DONE,BUT THE TORCH WENT OUT":BT│1:OD$(30)│"SOFT,STICKY":FFG│0:Бе2020cЫЫБе2152c╜вЕVZ$│ О(KO$(3),3)з2211 :Д2212dCгЕFFG│1зЗ"IT'S ALREADY LIT.":Бе2020:ДЙ"WITH";W$:Е О(W$,3)│ О(KO$(4),3)зFFG│1:З"IT IS ABLAZE":Бе2020:ДЗ"YOU CAN'T USE THAT.":Бе2020dNдБе2152dмЕL│82░SS│0░T(82,3)│0░VZ$│ О(KO$(23),3) з2222dКнБе2152d█оЙ"WITH WHAT";IW$:Е О(IW$,3)┤▓ О(KO$(2),3)з2221:ДЗ"IT FIT NICELY":SS│1:Бе2020e_╢ЕL│118░VZ$│"CHA"зЗ"SHAME YOU WE Л&=:ГCOPYRIGHT (C) T&D SOFTWARE 1991 poker 3 ISSUE #111&pХ9000:ф2:Т65497,0:Т&HE6C6,&H12:Т&HE6C7,&H12:ц0'&у0,0:у1,63:ч1:ю(13,10),"COMPUTER POKER":у2,6:ю(10,12),"BY JAMES STAKELIN II":ч2:ю(9,8),"$$$$$$$$$$$$$$$$$$$$$$":ю(9,14),"$$$$$$$$$$$$$$$$$$$$$$":АX│8е14:ю(9,X),"$":ю(30,X),"$":Л':АX│1е1500:Л:X│0'KИ Ё Бе 10000'я у0,0:у1,32:у2,0:у3,6:у4,63:у5,16:э1,70:э2,70:э3,70:э4,70:э5,70:э6,70:M1│5000:M2│0:МS$(4),P1(13,10),P2(13,10),A(52),B1(5),B2(5):АX│1е10:АY│1е X:НP1(X,Y),P2(X,Y)(; ЛY,X:АX│1е5:НB1(X),B2(X):ЛX:МH$(9):АX│1е9:НH$(X):Л:МC(9):АX│1е9:НC(X):Л(и S$(1)│"BR4H3UERFERFDG3":S$(2)│"BR4H3E3F3G3":S$(3)│"BR3U2LHE3F3GLD2L":S$(4)│"BR2U2L2U2R2U2R2D2R2D2L2D2L2")Ы K$│"BR7M+3,+4R11U2NM+3,-2D8GL4H2U5R7BDD3NFLNGBD2RBU2ULBU2BL2NL2BR2R2":K1$│"BR7M+3,+4D5LD2NM-9,+3M+7,+3M+8,-4BUBL2NM-1,-5NM+8,+5BR4BD3M-6,+8D4M+4,+10NR8L4NL20M-3,-10U4M+3,-8BL11BUM+3,+9D6M-3,+6L4M+1,-10H3NL2BU4NL2R2M+3,+5D5NM-3,+9U5M-2,-9"*n Q$│"BR6BD8F2M-6,+10M-2,-4BD4E4G2M+2,-6E4U6M+6,+1NM+3,-1M-6,-1D6M+1,+4NM-5,+4M+3,+2NM-8,+2R4E2M+1,-4NM-3,-8R3M+2,-6NM+4,-2M-2,+6M+10,+4G4NH8G4BU2NH6E2NM-6,-8BD2M+6,+2M-12,+8ND8NM-20,-4BM-4,-6NM+8,-2NM-12,-6"*╜Q1$│"BF12BR4BUGL3HM+2,+1M+2,-1BU5R2EL3GBL1NUD2GR2BU3BL2L2HR3FBM-13,+30R32"+DJ$│"BR4M+2,+3NR11D5LD2M-3,+4NL2NM+22,+20M+3,-4NM+19,+20M+3,+1R2URNU6LM+2,+1R2M+3,-3U6NM+1,-2D2L2NL10GRDLBUM+1,+3LUBUBL2URDNLBD5R2",J1$│"BR17BD8F2M-3,+2NL10M+3,-2M+10,+5BU3BL6NM-12,+4BD2L4D4R4U4BR4M-4,+6L4H4UBD19NL16R16BU2BL8E3":A$│"BR16BD2M+12,+18M+2,+8D4G4L4H2G2F2M+4,+2L16M+4,-2E2H2G2L4H4U4M+2,-8M+12,-18":X│0:ц0,8ч1:ъ(10,10)м(18,18),╜,BF:X│Xл1:ЕX▓4з23:ДЕX┤3зч3:Дч2,Mї"BM10,18"лS$(X),cЕX┤3зш(14,16),3,3,yЕX▓2зш(14,15),2,2,Хы(10,12)м(17,18),X:Бе17,Яц0:ч5,╚АX│11е13:P1(X,1)│24:P2(X,1)│0:Л:Бе39,ёЖ 12,18,12,12,12,24,12,8,12,18,12,28-)Ж 4,10,20,10,4,26,20,26,4,10,20,10,4,26,20,26,12,18-PЖ 4,10,4,18,4,26,20,10,20,18,20,26-}Ж 0,10,0,18,0,26,24,10,24,18,24,26,12,18-░Ж 0,10,0,18,0,26,24,10,24,18,24,26,12,12,12,24-шЖ 0,10,0,18,0,26,24,10,24,18,24,26,12,8,12,18,12,28.&Ж 0,10,0,18,0,26,24,10,24,18,24,26,12,0,12,12,12,24,12,36.L Ж 8,60,64,60,120,60,176,60,232,60.!Ж PAIR,TWO ,THRE,STRA,FLUS,FULL,FOUR,STFL,ROYA.д"Ж 1.25,3,4.5,10,20,40,90,140,190.о'ф2:ц0/i(ъ(10,110)м(300,185),╜,B:ч3:АX│1е310й9:ъ(150,25)м(X,1),╜:ъ(150,25)м(X,49),╜:Л NO GOOD.":Бе3508@╞ЕPM│1░Y│74з720:ДЗ"IT CAN'T BE TURNED.":Бе3509╨Й"lEFT rIGHT uP dOWN";I$:Е О(I$,1)┤▓"D"зЗ"THE FLOOR FELL THROUGH AND YOU ALL PERISHED IN FLAMES BENEATH":Х:К:ДЗ"THE WALLS SLIDE UP REVEALING A DEAD GHOUL.":JJ│JJм1:G(1,Y)│80:G(2,Y)│68:G(4,Y)│73:T2│1:Бе35092┌З"CAN'T BE DONE.":Бе3509]фЕPO(5)┤▓0зЗ"I HAVE NO CURRENCY.":Бе3509╟юЕZ$│"AMU"░PO(8)│Y зЗ"HE HANDS YOU THE AMULET AND THENTAKES A COIN.":UL│ULм1:K$(8)│"AMU":PO(8)│0:Бе810:I°ЕY│9░PO(15)│Y ░PO(13)│Y ░Z$│"MER"зЗ"HE SMILES,TAKES THE COIN AND YOUGO ON HIS SHIP, OFF TO POILAR NGRA.":Y│10:UL│ULм1:Бе810:чЕY│11░Z$│"ZEB"░PO(8)│0зЗ"HE TAKES THE AMULET, AND YOU NOWHAVE THE FINEST ZEBRA OF THE LOT":PO(18)│0:PO(8)│90:O$(18)│"A ZEBRA":D$(18)│"IT IS STRONG":Бе810;] ЕY│40░PO(20)┤▓0░TL│1░Z$│"TAL"зЗ"THEY HAND IT TO YOU, YOU HAND THEM A COIN.":UL│ULм1:K$(20)│"TAL":PO(20)│0:Бе810;░ЕY│28░Z$│"BAG"░PO(14)┤▓0зЗ"YOU BOUGHT IT.":UL│ULм1:PO(14)│0:K$(14)│"BAG":Бе810;┌ З"YOU CAN'T BUY OR TRADE THAT.":Бе350<*ЕUL│0зPO(5)│90:Бе350:ДЕUL│1зO$(5)│"A GOLD COIN":Бе350:Д350Й"WHAT";I$:I$│ О(I$,3):ЕI$│"SAU"▒I$│"CRE"зЗ"THE KITTEN LAPS IT UP HAPPILY.":GV│1:PO(3)│90:PO(2)│90:O$(10)│"A KITTEN DRINKING CREAM":Бе350<ЄHЗ"CAN'T.":Бе350=eRЕPO(2)│0░PO(3)│0░Z$│ О(K$(2),3)зЗ"YOU POURED IT IN THE SAUCER.":D$(2)│"EMPTY":D$(3)│"FULL OF CREAM":PC│1:Бе350=в\ЕY│6░Z$│"CAT"зЗ"HE PURRS AND SEEMS TO SMILE!":WQ│1:Бе350=║fЗ"YOU CAN'T.":Бе350=─pБе870>3zЕY│86░PO(28)│90░Z$│"STA"зЗ"THE STATUE MOVES, REVEALING A FRESCO ON THE WALL BEHIND.":PO(28)│Y:Бе350:Д870>ТДЕY│63░T3│0░CV│1░Z$│"GHO"░PO(35)│0зЗ"YOU SLICE THE VINES AND HAVE NOWSAVED HIM!":T3│1:Бе350>┤ОЗ"YOU CAN'T SAVE THAT!":Бе350?КШЕY│56░T1│0зЗ"YOU SLICE MADLY INTO THE SUB- STANCE UNTIL IT SHRINKS AWAY INTO THE FLOOR. YOU SEE THE MANGLED CORPSE OF A GHOUL GO WITH IT.":JJ│JJм1:G(1,Y)│62:G(2,Y)│46:G(3,Y)│57:G(4,Y)│55:T1│1:Бе350@вЕY│63░PO(35)│0░T3│0зЗ"YOU CUT YOURSELF FREE, BUT THE GHOUL IS STILL TRAPPED.":G(1,Y)│69:G(2,Y)│57:G(3,Y)│64:CV│1:Бе350@XмЕY│83░MS│1зЗ"YOU SLICE INTO THE BEAST AND IT DISSOLVES!":TB│1:PO(30)│90:Бе350@b╢Бе870A"└ЕY│66░Z$│"HAN"зЗ"IT PRYS OPEN AND THE LANTERN FALLS AWAY!":PO(26)│Y:K$(26)│"LAN":O$(26)│"A LANTERN":Бе350:ДЕPO(4)│0░PO(5)┤▓0░Z$│"POU"зЗ"YOU FIND FOUR GOLD COINS":PO(5)│0:PO(4)│90:Бе350A>╩З"CAN'T OPEN IT.":Бе350AЭ╘ЕPO(26)│0░Z$│"LAN"зЗ"IT'S ON.":LO│1:D$(26)│"IT'S ON":Бе350:ДЗ"IT CAN'T BE TURNED ON":Бе350A╒▐ЕZ$│"LAN"зЗ"IT'S OFF.":LO│0:D$(26)│"IT'S OFF":Бе350A▀шБе870BQЄЕZ$│ О(K$(31),3)░PO(23)│0░PO(27)│0░PO(34)│0зЗ"IT'S MADE!!!":PO(27)│90:PO(34)│90:PO(23)│90:PO(31)│0:MS│1:Бе350Bh№З"YOU CAN'T":Бе350BеЕPO(18)│0░Z$│ О(K$(18),3)зЗ"YOU'RE UP!":G(3,11)│12:Бе350B░Бе1020CУЮ:З"SUDDENLY YOU FEEL SLEEPY.YOU MUST SLEEP! GOOD NIGHT.":ЕPO(14)│0зЗ"DURING THE NIGHT YOU FELT SOME- THING BRUSH AGAINST YOU AND YOU DUCKED INTO YOUR SLEEPING BAG.":T5│1:PO(18)│Y:O$(18)│"DEAD ZEBRA":D$(18)│"DEAD":Бе350C╨$З"YOU WERE SLAUGHTERED BY A GAENT DURING THE NIGHT.":Х:КDH.Ю:З"SUDDENLY AS YOU ARE WALKING A STRANGE SLIME ENWRAPS YOU...DARKAND EVIL...TEETH CLAMP,CLAWS TEAR...!":Бе350D°8Ю:З"WALLS CLOSE YOU IN OF A SUDDEN. YOU ARE TRAPPED, BUT IT IS ALOMST A COMFORT TO SEE REAL SUBSTANCE AGAIN. ONE WALL HAS A CRESENT MOON ENGRAVEN INTO IT.":Бе350E╕BЮ:З"A GHOUL GOES AHEAD OF YOU AND TRIPS A THIN, WELL-CONCEALED WIRE.SNAKE-LIKE VINES TEAR FROM THE FLOOR AND WRAP OVER IT AND YOU. THEY CUT AND SQUEEZE. YOU ARE BOTH DIEING!":Бе350F(LЮ:З"YOU WERE WALKING AND BEFORE YOU COULD GAIN BEARING,YOU WERE FALLING!!! DO SOMETHING AND NOW!":Бе350GVЕGV│1 ░ WQ│1зЮ0:З"A SEA OF CATS FLOOD THE ROOM, DRIVING THYCHORE NOTEN AWAY, ANDYOU REALISE JUST WHAT YOUR THREAT TO IT WAS.":З б(32,"*");"*";" CONGRATULATIONS! YOU WON! *"; б(32,"*")::ЕCD$│"D"з1230:Д1240G~`З"YOU ALMOST WISH YOU HAD BEEN KINDER TO THEM.THYCHORE NOTEN LAUGHS AND KILLS YOU, FOR THEY WON'T HELP YOU.":Х:КGчjЕY│56░T1│0зC│Cл1:Бе1140:ДЕY│81░T4│0зU│Uл1:Бе1150:ДЕY│63░T3│0зW│Wл1:Бе1160:ДЕJJ│1зO$(22)│"GHOUL":Р:ДРH tЕC▓3зЗ"YOU EVENTUALLY DIED OF BLOOD LOSS.":Х:К:ДРHR~ЕU│3зЗ"YOU STRUCK THE FLOOR AND DIED!":Х:К:ДРHсИЕ W▓4░CV│0зЗ"YOU WERE ALL CRUSHED TO DEATH!":Х:К:ДЕW▓4░CV│1зЗ"THE GHOUL WAS CRUSHED AND THE VINES RECEEDED.":JJ│JJм1:W│0:T3│1:ZD│1:Бе350HчТРI'ЬЙ"WHAT NOW";I$:З"IT DOES NO GOOD.":QA│QAл1:ЕQA│3з1190:Д1180I▀жЗ"A SHOWER OF BONES DROPS FROM THEDARKNESS ABOVE.":Й"WHAT NOW";I$:I$│ О(I$,3):ЕI$│"CAL"▒I$│"SCR"▒I$│"YEL"▒I$│"HEL"▒I$│"ASK"зЗ"YOU HEAR A VOICE SAY 'WE SEND DOWN LADDER.'"::Д1220JС░Й"WHAT NOW";I$:З"A LADDER F:ДЕY│56░T1│0з1070:ДЕY│74░T2│0з1080:ДЕY│63░T3│0з1090:ДЕY│81░T4│0з1100:ДЮ:З"------------YOU ARE------------";:ЕY┤29зЗEX$(Y):Бе310&°·ЕY│42зЗ"IN THE HOLE OF THE DHALA MASTI- CATERS":Бе1180:ДЕY│83зЗ"THERE IS A DOOR HERE WITH A STRANGE HOLE IN IT."'5ЕY│43зЗ"NEAR THE ENTRANCE TO THE PIT OF THE DHALA":Бе310'SЕY▓28░Y┤40зЗEX$(17):Бе310'ЖЕY│40зЗ"AT A CAMPSITE OF LAVA GATHERERS":Бе310'·"ЕY│41░TL│0зЗ"YOU TRIP AND FALL, KNOCKED OUT FOR MANY HOURS.YOU AWAKE LATE ATNIGHT.YOU RISE AND FIND YOURSELF";(┼,ЕY│41зЗ"STANDING ON LEDGE WHEN SUDDENLYA GROUP OF GAENTS FALL DOWN ON YOU AND CARRY YOU OFF TO A PIT INTO WHICH THEY DROP YOU. PRESS ANY KEY.":в44539:Y│42:Бе240:ДЗ"IN A MAZE OF TRANSPARENT WALLS")6З"========VISIBLE OBJECTS========";:АX│1е35:ЕPO(X)│Y зH│Hл З(O$(X)):S│Sл1:Бж330:Л:ДЛ)L@ЕS│0зЗ"NOTHING OF IMPORTANCE":Бе340:Д340)ЕJЕH▓30зH│0:З:ЗO$(X);:Р:ДЕS│1зЗO$(X);:Р:ДЗ",";O$(X);:Р*TS│0:H│0:З:З":::::::::DIRECTIONS ARE:::::::::";:ЕY▓43зЗ"YOU CAN'T SEE THE PASSAGES HERE":Бе350:ДАX│1е4:ЕG(X,Y)▓0зЗT$(X);" ";:Л:З:ДЛ:З*x^Бж1130:ЕY│6░ZD│0з430:ДЙ"WHAT NOW";I$:ЕI$│""з350:ДI│ Ю(1,"NSEW",I$):ЕI▓0з410:ДЕI$│"LOO"▒I$│"LOOK"з240*ЮhАX│1е4:ЕI$│T$(X)зI│X:X│0:Бе410:ДЛ*┼rАX│1е З(I$):Е Р(I$,X,1)│" "з380:ДЛ*х|Z$│ Р(I$,Xл1,3):I$│ О(I$,3)+)ЖАX│1е36:ЕI$│ О(V$(X),3)з400:ДЛ:З"I DON'T KNOW THAT VERB.":Бе350+ЭРИ V(X) Бе 450,480,490,510,530,550,560,580,670,680,710,740,820,850,860,870,880,890,900,920,960,980,990,1010,1030+эЪЕG(I,Y)▓0зY│G(I,Y):Бж420:I│0:Бе240:ДЗ"YOU CAN'T GO IN THAT DIRECTION":Бе350,дЕZD│0зPO(1)│Y:Р:ДР,ОоЗ"THE CAT JUMPS ON THE ZUAL AND KILLS IT, THEN PROCEEDS TO EAT ITS EVIL CARCASS. IT LOOKS AT YOU AS IF FOR APPROVAL.":ZD│1:Бе350-╕ЕY▓81зЗ"YOU DIED AT THE HANDS OF SOME UNSEEN TERROR IN THE DARKNESS.":Х:К:ДЗ"YOU ARE IN TOTAL DARKNESS!":Бе350-║┬АX│1е35:ЕPO(X)│Y ░ П(K$(X),1)┤▓"*"░Z$│ О(K$(X),3)зЗ"IT IS GOTTEN":PO(X)│0:X│0:Бе350:ДЕPO(X)│0░Z$│ О(K$(X),3)зЗ"YOU ALREADY HAVE IT.":Бе350:ДЕZ$│ О(K$(X),3)░ П(K$(X),1)│"*"з470:ДЛ-ц╠З"I DON'T KNOW OF SUCH AN OBJECT":Бе350.╓З"IT CAN'T BE GOTTEN.":Бе350.qрАX│1е35:ЕPO(X)│0░Z$│ О(K$(X),3)зЗ"IT IS DROPPED.":PO(X)│Y:Бе350:ДЛ:З"YOU DON'T HAVE IT TO DROP":Бе350.╓ъАX│1е35:Е(PO(X)│0 ▒ PO(X)│Y) ░Z$│ О(K$(X),3)зЗD$(X):Бе500:ДЛ:З"IT JUST ISN'T WITHIN VIEW.":Бе350/7ЇЕX│25░PO(26)│90зЗ"THERE IS ALSO A POCKET LANTERN CLUTCHED IN ITS HAND.":PO(26)│Y:Бе350:Д350/г■ЕY│83░Z$│K$(20)░PO(20)│0░TB│1зЗ"IT FIT PERFECTLY AND THE DOOR SWINGS WIDE!":G(3,Y)│84:PO(20)│90:Бе350/╗З"YOU CAN'T!":Бе3500$Ю:З"LISTING OF ITEMS ON YOUR PERSON":АX│1е35:ЕJJ│0░X│22зPO(X)│90:Л:ДЕPO(X)│0зЗO$(X),;:Q│Qл1:Л:З:ДЛ:З0JЕQ│0зЗ"NOTHING AT ALL":Бе350:Д3500а&Ю:АX│1е26:ЗV$(X),;:Л:З"PRESS ANY KEY FOR MORE":в44539:Ю:АX│27е36:ЗV$(X),;:Л:Бе3500ш0ЕY│84зЙ"OF WHOM DO YOU REQUEST HELP";I$:Е О(I$,3)│ О(K$(33),3)з11101+:З"YOU ARE NOT ALONE IN CONFUSION, FOR THERE IS NO HELP.":Бе3501ЎDЕY│4░Z$│ О(K$(7),3)░PO(8)┤▓0зЗ"NICE TA SEE YA'! YA' LIKE WHAT YA' SEE, IT BE ALL FER A SINGLE COIN TADAY! OH, CHECK THIS BUTIEMAITE! HE HOLDS UP A JADE AMULETOF SUPERB CRAFTSMANSHIP.":PO(8)│Y:Бе3502дNЕY│8░Z$│ О(K$(12),3)░PO(13)┤▓9зЗ"YOU TALK OF OLD TIMES AND GREAT ADVENTURES FOR MANY HOURS. THE SUN BEGINS TO SET AS YOUR TALES COME TO AN END.":PO(13)│9:PO(15)│9:Бе3503fXЕY│9░PO(15)│Y ░Z$│ О(K$(15),3)зЗ"AH, TIMES ARE HARD, FRIEND,AND WE TRADE HERE FOR NECESSITIES. I C'ULD GIVE YA A TRIP TO OUR LAND FOR A COIN.TIMES ARE HARD OR I'D TAKE YA' FREE.":Бе3504bЕY│28░Z$│"MAN"░PO(14)▓0зЗ"DON'T HAVE ANYTHING HERE EXCEPT FOR THAT SLEEPING BAG, BUT IF YOU SLEEP OUTDOORS AROUND HERE YA BETTER HAVE IT. ONE COIN.":Бе3504ХlЕY│11░Z$│ О(K$(17),3) ░PO(8)│0зЗ"HOW ARE YA? ZEBRA FOR YOUR AMU- LET? WORTH A COIN, ISN'T IT?JUSTCAN'T GET AROUND WITHOUT A ZEBRA":Бе3505rvЕY│40░PO(20)┤▓Y ░PO(20)┤▓0░Z$│"TRA"зЗ"YOU TALK FOR THE ENTIRE DAY OF THE LEGENDS OF NGRA, AND ABOUT THE EVILS OF THE GAENTS, THEN THEY OFFER YOU A TALISMAN FOR A COIN.THEY SAY IT'S GOOD LUCK.":PO(20)│Y:TL│1:Бе3506:АЕY│43░Z$│ О(K$(22),3)зЗ"THEY SMILE AT YOUR ODD LANGUAGE BUT THEY WILL HELP YOU.THREE OF THEM TAKE YOU TO THEIR SHIP AND YOU SAIL TO THE GREAT MAELSTROM INTO WHICH YOU PLUMET!":Y│44:PO(22)│0:Бе6606bКЗ"WHATEVER, IT DOESN'T TALK.":Бе3506ОФD$(22)│"WITH YOU":O$(22)│"GHOULS":Бе3506ЇЮЕY│74░T2│0░Z$│"MOO"зЗ"IT MOVES IN GENTLY THEN CLICKS":PM│1:Бе350:ДЗ"IT JUST CAN'T BE DONE.":Бе3507┐иЕT4│0░Y│81░Z$│ О(K$(24),3)░PO(24)│0░JJ▓0зЗ"THE GHOUL GRABBED IT AND SLOWLY LOWERED YOU DOWN.WHEN YOU FOUND BOTTOM IT THEN TIED THE ROPE OFFAND CLIMBED DOWN.":G(1,Y)│86:G(3,Y)│82:T4│1:PO(24)│90:Бе3507э▓ЕT4│0░Y│81зЗ"YOU DIED FROM THE FALL.":Х:К8╝З"IT WOULD DO 7┌D:ГCOPYRIGHT (C) T&D SOFTWARE 1991 quest for chaos ISSUE #111Ъ Ю:Й"CASSETTE OR DISK OR ENTER IF NO MUSIC(C/D)";CD$:ЕCD$┤▓"D"░CD$┤▓"C"░CD$┤▓""з10╜Ю0:З@199,"THE QUEST OF CHAOS";ОМ EX$(28),G(4,87),O$(35),D$(35),K$(35),PO(35),V$(36),V(36):АX│1е28:НEX$(X):Л:АX│1е87:НG(1,X),G(2,X),G(3,X),G(4,X):Л:АX│1е35:НO$(X),D$(X),K$(X),PO(X):Л:T$(1)│"NORTH":T$(2)│"SOUTH":T$(3)│"EAST":T$(4)│"WEST"╢(АX│1е36:НV$(X),V(X):Л:Y│1:JJ│3:UL│4п2Ж IN THE EVIL ZUAL WOODS,BEFORE A TOWERING INN,"AT THE CENTER OF DYLATHE. MUCH ACTIVITY BREWS AROUND YOU.",IN A LAVISHLY DECORATED CRAFTS SHOP,IN YOUR SMALL ARCHAIC ROOM AT THE INN,AT A LOWER POINT OF THE CITY WHERE AN ARCH BOWS OVER YOUв<Ж ON THE SANDY SHORES OF DYLATHE WHERE GENTLE OCEAN WAVES LAP OVER MYRIAD HILLS OF BEACH,IN THE HOME OF YOUR FRIEND THE WISE ARRZUL,AT THE DOCKS,ONE THE SHORES OF POILAR NGRA,IN THE POILAR MERCHANDISING SQUARE,ON A WELL USED PATHЗFЖ ON A PLAIN OF SOFT ROLLING GRASSAND FLOWERS SWAYING IN THE WIND,AT THE BASE OF THE HIGH REACHINGAND PRECIPITOUS SLOPES OF MOUNT NGRA,ON A PATH THAT DIMINISHES INTO A WOODLAND TO THE NORTH,IN A DARK WOODS,INSIDE MOUNT NGRAyPЖ ON A MOUNTAIN PATH GOING NORTH TO A DARK WOODS AND EAST TO A COOL LAKE,IN THE WOODS OF THE GAENTS,IN THE WOODS OF THE GAENTS,IN THE WOODS OF THE GAENTS,IN THE WOODS OF THE GAENTS,IN THE WOODS OF THE GAENTS,IN THE WOODS OF THE GAENTS ZЖ IN THE WOODS OF THE GAENTS,"A PATH HERE GOES UP AND INTO A DARK CAVE WHILE ONE WEST CONTIN-UES AROUND THE MOUNTAIN",AT A COOL MOUNTAIN LAKE,AT A SUPPLIES STOREdЖ 3,0,0,0,5,0,3,0,6,1,4,2,0,0,0,3,0,2,0,0,8,3,7,0,0,0,0,6,0,6,9,0,0,0,0,8,28,0,11,0,0,0,0,10,14,13,0,11,12,0,0,0,18,12,0,26,16,0,26,0,19,15,0,0,33,0,35,34,21,14,27,0,22,16,20,25,23,0,21,19,24,18,0,20,0,19,23,0,0,20,24,22,0,21,0,23,0,0,19,0nЖ 17,0,14,15,0,0,0,18,0,10,0,0,0,37,30,31,35,38,0,29,34,36,29,0,39,34,33,0,0,17,0,32,32,31,17,0,0,30,0,17,31,0,37,0,29,0,38,36,30,0,0,37,0,32,40,0,0,0,41,39,0,0,0,0,0,0,0,0,0,0,0,0,60,53,45,49,61,54,0,44,56,50,47,0,0,51,48,46,58,0,49,47єxЖ 59,52,44,48,46,0,0,0,47,0,0,0,49,0,53,0,44,0,54,52,45,0,0,53,0,0,56,0,0,0,0,0,63,0,0,56,0,48,0,0,0,49,60,0,66,44,0,59,67,45,0,0,0,56,0,0,0,0,0,0,70,0,65,63,71,0,66,64,0,60,67,65,73,61,68,66,74,0,0,67,0,63,0,0,76,64,71,0,77,65,72,70СВЖ 78,0,0,71,0,67,74,0,0,0,0,0,81,0,76,0,0,70,0,75,0,71,78,0,0,72,79,77,85,0,0,78,0,74,0,0,0,0,0,0,0,0,83,81,87,0,0,82,0,0,0,83,0,79,0,0,0,81,0,0,0,83,0,0ЖМЖ A ZUAL,AN UGLY AND SLIPPERY BEAST,ZUA*,1,A VIAL,IT IS FULL OF A RICH CREAM,VIA,5,A SAUCER,A SMALL CERAMIC SAUCER FROM WHICH CATS DRINK,SAU,5,A POUCH,IT IS SMALL AND CLOTH,POU,5,GOLD COINS,BEAUTIFULLY CRAFTED IN RICH SYMBOLS,GOL,90{ЦЖ INN,IT IS THE TALINBER INN,INN*,2,CRAFTSMAN,A RUGGED YET TALENTED MAN BEHINDA COUNTER,CRA*,4,AMULET,IT IS A HIDEOUS JADE RENDITION OF A GARGOYLE,AMU,90,A CAT,IT IS AN OLDER CAT AND IS EATINGA ZUAL,CAT*,6,KITTEN,A CUTE AND YOUNG CARNIVORE UаЖ KIT*,8,THE DOCKS,THEY ARE OLD AND WORN,DOC*,9,ARRZUL,A FRIENDLY OLD MAN,ARR*,8,SHIP,THE DARK SHIP OF THE POILAR MEN,SHI*,90,A SLEEPING BAG,IT LOOKS HIGH QUALITY,BAG*,28,MERCHANT,A SWARTHY AND BEARDED MAN,MER*,90!1кЖ MAN,A YOUNG MAN IN THE TRADE OF SELLING CONTRABAND,MAN*,28,A TRADER,HE IS SELLING THE TRAVELLING ZEBRAS,TRA*,11,MANY ZEBRAS,OF GOOD STOCK,ZEB*,11,TRAVELLERS,A SHABBY BUT KIND BUNCH OF LAVA GATHERERS,TRA*,40!э┤Ж TALISMAN,"AN INTRICATELY CARVED LAVA GAR- GOYLE",TAL*,90,A HOLE,IN THE SHAPE OF A GARGOYLE,HOL*,83,GHOULS ALL AROUND YOU,THEY ARE HIDEOUS AND DISGUSTING BUT THEY ARE HELPFUL,GHO*,43"ф╛Ж A HANDLE,ABOUT TWO FEET IN LENGTH WITH A HOLE BORNE IN ONE END,HAN,55,A ROPE,TWENTY FEET IN LENGTH,ROP,58,A SKELETON,OLD AND DECAYED,SKE,66,A POCKET LANTERN,IT IS OFF,LAN*,90,A SICLE BLADE,LONG AND SHARP WITH A HOLE AT THE WIDE END,BLA,80#┘╚Ж A FRESCO,"IT DEPICTS A SEA OF CATS IN BATTLE WITH A VAST,GELATINOUS, UNNAMABLE THING IN AN OCEAN OF BLACK CHAOS.",FRE*,90,STATUE OF A CAT,THE EARS HAVE BEEN BROKEN OFF,STA*,86,A CREATURE,A DEVILISH SLIMY BEAST OF MANY CLAWED TERROR$м╥Ж CRE*,83,A SICLE,A COMPLETE SICLE READY TO KILL,SIC,90,THYCHORE NOTEN,A VAST AND GELATINOUS HORROR OF INNUNDATING CHAOS,THY,84,CATS,,CAT*,90,BOLT,IT HAS A NUT ATTACHED,BOL,69,DAGGER,SHARP AND DEADLY,DAG,68%в▄Ж GET,1,DROP,2,LOOK,3,EXAMINE,3,PUT,4,INVENTORY,5,VERB,6,HELP,7,ASK,8,TALK,8,LISTEN,8,PUSH,9,THROW,10,TURN,11,BUY,12,TRADE,12,PAY,12,GIVE,13,POUR,14,PET,15,CLIMB,16,GO ,16,UP ,16,SCREAM,17,CALL,17,YELL,17,MOVE,18,SAVE,19,STAB,20,CUT,20,SWING%╤цЖ 20,OPEN,21,ON ,22,OFF,23,MAKE,24,RIDE,25&ЁЕY▓80░Y┤85░LO│0░T4│1з440:ДЕY│39░T5│0з1050 м&9:ГCOPYRIGHT (C) T&D SOFTWARE 1991 dir ISSUE #111&K Т 359,57:┐0,1&З╛Ю:Х2048:╚0:└4:З@229,"READING DISK DIRECTORY";:Т&HFF22,8&└╚А X│512 е 541:НA$:ТX, Й("&H"лA$):ЛX:╣ Г0│512:F│ г(0)&р╥МA$(68):Y│1:P1│1:PO│4:T│247' ▄А X│3е11:▀0,17,X,A$,B$:C$│A$л О(B$,127)'FцА N│0е7:A$(Y)│ Р(C$,Nн32л1,8)л"."л Р(C$,Nн32л9,3)л" "'mЁR│ К(A$(Y)):Е R│255зA$(Y)│"":Бе300'Ц·A$(Y)│A$(Y)л Л( Ж(1547лNн32)л48)л" "'╤Е  Ж(1548лNн32)│0 з A$(Y)│A$(Y)л"B" :Д A$(Y)│A$(Y)л"A"(1Е R│0 ▒  П(A$(Y),1)┤▓"B" ▒ ( Р(A$(Y),10,3)┤▓"BAS" ░  Р(A$(Y),10,3)┤▓"BIN") з A$(Y)│"":Бе290(NA$(Y)│ О(A$(Y),12):Y│Yл1(X"Л N,X(Г,P2│ Б((Yм1)о10):Е P2┤(Yм1)о10 зP2│P2л1(д6Ю:Зд6)"COLOR DISK DIRECTORY"(°@A$│ И(68мF)л" USED -"л И(F)л" FREE":Зд(32м З(A$))о2)A$:Зд10)"PAGE";P1;"OF";P2:З) JH│(P1м1)н10л1)TА X│H е Hл9)2^Е A$(X)│"" зЗ:Бе370)AhЗд9);A$(X))GrЛ)U|Т&HFF22,8)ЦЖАI│338 е 345:ТI,255:Л:K│POн32л8:Т529,&H80:A│ Г0(K):Т529,&H8B)лРE│(P1м1)н10лPOм3*ЪK$│ Т:ЕK$│"^" ░ PO│4 ░ P1▓1 з P1│P1м1:PO│13:A│ Г0(K):Бе310 :Д Е K$│"^" ░ PO▓4 з A│ Г0(K):PO│POм1:Бе390*ЛдЕ K$│ Л(10) ░ PO┤13 ░ E┤Yм1 з A│ Г0(K):PO│POл1:Бе390 :Д Е K$│ Л(10)░ P1┤P2 ░ PO│13 з P1│P1л1:PO│4:A│ Г0(K):Бе310*аоЕ K$│ Л(13) з450*к╕Бе410*╨┬ Р(A$(E),9,1)│".":T$│ О(A$(E),12)*№╠Z$│ Т : Ю : З @233,"LOADING "л О(T$,8);+%╓Е  Ю(A$(E),"BIN") з Т 359,126:╙MT$:в+LрЕ  Ю(A$(E),"BAS") з Т359,126:╙T$,R+VъБе410+лЇЖ BD,B3,ED,C3,4,0,1F,1,C3,0,E,ED,8D,0,D,A6,84,8B,40,A7,80,AC,8D,0,3,26,F4,39,0,0┬ Р(A$(E),9,1)│".":T$│ О(A$(E),12)*№╠Z$│ Т : Ю : З @233,"LOADING "л О(T$,8);+%                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 &C:ГCOPYRIGHT (C) T&D SOFTWARE 1991 cover program ISSUE #111&MХ 200&Е Е Ж(14000)│188 ░  Ж(14001)│188 ░  Ж(14002)│188 з 22&╡Е  Ж(186)│14 з ╙M "CVR-MOD" :Д ЧM "CVR-MOD"&╤IS$│" COCO ISSUE #111 "&ьDT$│" SEPTEMBER 1991 "'2A│ Э(IS$):A│ Ж(Aл2)н256л Ж(Aл3):АI│0е16:G│ Ж(AлI):Е G┤64 з G│Gл64'CТ14500лI,G:Л'ЙA│ Э(DT$):A│ Ж(Aл2)н256л Ж(Aл3):АI│0е16:G│ Ж(AлI):Е G┤64 з G│Gл64'ЪТ14700лI,G:Л'╢S1│1024:S2│1200:S3│1100(Т 3584,S1о256:Т3585,S1 ░ 255:Т3586,S2о256:Т3587,S2 ░ 255:Т3588,S3о256:Т 3589,S3 ░ 255( Бж 4000(B-Т3600,14000о256:Т3601,14000 ░ 255(h/Т3602, Д(7)н16:Т3603,( Д(17)м1)н2(Й0Т 3604,SPо256:Т3605,SP ░ 255(Х2в 15000(б7Бж 4000(╟<Т3600,14192о256:Т3601,14192 ░ 255)>Т3602, Д(7)н16:Т3603,( Д(17)м1)н2:Е  Д(3)│1 з Т3603,0)!@Т3604,SPо256:Т3605,SP ░ 255)-Fв 15000)EKЕ  Д(5)│1 з Бж 5000)вPSC│SCл1:Е SC│3 з SC│0:Бе28 :Д S1│1024л Д(8)н32:S2│1024л Д(12)н32:S3│1024л Д(10)н32:Бе 30*VаP│ Д(5):ЕP│1зТ3590,5:Т3591,1:Т3592,1 :ДЕP│2 зТ3590,5:Т3591,1:Т3592,7 :ДЕP│3зТ3590,7:Т3591,6:Т3592,4 :ДЕP│4 зТ3590,0:Т3591,7:Т3592,5 :ДТ3590, Д(8)м1:Т3591, Д(8)м1:Т3592, Д(8)м1*iSP│ Д(20)н50:Р+И┐0:Ю:З@40,"T & D SOFTWARE";:З@71,"HOLLAND MICHIGAN";:З@130,"REPRODUCTION OF ANY OF THE FOLLOWING IS PROHIBITED.":З@194,"T & D SOFTWARE SHALL HAVE"+дТЗ@226,"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+сЬЗ@421,"COCO CASSETTE NO. 111 SEPTEMBER 1991+ўбЕ  Д(2)│1 з ┐ 0,1,жАTD│0е2000:Л,oР"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+сЬЗ@421,"COCO CASSETTE NO. 111 SEPTEMBER 1991+ўбЕ  Д(2)│1 з ┐ 0,1,жАTD                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ┼ ╞ ╔ ┬ ┬╞╟╚$╟&├╞)┴+╞-./012┼┴                NCE BAS,ЄMRBILL BAS▒COAST BASYGOPHER3 BAS6SAMPLE DAT 3                                DIR BAS пCOVER BAS!CVR-MOD BIN"wPERFILE BAS#╓CHAOSINSBAS'|CHAOS BAS▌RETACCT BAS%▒ALPHA3 BAS(╥POKER3 BASОFINANCE BAS*еSILENCE BAS,ЄMRBILL BAS▒COAST BASYGOPHER3 BAS6SAMPLE DAT 3                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                m6░╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╛╕░╡╝╣░╢╝░╢╝▓╛╝╕╝╛╕║░║▒╣░╛╝╣╡╝╝░║╢▓╡А╡░╣│░║А║╗▓А░║А║║║╗│║╗│╢╡│░░║╢▓╡░╡░░░║║░║║░░░║░╡╡░║░║║┤▓╡░░░╕┤┤┤╝╕░┤╝А┤╝А╕ААА╕А┤┤А╕А╕╕А┤┤╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╛╕░╡╝╣░╢╝░░░░▒╝▓▒░░░░░░░░░░░АА░А║╢▓╡А╡А╣│░▒│░╖▓░╖▓▒АА▒░│▓▓│░│░░А║╢▓╡А╡ААА║║░║╡АА╡░▓╣╣╕╡░║╛░╡│╕░А╕┤┤┤╝╕А┤╝░┤╝░┤АА░╝░┤┤░░╝╕╕А░╝╕░╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА                                                                                                                                                                                                                                `ОЖАзАМ&∙Ж зНДзНБзН~╛пН{╛пНv╛пНq╢зНc╢зН]╢зНW0НZ╞└ЖАзАZ&√оНGmН=' 1НCdоН64цН-╡'5чН" 5 пН╛@mН 'оН М' М 'М@' oНё┤оНЄmНч' 1НьоНс4цН╫u'5чН╠ 5 пН╚О8д▀mН╢'оН╖М('МH' oНаbоНвmНЦ' 1НЪ▒оНС4цНЖ#'5чН{ 5 пНxО9lНmНe'оНgМш'М╚' oНO &ОжДM*ДpЛДpзН5жДДкН-КАзД0М&▐9■3_Г&Ў╢╗Дp╖mН&■╜mН &■╡mН°&■н╞FОd4Нб5О░0Z&ю9╞жазАZ&∙9╬`ьбДП║─П·эБ3_Г&ъ9]'┴'┴'┴'┴'┴'┴' !0 "0Ис 0Ир 0И▀ 0 0И 0И 0И! 9Н║4Г-"Г<.5OM9Нг4Г- Гю.5OM95╦─Ж M9ОО2Н94╢ #К╖ #╢  Д╖  оф0&№╢  ДК№╖  оф0&№1?&▐59                                                                                                        *                           :Ш0&№1?&▐59                                                                                                                                                                                                                                                                                                                                       ╙E:ГCOPYRIGHT (C) T&D SOFTWARE 1991 personnel file ISSUE #111U╚0:Бе 60000З2Е  Ж(116)│&H7F з Х6000:ML│200 :Д Х2000:ML│100┴4М NM$(ML),A1$(ML),A2$(ML),PH$(ML),EX$(ML,2),CM$(ML,6)х6Е  Ж(&HC000)│68 з DN│1 :Д DN│м1<Ю:З:З:З" personnel file":З:Зз=З" THIS COCO UTILITY PROGRAM WILL LET YOU ENTER AND STORE DATA ON CURRENT OR PROSPECTIVE PERSONNEL. DATA MAY BE SAVED TO TAPE OR DISK."э>З:З" FUNCTIONS INCLUDE SORTING, EDITING, AND PRINTING DATA."DЗ@480," PRESS ANY KEY TO CONTINUE";)EЕ Т│"" Бе 69BFЮ:З@32:Зд14)"MENU":ЗHЗ" L. LOAD DATA FILE S. SAVE DATA FILE A. ADD NEW DATA D. DISPLAY/EDIT P. PRINT DATA X. SORT DATA Q. QUIT"7JЗ:З" YOUR CHOICE?"NKK$│ Т:ЕK$│"" Бе 75eLP│ Ю("LSADPXQ",K$)uMЕ P│0 Бе 75ЪNИ P Бе 80,90,100,200,300,400,990┤PБж 10000:ЕF$│"" Бе 70─QЩ"I",#DN,F$╨RЙ#DN,NEсSЕ NE│0 Бе 89ЁTА I│1 е NE(U╗Й#DN,NM$(I):╗Й#DN,A1$(I):╗Й#DN,A2$(I):╗Й#DN,PH$(I)DVАK│0е2:╗Й#DN,EX$(I,K):ЛcWА J│1 е 6:╗Й#DN,CM$(I,J):ЛiXЛxYЪ#DN:Бе 70СZБж10000:ЕF$│"" Бе 70б[Щ"O",#DN,F$н\З#DN,NE╛]Е NE│0 Бе 99═^А I│1 е NE_З#DN,NM$(I):З#DN,A1$(I):З#DN,A2$(I):З#DN,PH$(I)`АK│0е2:З#DN,EX$(I,K):Л:aА J│1 е 6:З#DN,CM$(I,J):Л@bЛOcЪ#DN:Бе 70adЕ NE│ML Бе 75gfЮ{hЗ" ENTRY"NEл1:Зкn╗ Й" NAME: ";NM$(NEл1):Е NM$(NEл1)│"" Бе70╢pNE│NEл1╧r╗ Й" ADDR: ";A1$(NE)шt╗ Й" : ";A2$(NE)v╗ Й" PH #: ";PH$(NE)x╗ Й" EX 1: ";EX$(NE,0)7z╗ Й" EX 2: ";EX$(NE,1)R|╗ Й" EX 3: ";EX$(NE,2)c~З" COMMENT:"lАNL│0wВ╗ Й T$ИДЕ T$│"" з 70вЖNL│NLл1:CM$(NE,NL)│T$┤ИЕ NL┤6 Бе 130╛ХБе 70╬╚Е NE│0 Бе75╫╩PT│1▌╥Юу╘З√╓З" NAME: ";NM$(PT)╪З" ADDR: ";A1$(PT)+┌З" : ";A2$(PT)C▄З" PH #: ";PH$(PT)]▐З" EX 1: ";EX$(PT,0)wрЗ" EX 2: ";EX$(PT,1)СтЗ" EX 3: ";EX$(PT,2)мфА I│1 е 6:ЗCM$(PT,I):Л╓цЗ@480," (ARROWS) Q)UIT A)ADD E)DIT";юшK$│ Т:ЕK$│"" Бе 232ъЕK$│"^" Бе 240ыЕK$│ Л(10) Бе 245)ьЕK$│"Q" Бе 70;эЕK$│"A" з 270NюЕK$│"E" Бе 250YяБе 232kЁЕ PT│1 Бе 232~ЄPT│PTм1:Бе 210СїЕ PT│NE Бе 232дЎPT│PTл1:Бе 210Є·АI│1 е 7:З@Iн32,═"#";I;:Л:З@480, б(31,32);:З@480," (1-7) TO EDIT"; №K$│ Т:ЕK$│"" Бе 252)¤K│ Й(K$):ЕK┤1 ▒ K▓7 Бе 252P■И K Бе 261,262,263,264,265,266,267nБж 1000:NM$(PT)│T$:Бе 269МБж 1000:A1$(PT)│T$:Бе 269кБж 1000:A2$(PT)│T$:Бе 269╚Бж 1000:PH$(PT)│T$:Бе 269ш Бж 1000:EX$(PT,0)│T$:Бе 269 Бж 1000:EX$(PT,1)│T$:Бе 269( Бж 1000:EX$(PT,2)│T$:Бе 2693 Бе 210^F│0:А I│1 е 6:ЕCM$(PT,I)│"" з F│I:I│10dЛuЕ F│0 Бе 210УЮ:З:З"ADDING TO COMMENT:"ЮNL│Fм1и╗Й T$║ЕT$│"" Бе 210шNL│NLл1:CM$(PT,NL)│T$:Е NL┤6 з 278 :Д 210°,Е NE│0 Бе75 -PD│м2:З#PD,"".А I│1 е NE10З#PD,"NAME: "NM$(I)I2З#PD," : "A1$(I)a4З#PD," : "A2$(I)y6З#PD," : "PH$(I)Е8З#PD,""Я:З#PD," : "EX$(I,0)╣<З#PD," : "EX$(I,1)╙>З#PD," : "EX$(I,2)▀@З#PD,""эBА J│1 е 6 DЕ CM$(I,J)┤▓"" з З#PD,CM$(I,J) FЛ "JЗ#PD,"" (TЛ 2]Бе 70 fРЕ NE│0 Бе 75 :Д Ю:З@64:З" SORT BY:":З тТЗ" 1. NAME 2. EXTRA #1 3. EXTRA #2 4. EXTRA #3" ·ФK$│ Т:ЕK$│"" Бе 404!ЦK│ Й(K$):Е K┤1 ▒ K▓4 Бе 404!1ЪЮ:З@234,"WORKING."!BЬЕ NE│1 Бе 75!SдА I│1 е NEм1!dжА J│Iл1 е NE!иИ K Бе 431,432,433,434!апЕ NM$(I)▓NM$(J) з 440 :Д 450!┼░Е EX$(I,0)┤EX$(J,0) з 440 :Д 450!ъ▒Е EX$(I,1)┤EX$(J,1) з 440 :Д 450"▓Е EX$(I,2)┤EX$(J,2) з 440 :Д 450"5╕T$│NM$(I):NM$(I)│NM$(J):NM$(J)│T$"[╣T$│A1$(I):A1$(I)│A1$(J):A1$(J)│T$"Б║T$│A2$(I):A2$(I)│A2$(J):A2$(J)│T$"з╗T$│PH$(I):PH$(I)│PH$(J):PH$(J)│T$"с╝А Z│0 е 2:T$│EX$(I,Z):EX$(I,Z)│EX$(J,Z):EX$(J,Z)│T$:Л#╛АZ│1 е 6:T$│CM$(I,Z):CM$(I,Z)│CM$(J,Z):CM$(J,Z)│T$:Л#"┬Л:Л#,єБе 70#J▐Ю:З@232,"OK TO QUIT? Y/N"#T▀K$│ Т#fрЕK$│"N" Бе 70#zсЕK$┤▓"Y" Бе 991#АцЮ#ЖчК#гшЮ:З@224," NEW: ";:╗ЙT$:Р#┼'Ю:З@228,"filename: ";:╗Й F$:Р#╥ъ`└1:Бе 50X$(J,Z)│T$:Л#╛АZ│1 е 6:T$│CM$(I,Z):CM$(                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  о=В COPYRIGHT (C) T&D SOFTWARE 1991 retirement accountM╚0:Бе 60000П▐RIGHT (C) T&D SOFTWARE 1991 retirement account ISSUE #111Ъ2Х 2000╛8Е  Ж(&HC000)│68 з DN│1 :Д DN│м1ф<Ю:З:З" retirement account":З5>З" THIS PROGRAM CAN BE USED TO HELP YOU TRACK A RETIREMENT ACCOUNT.";?Зё@З " IT CAN PROJECT HOW MUCH MONEY WILL BE IN THE ACCOUNT AT A FUTURE DATE.":З:З" IT CAN ALSO PROJECT HOW LONG THE MONEY WILL LAST, ONCE YOU START MAKING WITHDRAWALS."¤EБж 9000!FЮ:З:З:З:З" menu":З╓HЗ" L. LOAD DATA FILE S. SAVE DATA FILE E. ENTER/EDIT DATA P. PROJECT INCOME R. PROJECT SPENDING Q. QUIT"їJЗ:З" YOUR CHOICE?" KK$│ ТLЕK$│"" Бе75%MP│ Ю("LSEPRQ",K$)5NЕ P│0 Бе 75VOИ P Бе 80,90,100,200,300,990pPБж 10000:ЕF$│"" Бе 70АQЩ"I",#DN,F$МRЙ#DN,ABШSЙ#DN,IRдTЙ#DN,MD│YЪ#DN:Бе 70═ZБж 10000:ЕF$│"" Бе 70▌[Щ"O",#DN,F$щ\З#DN,ABї]З#DN,IR^З#DN,MDcЪ#DN:Бе 70dЮ:З@96:fЗ" (A) ACCOUNT BALANCE: ";OhЗ═"######.##";ABnjЗ" (B) INTEREST RATE: ";ГlЗ═" ##.##";IRвnЗ" (C) MONTHLY DEPOSIT: ";╖pЗ═"######.##";MD╜┤З╬╢З" (Q) QUIT"ц╣K$│ Т:ЕK$│"Q" Бе 70·║Е K$│"C" Бе 196 ╗ЕK$│"A" Бе 190 ╝ЕK$│"B" Бе 193+╜Бе 185S╛P$│"BALANCE":Бж 199:AB│ Й(J$):Бе100Б┴P$│"INTEREST RATE":Бж 199:IR│ Й(J$):Бе100▒─P$│"MONTHLY DEPOSIT":Бж 199:MD│ Й(J$):Бе100╧╟Ю:З@225,P$;": ";:╗ Й J$:Р█╚Бж 2000ы╔Ю:З@224,"";╩З" HOW MANY MONTHS TO TRACK? ";:╗ Й O$#╠O│ Й(O$)3╬Е O│0 Бе 70R╨BL│AB:MI│IRо1200:II│0:DD│0e╤Е PD│0 з Ю:L│0z╥Бж 800:А I│1 е OР╘IE│MIнBL:II│IIлIE╩▄З#PD,═"### ######.## ####.## ######.##";I;BL;IE;BLлIE┌▐BL│BLлIEлMDч▀DD│DDлMD·рЕ PD┤▓0 Бе 240"цL│Lл1:Е L│12 з Бж 9000:Ю:L│0:Бж 800(ЁЛСёЗ#PD:З#PD," INTEREST EARNED: ";:З#PD,═"######.##";II:З#PD," DEPOSITS MADE: ";:З#PD,═"######.##";DDжЄЕ PD│0 з Бж 9000░+Бе 70╝,Бж 2000╠-Ю:З@224,"";∙2З" START WITHDRAWING AT MONTH? ";:╗Й O2$3O2│ Й(O2$)4Е O2│0 Бе 70=5З" WITHDRAW HOW MUCH? ";:╗Й O3$L6O3│ Й(O3$)p8BL│AB:MI│IRо1200:II│0:DD│0:WW│0x9M│1Л:Е PD│0 з Ю:L│0Ц;Бж 810гWA│0:Е M▓│O2 з WA│O3 :Д BL│BLлMD:DD│DDлMDю@BL│BLлIE:Е WA▓BL з WA│BL ABL│BLмWA:II│IIлIE:WW│WWлWACBЗ#PD,═"### ####.## ####.## #######.##";M;IE;WA;BLVEЕ PD┤▓0 Бе 329~FL│Lл1:Е L│12 з Бж 9000:Ю:L│0:Бж 810ИIM│Mл1ЪJЕ BL▓0 Бе 316KЗ#PD:З#PD,═" DEPOSITED: ######.##";DD:З#PD,═" INTEREST: ######.##";II:З#PD,═" WITHDRAWN: ######.##";WWLЕ PD│0 з Бж 9000%ПБе 70P З#PD," # BEG BAL INTEREST END BAL"V$РА*З#PD," # INTEREST WITHDRWL BALANCE"Ж.Рд▐Ю:З@232,"OK TO QUIT? Y/N"╝▀K$│ Т:ЕK$│"N" Бе 70╨рЕK$┤▓"N" Бе 999╓цЮ▄чК╨Ю:З@228,"(S)CREEN OR (P)RINTER? S/P"=╥K$│ Т:ЕK$│"S" з PD│0:Р :ДЕ K$│"P" з PD│м2:Р :Д 2002d#(З@484,"PRESS ANY KEY TO CONTINUE";w#*Е Т│"" Бе 9002}#,Ра'Ю:З@228,"FILENAME: ";:╗ Й F$:Рнъ`└1:Бе 50K$│"N" Бе 70╨рЕK$┤▓"N" Бе 999╓цЮ▄чК╨Ю:З@228,"(S)CREEN OR (P)RINTER                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 yQ:ГCOPYRIGHT (C) T&D SOFTWARE 1991 quest for chaos instructions ISSUE #111гЮ:З"*******IN QUEST OF CHAOS***************JAMES STAKELIN II********";:Бж50:ЮИЗ"instructions:":З"IN THIS ADVENTURE, YOU HAVE BEENCALLED BY FORCES UNKOWN INTO THEREALM OF DREAMS, A LAND ABOUT WHICH YOU ARE VERY FAMILIAR. ITWOULD SEEM THAT THE SWIRLING CHAOS THYCORE NOTEM HAS AWAKENEDAND SEEKS TO"gЗ"DESTROY WHAT IS LEFT OF THE KNOWN UNIVERSE.ITS HUNGER INSA- TIABLE,ITS PATIENCE AT AN END, IT STRUGGLES TO FREE ITSELF. YOU HAVE BEEN SELECTED BY THE ELDERS TO FIND AND, IF POSSIBLE,KILL THIS BEAST.":Бж50:ЮKЗ@32,"IT WAS HEARD IN THE DESTRUCTION OF A VILLAGE NEAR THE SWIRLING CHAOS THAT IT FEARS YOUR NAME. FOR THIS SOLE REASON YOU ARE CHOSEN TO ENCOUNTER A THING NO THING HAS EVER SEEN AND LIVED FOR ANY TIME THEREAFTER."┤З"IT IS SIMPLE,THE COMPLEXITY OF THIS TASK, OR IS IT. ONE WRONG MOVE AND YOU ARE SURE TO BE LOST."┐Бж50:ЮйЗ@32,"THIS GAME USES SIMPLE TWO WORD COMMANDS. SUCH AS get chair ORdrop book WILL SUFFICE. TO MOVETHROUGH THE AREAS, TYPE THE FIRST LETTER OF THE DIRECTION INWHICH YOU WANT TO GO. TYPE verb FOR A LIST OF AVAILABLE VERBS,"JЗ"AND TYPE inv TO GAIN AN INVEN- TORY OF ITEMS IN HAND. I WISH YOU LUCK IN SOLVING THIS ADVEN- TURE, AS ITS ENDING IS THE SAL- VATION OF THE UNIVERSE.":Кx2З"press any key to continue...";:в44539:Р GO. TYPE verb FOR A LIST OF AVAILABLE VERBS,"JЗ"AND TYPE inv TO GAIN AN INVEN- TORY OF ITEMS IN HAND. I WISH YOU LUCK IN SOL                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ╧&I:ГCOPYRIGHT (C) T&D SOFTWARE 1991 alphabet scrambler 3 ISSUE #111&┐ ф0:т32:Ю:З"THE ALPHABET SCRAMBLER!!!!!!!!!!":Й"ENTER NUMBER OF TILE SHUFFLES (1-10000)";DF:ЕDF┤1з10 :Д Т65497,0'ф2:у0,13:у1,63:М A(27),C(30),D(30):L│0:у 2,23:у4,16:у5,42:у3, Д(63):у6, Д(63):у7, Д(63):ч1'иъ(10,10)м(210,190),╜,B:АX│10е210й40:ъ(X,10)м(X,190),╜:Л:АY│10е190й30:ъ(10,Y)м(210,Y),╜:Л:ш(100,170),1,1:ш(140,170),1,1:ш(180,170),1,1((Q│0:ч2:ю(30,4),"ALPHABET":ю(30,6),"SCRAMBLE":ч1:ю(30,15),"SCORE:":ю(33,17),Q:Бж350:АX│1е26(2A(X)│Xл64:Л(5,З"SAVINGS AMOUNT =" Б(Iн100л.5)о100+H-Бж 97+R.Бе 98+r/Ю:а 210,1:Й"FINAL AMOUNT";F+Т0Й"INTEREST RATE";B:B│Bо1200+│1Й"YEARS COMPOUNDED";C:C│Cн12+╙2H│(FнB)о((1лB)п(Cл1)м(1лB))+ь3З:H│ Б(Hн100л.5)о100,4З"TO GET $";F;"REQUIRES,05З"MONTHLY DEPOSITS OF "; Р( И(H),2),G6З"FOR";Cо12;"YEARS,Q7Бж 97,[8Бе 98,}9Ю:а 210,1:Й"FINANCE AMOUNT";J,Э:Й"INTEREST RATE";B:B│Bо1200,╛;Й"DESIRED MONTHLY PAYMENT";K,┌L$│"##.#"-1?З"REQUIRE ";:З═L$;L;:З" MONTHLY PAYMENTS-;@Бж 97-FAБе 109-hBЮ:а 210,1:Й"FINANCE AMOUNT";J-ЗCЙ"INTEREST RATE";B:B│Bо100-еDЙ"FINANCE YEARS";M:M│Mн12-╞EK│Jн(Bо12)о(1м(1л(Bо12))пмM)-ЇFЗ:З"MONTHLY PAYMENT = $"; Б(Kн100л.5)о100-■GБж 97. HБе 109.+IЮ:а 210,1:Й"FINANCE AMOUNT";J.KJЙ"INTEREST RATE";B:B│Bо1200.dKЙ"MONTHLY PAYMENT";K.lLN│1.ЛMЙ"ENDING PAYMENT NUMBER";O.╖NP│1о((Bл1)пмO)н((Kн(((1лB)пмO)м1))оBлJ).╒OЗ:З"BALANCE AFTER PAYMENT.¤PЗ"NUMBER";O;"IS $"; Б(Pн100л.5)о100/>QQ│Pм(1о((Bл1)пм(Nм1))н((K(((1лB)пм(Nм1))м1))оBлJ))л(OмNл1)нK/aRЗ:З"ACCUMULATED INTEREST AFTER/СSЗ"PAYMENT NUMBER";O;"IS $"; Б(Qн100л.5)о100/ЫTБж 97/жUБе 109/╘VЮ:а 210,1:Й"DESIRED NUMBER OF PAYMENTS";R/ЇWЙ"INTEREST RATE";B:B│Bо12000XЙ"DESIRED MONTHLY PAYMENT";S0,YT│Sн(1м(1лB)пмR)оB0JZЗ:З"WITH PAYMENTS OF $";S0`[З"FOR";R;"MONTHS,0u\З"YOU CAN AFFORD0З]T$│"#####.##"0д^З"TO BORROW $";:З ═ T$;T0о_Бж 970╣`Бе 1091aЗ@484,"HIT ANY KEY TO CONTINUE";:АX│1508е1530:ТX, Ж(X)м64:Л:в44539:Р1HbЮ:а 195,2:З@5,"** SAVINGS PROGRAMS **":АX│1029е1050:ТX, Ж(X)м64:Л1rcЗ@64,"1) COMPOUND INTEREST ON SAVINGS1▒dЗ@128,"2) YEARS REQUIRED TO ACCUMULATE A DESIRED AMOUNT1╓eЗ@224,"3) FIND THE INTEREST RATE2fЗ@288,"4) FIND FINAL AMOUNT AFTER MONTHLY DEPOSITS2]gЗ@384,"5) MONTHLY DEPOSIT REQUIRED TO ACCUMULATE DESIRED AMOUNT2hЗ@483,"SELECT (1-5) OR mENU";2ФiA$│ Т:ЕA$│""з1052дjЕ A$│"M"з 22їkЕ A$│"1"з 11 :Д Е A$│"2"з 21 :Д Е A$│"3"з 31 :Д Е A$│"4"з 39 :Д Е A$│"5"з 473lБе 1053;mЮ:З@7,"** LOAN PROGRAMS **":АX│1031е1049:ТX, Ж(X)м64:Л3cnЗ@64,"1) HOW MANY PAYMENTS REQUIRED3КoЗ@128,"2) FIND LOAN PAYMENT AMOUNT3фpЗ@192,"3) FIND BALANCE & ACCUMULATED INTEREST AFTER X NUMBER OF PAYMENTS4qЗ@320,"4) FIND AFFORDABLE LOAN PAYMENT41rЗ@483,"SELECT (1-4) OR mENU";4FsA$│ Т:ЕA$│""з1154VtЕ A$│"M"з 24ЦuЕ A$│"1"з 57 :Д Е A$│"2"з 66 :Д Е A$│"3"з73 :Д Е A$│"4"з 864бvБе 115E & ACCUMULATED INTEREST AFTER X NUMBER OF PAYMENTS4qЗ@320,"4) FIND AFFORDA                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 :яE:ГCOPYRIGHT (C) T&D SOFTWARE 1991 silence syndrome ISSUE #111│└1:Ю8:X│ Д(м Я):МS(15),LO$(35):АX│1е35:НLO$(X):Л:LO│3:АX│1е10:НO$(X):НUO$(X):НOP$(X):Л:АX│1е10:O(X)│100:Л╥X1│ Д(5):X2│ Д(5):X3│ Д(5)>ЕX1│1 зRL$│RL$л"X" :Д Е X1│2 зRL$│RL$л"Y" :ДЕX1│3 зRL$│RL$л"V" :ДЕX1│4 зRL$│RL$л"M" :ДЕX1│5зRL$│RL$л"H"лЕX2│1 зRL$│RL$л"A" :Д Е X2│2 зRL$│RL$л"B" :ДЕX2│3 зRL$│RL$л"C" :ДЕX2│4 зRL$│RL$л"D" :ДЕX2│5 зRL$│RL$л"E"ЕX3│1 зRL$│RL$л"P" :Д Е X3│2 зRL$│RL$л"E" :ДЕX3│3 зRL$│RL$л"Z" :ДЕX3│4 зRL$│RL$л"G" :ДЕX3│5 зRL$│RL$л"Q"Ю8tЗ@101,"T H E S I L E N C E";:З@133,"S Y N D R O M E";:X$│RL$:RL$│"ITQ"░З@200,"BY: MIKE SNYDER";:З@293,"(C) 1991 T&D SOFTWARE";╧ АX│1024е1375:ТX, Ж(X)м64:Л З@389,"64K ALL TEXT ADVENTURE";:З@455,"G O O D L U C K";╤ ╔"V30T2O3L8FP255CP255GP255L4FP255L8CP255FP255GP255G+P255G+P255G+P255G+P255L16GT255P255T2FT255P255T2L8D+P255D+P255GP255FP255CP255GP255L4FP255L8CP255V28GP255V26L4FP255L8V24CP255V22GP255V20L4F"; ╔"T80;6;5;4;3;V-;2;1;V-;O2;12;V-;11;10;9;8;V-;7;6;5;4;3;V-;2;1;O1;12;11;V-;10;9;8;V-7;6;5;V6;4;3;2;1"J Ю:ЗLO$(LO)RN│0mАX│1е9:ЕO(X)│LO зN│1:ЛоЕN│1 ▒LO│23 зЗ"ITEMS IN THIS ROOM THAT INTERESTYOU INCLUDE:"╦АX│1е10:ЕO(X)│LO зЗO$(X)╤Л■ЕLO│23 зЗ"A COIN STUCK IN THE ROAD.":N│17ЕN│0 зЗ"YOU CAN SEE NOTHING WORTH MENTIONING."KАX│1е4:D(X)│0:Л╚ЕLO│6▒LO│7▒LO│10▒LO│11▒LO│12▒LO│14▒LO│15▒LO│17▒LO│19▒LO│21▒LO│22▒LO│23▒LO│24▒LO│26▒LO│30▒LO│31▒LO│33▒LO│34▒LO│35 зD(1)│1AЕLO│1▒LO│2▒LO│5▒LO│6▒LO│7▒LO│9▒LO│10▒LO│12▒LO│14▒LO│16▒LO│17▒LO│18▒LO│19▒LO│21▒LO│25▒LO│26▒LO│28▒LO│29▒LO│30 зD(2)│1вЕLO│2▒LO│4▒LO│6▒LO│7▒LO│9▒LO│12▒LO│19▒LO│21▒LO│22▒LO│23▒LO│26▒LO│27▒LO│28▒LO│29▒LO│32зD(3)│1ЕLO│3▒LO│5▒LO│7▒LO│8▒LO│10▒LO│13▒LO│20▒LO│22▒LO│23▒LO│24▒LO│27▒LO│28▒LO│29▒LO│30▒LO│33зD(4)│1ЕLO│12 ░S(5)│0 зD(2)│0:ЕLO│27 ░S(1)│0 зD(3)│0UЕLO│19 ░S(3)│0 зD(1)│0pЕLO│4 ░S(14)│1 зD(3)│0zC$│""ЦЕD(1)│1 зC$│C$л"NORTH "▓ ЕD(2)│1 зC$│C$л"SOUTH "═!ЕD(3)│1 зC$│C$л"EAST "ч"ЕD(4)│1 зC$│C$л"WEST"#ЕLO│4 ░S(14)│1 зC$│"DOWN"A$ЕD(1)│1 ░D(2)│1 ░D(3)│1 ░D(4)│1 зЗ"EXITS LEAD:"C$;:Бе38V%З"EXITS LEAD:"C$]&:Г╟'ЕLO│7 ░O(1)│0 ░S(7)│0 зЗ"YOU JUST STOLD A PIPE! YOU ARE ARRESTED. TRY NOT TO STEAL NEXT TIME.":Бе1336(ЕLO│7 ░O(7)│0 ░S(6)│0 зЗ"YOU JUST STOLD A PENCIL! YOU ARE ARRESTED. TRY NOT TO STEAL NEXT TIME.":Бе133░)ЕLO│21 ░O(10)│0 ░S(9)│0 зЗ"YOU JUST STOLD A PENCIL SHARP- ENER. YOU ARE ARRESTED. TRY NOT TO STEAL NEXT TIME.":Бе133*ЕLO│21 ░O(6)│0 ░S(8)│0 зЗ"YOU JUST STOLD A KEY. YOU ARE ARRESTED. TRY NOT TO STEAL NEXT TIME.":Бе133Х+ЕLO│18 ░O(1)│0 зЗ"SECURITY GUARDS SEE YOUR PIPE AND ASSUME YOU INTEND TO ROB THEBANK. YOU ARE TAKEN TO JAIL.":Бе133╢,MO│MOл1:З"MOVE"MO"IS:";:╗ЙA$-Е(A$│"N"▒A$│"NOR"▒A$│"NORTH") ░LO│23 ░O(3)│0 зЗ"YOU CAN'T GO INTO THE BANK WITH A STEREO!":Бе44R.Е(A$│"N"▒A$│"NOR"▒A$│"NORTH") ░D(1)│1 зLO│LOм5:Бе13К/Е(A$│"S"▒A$│"SOU"▒A$│"SOUTH") ░D(2)│1 зLO│LOл5:Бе13┴0Е(A$│"E"▒A$│"EAS"▒A$│"EAST") ░D(3)│1 зLO│LOл1:Бе13°1Е(A$│"W"▒A$│"WES"▒A$│"WEST") ░D(4)│1 зLO│LOм1:Бе13 32C│0:Е О(A$,3)│"GET"▒ О(A$,3)│"TAK"▒ О(A$,3)│"PIC" зC│1 [3Е О(A$,3)│"DRO"▒ О(A$,3)│"LEA" зC│2 У4Е О(A$,3)│"LOO"▒ О(A$,3)│"REA"▒ О(A$,3)│"EXA" з C│3 г5N│0:АX│1е10 ▀6ЕO(X)│LO ░C│1 ░ Ю(A$,UO$(X)) зЗO$(X)" TAKEN":O(X)│0:N│1!7ЕO(X)│0 ░C│2 ░ Ю(A$,UO$(X)) зЗO$(X)" DROPPED":O(X)│LO:N│1!J8ЕO(X)│0 ░C│3 ░ Ю(A$,UO$(X)) зЗOP$(X):N│1!X9Л:АX│1е10!╫:Е(LO│21▒LO│22▒LO│23▒LO│24) ░O(X)│LO зЗ"WHEN YOU DROP IT, A MAN THINKS YOU ARE GIVING IT TO HIM. HE TAKES IT.":O(X)│200!ч;Л:ЕN│1 з 44";<ЕLO│6 ░C│3░ Ю(A$,"SHE")░O(7)│100 зЗ"OBJECT ON THE SHELF: A PENCIL":O(7)│LO:Бе44"Р=ЕLO│11 ░O(1)│100 ░ Ю(A$,"SHE") ░C│3 зЗ"OBJECT ON THE SHELF: A PIPE":O(1)│LO:Бе44"Ё>ЕLO│13 ░C│3 ░ Ю(A$,"TRA") ░O(5)│100 зO(5)│LO:З"OBJECT BY THE TRACKS: A RAILROADSPIKE.":Бе44#Б?ЕLO│8 ░C│3 ░( Ю(A$,"TAP") ▒ Ю(A$,"SHE") ▒ Ю(A$,"COU")) ░O(2)│100 зЗ"YOU SEE A CASSETTE TAPE THAT IS SUPPOSED TO BE SUPER LOUD.":O(2)│LO:Бе44#√@Е( О(A$,3)│"HIT"▒ О(A$,3)│"BRE") ░ Ю(A$,"ARM") ░LO│12 ░O(1)│0 ░S(5)│0 зS(5)│1:З"YOU BREAK THEM SAVAGELY!":D(2)│1:Бе44$@AЕLO│1 ░ О(A$,3)│"BUY" ░O(4)┤▓0 зЗ"YOU HAVE NO MONEY, JACK!":Бе44$╘BЕLO│4 ░ О(A$,3)│"CLI" ░ Ю(A$,"LAD") ░S(14)│0 зS(14)│1:LO$(4)│"YOU ARE ATOP A LADDER. THERE IS A HATCH ON THE SIDE OF THE ROCK-ET, BY YOU.":Бе13%,CЕLO│1 ░O(1)│0 ░S(7)│1 ░ О(A$,3)│"BUY" ░ Ю(A$,"PIP") зЗ"YOU ALREADY BOUGHT IT!":Бе44%ДDЕLO│1 ░O(7)│0 ░S(6)│1 ░ О(A$,3)│"BUY" ░ Ю(A$,"PEN") зЗ"YOU ALREADY BOUGHT IT!":Бе44%ьEЕLO│1 ░ О(A$,3)│"BUY" ░S(7)│0 ░ Ю(A$,"PIP") ░O(4)│0 ░O(1)│0 зS(7)│1:З"YOU PAY THE MAN FOR IT.":Бе44&TFЕLO│1 ░ О(A$,3)│"BUY" ░S(6)│0 ░ Ю(A$,"PEN") ░O(4)│0 ░O(7)│0 зS(6)│1:З"YOU PAY THE MAN FOR IT.":Бе44&йGЕC│3 ░LO│3 ░ Ю(A$,"TAB") ░O(4)│100 зЗ"YOU SEE SOMEONE'S TIP MONEY.":O(4)│LO:Бе44'HЕC│3 ░ Ю(A$,"SHE") ░LO│16 ░O(10)│100 зЗ"OBJECT ON THE SHELF: A PENCIL SHARPENER.":O(10)│LO:Бе44'dIЕC│3 ░ Ю(A$,"SHE") ░LO│16 ░O(6)│100 зЗ"OBJECT ON THE SHELF: A KEY.":O(6)│LO:Бе44'┼JЕLO│16 ░ О(A$,3)│"BUY" ░ Ю(A$,"KEY") ░O(6)│0 ░O(4)│0 ░S(8)│0 зЗ"YOU PAY FOR IT.":S(8)│1:Бе44('KЕLO│16 ░ О(A$,3)│"BUY" ░ Ю(A$,"SHA") ░O(10)│0 ░O(4)│0 ░S(9)│0 зЗ"YOU PAY FOR IT.":S(9)│1:Бе44(gLЕLO│16 ░ О(A$,3)│"BUY" ░O(4)┤▓0 зЗ"YOU HAVE NO MONEY.":Бе44(▒MЕLO│16 ░ О(A$,3)│"BUY" ░O(4)│0 зЗ"YOU DON'T HAVE TO PAY FOR IT.":Бе44)NЕLO│18 ░C│3 ░ Ю(A$,"COU") ░O(8)│100 зO(8)│LO:З"OBJECT ON THE COUNTER: PAPER":Бе44)_OЕLO│27 ░S(10)│0 ░C│3 ░ Ю(A$,"DOO") зЗ"THERE IS A KEYHOLE. THE DOOR IS LOCKED.":Бе44)╣PЕLO│27 ░S(10)│0 ░ О(A$,3)│"UNL" ░ Ю(A$,"DOO") ░O(6)│0 зЗ"YOU UNLOCK IT.":S(10)│1:Бе44) QЕLO│27 ░S(10)│1 ░S(1)│0 ░C│3 ░ Ю(A$,"DOO") зЗ"IT IS CLOSED.":Бе44*]RЕLO│27 ░S(10)│1 ░S(1)│0 ░ О(A$,3)│"OPE" ░ Ю(A$,"DOO") зЗ"YOU OPEN IT.":S(1)│1:D(3)│1:Бе44+SЕC│3 ░ Ю(A$,"SHE") ░LO│32 зЗ"AS YOU ARE LOOKING, A SMALL BUT DEADLY SPIDER CRAWLS UP YOUR ARM AND PLACES A BITE ON YOUR NECK. THE RESULT IS QUICK AND PAINLESS. YOU DIE.":Бе133+pTЕLO│23 ░C│1 ░ Ю(A$,"COI") зЗ"YOU HAVE NOTHING TO PULL IT OUT OF THE TAR WITH.":Бе44+╖UЕLO│23 ░C│3 ░ Ю(A$,"COI") зЗ"IT'S STUCK IN THE ROAD ALRIGHT!":Бе44,VЕ Ю(A$,"CRA") ░ LO│32 ░C│3 ░ O(9)│100 зЗ"ALL ARE EMPTY EXCEPT ONE.":Бе44,FWЕLO│32 ░C│3 ░ O(9)┤▓100 ░ Ю(A$,"CRA") зЗ"ALL ARE EMPTY.":Бе44,ДXЕLO│32 ░ О(A$,3)│"OPE" ░ Ю(A$,"CRA") ░O(9)│100 з 89 :Д 92,ЪY╗Й"WITH WHAT-";A$-ZЕ Ю(A$,UO$(5)) ░O(5)│0 зЗ"YOU PRY THE LID OPEN. YOU NOW SEE THAT IT CONTAINS A COORD- INATE PAPER.":O(9)│LO:Бе44-.[З"IT WON'T OPEN.":Бе44-w\ЕLO│35 ░ О(A$,3)│"OPE" ░ Ю(A$,"CLO") зЗ"IT SEEMS TO BE JAMMED.":Бе44-┼]ЕLO│34 ░O(3)│100 ░( О(A$,3)│"PRY"▒ О(A$,3)│"LIF") ░ Ю(A$,"PLA") з94 :Д 97-█^╗Й"WITH WHAT-";A$.$_Е Ю(A$,UO$(1)) ░O(1)│0 зЗ"A STEREO IS UNDER THE FLOOR.":O(3)│LO:Бе44.@`З"IT WON'T BUDGE.":Бе44.┤aЕ О(A$,3)│"ROB" ░LO│18 зЗ"YOU FEEBLEY TRY TO STEAL MONEY, BUT YOU ARE CAUGHT AND PUT IN JAIL. TOO BAD.":Бе133/dbЕLO│19 ░  О(A$,3)│"SHO" ░( Ю(A$,"PAP") ▒ Ю(A$,"PAS")) ░O(8)│0 ░S(2)│1 ░S(3)│0 зЗ"THE GUARD SHOWS YOU ANOTHER SIGN THAT SAYS 'OKAY. YOU MAY PASS.'":D(1)│1:S(3)│1:Бе440;cЕLO│19 ░( О(A$,3)│"HIT"▒ О(A$,3)│"KIL"▒ О(A$,3)│"KIC" ▒ О(A$,3)│"PUN") ░ Ю(A$,"GUA") зЗ"YOU ARE SENT TO A MENTAL HOSP- ITAL AND PUT IN A PADDED CELL WHERE YOU CAN HURT NO ONE- INCLUDING YOURSELF.":Бе1330ЪdЕLO│25 ░C│3 ░ Ю(A$,"COM")░S(13)│0 зЗ"THERE IS A BUTTON IN THE BACK. (IT'S A COCO 3)":Бе441IeЕLO│25 ░ О(A$,3)│"PUS" ░ Ю(A$,"BUT") ░S(13)│0 зS(13)│1:З"THE DISK DRIVE BUZZES AS A RESULT OF BUILT IN HARDWARE AND A 3 LETTER WORD APPEARS ON THE SCREEN.":Бе441еfЕLO│25 ░ О(A$,3)│"LOO" ░( Ю(A$,"COM") ▒ Ю(A$,"SCR"))░S(13)│1 зЗ"THE MESSAGE IS "X$:Бе442gЕS(9)│1 ░ О(A$,3)│"SHA" ░ Ю(A$,"PEN") ░O(7)│0 ░O(10)│0 зЗ"YOU SHARPEN IT":OP$(7)│"IT IS SHARP.":S(12)│1:Бе442\hЕ О(A$,3)│"WRI" ░O(7)│0 ░S(12)│0 зЗ"THE PENCIL IS TOO DULL.":Бе442▒iЕ О(A$,3)│"WRI" ░O(7)│0 ░S(12)│1 ░O(8)┤▓0 зЗ"YOU HAVE NOTHING TO WRITE ON.":Бе442ЄjЕ О(A$,3)│"WRI" ░O(7)│0 ░S(12)│1 ░O(8)│0 ░S(2)│0 з107 :Д 1103k╗Й"WHAT WILL YOU WRITE-";A$3]lЕA$│X$ зЗ"YOU WRITE IT DOWN.":OP$(8)│"A MESSAGE IS ON IT.":S(2)│1:Бе443аmЗ"DON'T WRITE THAT. YOU WOULD JUST WASTE YOUR PAPER.":Бе444'nЕLO│15 ░ О(A$,3)│"SHO" ░ Ю(A$,"COO") ░O(9)│0 зЗ"SOMEONE NODS AND WRITES DOWN A MESSAGE THAT THEY ARE LAUNCHING THE MISSLE.":Бе1354xoЕLO│4 ░S(14)│1 ░(A$│"D"▒A$│"DOW"▒A$│"DOWN") зS(14)│0:П:АX│1е4:НLO$(X):Л:Бе134ЇpЕLO│4 ░S(14)│1 ░C│3 ░ Ю(A$,"HAT") зЗ"IT IS OPENED. IT WILL AUTO- MATICALLY CLOSE WHEN THE ROCKET IS LAUNCHED.":Бе445aqЕ О(A$,3)│"PUT" ░ Ю(A$,"STE") ░O(3)│0 ░LO│4 ░S(14)│1 зЗ"YOU PUT IT IN THE ROCKET.":S(15)│1:O(3)│200:Бе445╢rЕO(3)│0 ░ О(A$,3)│"SET" ░ Ю(A$,"STE") зЗ"YOU SET IT FOR DELAY PLAY.":S(4)│1:Бе446!sЕ О(A$,3)│"PUT" ░ Ю(A$,"TAP") ░O(2)│0 ░O(3)│0 зЗ"YOU PUT IT IN THE TAPE PLAYER.":S(11)│1:O(2)│200:Бе446ftЕA$│"INV"▒A$│"INVENTORY"▒A$│"I"▒A$│"IN"▒A$│"INVENT" з 117 :Д 1226ВuЗ"YOU HAVE":N│0:АX│1е106ЪvЕO(X)│0 зЗO$(X):N│16аwЛ6╢xЕN│0 зЗ"NOTHING."6┐yБе4477zЕ О(A$,3)│"SAY" ▒ О(A$,3)│"TAL" ▒ О(A$,3)│"ASK" ▒ О(A$,3)│"SPE" зЗ"WHEN YOU TRY TO TALK, THE SOUND VAPORIZES.":Бе447\{ЕC│1 зЗ"YOU CANNOT GET IT.":Бе447Д|ЕC│2 зЗ"CHECK YOUR INVENTORY.":Бе447й}ЕC│3 зЗ"IT LOOKS ORDINARY.":Бе448~Е(A$│"H"▒A$│"HEL"▒A$│"HELP") зЗ"YOU NEED TO SEND SOMETHING INTO THE SPACE CLOUD TO DISRUPT IT.":Бе448BЕ О(A$,3)│"BUY" зЗ"IT'S NOT FOR SALE.":Бе448iАЕ О(A$,3)│"PAY" зЗ"TRY 'BUY'":Бе448╗БЕ О(A$,3)│"FUC"▒ О(A$,3)│"SHI"▒ О(A$,3)│"DAM" зЗ"DON'T CUSS, YOU IDIOT!":Бе449TВЕ О(A$,3)│"CLI" ▒ О(A$,3)│"JUM" ▒ О(A$,3)│"EAT"▒ О(A$,3)│"KIL"▒ О(A$,3)│"HIT"▒ О(A$,3)│"STE"▒ О(A$,3)│"WRI"▒ О(A$,3)│"USE" зЗ"YOU CAN'T DO IT.":Бе449ЗГЕ Ю(A$," ")│0 зЗ"I USUALLY NEED 2 WORDS.":Бе449╠ДЗ"EASY FOR YOU TO SAY, BUT IMPOSSIBLE FOR ME TO DO.":Бе44:ЕЗ"G A M E O V E R":╗Й"PLAY AGAIN-";A$:ЕA$│"Y"▒A$│"YES" зО :Д К:О:ЖК:ЗЗЕS(4)│0 ░S(15)│1 зЗ"THE STEREO WASN'T SET. YOU DIDN'T STOP THE SPACE CLOUD. YOU HAVE LOST.":Бе133:═ИЕS(15)│0 зЗ"THE STEREO WASN'T IN THE ROCKET.YOU HAVE LOST!":Бе133;0ЙЕS(15)│1 ░S(4)│1 ░S(11)│0 зЗ"YOU FORGOT TO PUT THE TAPE IN THE STEREO. YOU JUST LOST!":Бе133;SКЕS(15)│1 ░S(4)│1 ░S(11)│1 з140;\ЛБе44;═МЗ"THE STEREO GOES UP WITH THE ROCKET. IT GOES OFF, AND THE SILENCE CLOUD EXPLODES. YOU HAVE WON!"";A$:Ю:З"GOOD JOB!":К:О>ТЖ "YOU ARE AT THE CHECKOUT COUNTER IN THE DEPARTMENT STORE. A MAN IS BEHIND IT WAITING FOR MORE CUSTOMERS.","YOU ARE ON A SILENT STREET. THERE IS A FIRE HYDRANT HERE."?UУЖ "YOU ARE IN THE CAFE. THERE ARE TABLES ALL AROUND. PEOPLE ARE EATING STRANGELY.. THERE IS NO NOISE AT ALL. IT'S AS IF YOU WERE DEAF, BUT YOU KNOW THAT EVERYONE IS EXPERIENCING THE SAME SILENCE."@ФЖ "YOU ARE BY A MASSIVE ROCKET. A LADDER LEADS UP THE SIDE. THERE IS A SMALL HATCH TOWARD THE TIP OF THE ROCKET.","YOU ARE WALKING ALONG ON A WIND-ING DRIVEWAY."@хХЖ "YOU ARE IN THE DEPARTMENT STORE.THERE ARE MANY SHELVES HERE, ANDA DOOR TO THE EAST.","YOU ARE ON THE STREET. THERE IS A LOOSE MANHOLE COVER HERE.","THIS IS THE RECORD STORE. THE TAPES ARE IN A SHELF ON THE COUNTER."A│ЦЖ "YOU ARE WALKING ALONG ON A WINDING DRIVEWAY.","YOU ARE ON THE WINDING DRIVE... A BUILDING IS TO THE SOUTH.","YOU ARE AT THE BACK OF THE DEPARTMENT STORE. THERE ARE SHELVES HERE, ALSO."BkЧЖ "YOU ARE ON THE N-S STREET. YEL- LOW/BLACK ARMS ARE IN FRONT OF YOU, IN FRONT OF A TRAIN TRACK. A BLINKING RAILROAD CROSSING LIGHT IS ON, BUT THERE IS NO TRAIN IN SIGHT."C"ШЖ "YOU ARE ON THE RAILROAD TRACK. IT WOULD BE SENSELESS TO KEEP FOLLOWING IT TO THE EAST.","YOU ARE ON A DRIVEWAY THAT LEADSNORTH AND WINDS. IT ALSO LEADS SOUTH TO THE ROAD."C▄ЩЖ "YOU ARE IN THE MISSLE LAUNCH CONTROL ROOM. THE LAUNCH PERS- ONNEL ARE SHOWING SIGNS TO EACH OTHER AND NODDING. ONE MAN WEARING HEADPHONES IS TURNING DIALS ON A PANEL."DБЪЖ "YOU ARE IN A PAWN SHOP. AN OLD MAN IS SITTING IDLEY IN A CHAIR READING SOME MAGAZINE. HE MUST OWN THE SHOP. THERE ARE MANY SHELVES THROUGHOUT THE SHOP."ENЫЖ "YOU ARE ON A N-S STREET. NORTH ARE BROKEN RAILROAD ARMS. TO THE SOUTH IS AND EAST-WEST STREET.","YOU ARE IN THE BANK. THERE ARE FOUR COUNTERS. FOUR BANK TELLERSARE ATTENDING TO BUSINESS."E▌ЬЖ "YOU ARE AT A GATE. A SIGN READS 'GHEFFORD MISSLE LAUNCH PAD.' A GUARD IS HERE HOLDING A SIGN THAT READS 'SHOW ME THE PASS WORD.'"FвЭЖ "YOU ARE IN THE PARKING LOT. A BLUE CAMERO IS HERE WITH THE WINDOW ROLLED DOWN.","YOU ARE AT THE END OF THE STREET. A HIGHWAY GOES SOUTH AND SOME SORT OF SHOP IS TO THE NORTH."GLЮЖ "YOU ARE ON THE STREET. ANOTHER ROAD GOES NORTH. A LOCKED GATE IS TO THE SOUTH.","YOU ARE ON THE ROAD. A BANK IS TO THE NORTH. THE STREET GOES EAST AND WEST."H4ЯЖ "YOU ARE AT THE EAST END OF THE STREET. NORTH IS A SMALL ROAD LEADING TO A GATE.","YOU ARE IN A ROOM WITH A COMP- UTER ON A DESK BY ONE WALL. THERE IS ALSO A WINDOW TO THE EAST OVERLOOKING A LARGE AMUSE- MENT PARK."IаЖ "YOU ARE ON THE HIGHWAR. A PATH LEADING TO A BUILDING IS THE THE EAST.","YOU ARE BY THE DOOR OF A WARE- HOUSE. A PATH GOES WEST TO THE HIGHWAY.","YOU ARE IN THE ENTRANCE HALL. A LOCKED DOOR IS TO THE NORTH."IЯбЖ "YOU ARE IN A HALL. THERE IS AN OPEN DOOR SOUTH AND A LOCKED DOOR TO THE NORTH. WEST IS THE MAIN ENTRANCE HALL OF THE WARE- HOUSE."JРвЖ "YOU ARE AT THE END OF THE HALL. NORTH AND SOUTH ARE LARGE ROOMS AND THE HALL GOES WEST.","YOU ARE ON THE HIGHWAY. A BUILD-ING IS EAST WITH A SIGN ON THE DOOR READING 'SORRY: CLOSED'. IT WOULD BE SENSELESS TO GO FURTHER SOUTH."K{гЖ "YOU ARE IN A HUGE STORAGE ROOM. THERE ARE CRATES SCATTERD AROUNDAND EMPTY SHELVES ON THE WEST WALL.","YOU ARE AT THE END OF A SMALL HALL. A STORAGE ROOM IS WEST. ON THE SOUTH WALL IS A NUMBER PAD USED TO OPEN THE DOOR."LдЖ "YOU ARE IN A SMALL STORAGE ROOM WITH A LOOSE PLANK IN THE FLOOR","YOU ARE IN A LARGE STORAGE ROOM.THERE IS A CLOSET IN THE EAST WALL. IT IS CLOSED."L╞еЖ A LEAD PIPE,PIP,IT IS A LARGE LEAD PIPE THAT LOOKS LIKE IT COULD BREAK THINGS,A CASSETTE TAPE,TAP,"IT IS GURANTEED TO BE LOUD, BRAIN-BUSTING ROCK MUSIC."MzжЖ A PORTABLE STEREO,STE,THE STEREO HAS A COMPUTER BUILT IN THAT CAN BE SET FOR DELAY PLAY. YOU CAN SET IT TO GO OFF AT A PREDEFINED TIME AND PLAY WHATEVER TAPE IS IN IT.MнзЖ SOME MONEY,MON,YOU HAVE A LOT OF MONEY LEFT.N;иЖ A RAILROAD SPIKE,SPI,IT IS A GOOD SIZED SPIKE,A SKELETON KEY,KEY,IT IS LARGE AND CAN ONLY BE USEDTO UNLOCK DOORS WITH LARGE LOCKS.NюйЖ A PENCIL,PEN,THE LEAD IS DULL.,A PIECE OF PAPER,PAP,IT IS BLANK,COORDINATE PAPER,COO,THERE ARE COORDINATE NUMBERS ON IT.,PENCIL SHARPENER,SHA,IT IS USED TO SHARPEN PENCILS.KEY,IT IS LARG                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 2500 1.3 50 ╗у╗у╗у)у╗у╗aТaТaТaТaТaТaТaТaТaТaТaТaТaТaТaТу╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗у╗DDDDDDDDDDDDDDDDЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmDDDDDDDDDDDDDDDDЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮmЮm}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓}╓   E,JULY,AUGUST,SEPTEMBER,OCTOBER,NOVEMBER,DECEMBER'T:Е  Ж(&HC000)│68 з DN│1 :Д DN│м1't<Ю:З:З" mr bill":З(=З" MR BILL IS A PERSONAL BILL TRACKING SYSTEM. WITH IT, YOU CAN GET QUICK BALANCES LIST- INGS FOR ALL OF THE COMPANIES YOU GET BILLED BY."(Г>З" IT CAN ALSO PROVIDE A QUICK MONTH BY MONTH ANALYSIS SO YOU SEE TRENDS IN YOUR SPEND- ING HABITS."(▐?З" MR BILL WORKS EQUALLY WELL WITH TAPE OR DISK. PRINT-OUTS ARE ALSO SPPORTED."(ъAБж 9000)╚FЮ:З@96:З" L. LOAD DATA FILE S. SAVE DATA FILE A. ADD NEW COMPANY B. SHOW BALANCE M. MONTHLY BILLS T. TRANSACTIONS Q. QUIT")▀KK$│ Т:ЕK$│"" Бе 75*LP│ Ю("LSABMTQ",K$):ЕP│0 Бе 75*&MИ P Бе 80,90,100,200,300,400,990*@PБж 10000:ЕF$│"" Бе 70*XQЩ"I",#DN,F$:Й#DN,NC*gRА I│1 е NC*yS╗ Й#DN,CN$(I)*ИTЙ#DN,BL(I)*жUА J│1 е 12:Й#DN,MN(I,J):Л*┼VА J│1 е ME:╗Й#DN,T$(I,J):Л*╦WЛ*┌YЪ#DN:Бе 70*ЇZБж 10000:ЕF$│"" Бе 70+ [Щ"O",#DN,F$:З#DN,NC+\А I│1 е NC+6]З#DN,CN$(I):З#DN,BL(I)+S^АJ│1 е 12:З#DN,MN(I,J):Л+q_А J│1 е ME:З#DN,T$(I,J):Л+w`Л+ЖcЪ#DN:Бе 70+ТdЮ:З@196+└fЗ" COMPANY NAME: ";:╗ Й NC$:ЕNC$│"" Бе 70+╪hNC│NCл1:CN$(NC)│NC$,iЗ" CURRENT BALANCE: ";:╗ Й N$:BL(NC)│ Й(N$),%jА I│1 е ME:T$(NC,I)│"":Л,/wБе 70,I╚Е NC│0 з Бж 800:Бе 70,R╔AF│1,^╩Бж 2000,d╥Ю,j╘З,s╓TL│0,м▄Е K$│" " з А I│1 е NC:Бж 280:Л :Д I│ К(K$)м64:Бж 280,▀сЕK$│" " з З:I│0:CN$(I)│"TOTAL":BL(I)│TL:Бж 280,ёцБж 9000:Бе 70-"З═" % % #####.##";CN$(I);BL(I)-2TL│TLлBL(I)-8Р-R,Е NC│0 з Бж 800:Бе 70-c.AF│1:Бж 2000-w0Е K$│" " Бе 350-И5ZZ│ К(K$)м64-О6Ю-а:З" ";CN$(ZZ)-ж<З-╡@А I│1 е 12-цBЗ═" % % #####.##";MN$(I);MN(ZZ,I)-ьDЛ-■JБж 9000:Бе 70. ^А I│1 е 12.`MN(0,I)│0.*bА J│1 е NC.FcMN(0,I)│MN(0,I)лMN(J,I).NdЛ J.UfЛ .thCN$(0)│"TOTAL":ZZ│0:Бе 310.ОРЕ NC│0 з Бж 800:Бе 70.ЯХAF│0:Бж 2000.░ЧZZ│ К(K$)м64.╠ЪЮ:З:З" ";CN$(ZZ):З@160/aЬЗ" B. ADD AMOUNT BILLED P. ADD AMOUNT PAYED L. LIST TRANSACTIONS H. PRINT TRANSACTIONS Q. QUIT"/yдK$│ Т:ЕK$│"" Бе 420/ОжP│ Ю("BPLHQ",K$)/ЮзЕP│0 Бе 420/╗йИ P Бе430,440,450,460,70/щоЮ:З@228,"AMOUNT: ";:╗ Й A$:Е A$│"" Бе 4100,пЮ:З@228,"DATE (MM/DD/YY): ";:╗ Й D$:M│ Й( О(D$,2)):Е M┤1 з M│109░A│ Й(A$)0K▒Е M▓12 з M│120_▓BL(ZZ)│BL(ZZ)лA0j│Бж 8500Т┤T$(ZZ,PP)│"BILLED ON "лD$л" "л И(A)0к╡MN(ZZ,M)│MN(ZZ,M)лA0╡╖Бе 4100с╕Ю:З@228,"AMOUNT: ";:╗Й A$:ЕA$│"" Бе 4101╣Ю:З@228,"DATE (MM/DD/YY): ";:╗Й D$1║A│ Й(A$)1)╝BL(ZZ)│BL(ZZ)мA14╜Бж 8501]╛T$(ZZ,PP)│"PAYED ON " лD$л" "л И(A)1h┴Бе 4101p┬Ю:З1y─LC│01И┼А I│1 е ME1░╞Е T$(ZZ,I)┤▓"" з З T$(ZZ,I):LC│LCл11╧╟Е LC│12 з Бж 9000:Ю:З:LC│01╒╚Л1ш╔Е LC з Бж 90001є╦Бе 4101¤╠PD│м22 ╬А I│1 е ME2/╤Е T$(ZZ,I)┤▓"" з З#PD,T$(ZZ,I)2<╒Л:Бе 4102f Ю:З@226,"PLEASE ADD A COMPANY FIRST."2r"Бж 90002x)Р2нRPP│ME:А II│1 е ME:Е T$(ZZ,II)│"" з PP│II:II│10002│SЛ2╣TР2╫▐Ю:З@232,"OK TO QUIT? Y/N"2ярK$│ Т:ЕK$│"N" Бе 703сЕK$┤▓"Y" Бе 9923 чЮ:К3╨Ю3╥FF│13)╘А I│1 е 263C╓Е FF з З:FF│0:Бе 20103L╪FF│13u┌З═"(!) % % "; Л(Iл64);CN$(I);3{▄Л3Ц▌З@482,"";:Z$│ Л(NCл64)3▐▐Е AF з З" SELECT (A-"Z$") SPACE=ALL"; :Д З" SELECT (A-"Z$")";3ўфK$│ Т:ЕK$│"" Бе 20204цЕ K$│" " ░ AF│1 з Р41юЕ K$▓│"A" ░ K$┤│ Л(NCл64) з Р4=ўБе 20204d#(З@484,"PRESS ANY KEY TO CONTINUE";4w#*Е Т│"" Бе 90024}#,Р4а'Ю:З@228,"FILENAME: ";:╗ Й F$:Р4нъ`└1:Бе 50Z$") SPACE=ALL"; :Д З" SELECT (A-"Z$")";3ўфK$│ Т:ЕK$│"" Бе 20204цЕ K1е10:Зд7)"";:З═"## % % ###,###";T,I$(T);S(T):Л:З:Зд8)"PRESS "5V;Е Т┤▓ Л(13)з595w:Г******INITIALIZATION******5л?:ГCLS5╡@Х15005█AMO│0:WK│0:DA│0:MN│0:MI│0:A│8:RT│06BМ CT$(30),PD$(6),PD(6),WT(6),RT(6),DT(30,30),MN$(12),DA$(7)6JCА J│1е30:Н CT$(J):Л::ГREAD IN CITY STRING$6ЖDАJ│1е6:НPD$(J),WT(J):Л::ГREAD IN PROCUCT$,WEIGHT$,RATE$6░EАJ│0е11:НMN$(J):ЛJ:АJ│0е6:Н DA$(J):ЛJ6ЎFАJ│1е30:АX│1е30:Н DT(J,X):ЛX:ЛJ::Г READ IN MILAGES BETWEEN CITIES7sGM1$│"O3T200L10CC#DE-EFF#GGG#AA#BO4CC#DE-EFF#":M2$│"V31T10O1L4CL200O4BA#AG#GF#FEE-DCO3BA#AG#GF#FEE-DCO2BA#AG#GF#FEE-DC#C"7хHM3$│"T15V15L4O4ED#ED#EO3BO4DCL4O3AP4":M4$│"T2P4V25L16O4CDGL8O5CL16O4AL4O5C":M5$│"T2O3V31L10AV16AV8AV3AV1L20A"7ЄIТ65494,08JАJ│1е5:АY│1е20:╔"V31T25L25O1ABAB":ЛY:ЛJ8>K:Г***START MAIN PROGRAM****8kLЮ:Зд4)"YOUR NAME PLEASE":Зд7);:ЙNM$:╔M5$8ОMЮ:З:Зд6)"< TRACTOR SELECTION>"8╢NЗ:З:Зд3)"(1) NEW KENWORTH AREODINE"8┌OЗ:Зд3)"(2) 2 YR OLD PETERBUILT"9PЗ:Зд3)"(3) 4 YR OLD FREIGHTLINER"9QЗ:Зд7)"WHICH ONE <1-3>";9>RI$│ Т:ЕI$│""з82 :Д TK│ Й(I$)9\SЕ TK┤1 ▒ TK▓3 з ╔M2$:Бе779ТTЕTK│1 з TP│3000 :ДЕTK│2 зTP│2500 :ДЕTK│3 зTP│20009┬UЕ TK│1 зMP│6 :Д Е TK│2 зMP│5:ДЕTK│3 зMP│4.59¤VЕ TK│1 зTR│100000 :ДЕTK│2 зTR│80000 :ДЕ TK│3з TR│60000:W:Г***PUT MUSIC HERE*******:гXЮ:З:З"OK "NM$:З"WE WILL START YOU OUT IN KANSAS CITY MO. THIS WILL BE YOUR HOMETERMINAL THROUGHOUT THIS SESSION GOOD LUCK!!":┼YЗ:Зд3)"PRESS TO CONTINUE":█ZA$│ Т:ЕA$┤▓"C"з90:ю[╔M5$:╔M3$:╔M4$;\:Г*******MAIN LOOP*********;']╔ M5$:ЕMN▓│12 з Бе41;░^Ю:З"MONTH:";MN$(MN);" DAY OF WEEK:"DA$(DA):Зд7)"CASH=";:З═"$##,###.##";MO:Зд5)" MN";MN;" WK";WK;" DA";DA:ЗNM$" YOU ARE IN ":ЗCT$(A);╙_З"******LOADS AVAILABLE******"<6`J│ Д(9):Е J┤4 з З" no loads available today":АX1│1е1500:ЛX1:ZZ│ZZл25:╔M2$:DA│DAл1:Бж118:Бе92<╫aDB│Jм4:АY│1еDB:B│ Д(30):ЕDB┤2 ░ A│B з З" no loads available today":АX1│1е1500:ЛX1:ZZ│ZZл25:╔M2$:DA│DAл1:Бж118:Бе92 :ДЗY">";CT$(B);:Зд24)DT(A,B):D(Y)│B:ЛY=bЗ:Зд7)"[ WHICH ONE ]?":Е DB┤1 з DB│1=$cI$│ Т:K│ Й(I$):ЕK┤1 ▒ K▓DB з 99=<dDA│DAл1:╔M5$:Z│D(K)=beMI│DT(A,Z):DA│DAл Б(MIо500):Бж114=╒fЮ Д(9)м1:W│ Д(6):ЗNM$:З"YOU HAVE A LOAD OF "PD$(W):З"GOING TO: ";CT$(Z):З"WEIGHING "(WT(W)н1000)" POUNDS":╔M3$=юgRT│((50л Д(50))о100)>)hЗ"PAYING ";:З═"$#.##";RT;:З" PER MILE":Е RT▓.9 з ╔ M4$>;iMO│MOл(MIнRT)>KjАJ│1е1500:Л>YkБж122:A│Z>blБе92>╪mBB│ Д(TR):ЕBB┤100 з З"YOU BLEW A TIRE!!":J│ Д(100)л300:MO│MOмJ:З"NEW TIRE COST $"J:TR│TRл40000:╔M2$:АX1│1е500:ЛX1>▐nР?eoBB│ Д(200):ЕBB┤10 з З"YOU HAD A BREAK DOWN!!":J│ Д(500)нTK:З"COST TO FIX $"J:MO│MOмJ:АJ│1е500:ЛJ:а150,1:а10,1:а150,1:АX1│1е500:ЛX1?┼pBB│ Д(200):ЕBB┤10 зЗ"PERMITS TO BUY";:J│ Д(100):MO│MOмJ:З"$"J:АJ│1е500:Л:╔M2$:АX1│1е500:ЛX1@3qBB│ Д(200):ЕBB┤10 зЗ"YOU HAD A SPEEDING TICKET":╔M2$:J│ Д(50)л50:З"IT COST $"J:MO│MOмJ:АJ│1е500:ЛJ:Р :Д Р@Qr:Г***DAYS ON THE ROAD****@БsЕ DA▓6 з DA│DAм7:WK│WKл1:Бж116:Бж136:Р :Д РAtЕ WK▓│4 з WK│0:MN│MNл1:MO│MOмTP:а125,10:а10,15:З"TRUCK PAYMENT OF $"TP" PAID!":╔M2$:АJ│1е500:ЛJ:З"INSURANCE PAID $";850:╔M2$:MO│MOм850:АJ│1е1000:ЛJA+uАJ│1е1000:Л:РAIv:Г****YOU SAT ONE DAY****AЎwЮ:З NM$:З"YOU DIDN'T GET LOADED TODAY SO YOU HAD TO SIT. IT STILL COST $25 FOR EXPENSES THIS DAY. PERHAPS YOU WILL GET LOADED TOMORROW. YOU BETTER HOPE SO "BxMO│MOм25B#yАJ│1е1500:ЛJ:а125,3:Бж114:РBDz:Г*****REM TRIP REPORT******Bb{З"******TRIP REPORT*****"Bk|╔M5$BТ}З"INCOME :";:З═"$#,###.##";(MIнRT)B▒~DF│( Б(MIоMP))н( Д(50)л80)B┐DF│DFо100BьАЗ:З"FUEL COST ";:З═"$###.##";DF:MO│MOмDFC БTR│TRм(MIн2):ЕTR┤0зTR│100CВБж109:Бж111C5ГZA│ Б(MIо500):ZA│ZAн20CBДMO│MOмZAChЕЗ"MEALS ETC";:З═"$###.##";ZA:ZA│0CxЖАJ│1е1500:ЛC~ЗРCМИ╔M1$:╔M5$CТЙРC√КЖ SAN FRANCISCO CA.,LOS ANGELES CA.,PORTLAND OR.,DENVER CO.,SALT LAKE CITY UT.,PHOENIX AZ.,DALLAS TXD{ЛЖ KANSAS CITY MO.,NEW ORLEANS LA.,LITTLE ROCK AK.,ST. LOUIS MO.,DES MOINES IA.,MINNEAPOLIS MN.,DETROIT MI.,INDIANAPOLIS IN.EМЖ COLUMBUS OH.,LOUISVILLE KY.,NASHVILLE TN.,BIRMINGHAM AL.,MIAMI FL.,ATLANTA GA.,CHARLOTTE NC.,NORFOLK VA.,BALTIMORE MD.,PITTSBURGH PA.EOНЖ PHILLIDELPHIA PA.,JACKSON MS.,CHICAGO IL.,BOSTON MA.,NEW YORK NY.EбОЖ PAPER,45,CANNED GOODS,45,CLOTHING,15,MACHINE GOODS,45,APPLIANCES,15,MAIL,20EєПЖ jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec,sun,mon,tue,wed,thu,fri,satFР:ГSAN FRANCISCOFЬСЖ 0,387,637,1255,752,762,1752,1861,2278,1987,2118,1825,1979,2399,2289,2426,2346,2325,2365,3093,2483,2721,3001,2823,2609,2902,2151,2173,3128,2930FоТ:ГLOS ANGELESGCУЖ 387,0,962,1031,691,389,1399,1577,1858,1687,1836,1709,1857,2288,2063,2242,2182,2011,2052,2716,2191,2412,2685,2647,2430,2703,1818,2048,3017,2794GRФ:ГPORTLANDGшХЖ 637,962,0,1261,763,1268,2043,1820,2536,2189,2057,1816,1724,2384,2237,2441,2313,2369,2586,3257,2664,2779,2968,2797,2549,2859,2446,2117,3144,2914GїЦ:ГDENVERHЖЧЖ 1255,1031,1261,0,534,813,784,606,1277,941,863,671,917,1283,1063,1241,1119,1184,1325,2107,1430,1580,1766,1643,1427,1739,1198,1021,1998,1794HЫШ:ГSALT LAKE CITYI/ЩЖ 752,691,763,534,0,646,1257,1105,1775,1438,1362,1070,1186,1671,1566,1682,1618,1703,1791,2566,1934,2083,2223,2067,1924,2154,1656,1417,2376,2189I=Ъ:ГPHOENIXI╥ЫЖ 762,389,1268,813,645,0,1002,1235,1496,1325,1481,1432,1677,2008,1725,1903,1751,1674,1677,2348,1827,2034,2349,2312,2087,2374,1458,1742,2670,2445I▀ЬВ DALLASJjЭЖ 1752,1399,2043,784,1257,1002,0,505,517,316,655,703,949,1156,892,1049,828,659,635,1343,822,1058,1351,1357,1208,1443,407,921,1753,1559JАЮ:Г KANSAS CITY MOKЯЖ 1861,1577,1820,606,1105,1235,505,0,839,423,257,197,443,769,501,680,513,578,725,1441,822,974,1160,1070,870,1170,686,542,1435,1233Kа:ГNEW ORLEANSKгбЖ 2278,1858,2536,1277,1775,1496,517,839,0,417,698,982,1346,1070,802,915,701,532,346,860,480,722,1039,1135,1138,1229,206,919,1507,1335K╡в:ГLITTLE ROCKL<гЖ 1987,1687,2189,941,1438,1325,316,423,417,0,396,560,825,877,609,728,514,346,427,1161,552,778,1023,1042,898,1136,264,657,1507,1250LKд:ГST LOUISL╬еЖ 2118,1836,2057,863,1362,1481,655,257,698,396,0,370,630,534,244,422,256,321,512,1226,565,731,903,828,609,904,497,289,1207,976L▀ж:ГDES MOINESMgзЖ 1825,1709,1816,671,1070,1432,703,197,982,560,370,0,245,587,479,662,588,693,826,1591,955,1061,1146,1039,776,1094,825,344,1337,1118Myи:ГMINNEAPOLISNйЖ 1979,1857,1724,917,1186,1677,949,443,1346,825,630,245,0,685,593,778,705,833,1068,1769,1121,1151,1232,1113,887,1195,1055,410,1390,1217Nк:ГDETROITNШлЖ 2399,2288,2384,1283,1671,2008,1156,769,1070,877,534,587,685,0,284,193,382,543,756,1385,732,630,727,514,296,609,957,275,799,649Nлм:ГINDIANAPOLISO.нЖ 2289,2063,2237,1063,1566,1725,892,501,802,609,244,479,593,284,0,177,114,283,478,1186,527,551,705,569,364,659,672,185,929,731O@о:ГCOLUMBUS OHO─пЖ 2426,2242,2441,1241,1682,1903,1049,680,915,728,422,662,778,193,177,0,214,383,574,1171,585,435,563,425,186,477,800,358,801,556O╒░:ГLOUISVILLEPX▒Ж 2346,2182,2313,1119,1618,1751,828,513,701,514,256,588,705,382,114,214,0,174,360,1088,415,456,647,639,393,706,586,297,962,766Ph▓:ГNASHVILLEPы│Ж 2325,2011,2369,1184,1703,1674,659,578,532,346,321,693,833,543,283,383,174,0,194,910,246,421,672,702,567,787,414,466,1092,900P№┤:ГBIRMINGHAMQА╡Ж 2365,2052,2586,1325,1791,1677,635,725,346,427,512,826,1068,756,478,574,360,194,0,754,150,391,708,771,788,868,245,657,1226,978QП╢:ГMIAMI FLR!╖Ж 3093,2716,3257,2107,2566,2348,1343,1441,860,1161,1226,1591,1769,1385,1186,1171,1088,910,754,0,663,740,971,1094,1180,1230,912,1397,1520,1334R/╕:ГATLANTAR│╣Ж 2483,2191,2664,1430,1934,1827,822,822,480,552,565,955,1121,732,527,585,415,246,150,663,0,240,557,654,683,748,399,708,1108,854R─║:ГCHARLOTTE SI╗Ж 2721,2412,2779,1580,2083,2034,1058,974,722,778,731,1061,1151,630,551,435,456,421,391,740,240,0,310,418,495,512,632,737,848,618SZ╝:ГNORFOLK VASт╜Ж 3001,2685,2968,1766,2223,2349,1351,1160,1039,1023,903,1146,1232,727,705,563,647,672,708,971,557,310,0,228,421,265,949,865,581,365SЄ╛:ГBALTIMORET{┐Ж 2823,2647,2797,1643,2067,2312,1357,1070,1135,1042,828,1039,1113,514,569,425,639,702,771,1094,654,418,228,0,245,96,1012,717,427,199TМ└:ГPITTSBURGHU┴Ж 2609,2430,2549,1427,1924,2087,1208,870,1138,898,609,776,887,296,364,186,393,567,788,1180,683,495,421,245,0,308,943,476,574,379U%┬:ГPHILLIDELPHIAUо├Ж 2902,2703,2859,1739,2154,2374,1443,1170,1229,1136,904,1094,1195,609,659,477,706,787,868,1230,748,512,265,96,308,0,1106,785,315,106U┐─:ГJACKSON MSVF┼Ж 2151,1818,2446,1198,1656,1458,407,686,206,264,497,825,1055,957,672,800,586,414,245,912,399,632,949,1012,943,1106,0,745,1455,1224VT╞:ГCHICAGOV╪╟Ж 2173,2048,2117,1021,1417,1742,921,542,919,657,289,344,410,275,185,358,297,466,657,1397,708,737,865,717,476,785,745,0,1004,809Vх╚:ГBOSTONWt╔Ж 3128,3017,3144,1998,2376,2670,1753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208W~╩:ГNYCX╦Ж 2930,2794,2914,1794,2189,2445,1559,1233,1335,1250,976,1118,1217,649,731,556,766,900,978,1334,854,618,365,199,379,106,1224,809,208,0753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208W~╩:ГNYCX╦Ж 2930,2794,2914,1794,2189,2445,1559,1233,1335,1250,976,1118,1217,649,731,556,766,900,978,1334,854,618,365,199,379,106,1224,