VЗ@X," ";:З@Xл1,"THE";A0 `З@Y," ";:З@Yм3,"ORY ";A@ jX│Xл1:Y│Yм1AH tЛ ZAX ~А X│1 е 100Aq ИЗ@201," ";AК ТЗ@201,"BIORHYTHMIC";AТ ЬЛ XAи жА DL│1 е 500:Л DLA╝ ░X│141:A$│" THE"A╦ ║А Z│1 е 19A╫ ─З@X,A$;A° ╬Е X▓155 з A$│ О(A$, З(A$)м1)B ╪X│Xл1B тЛ ZB& ьX│201:A$│"BIORHYTHMIC "B5 ЎА Z│1 е 19BL З@X," ";:З@Xм1,A$;BV X│Xм1B} Е X┤194 з X│194:A$│ П(A$, З(A$)м1)BЕ Л ZBП (Y│268BЪ 2АX│1е4B┬ <З@Y," ";:З@Yл32,"THEORY";B═ FY│Yл32Bт PА DL│1 е 10:Л DLBъ ZЛ XC dЗ@Y," ";C nА DL│1 е 500:Л DLC xЮC$ ВРB5 ЎА Z│1 е 19BL З@X," ";:З@Xм1,A$;BV X│Xм1B} Е X┤194 з X│194:A$│ П(A$, З(A$)м1)BЕ Л ZBП (Y│268BЪ 2АX│1е4B┬ <З@Y," ";:З@Yл32,"THEORY";B═ FY│Yл32Bт PА DL│1 е 10:Л DLBъ ZЛ XC dЗ@Y,"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 INDIANAPLS.KKKKK BUFFALOKKKKK NEW ENGLANDKKKKK N.Y. JETSKKKKK MIAMIKKKKK CINCINNATIKKKKK CLEVELANDKKKKK HOUSTONKKKKK PITTSBURGKKKKK DENVERKKKKK KANSAS CITYKKKKK LA RAIDERSKKKKK SAN DIEGOKKKKK SEATTLEKKKKK DALLASKKKKK NY GIANTSKKKKK PHILADELPHIAKKKKK PHOENIXKKKKK WASHINGTONKKKKK CHICAGOKKKKK DETROITKKKKK GREEN BAYKKKKK MINNESOTAKKKKK TAMPA BAYKKKKK ATLANTAKKKKK LA RAMSKKKKK NEW ORLEANSKKKKK SAN FRAN.KKKKK ITYKKKKK LA RAIDERSKKKKK SAN DIEGOKKKKK SEATTLEKKKKK DALLASKKKKK NY GIANTSKKKKK PHILADELPHIAKKKKK PHOENIPS│PSл11$8Е PS▓22 з PS│PSм22 :Д110010BБе 10801ELЕ PS│22 з в445391OVC│Cл11^`А X│1 е 511ljZ$(X)│"."1ttЛ X1Г~Z$(26)│"!"1ЛИY│01пТX│( Е(Kн(Aо23м Б(Aо23)))н25)л261╜ЬZ$(X)│"P"1╟жY│YлX1ы░X│( Е(Kн(Aо33м Б(Aо33)))н25)л261∙║Z$(X)│"I"2─Y│YлX2'╬X│( Е(Kн(Aо28м Б(Aо28)))н25)л2625╪Z$(X)│"E"2CтY│(YлX)о32QьZ$(Y)│"*"2xЎЗ#SP,д8)T$(P2);" ";:З#SP,═"##";D2;2ХЗ#SP,"/";:З#SP,═"##";M2;2е З#SP," ";2┤А X│1 е 512хЕ Z$(X)│"*"з ° 2,0:З#SP,Z$(X);:° 0,0:Бе 13302ї(З#SP,Z$(X);2¤2Л X3<З#SP3(FВ INCREMENTATION OC THE CHART3:PЕ P2│8 з 13903FZP2│P2л13XdЕ P2▓7 з P2│13dnD2│D2л13БxЕ D2▓F(M2)з D2│1:M2│M2л13ФВЕ M2┤13 з 14603еМM2│1:Y2│Y2л13╢ЦX│Y2:F(2)│283┬аБж 19103╥кF(2)│F(2)лX3┌┤Л A3∙╛Е SP│0 з З#SP:З#SP:Бе 15304╚° 0,04╥Е C▓66 з C│Cм66 :Д 15104+▄Бе 14904CцА X│C е 66:З#SP:Л X4OЁ° 0,0:Ю4Ф·З д5)"SUMMARY OF THE THEORY (Y/N):";:а 200,2:в44539:E$│ Т:Т135,04│Е E$┤▓"Y" ░ E$┤▓"Y" з 19904╨Е SP│м2 з З#SP:З#SP:З#SP5Ю:З#SP,д25)"SUMMARY OF THE BIORHYTMIC THEORY":З#SP5Ь"З#SP,д5);"According to the BIORHYTHMIC THEORY, the man at the first minutes":З #SP,д5)"after the birth, is subjected to three metabolic cycles."5°,З #SP:З#SP,д5);"The cycles are:":З #SP:З#SP,д5);"23 days for the physical aptitudes..."6e6З #SP,д5);"28 days for the emotional aptitudes...":З #SP,д5);"33 days for the intellectual aptitudes..."6є@З #SP:З#SP,д5);"THE PHYSICAL CYCLE is associated with physical energy, general":З#SP,д5);"vitality, endurance and resistance to illness."7hJЗ#SP:З#SP,д5);"THE EMOTIONAL CYCLE is associated with sensibility, emotional":З#SP,д5);"response and intuition."7█TЗ#SP:З#SP,д5);"THE INTELLECTUAL CYCLE is associated with mental abilities,":З#SP,д5);"and intellectual power."8R^З#SP:З#SP,д5);"The three cycles started at point zero at birth and follow their":З#SP,д5);"cycles all along life."8hЕ SP│0 з ё 5,23:З"PRESS A KEY";:в41393:Ю9rЗ#SP:З#SP,д5);"The theory says that each cycle is divided in two equal parts:":З#SP,д5);"the first is positive and the other negative. When the days are"9└|З#SP,д5);"positive the man is at the top of his fitness, physical, emotional":З#SP,д5);"or intellectual, no matter the cycle we choose. On negative days, the":*ЖЗ#SP,д5);"organism is under recovery; we have to make few efforts on these":З#SP,д5);"negative days.":═РЗ#SP:З#SP,д5);"The critical days are dangerous and happen when one or two or the":З#SP,д5);"three cycles cross the central line between negative and positive";:ЪЗ#SP,д5);"sides. In those days, the organism is not stabilized and is":З#SP,д5);"impossible to foresee.";╤дЗ#SP:З#SP,д5);"The symbol * is the three cycles' average on each day. You":З#SP,д5);"can draw a graph of your general condition in connecting all"<оЗ#SP,д5);"these symbols (*) with a pencil."<╕Е SP│0 з З#SP:Бе 1990<3┬А X│1 е 30:З#SP:Л XDJ2│0=NNА I│1 е Xм1=]XJ2│J2лF(I)=ebЛ I=klР=ЗvВ CHECK X FOR LEAP-YEAR=жАЕ Xо400м Б(Xо400)│0 з 1950=┼КЕ Xо100м Б(Xо100)│0 з 1970=рФЕ Xо4м Б(Xо4)┤▓0з 1970=шЮX│1=юиР=Ў▓X│0=№╝Р>G╞ё 5,23:З"ANOTHER BIORHYTHIC CHART (Y/N):";:а 200,2:в44539:E$│ Т:Т135,0>P╨PS│0>q┌Е E$│"Y" ▒ E$│"y" з Ю:Бе 270>ЬфЮ:т 40:ё 13,12:З"HAVE A GOOD DAY...";:>┐юА MU│75 е 175 й 25:а MU,2:Л MU>╓°А DL│1 е 1000:Л DL>щТ113,0:в&H8C1B>Є т 32?у 13,10:у 12,63? А X│0 е 63?+*Y│Yл1:Е Y│9 з Y│0?84Ь(X,0,Y)?@>Л X?OHА X│1 е 31?]RЬ(63,X,Y)?s\Y│Yл1:Е Y│9 з Y│0?{fЛ X?ОpА X│63 е 1 йм1?ЬzЬ(X,31,Y)?▓ДY│Yл1:Е Y│9 з Y│0?║ОЛ X?╬ША X│31 е 1 й м1?█вЬ(0,X,Y)?ёмY│Yл1:Е Y│9 з Y│0?∙╢Л X@ └X│128:Y│156@╩А Z│1 е 13@'╘З@142,"H";@?▐З@X," ";:З@Xл1,"T";@WшЗ@Y," ";:З@Yм1,"E";@gЄX│Xл1:Y│Yм1@o№Л Z@ X│192:Y│220@Н А Z│1 е 9@к З@X," ";:З@Xл1,"BIORHY";@╞ $З@Y," ";:З@Yм5,"THMIC";@╓ .X│Xл1:Y│Yм1@▐ 8Л Z@ю BX│256:Y│285@√ LА Z│1е12A  M&?:ГCOPYRIGHT (C) T&D SOFTWARE 1991 nfl 91 inst. ISSUE #110&z Ю:З@227,"PRINT TO PRINTER? (Y/N)":Y$│"Y":N$│"N":NL$│""&бPM$│"PRESS ANY KEY TO CONTINUE..."&░АTD│0е1E32&║(K$│ Т&ц2ЕK$│Y$ з PD│м2 :Д ЕK$│N$ з PD│0 :Д Л TD&ь<Ю'(FЗ#PD," nfl 91 predictions ";:Е PD┤▓0 з З#PD'5PЗ#PD," "'qZЗ#PD," WELCOME TO NFL 91 PREDICTIONS. ";:Е PD┤▓0 з З#PD'нdЗ#PD," THIS PROGRAM TAKES DATA FROM ";:Е PD┤▓0 з З#PD'щnЗ#PD," THE 1989 PRO FOOTBALL SEASON ";:Е PD┤▓0 з З#PD(%xЗ#PD," AND PREDICTS THE SCORES FROM ";:Е PD┤▓0 з З#PD(aВЗ#PD," ALL 16 GAMES OF EACH OF THE 28 ";:Е PD┤▓0 з З#PD(ЭМЗ#PD," TEAMS. THESE SCORES CAN BE ";:Е PD┤▓0 з З#PD(┘ЦЗ#PD," PRINTED ON YOUR PRINTER. ";:Е PD┤▓0 з З#PD(цаЗ#PD," ")"кЗ#PD," THERE IS ANOTHER FEATURE WHICH ";:Е PD┤▓0 з З#PD)^┤З#PD," ALLOWS YOU TO UPDATE EACH IN- ";:Е PD┤▓0 з З#PD)Ъ╛З#PD," DIVIDUAL TEAM EITHER BEFORE ";:Е PD┤▓0 з З#PD)╓╚З#PD," THE SEASON BEGINS OR DURING ";:Е PD┤▓0 з З#PD*╥З#PD," THE SEASON. ";:Е PD┤▓0 з З#PD*▄Бж 9000*$цЮ*1ЁЗ#PD," "*m·З#PD," THERE IS A SEPARATE DATA FILE ";:Е PD┤▓0 з З#PD*йЗ#PD," CALLED 'NFL/DAT' WHICH CAN BE ";:Е PD┤▓0 з З#PD*хЗ#PD," LOADED AND EDITED. THIS FILE ";:Е PD┤▓0 з З#PD+!З#PD," ALLOWS YOU TO INPUT ANY MAJOR ";:Е PD┤▓0 з З#PD+]"З#PD," CHANGES IN THE DEFENSE, OF- ";:Е PD┤▓0 з З#PD+Щ,З#PD," FENSE, COACHING STAFF, INJURIES";:Е PD┤▓0 з З#PD+╒6З#PD," OR ANY INTANGIBLES. ";:Е PD┤▓0 з З#PD+т@З#PD," ",JЗ#PD," NOTE: YOU CAN STILL PREDICT ";:Е PD┤▓0 з З#PD,ZTЗ#PD," THE SCORES WITHOUT LOADING AND ";:Е PD┤▓0 з З#PD,Ц^З#PD," RUNNING THE DATA FILE. THIS ";:Е PD┤▓0 з З#PD,╥hЗ#PD," FILE IS THERE FOR YOU TO PER- ";:Е PD┤▓0 з З#PD-rЗ#PD," SONALIZE THE PREDICTIONS. ";:Е PD┤▓0 з З#PD-|З#PD," "-'ЖБж 9000--РЮ-iЪЗ#PD," CHANGING THE TEAM STATS ";:Е PD┤▓0 з З#PD-vдЗ#PD," "-▓оЗ#PD," TO ALTER THE PREDICTIONS, RUN ";:Е PD┤▓0 з З#PD-ю╕З#PD," THE PROGRAM AND SELECT OPTION ";:Е PD┤▓0 з З#PD.*┬З#PD," 1 TO LOAD THE NFL DATA. NOW ";:Е PD┤▓0 з З#PD.f╠З#PD," SELECT OPTION 3 FOR VIEWING ";:Е PD┤▓0 з З#PD.в╓З#PD," AND EDITING ANY OF THE 28 ";:Е PD┤▓0 з З#PD.▐рЗ#PD," TEAMS. SELECT THE NUMBER THAT ";:Е PD┤▓0 з З#PD/ъЗ#PD," CORRESPONDS TO THE TEAM AND ";:Е PD┤▓0 з З#PD/VЇЗ#PD," THEN PRESS . USE THE ";:Е PD┤▓0 з З#PD/Т■З#PD," UP AND DOWN ARROW KEYS TO SE- ";:Е PD┤▓0 з З#PD/╬З#PD," LECT EITHER DEFENSE, OFFENSE, ";:Е PD┤▓0 з З#PD0 З#PD," COACHING STAFF, INJURIES, OR ";:Е PD┤▓0 з З#PD0FЗ#PD," INTANGIBLES. ";:Е PD┤▓0 з З#PD0S&З#PD," "0_0Бж 90000e:Ю0rDЗ#PD," "0оNЗ#PD," ORIGINALLY, THE VALUES ARE SET ";:Е PD┤▓0 з З#PD0ъXЗ#PD," TO 0. PUSHING THE RIGHT ARROW ";:Е PD┤▓0 з З#PD1&bЗ#PD," KEY WILL ADD POINTS TO THE ";:Е PD┤▓0 з З#PD1blЗ#PD," TEAM. PUSHING THE LEFT ARROW ";:Е PD┤▓0 з З#PD1ЮvЗ#PD," KEY WILL SUBTRACT THE VALUE. ";:Е PD┤▓0 з З#PD1лАЗ#PD," "1чКЗ#PD," FOR INSTANCE, IF A TEAM HAS ";:Е PD┤▓0 з З#PD2#ФЗ#PD," BEEN WINNING WITH GOOD DEFENSE,";:Е PD┤▓0 з З#PD2_ЮЗ#PD," YOU SHOULD ADD 5-9 POINTS TO ";:Е PD┤▓0 з З#PD2ЫиЗ#PD," THEIR DEFENSE. OR, IF A TEAM ";:Е PD┤▓0 з З#PD2╫▓З#PD," SUDDENLY SUFFERS SOME SERIOUS ";:Е PD┤▓0 з З#PD3╝З#PD," INJURIES, YOU SHOULD SUBTRACT ";:Е PD┤▓0 з З#PD3O╞З#PD," 5-9 POINTS FROM THE INJURIES ";:Е PD┤▓0 з З#PD3Л╨З#PD," CATEGORY. ";:Е PD┤▓0 з З#PD3Ч┌Бж 90003╘фЮ:З@230,"";:Е  Ж(186)│14 з З"RUNNING "; :Д З"CLOADING ";4юЗ"NFL91":Е  Ж(186)│14 з О"NFL91" :Д Ч"NFL91"4 °К4#(ЕPD┤▓0 з Р4)#2З@482,PM$;43#З#SP,д26)"*****************************".HЗ#SP,д26)"* P=PHYSICAL (23 DAYS) *".KRЗ#SP,д26)"* E=EMOTIONAL (28 DAYS) *".x\З#SP,д26)"* I=INTELLECTUAL (33 DAYS) *".еfЗ#SP,д26)"* *=AVERAGE *".╥pЗ#SP,д26)"* -=NEGATIVE CYCLE *". zЗ#SP,д26)"* +=POSITIVE CYCLE *"З#SP,д5);"and intellectual power."8Ш^З#SP:З#SP,д5);"The three cycles started at point zero at birth and follow their":З#SP,д5);"cycles all along life."8┼hЕ SP│0 з ё 5,23:З"PRESS A KEY";:в41393:Ю9crЗ#SP:З#SP,д5);"The theory says that each cycle is divided in two equal parts:":З#SP,д5);"the first is positive and the other negative. When the days are":|З#SP,д5);"positive the man is at the top of his fitness, physical, emotional":З#SP,д5);"or intellectual, no matter the cycle we choose. On negative days, the":pЖЗ#SP,д5);"organism is under recovery; we have to make few efforts on these":З#SP,д5);"negative days.";РЗ#SP:З#SP,д5);"The critical days are dangerous and happen when one or two or the":З#SP,д5);"three cycles cross the central line between negative and positive";АЪЗ#SP,д5);"sides. In those days, the organism is not stabilized and is":З#SP,д5);"impossible to foresee."<дЗ#SP:З#SP,д5);"The symbol * is the three cycles' average on each day. You":З#SP,д5);"can draw a graph of your general condition in connecting all" КЕ Xо100м Б(Xо100)│0 з 1970>&ФЕ Xо4м Б(Xо4)┤▓0з 1970>.ЮX│1>4иР><▓X│0>B╝Р>Н╞ё 5,23:З"ANOTHER BIORHYTHIC CHART (Y/N):";:а 200,2:в44539:E$│ Т:Т135,0>Ц╨PS│0>╖┌Е E$│"Y" ▒ E$│"y" з Ю:Бе 270>тфЮ:т 40:ё 13,12:З"HAVE A GOOD DAY...";:?юА MU│75 е 175 й 25:а MU,2:Л MU?°А DL│1 е 1000:Л DL?/Т113,0:в&H8C1B?8 т 32?Lу 13,10:у 12,63?[ А X│0 е 63?q*Y│Yл1:Е Y│9 з Y│0?~4Ь(X,0,Y)?Ж>Л X?ХHА X│1 е 31?гRЬ(63,X,Y)?╣\Y│Yл1:Е Y│9 з Y│0?┴fЛ X?╘pА X│63 е 1 йм1?тzЬ(X,31,Y)?°ДY│Yл1:Е Y│9 з Y│0@ОЛ X@ША X│31 е 1 й м1@!вЬ(0,X,Y)@7мY│Yл1:Е Y│9 з Y│0@?╢Л X@O└X│128:Y│156@^╩А Z│1 е 13@m╘З@142,"H";@Е▐З@X," ";:З@Xл1,"T";@ЭшЗ@Y," ";:З@Yм1,"E";@нЄX│Xл1:Y│Yм1@╡№Л Z@┼ X│192:Y│220@╙ А Z│1 е 9@Ё З@X," ";:З@Xл1,"BIORHY";A $З@Y," ";:З@Yм5,"THMIC";A .X│Xл1:Y│Yм1A$ 8Л ZA4 BX│256:Y│285AA LА Z│1е12A[ VЗ@X," ";:З@Xл1,"THE";Av `З@Y," ";:З@Yм3,"ORY ";AЖ jX│Xл1:Y│Yм1AО tЛ ZAЮ ~А X│1 е 100A╖ ИЗ@201," ";A╨ ТЗ@201,"BIORHYTHMIC";A╪ ЬЛ XAю жА DL│1 е 500:Л DLB ░X│141:A$│" THE"B ║А Z│1 е 19B ─З@X,A$;B> ╬Е X▓155 з A$│ О(A$, З(A$)м1)BH ╪X│Xл1BP тЛ ZBl ьX│201:A$│"BIORHYTHMIC "B{ ЎА Z│1 е 19BТ З@X," ";:З@Xм1,A$;BЬ X│Xм1B├ Е X┤194 з X│194:A$│ П(A$, З(A$)м1)B╦ Л ZB╒ (Y│268Bр 2АX│1е4C <З@Y," ";:З@Yл32,"THEORY";C FY│Yл32C( PА DL│1 е 10:Л DLC0 ZЛ XCG dЗ@Y," ";C^ nА DL│1 е 500:Л DLCd xЮCj ВРB{ ЎА Z│1 е 19BТ З@X," ";:З@Xм1,A$;BЬ X│Xм1B├ Е X┤194 з X│194:A$│ П(A$, З(A$)м1)B╦ Л ZB╒ (Y│268Bр 2АX│1е4C <З@Y," ";:З@Yл32,"з2050J°Бе2000JLАL│1е68:FI$(L)│"":RF$(L)│"":ЛL:CF│0:LC│0:RC│0:╧0:Бе1060Ji В **********************JГ:ГSEARCH FOR FILENAMEJа В **********************J╘*Ю:Й"Search for what FILENAME:";FI$:ЕFI$│""з1060Jё4Е З(FI$)▓8зFI$│ О(FI$,8)K3>CF│0:LC│0:╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ1KДHАL│1еRC:Ю:З"Search ";RF$(L);":";FI$:Щ"I",#1,RF$(L):Й#1,T:╗Й#1,ID$:З"ID=";ID$KхRЗ:З"Filename(s) found (if any):":АLL│1еT:Й#1,FI$(LL):Е О(FI$(LL), З(FI$))│FI$з2140 :Д Бе2190L"\CF│CFл1:LC│LCл1:ЗFI$(LL);:Е LC┤▓WC зЗ" "; :Д Е LC│WC зЗL;fЕCF│30 ▒ CF│60 з2170LFpБе2190L^zIN$│ Т:ЕIN$│""з2170LdДЮLyОЛLL:Ъ1:LC│0:CF│0LкШЗ:З"ontinue eturn to options xit"L┬вIN$│ Т:ЕIN$│""з2210L╓мЕIN$│"E"з╧0:Ю:КLш╢ЕIN$│"C"з2260L·└ЕIN$│"R"з2270M╩Бе2210M#╘АLL│1еT:FI$(LL)│"":ЛLL:ЛLMz▐АL│1е68:RF$(L)│"":FI$(L)│"":ЛL:T│0:L│0:LL│0:RC│0:CF│0:LC│0:ID$│"":FI$│"":╧0:Бе1060MЧшВ **********************M░Є:ГVIEW ALL FILENAMESM═№В **********************N ╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ1N_ АLL│1еRC:Ю:Щ"I",#1,RF$(LL):Й#1,T:╗Й#1,ID$:З"Viewing all files on disk":З"ID=";ID$:З:ЗN▐ З T;"Files in ";RF$(LL):З"Filenames are:":АL│1еT:Й#1,FI$(L):ЛL:Ъ1:CF│1:Бж2540:Ю:З"ontinue eturn to options xit"NЎ $IN$│ Т:ЕIN$│""з2340O .ЕIN$│"E"з╧0:Ю:КO 8ЕIN$│"C"з2390O. BЕIN$│"R"з2400O9 LБе2340OA VЛLLOД `АL│1е68:RF$(L)│"":FI$(L)│"":ЛL:ID$│"":LL│0:L│0:T│0:CF│0:Бе1060OК jКOи tВ ***********************O┬ ~В DBMOD0 - SUBROUTINEOр ИВ THIS MODULE IS DESIGNEDO■ ТВ TO DISPLAY FILENAMES ON k&G:ГCOPYRIGHT (C) T&D SOFTWARE 1991 biorhythmic theory ISSUE #110&j :Г****************************&Н:Г* THE BIORHYTHMIC THEORY *&░:Г* BY *&╙(:Г* JEAN-CLAUDE LAROUCHE *&Ў2:Г****************************'<Бж 2060'Fу 0,10:у 8,63'Pт80'#ZЮ1'0dМ Z$(51)'CnМT$(8),M1$(12)'TxМ F(12),J(2)'bВА X│1 е 8'nМН T$(X)'гЦЖ "SUN","MON","TUE","WED","THU","FRI","SAT"," "'лаЛ X'╣кK│6.28318'╚┤А X│1 е 12'╙╛Н F(X)'¤╚Ж 31,28,31,30,31,30,31,31,30,31,30,31(╥Л X(▄А X│1 е 12(!цН M1$(X)()ЁЛ X(Э·Ж "JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE","JULY","AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER"(гЮ(╧ё 5,1:а 200,2:Й "BIORHYTHM FOR ...";NM$)ё 5,2:З"ENTER THE DATES UNDER THAT FORM (DD,MM,YY)") "З)',ё 5,4:З"BIRTH DATE:";)>6а 200,2:Й D1,M1,Y1)P@Е Y1▓99 з 340)_JY1│Y1л1900)uTD2│D1:M2│M1:Y2│Y1)Б^Бж 1750)ЛhP1│P2)лrё 5,5:З"STARTING DATE...:";)┬|а 200,2:Й D2,M2,Y2)╘ЖЕ Y2▓99 з 410)уРY2│Y2л1900)яЪБж 1750*дё 5,6:З"# OF DAYS.......:";*оа 200,2:Й L*F╕З:З:З д25)"DO YOU WANT THE RESULT"*Г┬З:З д28)"1 - ON THE SCREEN":З:З д28)"2 - ON THE PRINTER"*└╠З:З д30)"CHOICE(1-2)?";:а 200,2:в44539:SP$│ Т:SP│ Й(SP$)*╪╓Е SP┤1 ▒ SP▓2 з 460*єрЕ SP│2 з SP│м2 :Д SP│0*∙ъЮ+ЇВ COMPENSATION, LEAP-YEAR+ ■X│M1+,Бж 1850+@J1│J2лD1лY1н365+WЕ J1┤639723 з P1│8+`&X│M2+l0Бж 1850+А:J2│J2лD2лY2н365+ЧDЕ J2┤639723 з P2│8+дNN1│Y2м.1+юXA│J2мJ1л Б(N1о4)м Б(Y1о4)м Б(N1о100)л Б(Y1о100)л Б(N1о400)м Б(Y1о400)+ bЕ M1▓2 з 650,lX│Y1,vБж 1910,АA│AлX,/КЕ M2▓3 з 690,8ФX│Y2,DЮБж 1910,NиA│AлX,j▓В PRINT GRAPHIC HEADING,{╝Е SP│0 з 760,в╞Е  Ж(65314)о2│ Б( Ж(65314)о2)з 740,█╨ё 24,11:° 0,0,B:З "THE PRINTER IS NOT READY";:а 10,5,¤┌А DL│1е1000:Л DL:° 0,0:Бе 710-фЮ:ё 35,11:° 0,0,B:З"I PRINT";-<юА PR│1 е 4:З#м2:Л:Бе 770-B°Ю-mЗ#SP,д5)"BIORHYTHMIC CHART FOR: ";NM$-v З#SP-жЗ#SP,д28)"BORNED ";" ";T$(P1);D1;M1$(M1);Y1-╫ З#SP,д28)"STARTING ON ";T$(P2);D2;M1$(M2);Y2-р*З#SP. 4З#SP,д5)"SYMBOLS INTERPRETATION":З#SP.7>З#SP,д26)"*****************************".dHЗ#SP,д26)"* P=PHYSICAL (23 DAYS) *".СRЗ#SP,д26)"* E=EMOTIONAL (28 DAYS) *".╛\З#SP,д26)"* I=INTELLECTUAL (33 DAYS) *".ыfЗ#SP,д26)"* *=AVERAGE *"/pЗ#SP,д26)"* -=NEGATIVE CYCLE *"/EzЗ#SP,д26)"* +=POSITIVE CYCLE *"/rДЗ#SP,д26)"*****************************"/АОЗ#SP:З#SP/┼ШЗ#SP,д13)"IF A SYMBOL IS MISSING, IT IS BECAUSE TWO SYMBOLS ARE"/ёвЗ#SP,д13)"ON THE SAME PLACE.":З#SP:З#SP0мЕ SP│м2 з 9600'╢З#SP,д5)"PRESS A KEY";:в41393:Ю0j└З#SP,д20)"- CRITICAL +"0н╩З#SP,д20)"<><><><><><><><><><><><><><><><><><><><><><><><>"0╨╘В FIX F(2) AT 29 FOR LEAP-YEAR0┘▐X│Y20хшБж 19100їЄF(2)│F(2)лX1 №В MAKE THE CHART1L│AлL1C│281-А A│A е Lм11@$Е SP│м2 з 11101L.PS│PSл11j8Е PS▓22 з PS│PSм22 :Д11001vBБе 10801ЛLЕ PS│22 з в445391ХVC│Cл11д`А X│1 е 511▓jZ$(X)│"."1║tЛ X1╔~Z$(26)│"!"1╤ИY│01їТX│( Е(Kн(Aо23м Б(Aо23)))н25)л262ЬZ$(X)│"P"2 жY│YлX21░X│( Е(Kн(Aо33м Б(Aо33)))н25)л262?║Z$(X)│"I"2I─Y│YлX2m╬X│( Е(Kн(Aо28м Б(Aо28)))н25)л262{╪Z$(X)│"E"2ЙтY│(YлX)о32ЧьZ$(Y)│"*"2╛ЎЗ#SP,д8)T$(P2);" ";:З#SP,═"##";D2;2█З#SP,"/";:З#SP,═"##";M2;2ы З#SP," ";2·А X│1 е 513+Е Z$(X)│"*"з ° 2,0:З#SP,Z$(X);:° 0,0:Бе 13303;(З#SP,Z$(X);3C2Л X3L<З#SP3nFВ INCREMENTATION OC THE CHART3АPЕ P2│8 з 13903МZP2│P2л13ЮdЕ P2▓7 з P2│13кnD2│D2л13╟xЕ D2▓F(M2)з D2│1:M2│M2л13┌ВЕ M2┤13 з 14603ыМM2│1:Y2│Y2л13№ЦX│Y2:F(2)│284аБж 19104кF(2)│F(2)лX4 ┤Л A4?╛Е SP│0 з З#SP:З#SP:Бе 15304I╚° 0,04e╥Е C▓66 з C│Cм66 :Д 15104q▄Бе 14904ЙцА X│C е 66:З#SP:Л X4ХЁ° 0,0:Ю4┌·З д5)"SUMMARY OF THE THEORY (Y/N):";:а 200,2:в44539:E$│ Т:Т135,04∙Е E$┤▓"Y" ░ E$┤▓"Y" з 19905Е SP│м2 з З#SP:З#SP:З#SP5MЮ:З#SP,д25)"SUMMARY OF THE BIORHYTMIC THEORY":З#SP5т"З#SP,д5);"According to the BIORHYTHMIC THEORY, the man at the first minutes":З #SP,д5)"after the birth, is subjected to three metabolic cycles."6>,З #SP:З#SP,д5);"The cycles are:":З #SP:З#SP,д5);"23 days for the physical aptitudes..."6л6З #SP,д5);"28 days for the emotional aptitudes...":З #SP,д5);"33 days for the intellectual aptitudes..."79@З #SP:З#SP,д5);"THE PHYSICAL CYCLE is associated with physical energy, general":З#SP,д5);"vitality, endurance and resistance to illness."7оJЗ#SP:З#SP,д5);"THE EMOTIONAL CYCLE is associated with sensibility, emotional":З#SP,д5);"response and intuition."8!TЗ#SP:З#SP,д5);"THE INTELLECTUAL CYCLE is associated with mental abilities,":6A$│"=":╞"S12BM120,85":Бж10908k@A$│"11":╞"S8BM160,70":Бж1090:A$│"8":╞"S8BM170,90":Бж1090:╞"S8BM135,75"лL2$8лJA$│"IN THIS PART OF THE PROBLEM I HAVE":╞"S4BM5,115":Бж10908щTA$│"MULTIPLIED THE DENOMINATOR TIMES":╞"S4BM5,127":Бж10909(^A$│"THE WHOLE NUMBER. THAT IS 8 TIMES":╞"S4BM5,139":Бж10909bhA$│"1 IS 8, THEN ADD THE NUMERATOR":╞"BM5,151":Бж10909╦rA$│"TO THAT ANSWER AND YOU GET THE":╞"S4BM5,163":Бж1090:A$│"ANSWER SHOWM ABOVE.":╞"S4BM5,175":Бж1090:|АX│1е1500:Л:A$│"HIT ANY KEY TO CONTINUE":╞"BM0,202":Бж1090:в44539:&Ж╝:╚4,1:┐1,1:┴0,1:GРA$│"11":╞"S12BM60,30":Бж1090:gЪA$│"8":╞"S12BM70,60":Бж1090:|д╞"S8BM40,35"лL2$:ЭоA$│"X":╞"S12BM130,45":Бж1090:╛╕A$│"2":╞"S12BM170,40":Бж1090:▀┬A$│"2":╞"S12BM210,30":Бж1090:ї╠╞"S8BM190,35"лL2$;╓A$│"4":╞"S12BM210,60":Бж1090;UрA$│"TAKE A PIECE OF PAPER AND PUT THIS":╞"S4BM5,90":Бж1090;РъA$│"PROBLEM ON IT. NOW YOU TRY TO":╞"S4BM5,102":Бж1090;╘ЇA$│"ANSWER THE SECOND PART OF THE FRACTION":╞"S4BM5,114":Бж1090;ў■╞"S4BM10,150R200D15L200U15R10"<2A$│"HIT ANY KEY TO CONTINUE":╞"BM20,160":Бж1090:в44539wАA$│"A NUMBER THAT THE DENOMINATOR AND":╞"S4BM5,114":Бж1090:A$│"THE NUMERATOR MAY BE DIVIDED BY":╞"S4BM5,126":Бж1090:A$│"EVENLY.":╞"S4BM5,138":Бж1090>│КАX│1е2000:Л:╞"S4BM68,75"лL6$:A$│"2":╞"S4BM60,70":Бж1090?,ФA$│"= 4":╞"S4BM90,65":Бж1090:АX│1е1000:Л:╞"S4BM175,42"лL6$:A$│"2":╞"S4BM168,40":Бж1090:A$│"= 5":╞"S4BM210,40":Бж1090?╤ЮA$│"NOW MULTIPLY THE TW0 NUMERATORS":╞"S4BM5,150":Бж1090:A$│"TOGETHER THEN MULTIPLY THE TWO":╞"S4BM5,162":Бж1090:A$│"DENOMINATORS TOGETHER.":╞"S4BM5,174":Бж1090@иАX│1е2000:Л:A$│"PRESS ANY KEY TO CONTINUE":╞"S4BM5,200":Бж1090:в44539@0н╝:╚4,1:┐1,1:┴0,1@m▓A$│"YOUR ANSWER SHOULD PRODUCE THIS":╞"S4BM10,10":Бж1090@о╝A$│"IMPROPER FRACTION. TRY TO REDUCE IT":╞"S4BM10,22":Бж1090@ы╞A$│"ON YOUR OWN. I'LL WAIT ABOUT 20":╞"S4BM10,34":Бж1090A╨A$│"SECONDS.":╞"S4BM10,46":Бж1090AC┌A$│"55":╞"S12BM35,90":Бж1090:╞"S8BM20,95"лL2$AeфA$│"16":╞"S12BM35,115":Бж1090AгюАX│1е9000:Л:A$│")":╞"S12BM80,113":Бж1090:╞"S8BM82,95"лL5$A╞°A$│"55":╞"S12BM100,115":Бж1090AцA$│"3":╞"S8BM125,90":Бж1090B  A$│"48":╞"S12BM100,140":Бж1090B<╞"S8BM90,145"лL2$:A$│"7":╞"S8BM125,160":Бж1090B] A$│"=":╞"S8BM195,100":Бж1090B}*A$│"3":╞"S8BM210,90":Бж1090Bп4A$│"7":╞"S8BM235,80":Бж1090:╞"S8BM225,82"лL2$B╨>A$│"16":╞"S8BM230,95":Бж1090BєH╞"S4BM10,170R200D15L200U15R10"C0RA$│"PRESS ANY KEY TO CONTINUE":╞"BM20,180":Бж1090:в44539Cu `╝:A$│"IF YOUR PAPER LOOKED LIKE THE PREVIOUS":╞"S4BM5,90":Бж1090C╢ jA$│"SCREEN THEN YOU HAVE DONE VERY WELL":╞"S4BM5,102":Бж1090Cў tA$│"IF YOUR PAPER DIDN'T LOOK LIKE THAT":╞"S4BM5,114":Бж1090D6 ~A$│"PRESS NUMBER 1 TO SEE THE PROGRAM":╞"S4BM5,126":Бж1090Dt ИA$│"AGAIN. OTHERWISE PRESS NUMBER 2.":╞"S4BM5,138":Бж1090D╖ ТA$│"DO YOU NEED TO SEE THE PROGRAM AGAIN?":╞"S4BM5,150":Бж1090D╨ ЬAN$│ Т:Е AN$│""з2460Dє жAN│ Й(AN$):Е AN┤1 ▒ AN▓2 з2460E ░И AN Бе 1160,2490E@ ║╝:A$│"GOODBYE":╞"S4BM30,20":Бж1090:АX│1е1000:Л:Ю:КN. OTHERWISE PRESS NUMBER 2.":╞"S4BM5,138":Бж1090D╖ ТA$│"DO YOU NEED TO SEE THE PROGRAM AGAIN?":╞"S4BM5,150":Бж1090D╨ ЬAN$│ Т:Е AN$│""з2460Dє жAN│ Й(AN$):Е AN┤1 ▒ AN▓2 з2460E ░И AN Бе                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 A&H :ГCOPYRIGHT (C) T&D SOFTWARE 1991 multiply fractions ISSUE #110&VdМ A$(122)&ln╚4,1:┐1,0:╝1:┴0,1&|xA$(32)│"BR5&ШВA$(33)│"BU6BR2D3BD2DBR4&╖МA$(34)│"BU6BR2D2BRU2BR2BD6&▀ЦA$(35)│"BR2U6BR2D6U2R2L6BU2R6BR4BD4'аA$(36)│"BU2FR2EHL2HER2FHLUD6BR4',кA$(37)│"BRBU5URDLUBR4DG4DBR3URDLRBR5'P┤A$(38)│"BR4BU2G2L2HE3UHLGDF4BR2'n╛A$(39)│"BU6BR2D2BD2BF2BR2'И╚A$(40)│"BR2HU4EBD6BR3'б╥A$(41)│"BREU4HBD6BR4'╩▄A$(42)│"BUBR3U4D2L3R6L3E2G4E2H2F4BR2'чцA$(43)│"BRBU3R4L2U2D4BR4(ЁA$(44)│"BR2BUDGBEBR2(·A$(45)│"BE2R2BRBD2BR3(-A$(46)│"BRRBR2(FA$(47)│"BRUE4UBR2BD6(eA$(48)│"BRHU3ER2FD3GNL2BR4(~"A$(49)│"BU4BR2ED5BR3(Ю,A$(50)│"BU4ER2FDGL3D2R4BR2"(┴6A$(51)│"BU4ER2FGNL2FDGL2NHBR6"(▐@A$(52)│"BR3U5G3R4BD2BR3"( JA$(53)│"BU5NR4D2R3FDGNL3BR4")'TA$(54)│"BU5BRNR3GD3FR2EUHL2GBD2BR7")A^A$(55)│"BU5R4D2G3BR6")fhA$(56)│"BRNR2HUEHER2FGNL2FDGBR4")ЕrA$(57)│"R3EU3HL2GDFR2EBF3")е|A$(58)│"BU4BR2DBD2DBR2BDBR2)┴ЖA$(59)│"BRBU5DBD2DNGBR3)┘РA$(60)│"BU3NE3F3BR2)°ЪA$(61)│"BRBU2R3BU2L3BR5BD5*дA$(62)│"BU6F3G3BR5*.оA$(63)│"BU5ER2FDGLDBD2DBR4*L╕A$(65)│"U5ER2FD3NL4D2BR3"*~┬A$(64)│"BU5BR3BFDHL2GDFR2ENU2FEU3HL5G2D3F2R3E*Ю╠A$(66)│"U6R3FDGNL3FDGNL3BR4*┐╓A$(67)│"NRHU4ER2FBD4GNL2BR4"*█рA$(68)│"U6R3FD4GNL3BR4"*√ъA$(69)│"NR4U3NR3U3R4BD6BR3"+ЇA$(70)│"U3NR3U3R4BD6BR3"+<■A$(71)│"BRHU4ER2FBD3NLDGNL2BR4"+XA$(72)│"U3NU3R4NU3D3BR4+sA$(73)│"U6LR2LD6LR2BR3+СA$(74)│"BUNUFR2ENU5BDBR3"+╡&A$(75)│"U3NU3R2E2UBD3BL2F2DBR3"+╦0A$(76)│"NU6R4BR3"+ф:A$(77)│"U6F3E3D6BR3"+ DA$(78)│"U5NUF4NU5DBR3",NA$(79)│"BRNR2HU4ER2FD4GBR4",<XA$(80)│"U6R3FDGNL3BF3BR",`bA$(81)│"BRHU4ER2FD4GLNUNDNLBR5",~lA$(82)│"U6R3FDGL2NLF3BR3",вvA$(83)│"BUFR2EUHL2HUER2FBD5BR3",└АA$(84)│"BR2U6NL2R2BD6BR3",▀КA$(85)│"BRHU5BR4D5GNL2BR5",■ФA$(86)│"BR2H2U4BR4D4G2BR5"-ЮA$(87)│"BUNU5FE2F2ENU5BR3BD"-?иA$(88)│"UE2H2UBR4DG2F2DBR3"-a▓A$(89)│"BR2U3H2UBR4DG2BF3BR2"-╝A$(90)│"NR4UE4UNL4BF3BD3"-Щ╞A$(94)│"BR3U6NG2F2BD4-╢╨A$(95)│"BU3NE2NF2R6BD3BR-█┌A$(97)│"BU4R3FDHL2GDFR2ENU2FBR2".фA$(98)│"BU6RD6NLBUFR2EU2HL2GBF3BR3".$юA$(99)│"BRNR2HU2ER2FBD2GBR3".P°A$(100)│"BRNR2HU2ER2FD2NGDU6NLBD6NLBR3".uA$(101)│"BRHU2ER2FDL3BD2R2NEBR3".Ш A$(102)│"BRU3NLNRU2ERFDBD4BR2".─A$(103)│"BRNR2HU2ER2FNUD2NGD2GL2HBEBR5".ч A$(104)│"NRBU6RD3ND3ER2FD3BR2"/*A$(105)│"RNRU4LBU2RBD6BR3"/&4A$(106)│"BDFREU5LBURBD5BR2"/G>A$(107)│"RU6NLBD4R2NE2F2BR2"/bHA$(108)│"BU6RD6NLRBR2"/ДRA$(109)│"BU4FND3EFND3EFD3BR2"/в\A$(110)│"BU4FND3ERFD3BR2"/├fA$(111)│"BRHU2ER2FD2GNL2BR3"/ьpA$(112)│"BU4FND2ER2FD2GL2HD3LBU2BR7"0zA$(113)│"BRNR2HU2ER2FNED2NGD3RBU2BR2"07ДA$(114)│"BRBU4FND3ERFBD3BR2"0ZОA$(115)│"BUFR2EHL2HER2FBD3BR2"0{ШA$(116)│"BU4RNUNRD3FREBDBR3"0ЪвA$(117)│"BUNU3FR2ENU3FBR2"0╝мA$(118)│"BU2NU2F2E2NU2BD2BR2"0с╢A$(119)│"BUNU3FRENU3FRENU3BR2BD"0¤└A$(120)│"E2NH2NE2F2BR2"1#╩A$(121)│"BUNU3FR2ENU3D2GL2HBUBR6"1>╘A$(122)│"BU4R4G4R4BR2"1S┘L1$│"BRR30D25L301}▐╝:┐1,1:A$│"PROGRAM":╞"BM95,60":Бж10901Н▀L2$│"BRR30"1ЭрL3$│"BRR10"1нсL4$│"BRR20"1╜тL5$│"BRR50"1═уL6$│"BRE20"1ьшA$│"BY":╞"BM115,85":Бж10902ЄA$│"ROSE POLONSKY":╞"BM125,105":Бж10902H№A$│"4 TUDOR CT. APT. 15":╞"BM125,115":Бж10902{A$│"ELIZABETH, N.J. 07208":╞"BM125,125":Бж10902Э╞"BM10,150S4R200D15L200U15R102▀A$│"HIT ANY KEY FOR NEXT SCREEN":╞"BM20,160S4":Бж1090;:в445392Ї$в 45539:Ю:Бе11603BА X│1 е  З(A$)3LY│ К( Р(A$,X,1))3,VЕ Y┤0 з Y│038`╞ A$(Y)3@jЛ:Р3UИ╝:╚4,1:┐1,1:┴0,13СТA$│"TO MULTIPLY FRACTIONS YOU SHOULD":╞"BM10,10":Бж10903¤ЬA$│"REVIEW YOUR DIVISION FACTS":╞"BM10,22":Бж1090:A$│"BECAUSE YOU WILL BE USING THEM":╞"BM10,34":Бж109042жA$│"WHEN I EXPLAIN CANCELING.":╞"BM10,46":Бж10904T░╞"BM10,150S4R200D15L200U15R104К║A$│"HIT ANY KEY TO CONTINUE":╞"BM20,160S4":Бж10904Х┐в445394к┴╝:╚4,1:┐1,1:┴0,14╩dA$│"1":╞"S12BM20,40":Бж10904ъnA$│"3":╞"S12BM60,30":Бж10905 oA$│"8":╞"S12BM60,60":Бж10905x╞"S8BM40,35"лL2$5@СA$│"X":╞"S12BM130,45":Бж10905aЦA$│"2":╞"S12BM170,40":Бж10905ВаA$│"2":╞"S12BM210,30":Бж10905Шк╞"S8BM190,35"лL2$5╣┤A$│"4":╞"S12BM210,60":Бж10905¤╛A$│"TO MULTIPLY A MIXED FRACTION LIKE THIS,":╞"S4BM5,80":Бж10906<╚A$│"YOU MUST MULTIPLY THE DENOMINATOR BY":╞"BM5,92":Бж10906t╥A$│"WHOLE NUMBER AND THE ADD THE":╞"BM5,102":Бж10906н▄A$│"NUMERATOR TO THE YOUR ANSWER.":╞"BM5,114":Бж10906╨ц╞"S4BM10,150R200D15L200U15R10"7 ЁA$│"HIT ANY KEY TO CONTINUE":╞"BM20,160":Бж1090:в445397 ·╝:╚4,1:┐1,1:┴0,17YA$│"SHOWN BELOW IS THE WAY TO WORK":╞"BM5,10":Бж10907ЕA$│"OUT THIS PROBLEM.":╞"BM5,22":Бж10907еA$│"1":╞"S12BM20,85":Бж10907┼A$│"3":╞"S12BM60,70":Бж10907ц"A$│"8":╞"S12BM60,100":Бж10907√,╞"S8BM40,75"лL2$8OGOTHOTH!'":Бе200J║бЕL│56зЗ"YOU WILL NEED MANY THINGS TO KILL GLORY, AND YOU MUST DO IT, LEST HE TAKES THE WORLD UNDER HIS DEADLY LEAD, AND KILLS IT. YOU MUST BE PROTECTED.":Бе200J┘вЗ"IT DOES NOT TALK.":Бе200K6╨ЕL│51░O(44)│L ░I$│K$(41)░O(41)│200зЗ"IT IS FULL.":K$(44)│"BLI":O(44)│200:O(41)│999:Бе200KN╤З"YOU CAN'T.":Бе200LЕL│6░I$│"CRO"░O$(57)│"THE CROSS"░O(57)│200░O(1)│200зЗ"HE TAKES IT AND HANDS YOU THE MIGHTY TALISMAN!!":O(59)│200:O$(59)│"THE TALISMAN":K$(59)│"TAL":O(57)│999:T(11,1)│52:Бе200LКЕL│62░O(55)│L ░I$│ О(K$(55),3)░O(11)│200зO(11)│10:O(55)│0:T(1,L)│Lл1:З"HE TOOK IT AND VANISHED.":Бе200:ДЗ"IT TAKES NOTHING.":Бе200L№4ЕL│9░I$│"HAT"░D$(15)│"IT IS OPENED."зL│10:O(15)│L:Бе100:ДЕL│10░I$│"HAT"зL│9:O(15)│L:Бе100:ДЗ"YOU CAN'T":Бе200MЗЮM╥ИЗ"GOT THEM!":O(30)│200:З"AS YOU PUT THE SPIKES AWAY, THE SKELETON BEGINS TO STIR, AND ATTACKS YOU UNDER FORCE OF SOME SUPERNAL INFLUENCE.":Й"WHAT TO DO";W$:Ю:ЕW$│"HIT SKE"▒W$│"HIT SKELETON"з5001:Д5002NBЙЙ"WITH";W$:Е О(W$,3)│K$(18)░O(18)│200зЗ"THE SKELETON MET HIS MATCH.":Бе200:ДЗ"NO GOOD.":Q│Qм1:Бж1340:Бе5000NuКЗ"NO GOOD.":Q│Qм1:З"STRENGTH=";Q:Бж1340:Бе5000NБ':ГBOSS1Oc'Ю:З"DARKNESS FILLS THE ROOM, ENCOM- PASSES YOU IN FOLDS OF HATE AND COLD. THE UBIQUITOUS BLACK BECOMES ASPHYXIATING,TAKES ON A SUBSTANCE OF ITS OWN. THEN FROM THE DARKNESS THE FACE OF DREAD EMERGES. IT IS THE VALE."Oэ'Бж20000:ЕA$│ О(V$(10),3)░I$│"CLO"░F│1зЗ"IT SLICED THROUGH THE VALE, BRINGING IT TO THE GROUND.":O(35)│L:O(57)│L:АG│1е1000:Л:Бе100P 'ЕA$│ О(V$(9),3)░O(4)│200░I$│"WAT"з10004:Д10009PS'Й"ON";W$:Е О(W$,3)│K$(19)зЗ"DONE.":F│1:Бе10002PА'З"IT DOES NO GOOD.":Q│Qм1:Бж1340:Бе10002PМ):ГBOSS2Q_)Ю:З"AS YOU STEP ONTO THE SOFT RIVER BANKS, A GURGGLING NOISE COMES FROM BENEATH THE WATERS. YOU TURN TO RUN AS A GREAT SURGE OF WATER ERUPTS FROM THE SURFACE. AN ELEMENTAL SEEMS TOHAVE WAGED A BATTLE."Qк)Бж20000:ЕA$│"KIL"░O(35)│200з10503:ДЗ"YOU CANNOT.":Q│Qм1:Бж1340:Бе10502RF)Й"WITH";W$:Е О(W$,3)│K$(35)зЗ"IT CRINGES AWAY FROM YOU, DIEINGAND WRITING IN PAIN AS THE BLIGHT FILLS ITS SOUL.":O(44)│L:O(58)│L:АG│1е1000:Л:Бе100Rk)З"NO GOOD!":Q│Qм1:Бж1340:Бе10502Rw*°:ГBOSS3S/*∙Ю:З"BEFORE YOU TOWERS THE MIGHTY FIRE FIEND; THAT WHICH BOASTS TOHAVE KILLED YOUR FATHER! IT LAUGHS AT YOU WITH A LOOK OF PROMISCUITY ETCHED ACROSS ITS WRETCHED FACE."T*·Бж20000:ЕA$│ О(V$(10),3)░I$│"WAT"░O(44)│200зЗ"THE VIAL SAILED, STRUCK THE DEMON WARRIOR, AND YOU WATCHED AS ITS FORM BROKE SLOWLY DOWN BEFORE YOU. YOU SMILE IN HATREDOVER ITS PUDDLE OF FLESH.":O(59)│L:O(44)│999:Бе200TP*√З"INANE AGAINST SUCH AN OPPONENT!":Q│Qм1:Бж1340:Бе11002T\,ь:ГGLORYU,эЮ:З"YOU NOW PALE IN THE PRESENCE OF GLORY HIMSELF! 'SON OF BASHEES,YOU HAVE COME A LONG WAY. HAVE YOU PREPARED FOR OUR BATTLE? FORYOUR PITIFUL SAKE, I HOPE SO.'"UХ,юБж20000:ЕA$│"THR"░I$│"AVE"░O(1)│200░U2│1░U1│1з11503:ДЗ"GLORY LAUGHS DEEPLY AND STRIKES YOUR HEAD WITH A FIST OF STEEL.":Q│Qм2:Бж1340:Бе11502Vx,яЮ:З"GLORY TUMBLES TO THE MARBLE FLOOR, YOUR AIM SURE AND TRUE TO ITS MARK UNMATCHED IN BATTLE. THE MIGHTY KING OF THE DEMON CHURCH GLANCES UP AT YOU, LEAPS IN A FINAL DEATH GOUGE, AND TEARS OFF YOUR SWORD-ARM."W],ЁЗ"YOU SCREAM IN PAIN. GLORY SMILESAS DEATH TAKES HIM. QUICKLY YOU THROW WHAT IS LEFT OF THE HOLY WATER OVER YOUR HEAD, RETURNING YOU TO YOUR HOME TOWN. YOU DROPON THE STREET, BLEEDING TO DEATH";:З:З"PRESS ANY KEY.";:в44539X#,ёЮ0:АG│1е1000:Л:Ю:З"YOU AWAKEN IN A SOFT BED, YOUR LEFT SHOULDER ACHING, YOUR LEGS AND ARM WRAPPED IN WARM CLOTH. YOU CAN FEEL THE MAGIC TOUCH OF HEALING HERBS DOING THEIR WORK ON YOUR SIDE."Y ,ЄЗ"THE PRIEST SITS AT YOUR SIDE, WATCHING OVER YOU, A SMILE ON HIS FACE. HE WHISPERS, 'YOUR HELL IS ENDED, MY SON.' YOU FALLBACK INTO BED AND REST, ASSURED OF YOUR SUCCESS, AND TRUE TO THELEGEND OF A DEMON SLAYER CALLED."Y,єКYwN Й"ACTION";I$:АX│1е З(I$):Е Р(I$,X,1)│" "зA$│ О(I$,3):I$│ Р(I$,Xл1,3):Р:ДЛ:З"NONSENSENSE!":Бе20000Y▓u0АX│1е59:ЕO(X)│L ░ П(K$(X),1)┤▓"*" зO(X)│200:D│Dл1:Л:ДЛYшu1ЕD│0зЗ"NOTHING TO GET.":Бе200:ДЗ"DONE.":D│0:Бе200Zu2АX│1е59:ЕO(X)│200 зO(X)│L:D│Dл1:Л:ДЛZGu3ЕD│0зЗ"NOTHING TO DROP":Бе200:ДЗ"DONE.":D│0:Бе200:I$│ Р(I$,Xл1,3):Р:ДЛ:З"NONSENSENSE!":Бе20000Y▓u0АX│1е59:ЕO(X)│L ░ П(K$(X),1)┤▓"*" зO(X)│200:D│Dл1:Л:ДЛYшu1ЕD│0зЗ"NOTHING TO GET.":Бе200:ДЗ"DONE.":D│0:Бе200Zu2АX│1е59:ЕO(X)│200                                                                                                                                                                                                                                                                 $│K$(40)░L│59░O(49)│L з101089ыЕI$│"COI"░ L▓11з1005:Д10048PьЗ"YOU CANT.":Бе2008нэЙ"AT";W$:W$│ О(W$,3):ЕL│12░W$│"DOO"з1006:ДЕL│31░W$│"HOL"з1007:ДЕL│63░W$│"WAL"з1008:Д10048¤юЗ"THE DOOR AND THE COIN SHATTER ONIMPACT.":O(20)│0:T(1,L)│13:O(9)│999:Бе2009xяЗ"THE COIN FELL IN, TRIGGERING A MECHANISM THAT RAISED A PORTION OF THE EAST WALL.":O(10)│999:O(39)│0:T(3,L)│34:Бе2009┴ЁЗ"IT VANISHED WHEN THE COIN HIT IT":T(1,L)│64:O(11)│10:O(56)│0:Бе200:BЄЙ"AT";W$:Е О(W$,3)│ О(K$(49),3)зO(40)│999:O(49)│999:T(3,L)│65:З"IT BURST INTO FLAMES AS YOUR PROJECTILE STRUCK IT.":Бе200:cЕL│60зL│61:Бе200:ДL│60:Бе200:o:ГKNOCK:ЬЕL┤▓7зЗ"NOTHING TO BE KNOCKED ON.":Бе200:ЎЕI$┤▓"DOO"зЗ"IT HAS NO EFFECT.":Бе200:ДЙ"WHICH ONE (N)ORTH OR (S)OUTH";W$:W$│ О(W$,1);ЕW$│"N"з1054:ДЕW$│"S"з1060:Д200;sKD│1:З"A MAN OPENS THE DOOR AND SAYS 'WHO ARE YOU, AND WHAT DO YOU WANT?'":Бе200;╟$З"A MAN OPENS THE DOOR, AND CORDIALLY INVITES YOU INSIDE.":T(2,L)│8:Бе200;╥L:ГSHOW<|MЕL│6░O(4)┤L ░O(6)│200░I$│K$(6) зЗ"HE SAYS, 'YOU SHOULD TAKE THIS TO THE END AND CONSECRATE YOUR OFFERINGS.' THEN HE HANDS YOU A VIAL OF HOLY WATER.":O(4)│200:Бе200<╔NЕO(4)│200░KD│1░I$│"WAT"░L│7зЗ"HE SMILES AND LETS YOU IN.":T(1,L)│9:Бе200<чOЗ"IT DID NOT WORK.":Бе200<ё~:ГPUT=кЕO$(57)│"THE CROSS"░O(57)│200░I$│K$(57)░L│1зЗ"THE CROSS SLID IN, THEN DROPPED TO THE GROUND. SLOWLY THE DOOR ROSE ALLOWING YOU INSIDE THE FABLED TEMPLE.":T(2,1)│2:O(57)│L:Бе200=╥АЕ(L│55▒L│14)░I$│K$(6)░O(6)│200з1157>)БЕ(L│52 ▒L│55) ░I$│"TAL"░O(59)│200░O$(59)│"THE TALISMAN"зЗ"THE DOOR OPENED.":Бе1155>FВЗ"IT DID NO GOOD.":Бе200>wГЕL│52зT(3,L)│53:Бе200:ДЕL│55зT(3,L)│54:Бе200>╝ЕЗ"THE DOOR OPENED!":ЕL│55зT(4,L)│57:Бе200:ДЕL│14зT(3,L)│15:Бе200>╟░:ГMOVE?K▒ЕI$│"TAB"░L│9░MT│0зЗ"IT HAS BEEN LIFTED.":MT│1:Бе200:ДЕI$│"CAR"░MT│1░E│0░O(15)│0зЗ"YOU HAVE FOUND SOMETHING.":O(15)│L:E│1:Бе200?zтЕI$│ О(K$(24),3)░O(24)│200░L│47з1251:Д1252@уЙ"WITH";W$:W$│ О(W$,3):ЕW$│K$(23)░O(23)│200зЗ"THE LIQUID SPILLED, SUPPLYING YOU WITH TRANSPORTATION.":T(3,L)│48:O(24)│999:Бе200@фЗ"IT DOES NOT GOOD.":Бе200@.:ГKILL/HIT@_ЕL│61░O(23)│200░I$│ О(K$(54),3)з1309:ДБе1252@РЙ"WITH";W$:W$│ О(W$,3):ЕW$│K$(23)з1310:Д1252AbЗ"A LIGHT STREAMS FROM THE BELL, UNTIL IT VANISHES FROM SIGHT, THEN A SHRILL, ECHOING TONE PIERCES YOURS EARS, DRIVING YOU WEAKLY TO YOUR KNEES. YOU MUST DO SOMETHING, QUICKLY.":O(54)│999:O(23)│999A┘Й"COMMAND>>";I$:АX│1е З(I$):Е Р(I$,X,1)│" "зA$│ О(I$,3):I$│ Р(I$,Xл1,9):Бе1312::ДЛ:З"NO GOOD!":Q│Qм1:Бж1340:Бе1311Bo ЕA$│ О(V$(30),3)░I$│R$ зЗ"THE NOISE ENDED AND THE NORTH WALL CRUMBLED TO YOUR GRAT RE- LIEF.":T(1,L)│62:Бе200:ДQ│Qм1:З"NO GOOD!":Бж1340:Бе1311Bж<ЕQ│┤0зЗ"THOU HATH DECEASED.":Х:К:ДЗ"STRENGTH=";Q:РB▓F:ГDRIVECGЕI$│K$(30)░O(30)│200░L│21░DT│0зЗ"WELL DONE.":DT│1:O(30)│L:K$(30)│"SPI*":Бе200CHЗ"NO GOOD.":Бе200CСxЕDT│1░O(25)│200░O(33)│0зЗ"YOU HAVE FOUND ";O$(33):O(33)│200:Бе200:ДЕL│16▒L│18зЗ"DONE.":Бе1401:ДЗ"YOU CAN'T.":Бе200C┬yЕL│18зL│16:O(26)│L:Бе200:ДL│18:O(26)│L:Бе200D=кЕO(33)│200░I$│K$(33)зЗ"A PAIR OF POWERFUL WINGS STRETCHFROM YOUR SHOULDERS.":O(33)│999:GW│1:Бе200:ДЗ"YOU CAN'T.":Бе200DП▄ЕO(50)│200░O(25)│200░I$│"ROP"зЗ"YOU TIED IT.":SG│1:Бе200:ДЗ"YOU CAN'T.":Бе200DуЕL│26░GW│1зЗ"YOU SAIL WITH STILL GRACE TO THEOTHER SIDE.":L│27:АX│1е900:Л:Бе100D√З"YOU CAN'T.":Бе200E$@ЕL│28▒L│35з1601:ДЗ"YOU CAN'T.":Бе200E>AЕY1│1░L│28зL│29:Бе100EМBЕY1│1░L│35зЗ"YOU HAVE FOUND THINGS.":O(40)│200:O(41)│200:Бе200:Y1│0:Бе200E║CЗ"THERE WOULD BE NOT ENOUGH OXYGEN":Бе200FYrЕL│29зЗ"YOU SWIM FOR IT.":L│30:Бе200:ДЕL│35зЗ"YOU REACH THE OPPOSITE BANK.":L│36:Бе200:ДЕL│36зЗ"YOU SWIM OUT ON THE LAKE.":L│35:Бе200:ДЗ"YOU CAN'T.":Бе200FyдЗ"YOU FOUND NOTHING.":Бе200F╚╓ЕO$(57)│"THE CROSS"з1755:ДЗ"HOLD WHICH:":ЕO(57)│200зЗ"(1) CROSS PIECE ONE"Fю╫ЕO(58)│200зЗ"(2) CROSS PIECE TWO"GВ╪ЙW:Бж1760:ЕW│1░L│46зЗ"THE WATERFALL STOPPED!":T(3,L)│47:Бе200:ДЕW│1зY1│1:З"IT IS DONE.":Бе200:ДЕL│65░W│2зЗ"THE SNAKES SHRIVEL.":O(51)│999:Бе200G╝┘ЕW│2░L│63зЗ"THE WALL VANISHED!":T(1,L)│64:Бе200:Д1750G╘█З"YOU CAN'T.":Бе200HрЕO(57)┤▓200░W│1з200:ДЕO(58)┤▓200░W│2з200:ДРHXЕI$│"WAL"░L│18░T(4,L)│0зЗ"THE WALL MOVED!":T(4,L)│20:Бе200:ДЗ"YOU CAN'T.":Бе200Hv:З"IT DOES NO GOOD.":Бе200HўlЕI$│ О(K$(37),3)░O(37)│200зЗ"WORN.":U1│1:CA│CAм1:Бе200:ДЕI$│K$(43)░O(43)│200зЗ"WORN.":U2│1:CA│CAм1:Бе200:ДЗ"YOU CAN'T":Бе200IГЮЕL│8░O(6)│0зЗ"HERE I WILL GIVE YOU PROOF OF YOUR IDENTITY. BUT KNOW, MUCH WILL YOU NEED THAT THIS WILL NOTGIVE YOU.":O(6)│200:Бе200IхЯЕL│9░O(18)│0зЗ"I SHALL GIVE YOU THESE TO AID INYOUR QUEST, FRIEND.":O(18)│200:O(19)│200:Бе200JаЕL│57зЗ"HE SCREAMS 'YDING WATER,FIGHTING THE RIVER CURRENTS,SWIMMING THROUGH THE CHILLING WATER,SWIMMING THROUGH THE CHILLING WATERS,IN AN AIR POCKET,THE CLOSE CEILING ENDS HERE AT AN UNDERGROUND LAKE WITH A TENDER BANK OPPOSITE YOU'┬Ж STANDING OUTSIDE A DAMP CAVE,WANDERING THROUGH A STRANGE UNDERGROUND PASSAGE,WANDERING THROUGH A STRANGE UNDERGROUND PASSAGE,IN A DARK CAVE,IN A DARK CAVE,AT AN INTERSECTION OF PASSAGES,IN A DARK CAVE,IN A DARK CAVE(░Ж IN A DARK CAVE WHERE THE RUSH OFMOVING WATER FILLS YOUR EARS,IN A DARK CAVE,STANDING BEHIND A RAGING WATER- FALL,AT THE BASE OF THE FALLS,STANDING ON THE RIVER VOE DELTA,ON SOFT DRY LAND,ON SOFT DRY LAND,BEFORE A DARK POOL OF WATER)vЖ STANDING IN THE CHURCH OF DEMONSWHERE THE ENTRANCE TO GLORY IS SO CLOSE TO YOUR SIDE,IN THE CHAMBER OF GLORY,IN THE DEMON CHURCH,AT A HALL OF PASSAGES,IN THE DEMON CHURCH,IN THE DEMON CHURCH*CЖ IN THE DEMON CHURCH,STANDING BEFORE THE MIGHTY DEATHGUARG,AT A FALLEN AREA OF THE CHURCH THAT OFFERS A BOTTOMLESS GORGE AND EXPOSED RAFTERS ABOVE,CAUGHT IN A STRANGE AURA,BEFORE THE GUARDIAN DEMON*╡Ж IN A ROOM HEATED BY THE FLAMES OF DEMON HEARTS,AT THE ALTAR OF THE INFAMOUS WRATHIE,IN THE DEMON CHURCH*╞U:ГROOM PRINT*╙VЗL$(L):Р+rdЮ:З б(32,"-");:З"***YOUR POSITION IN THE QUEST***";:Бж85:З б(32,"X");:З"OBJECTS VISIBLE TO YOU HERE ARE:";:Бж110:З:З б(32,"-");:З"DIRECTIONS AVAILABLE..."+ФeАX│1е4:ЕT(X,L)▓0зЗT$(X);:Л:ДЛ+нfЗ:З б(32,"*");:Бе200+╫nАX│1е59:ЕO(X)│L зЗO$(X),;:A│Aл1:Л::ДЛ,oЕA│0зЗ"NOTHING SPECIAL SEEN.":Р:ДA│0:Р,╚:ГINPUT ROUTINE,f╔Е L│27░O(57)│0з10000:ДЕL│51░O(58)│0з10500:ДЕL│64░O(59)│0з11000:ДЕL│53з11500,╗╩Й"YOUR ACTION";I$:ЕI$│""зЗ"ENTER SOMETHING":Бе202:ДЕI$│"LOO"з100:ДЕI$│"LOOK"з100- ╦I│ Ю(1,"NSEW",I$):A$│ О(I$,3):АX│1е З(I$):Е Р(I$,X,1)│" "зI$│ Р(I$,Xл1,3) :ДЛ-Ф╠АX│1е35:ЕA$│ О(V$(X),3)з207:ДЛ:ЕI│0зЗ"I DON'T UNDERSTAND.":Бе200:ДЕI▓0░ T(I,L)▓0 з L│T(I,L):Бе100:ДЗ"YOU CAN'T GO THAT WAY.":Бе200.0╧И V(X) Бе400,300,500,600,700,800,900,1000,1050,1100,1150,1200,1250,1300,1350,1400,1450,1500,1550,1600,1650,1700,1750,1800,1850,1900,1950,2000,2050,2100.Q╨З"I DON'T UNDERSTAND.":Бе200.o╥:ГSTART OF VERB RESPONSES.в,ЕI$│K$(30)░O(30)│L ░L│20з4999:ДЕI$│"ALL"з30000/s-ЕL│65░I$│ О(K$(50),3)░O(51)│L зЗ"THE SNAKES STRUCK AT YOU AS YOU REACHED FOR IT, SURGING YOUR BLOOD WITH LETHAL POISON. YOU HAVE DECEASED, YOUR LEGEND NEVERBORN.":Х:К:ДЕL│64з305:ДЕL│27з306:ДЕL│51з3070.АX│1е59:ЕO(X)│L ░ I$│ О(K$(X),3) ░ П(K$(X),1)┤▓"*"зЗ"TAKEN.":O(X)│200:Бе200:ДЕO(X)│L ░I$│ О(K$(X),3)зЗ"IT CANNOT BE GOTTEN.":Бе200:ДБж303:Л:З"IT IS NOT AROUND.":Бе2000X/ЕO(X)│200░I$│K$(X)зЗ"YOU ALREADY HAVE IT.":Бе 200 :ДР0|0З"YOU CAN CARRY NO MORE.":Бе20011ЕI$│"PIE"зЗ"THE CROSS IS MADE!":O(59)│999:O(58)│999:O(57)│200:O$(57)│"THE CROSS":K$(57)│"CRO":D$(57)│"IT RADIATES WITH POWER.":L│11:Q│5:Бе200:Д3021?2ЕI$│"PIE"зO(57)│200:L│11:Q│5:Бе100:Д3021k3ЕI$│"PIE"зO(58)│200:L│11:Q│5:Бе100:Д3022;РЮ:З" VERBS ********************************";:АX│1е24:ЗV$(X),;:Л:З"PRESS ANY KEY";:в44539:Ю:З" VERBS ********************************";:АX│25е35:ЗV$(X),;2bСЛ:З:З"PRESS ANY KEY.":в44539:Бе1002wЇЕ I$│"ALL"з300022фїАX│1е59:ЕO(X)│200 ░I$│K$(X) зЗ"YOU HAVE DROPPED IT.":O(X)│L:Бе200:ДЛ:З"YOU DON'T HAVE IT TO DROP.":Бе2002ўXЮ:З"INVENTORY"3!YАX│1е59:ЕO(X)│200зЗO$(X):Q1│Q1л1:Л:ДЛ3vZЕQ1│0зЗ"NOTHING.":З"PRESS ANY KEY.":в44539:Бе100:ДЗ"PRESS ANY KEY.":в44539:Бе1003Й╝:ГLOOK/EXAMINE3█╛АX│1е59:Е(O(X)│L ▒O(X)│200)░I$│ О(K$(X),3) з703:ДЛ:З"IT IS NOT AROUND.":Бе2004┐ЕD$(X)│""зЗ"NOTHING INTERESTING ABOUT IT.":Бе200:ДЗD$(X):Бе2004( :ГPRY4ю!ЕI$│ О(K$(12),3)░L│10░D$(12)┤▓"IT IS OPENED." ░O(18)│200зЗ"IT IS OPENED.INSIDE YOU FOUND THREE STRANGE COINS, NOW IN YOURPOSSESSION.":O(9)│200:O(10)│200:O(11)│200:D$(12)│"IT IS OPENED.":Бе2005c"ЕL│9░O(15)│L ░I$│ О(K$(15),3)░D$(15)┤▓"IT IS OPENED."зЗ"YOU HAVE FOUND AN INGRESS.":D$(15)│"IT IS OPENED.":Бе2005═#ЕL│20░O(30)│0░I$│ О(K$(29),3)зЗ"YOU HAVE FOUND SEVERAL ROCK SCALING ANCHOR SPIKES.":O(30)│L:Бе2005╪Д:ГPOUR5°ЕЕO(4)│200░I$│"WAT"з902:Д9206/ЖЙ"ON WHAT";W$:ЕW$│""з200:ДЕ О(W$,3)│"COI"з903:Д9206ZЗЕL┤▓11зЗ"THIS IS NOT THE PLACE.":Бе2006бИЕO(9)│200зL│12:Бе906:ДЕO(10)│200зL│28:Бе907:ДЕO(11)│200зL│52:Бе9086║ЙЗ"YOU CANNOT.":Бе2006╘КЮ:З"TO SUMMIT.":Бе9096°ЛЮ:З"ON TO THE RIVER VOE.":Бе9097МЮ:З"TO THE CHURCH OF DEMONS."7/НАX│1е400:Л:Бе1007GШЗ"YOU CAN'T.":Бе2007░шЕL│19░O(21)│200░I$│K$(21)зЗ"THE PEBBLE FLEW, AND BOUNCED OFFOF EMPTY AIR!":T(1,L)│21:O(21)│999:Бе2007ющЕSG│1░ (L│60 ▒ L│61) ░I$│K$(50)зЗ"AWAY YOU SWING.":Бе10408ъЕO(40)│200░I64,64,0,64,96,-6,112,-2,96,9998лфЖ 0,24,12,14,14,5,5,-3,2,-3,1,-8,0,1,3,3,1,-8,0,15,13,14,127,126,65,-2,127,14,7,2,-2,0,96,96,112,80,-4,88,60,56,56,120,120,112,112,96,9999юЖ -33,0,64,-3,96,65,3,15,1,-2,0,126,127,97,31,-2,126,-2,125,123,119,111,127,63,127,-2,126,127,115,99,3,9999а°Ж -17,0,-2,64,-2,96,-3,112,48,56,56,24,24,24,26,26,-7,31,30,28,24,0,1,3,12,3,1,3,15,31,63,127,63,63,126,121,119,79,127,117,65,9999хЖ -15,0,32,53,31,15,7,3,1,-31,0,64,64,96,96,32,1,1,3,7,7,6,8,999:S Ж -40,0,-3,120,92,108,116,28,96,-2,112,56,124,123,113,0,-3,64,112,96,112,96,-2,112,120,124,60,30,12,2,999:─Ж -42,0,1,127,91,41,98,-3,127,126,97,31,127,-2,126,121,99,23,-2,111,8,119,123,-2,88,92,-3,88,112,96,96,1,999; Ж -40,0,112,112,122,29,102,-5,127,15,95,56,39,95,127,31,-6,0,113,123,13,124,124,999;Г*Ж -35,0,-3,64,52,54,39,95,92,92,63,127,31,-2,7,1,-15,0,7,14,3,-8,0,64,96,112,48,80,80,96,48,16,999<4Ж -20,0,112,32,64,-7,0,120,120,102,31,126,121,115,111,95,63,-2,127,120,112,64,-12,0,8,60,108,54,26,30,7,3,1,-11,0,31,31,13,6,3,-3,1,999<е>Ж -15,0,8,28,60,0,126,103,57,94,103,120,-2,124,-2,108,-3,110,-2,109,107,91,91,67,7,-3,15,30,29,27,31,30,28,16,-14,0,64,112,-3,124,126,62,62,6,999<єHЖ -20,0,1,-4,3,7,15,7,7,-3,3,65,97,113,-5,112,32,32,-20,0,-2,15,7,3,3,999=RЖ -32,0,-3,1,0,1,1,999=@\Ю:Y│15:Т&HFFBC,Y:З"CHANGE TO BLUE CARTRIDGE."=_f:Г**********BLUE**********>pЗ#м2, Л(30); Л(20); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10);>=zЗ:З:З"ANY KEY WHEN READY">HДв44539>oОЗ:З:°2,2,B:З"PRINTING....";:°2,5:З>АШЗ#м2, Л(18);>ОвА R│1 е 8>дмН N:Е N│999 з 990>╚╢Е N▓│0 з З#м2, Л(128лN);:Бе 940>╨└Н M>Є╩З#м2, Л(28); Л(мN); Л(128лM);>¤╘Бе 940?▐З#м2:Л R:Бе1080?qшЖ -64,0,64,-3,0,64,0,-5,64,-5,0,64,96,64,96,112,16,16,32,112,88,24,16,112,56,30,127,7,3,999?·ЄЖ -55,0,14,27,127,123,95,25,31,13,31,13,13,15,5,5,15,13,13,15,28,55,51,31,27,26,10,29,13,13,15,4,4,13,15,61,113,99,79,95,63,15,4,999@q№Ж -58,0,3,7,15,28,24,58,62,127,98,120,124,28,12,70,98,99,112,112,56,24,24,12,12,6,6,66,98,34,49,89,76,70,3,1,1,999@┘Ж -68,0,-3,1,-5,19,82,58,58,58,94,93,46,46,22,-3,23,-2,19,17,-4,32,96,96,48,48,112,112,32,96,64,999AYЖ -72,0,4,100,50,57,60,62,27,25,25,25,12,12,12,6,6,2,2,66,65,65,96,32,48,120,124,115,98,24,29,127,34,47,63,112,96,96,64,999A┴Ж -69,0,64,120,126,127,71,78,78,76,-3,12,6,6,68,96,32,62,55,11,27,27,12,10,19,30,7,4.4,7,3,-3,1,999B $Ж -70,0,2,127,127,67,97,113,113,89,72,124,38,22,31,11,9,7,2,3,1,999B'.Ж -69,0,7,7,6,2,3,1,1,999B╞8З#м2,  Л(30):АJ│1е3:З#м2,"":ЛJ:З#м2, Л(27); Л(26); Л(27); Л(26); Л(27); Л(26):З#м2, Л(27); Л(31):З#м2," My Dear Helen,":З#м2, Л(27); Л(32)BЎBY│62:Т&HFFBC,Y:Ю:З"Try Another One. [ Y/N ]CLI$│ Т:Е I$│"" з1100 CaVЕ I$│"N" з З#м2, Л(30):Ю:З"END OF PROGRAM" :Д ЕI$│"Y" з О30 :Д а100,1:Бе1090; Л(26); Л(27); Л(26):З#м2, Л(27); Л(31):З#м2," My Dear Helen,":З#м2, Л(27); Л(32)BЎBY│62:Т&HFFBC,Y:Ю:З"Try Another One. [ Y/N ]CLI$│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  b&3 Т &H95C9,&H17:Т &HFF22,&H10 :Г TRUE LOWERCASE&[Т150,18 :ГPRINTER BAUD RATE AT 2400&пт32:X│0:Y│63 :Т&HFFBD,X:Т&HFFBC,Y:З"JONCOM":З" COLOR ROSE ":АZ│1е500:ЛZ'(З:З"Printer on line?":З"Black ribbon cartridge please.":З:З"PRESS ANY KEY WHEN READY.":в44539'&2З:З"PRINTING..."'><З#м2, Л(18); Л(13);'MFА R│1 е 17'cPН N:Е N│999 з 130'ЖZЕ N▓│0 з З#м2, Л(128лN);:Бе 80'ОdН M'░nЗ#м2, Л(28); Л(мN); Л(128лM);'║xБе 80'═ВЗ#м2:Л R:Бе310('МЖ -21,0,64,32,24,8,8,4,56,64,96,16,-3,8,4,4,2,1,65,1,2,-3,4,8,8,112,32,32,64,64,0,999(УЦЖ -20,0,57,70,0,0,96,32,96,-2,32,33,66,12,112,-5,64,115,127,124,6,0,0,16,12,3,0,8,4,9,5,25,97,99,30,999(·аЖ -21,0,1,14,16,33,34,36,41,49,49,32,97,66,68,4,4,-4,2,6,5,3,3,66,50,12,-3,0,64,-3,32,33,17,15,999)4кЖ -33,0,3,60,68,8,31,8,4,4,94,40,30,13,10,5,2,2,1,999)н┤Ж -5,0,-3,64,32,40,24,72,9,6,2,2,1,9,9,-3,41,49,-3,18,20,40,40,48,16,32,32,64,32,81,73,62,72,28,42,73,8,48,32,64,999*<╛Ж 24,20,18,17,17,58,10,-3,5,-3,2,-8,1,2,4,12,2,-6,1,9,15,48,18,113,0,1,62,0,0,113,8,15,67,32,16,80,72,40,-4,36,66,66,68,4,4,8,8,16,112,999*з╚Ж -31,0,96,64,32,16,18,17,50,76,16,14,127,126,1,0,30,96,1,1,2,2,4,8,16,0,64,0,1,1,0,12,20,100,13,2,999+5╥Ж -16,0,64,32,48,16,16,-3,8,72,-2,68,36,38,37,37,-4,36,16,48,48,33,34,38,120,71,62,124,3,12,2,12,16,32,64,0,64,64,1,6,8,48,0,10,54,67,999+▒▄Ж -14,0,32,85,74,32,16,8,4,2,97,33,32,-5,16,96,64,-11,0,1,1,3,15,62,112,64,-2,0,64,35,48,16,17,81,50,18,6,8,9,22,56,999,CцЖ -9,0,-4,64,0,0,121,4,-3,2,1,1,-9,0,113,14,-5,2,4,120,-3,4,34,18,10,98,28,13,15,70,1,4,10,113,33,33,48,8,16,8,72,8,12,4,2,66,33,18,13,10,999,■ЁЖ -6,0,96,30,1,1,-3,0,1,1,2,7,0,8,48,104,120,64,28,32,48,32,80,32,24,71,33,32,32,-6,0,-2,1,126,0,36,86,13,-3,0,1,30,96,0,1,1,6,28,104,16,16,99,8,4,36,37,34,38,-2,36,40,8,16,16,96,999-к·Ж -6,0,1,126,0,0,-2,64,-4,32,36,36,44,44,0,3,15,31,30,56,1,16,14,13,36,-5,32,-3,0,112,24,14,5,98,25,-5,0,112,32,39,88,32,0,96,63,3,7,14,127,115,10,4,114,2,125,-6,1,999.XЖ -7,0,124,3,1,-5,0,-2,4,2,112,16,8,4,2,62,6,0,1,3,4,-5,0,64,64,32,32,60,74,73,88,32,35,64,0,96,24,8,30,1,-12,0,67,39,56,113,76,3,-6,0,64,32,16,8,72,40,40,8,8,104,24,999/Ж -8,0,1,14,8,8,-5,16,48,48,115,12,80,32,96,32,16,16,8,4,124,4,6,25,96,1,6,12,16,32,64,-2,0,7,14,58,64,-10,0,8,116,66,18,73,37,33,24,4,2,1,1,3,7,14,28,56,112,96,64,63,32,14,9,4,6,2,2,1,999/╠Ж -12,0,2,4,12,22,34,66,126,1,24,70,33,24,7,2,19,19,-3,17,18,18,20,36,36,60,72,48,112,80,33,34,36,32,33,35,44,48,32,64,-7,0,3,1,0,0,64,48,12,-3,2,1,65,65,57,6,1,7,127,126,9990F"Ж -18,0,3,1,1,2,-4,4,24,16,8,8,4,4,68,34,18,10,9,8,9,10,10,87,86,44,56,48,96,64,-14,0,23,8,8,4,2,2,1,-7,0,127,127,9990б,Ж -29,0,4,2,3,-3,2,1,2,2,1,1,-6,0,1,3,14,28,56,112,96,64,64,-22,64,127,127,-120,64,9990╧6Y│33:Т&HFFBC,Y:Ю:З"CHANGE TO RED RIBBON."1s@З#м2, Л(30); Л(20); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10);1СJ:Г**********RED**********1пTЗ:З:З"ANY KEY WHEN READY"1║^в445391▀hЗ:З:°2,3,B:З"PRINTING....";:°2,51ЁrЗ#м2, Л(18);1 |А R│1 е 142ЖН N:Е N│999 з 44029РЕ N▓│0 з З#м2, Л(128лN);:Бе 3902AЪН M2cдЗ#м2, Л(28); Л(мN); Л(128лM);2nоБе 3902Б╕З#м2:Л R:Бе5902ы┬Ж -22,0,64,96,112,112,120,64,-2,0,96,-3,112,-2,120,124,126,62,126,124,-3,120,112,112,0,64,64,-4,0,9993c╠Ж,-20,0,57,-2,127,31,95,31,95,95,94,61,115,15,-5,63,12,0,3,121,-2,127,111,115,124,127,119,123,118,114,102,30,28,9993╒╓Ж -22,0,1,15,30,29,27,22,14,14,31,30,61,59,123,123,-4,125,121,122,124,124,61,13,115,-3,127,63,-3,31,30,14,9994рЖ -33,0,1,-3,7,0,7,3,3,1,7,1,2,5,2,1,1,9994ъЖ 9994ЇЖ 9994"■Ж 9994,Ж 9994HЖ -23,0,-2,64,-5,96,9994ГЖ -16,0,120,-3,124,-2,126,-9,127,14,112,-5,124,120,9994я&Ж -7,0,96,-2,126,-3,127,-2,126,124,120,127,119,71,7,7,63,-2,3,15,31,15,31,7,56,31,31,-7,127,126,126,999590Ж -7,0,1,-2,127,-2,63,-4,31,90,2,-11,0,88,-5,95,-3,127,127,15,7,1,9995░:Ж -8,0,124,126,-5,127,119,115,112,120,8,104,112,120,120,64,120,126,123,124,120,124,125,127,127,63,63,31,31,3,1,9995шDЖ -9,0,1,7,7,-7,31,12,3,15,-3,31,-2,15,7,-3,3,1,9996NЮ:Y│17:Т&HFFBC,Y:З"CHANGE TO GREEN CARTRIDGE"6вXЗ#м2, Л(30); Л(20); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(10); Л(27); Л(26); Л(27); Л(26);6┬b:Г**********GREEN**********6ыlЗ:З:З"PRESS ANY KEY WHEN READY.":З:З6Ўvв445397 АЗ"PRINTING...."7КЗ#м2, Л(18);7*ФА R│1 е 137@ЮН N:Е N│999 з 7207dиЕ N▓│0 з З#м2, Л(128лN);:Бе 6707l▓Н M7О╝З#м2, Л(28); Л(мN); Л(128лM);7Щ╞Бе 6707м╨З#м2:Л R:Бе8608┌Ж -8,0,-2,64,96,48,112,120,-2,124,126,118,118,-3,86,78,-3,108,104,-2,80,64,96,  █& Т&H95C9,&H17:Т&HFF22,&H10&GТ150,18 :ГPRINTER BAUD RATE AT 2400&Гт32:X│0:Y│15 :Т&HFFBD,X:Т&HFFBC,Y:З"JONCOM":АZ│1е500:ЛZ&┴(З:З"PRINTER ON LINE?":З"PRESS ANY KEY WHEN READY.":в44539&╓2З:З"PRINTING..."&э<З#м2, Л(18); Л(13)&№FА R│1 е 17'PН N:Е N│999 з 130'5ZЕ N▓│0 з З#м2, Л(128лN);:Бе 80'=dН M'_nЗ#м2, Л(28); Л(мN); Л(128лM);'ixБе 80'|ВЗ#м2:Л R:Бе310'╓МЖ -21,0,64,32,24,8,8,4,56,64,96,16,-3,8,4,4,2,1,65,1,2,-3,4,8,8,112,32,32,64,64,0,999(BЦЖ -20,0,57,70,0,0,96,32,96,-2,32,33,66,12,112,-5,64,115,127,124,6,0,0,16,12,3,0,8,4,9,5,25,97,99,30,999(йаЖ -21,0,1,14,16,33,34,36,41,49,49,32,97,66,68,4,4,-4,2,6,5,3,3,66,50,12,-3,0,64,-3,32,33,17,15,999(укЖ -33,0,3,60,68,8,31,8,4,4,94,40,30,13,10,5,2,2,1,999)\┤Ж -5,0,-3,64,32,40,24,72,9,6,2,2,1,9,9,-3,41,49,-3,18,20,40,40,48,16,32,32,64,32,81,73,62,72,28,42,73,8,48,32,64,999)ы╛Ж 24,20,18,17,17,58,10,-3,5,-3,2,-8,1,2,4,12,2,-6,1,9,15,48,18,113,0,1,62,0,0,113,8,15,67,32,16,80,72,40,-4,36,66,66,68,4,4,8,8,16,112,999*V╚Ж -31,0,96,64,32,16,18,17,50,76,16,14,127,126,1,0,30,96,1,1,2,2,4,8,16,0,64,0,1,1,0,12,20,100,13,2,999*ф╥Ж -16,0,64,32,48,16,16,-3,8,72,-2,68,36,38,37,37,-4,36,16,48,48,33,34,38,120,71,62,124,3,12,2,12,16,32,64,0,64,64,1,6,8,48,0,10,54,67,999+`▄Ж -14,0,32,85,74,32,16,8,4,2,97,33,32,-5,16,96,64,-11,0,1,1,3,15,62,112,64,-2,0,64,35,48,16,17,81,50,18,6,8,9,22,56,999+ЄцЖ -9,0,-4,64,0,0,121,4,-3,2,1,1,-9,0,113,14,-5,2,4,120,-3,4,34,18,10,98,28,13,15,70,1,4,10,113,33,33,48,8,16,8,72,8,12,4,2,66,33,18,13,10,999,нЁЖ -6,0,96,30,1,1,-3,0,1,1,2,7,0,8,48,104,120,64,28,32,48,32,80,32,24,71,33,32,32,-6,0,-2,1,126,0,36,86,13,-3,0,1,30,96,0,1,1,6,28,104,16,16,99,8,4,36,37,34,38,-2,36,40,8,16,16,96,999-Y·Ж -6,0,1,126,0,0,-2,64,-4,32,36,36,44,44,0,3,15,31,30,56,1,16,14,13,36,-5,32,-3,0,112,24,14,5,98,25,-5,0,112,32,39,88,32,0,96,63,3,7,14,127,115,10,4,114,2,125,-6,1,999.Ж -7,0,124,3,1,-5,0,-2,4,2,112,16,8,4,2,62,6,0,1,3,4,-5,0,64,64,32,32,60,74,73,88,32,35,64,0,96,24,8,30,1,-12,0,67,39,56,113,76,3,-6,0,64,32,16,8,72,40,40,8,8,104,24,999.╚Ж -8,0,1,14,8,8,-5,16,48,48,115,12,80,32,96,32,16,16,8,4,124,4,6,25,96,1,6,12,16,32,64,-2,0,7,14,58,64,-10,0,8,116,66,18,73,37,33,24,4,2,1,1,3,7,14,28,56,112,96,64,63,32,14,9,4,6,2,2,1,999/{Ж -12,0,2,4,12,22,34,66,126,1,24,70,33,24,7,2,19,19,-3,17,18,18,20,36,36,60,72,48,112,80,33,34,36,32,33,35,44,48,32,64,-7,0,3,1,0,0,64,48,12,-3,2,1,65,65,57,6,1,7,127,126,999/ї"Ж -18,0,3,1,1,2,-4,4,24,16,8,8,4,4,68,34,18,10,9,8,9,10,10,87,86,44,56,48,96,64,-14,0,23,8,8,4,2,2,1,-7,0,127,127,9990P,Ж -29,0,4,2,3,-3,2,1,2,2,1,1,-6,0,1,3,14,28,56,112,96,64,64,-22,64,127,127,-120,64,9990q6Ю:З"Try Another One. [ Y/N ]0Й@I$│ Т:Е I$│"" з320 0┌JЕ I$│"N" з З#м2, Л(30):Ю:З"END OF PROGRAM" :Д ЕI$│"Y" з О50 :Д а100,1:Бе3104,2,2,1,-7,0,127,127,9990P,Ж -29                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 FHC:ГCOPYRIGHT (C) T&D SOFTWARE 1991 paladin legend ISSUE #110╟Ю:L$│ б(32,"="):АX│1е15:ЗL$;:Л:З@256,"******** PALADIN LEGEND ********";:З@302,"BY:";:З@320,"=====>>JAMES STAKELIN II<<======";ЫМT(4,65),O$(59),O(59),D$(59),K$(59),V$(35),V(35),L$(65):АX│1е65:НT(1,X),T(2,X),T(3,X),T(4,X):Л:АX│1е59:НO$(X),D$(X),K$(X),O(X):Л:АX│1е35:НV$(X),V(X):Л:T$(1)│"NORTH ":T$(2)│"SOUTH ":T$(3)│"EAST ":T$(4)│"WEST"═АX│1е65:НL$(X):Л:Q│5:L│1:R$│"YOGOTHOTH":Бе100RЖ 3,0,0,0,1,0,0,0,0,1,4,0,0,0,5,3,6,0,7,4,0,5,0,0,0,0,11,5,7,0,0,0,0,7,0,0,0,0,0,0,0,0,0,7,0,0,0,0,17,12,14,0,16,0,0,13,0,0,0,14BЖ 0,14,0,0,0,13,0,0,19,0,0,20,0,18,0,0,0,0,18,0,0,0,0,22,23,0,21,24,0,22,0,25,0,0,22,0,26,0,23,0,0,25,0,0,0,0,0,0,0,0,0,0,0,0,0,0,31,0,0,32,0,30,0,0,33,0,30,0,0,32,0,0,35,0,0,0,0,34,0,0,42,35,38,37,40,0,36,0,0,0,0,36,44,0,0,0,0,37,42,03Ж 0,42,0,0,41,36,43,40,0,0,44,42,45,39,0,43,0,44,46,0,0,0,0,45,0,0,0,0,0,0,50,0,50,0,0,0,51,49,0,48,0,0,0,0,55,0,0,0,0,0,0,52,56,0,0,55,58,52,0,0,0,54,0,0,0,0,55,0,59,55,0,0,60,58,0,0,0,59,0,0,0,60,0,0,0,61,0,0,0,62,0,0,0,0,0,0,0,0,0,59#Ж THE HOLY AVENGER,A MAGNIFICENT FIGHTING BLADE,AVE,2,THE TEMPLE OF BRAMAH,GRAND AND MYSTERIOUS WITH A HOLYMARK INGRAVED IN ITS DOOR,TEM*,1,A PRIEST,HE IS TALL AND SLENDER,PRI*,6,HOLY WATER,,WAT,0,DOORS TO HOMES NORTH AND SOUTH,,DOO*,7Ж THE FAMILY SEAL,IT IS OF YOUR LINEAGE,SEA,0,A MAN,,MAN*,9,A MAN,,MAN*,8,COIN OF SUMMIT,,COI,0,COIN OF WATER,,COI,0,COIN OF FIRE,,COI,0,A CHEST,A NORMAL WOODEN CHEST,CHE*,10,AN EATING TABLE,,TAB*,9,A LUSH CARPET,,CAR*,9,A HATCH,IT GOES DOWNы Ж HAT*,0,A TABLE,,TAB*,8,SEVERAL CHAIRS,THEY SURROUND THE TABLE,CHA*,8,A DAGGER,SMALL AND SILVER,DAG,0,HEALING CLOTH,IT HAS STRANGE PROPERTIES,CLO,0,A DOOR OF ROCK,,DOO*,12,A PEBBLE,,PEB,13,A DOOR,,DOO*,14╤ Ж A GOLDEN HAMMER,,HAM,15,A BOTTLED RAFT,,RAF,15,ROPE,,ROP,17,LADDER,IT GOES UP,LAD*,16,LOCK,,LOC*,14,A SKELETON,IT EMINATES THE STENCH OF ROT,SKE*,20,A PACK,IT IS OLD AND DUSTY,PAC*,20,SPIKES,MADE FOR MOUNTAIN CLIMBING,SPI,0Ю Ж WALL,,WAL*,0,A NICHE,IT IS HIGH IN THE PRECIPICE TO YOUR RIGHT,NIC*,21,WING OF MAGIC POTION,,POT,0,A CREVASSE,IT SPANS AN AREA MUCH TO FAR TO LEAP,CRE*,26,THE BLIGHT AXE,A MONSTER OF A WEAPON,AXE,0{ Ж THE RIVER VOE,IT SCINTILLATES BEAUTIFULLY IN THE AFTERNOON SUN,RIV*,28,THE ARMOR OF OSOTH,WORN BY A MAN WHO ONCE TRIED TO DEFEAT THE MIGHTY GLORY,ARM,54,A CAVE,DARK AND OMINOUS,CAV*,29,A HOLE,BUBBLES ISSUE FROM ITm Ж HOL*,31,A POISON THROWING STAR,,STA,0,AN EMPTY VIAL,,VIA,0,A WATERFALL,,FAL*,46,A GAUNTLET,MADE WELL OF TEMPERED STEEL,GAU,49,BLIGHTWATER,,BLI*,0,THE ENTRANCE TO GLORY,A SYMBOL OF PURITY IS CARVED INTO IT,ENT*,52,AN OLD MAN,,MAN*,57KЖ DOORS TO THE EAST AND WEST,,DOO*,55,GRATHOTH,A SOUL LOST IN THE CHURCH OF DEMONS,GRA*,56,THE DEATH GUARG,HIDEOUS AND EVIL OF COUNTENANCE,GUA*,59,A GRAPPLING HOOK,JUST THE HOOK,GRA,65,SNAKES,VERY POISONOUS,SNA*,65 >Ж RAFTERS EXPOSED IN THE CIELING,,RAF*,60,A TRENCH OF LAVA,,TRE*,60,A SILVER BELL,,BEL*,61,A GUARD DEMON,HE SEEMS ANXIOUS,DEM*,62,A WALL OF FIRE,,FIR*,63,PIECE ONE OF THE CROSS,,ONE,0,PIECE TWO OF THE CROSS,,TWO,0,PIECE THREE OF THE CROSS KЖ ,THR,0!>Ж VERB,1,GET,2,DROP,3,INVENTORY,4,LOOK,5,EXAMINE,5,OPEN,6,PRY,6,POUR,7,THROW,8,TOSS,8,KNOCK,9,SHOW,10,PUT,11,PLACE,11,MOVE,12,BREAK,13,KILL,14,HIT,14,DRIVE,15,CLIMB,16,USE,17,TIE,18,FLY,19,DIVE,20,SWIM,21,SEARCH,22,HOLD,23,PUSH,24,YELL,25!kЖ WEAR,26,TALK,27,FILL,28,GIVE,29,GO ,30"eЖ STANDING BEFORE THE GRAND BRAMAHTEMPLE,INSIDE THE TEMPLE OF BRAMAH WHERE THE AIR HUMMS OF PURITY,ON A DIRT PATH LEADING INTO THE TOWNSHIP OF KRELOE,IN THE OUTSKIRTS OF THE TOWNSHIP,STANDING BEFORE THE PROMINENT PLACE OF WORSHIP OF KRELOE#<Ж "INSIDE THE CHURCH OF KRELOE, STANDING BEFORE AN ALTAR OF HOLYWORSHIP",IN THE CENTER OF TOWN WHERE THE HOUSES OF ITS DENIZENS ENCOMPASSYOU,INSIDE A QUIET HOME,INSIDE A QUIET HOME,IN A DANK EARTHEN BASEMENT$7Ж "AT THE END OF TOWN, A GREAT ROCK PRECIPICE IMPEDING YOUR PASSAGE",IN THE MIDST OF A VAST MOUNTAIN CHAIN,PONDERING THE INGRESS IN WHICH YOU STAND,IN AN OPEN CAVERN,IN AN ALCOVE,AT A DEAD END WHERE THE CIELING ALONE GIVES FURTHER PASSAGE%(Ж DEEP INSIDE THE MOUNTAIN CHAIN,IN A HIGHER LEVEL OF THE MYSTERIOUS PEAKS,STANDING BEFORE A VAST CHASM,IN AN ASPHYXIATINLGY SMALL ROOM,AT ONE SIDE OF A VAST CHASM,IN A CAVE HEWN OF MOUNTAIN STONE,IN A CAVE HEWN OF MOUNTAIN STONE%ЇЖ IN A CAVE HEWN OF MOUNTAIN STONE,AT A TURN IN THE CAVE,TETERING AT THE EDGE OF AN OMINOUS DRAFTY CREVASSE,IN THE GOLDEN PALATIAL ROOM OF THE VALE,STANDING BEFORE THE RIVER VOE,UNDER THE WATER&▄Ж TREA ї&A:ГCOPYRIGHT (C) T&D SOFTWARE 1991 to-do list ISSUE #110&Q╚0:Бе 60000&\2Х 4000&Д4М EV$(400),ED$(400),ND(12),SF$(400)&и6Е  Ж(&HC000)│68 з DN│1 :Д DN│м1&┤8YR│1991&╜:NE│0&╓<А I│1 е 12:Н ND(I):Л&э>Ж31,28,31,30,31,30'?Ж31,31,30,31,30,31'AБж 900'FЮ:З@64'7GЗ:З" YEAR";YR:З'═HЗ" Y. YEAR SELECT L. LOAD DATA FILE S. SAVE DATA FILE T. TO-DO DISPLAY Q. QUIT"'фKK$│ Т:ЕK$│"" Бе 75(LP│ Ю("YLSTQ",K$):Е P│0 Бе 76(!MИ P Бе 78,80,90,100,990(]NЮ:З@230,"YEAR: ";:╗Й Y$:Y│ Й(Y$):Е Y┤1991 ▒ Y▓2091 з 78(sOYR│Y:Бж 800:Бе 70(КPБж 2000:ЕF$│""Бе70(ЪQЩ"I",#DN,F$(жRЙ#DN,YR(▓SЙ#DN,NE(ёTЕ NE з А I│1 е NE:╗Й#DN,EV$(I):╗Й#DN,ED$(I):╗Й#DN,SF$(I):Л)YЪ#DN:Бе 70)ZБж 2000:ЕF$│"" Бе 70))[Щ"O",#DN,F$)5\З#DN,YR)A]З#DN,NE)}^Е NE з А I│1 е NE:З#DN,EV$(I):З#DN,ED$(I):З#DN,SF$(I):Л)ЛcЪ#DN:Бе70)ШdM│9:D│10)иfЮ:N1│0:N2│0)╩hЗ б(15,191);" "; б(15,191м16)*jА I│1 е 9:З Л(191) б(13,32) Л(191)" " Л(191м16) б(13,32) Л(191м16)*lЛ*7nЗ б(15,191)" " б(15,191м16)*lpD1$│ Р( И(M),2)л"-"л Р( И(D),2)л"-"л Р( И(YR),2)*zrЗ@35,D1$;*РtЕ Dл1▓ND(M) з 120*аvM2│M:D2│Dл1*лwБе 125*╗xM2│Mл1:D2│1*Є}D2$│ Р( И(M2),2)л"-"л Р( И(D2),2)л"-"л Р( И(YR),2)+ВЗ@35л16,D2$;+ДЕ NE│0 Бе 180+$ЖА I│1 е NE+=ИЕ ED$(I)┤▓D1$ Бе 150+IКN1│N1л1+xМЗ@33лN1н32,═"!% %";SF$(I);EV$(I);+ГОБе 160+ЬЦЕ ED$(I)┤▓D2$ Бе 160+иШN2│N2л1+┌ЪЗ@33л16лN2н32,═"!% %";SF$(I);EV$(I);+раЛ,(┤З@257л128," ARROWS ADVANCE DAY & MONTH (A) ADD DATA TO "лD1$,Г╢З@257л128л64," (B) ADD DATA TO "лD2$:З@257л128л64л32," (P) PRINT (M) MARK (Q) QUIT";,Ы╣K$│ Т:ЕK$│"" Бе 185,о║ЕK$│"^" Бе 200,─╗ЕK$│ Л(10) Бе 210,┘╝ЕK$│ Л(8) Бе 220,ю╜ЕK$│ Л(9) Бе 230-╛ЕK$│"Q" Бе 70-└ЕK$│"A" Бе 300-&┴ЕK$│"B" Бе 400-9┬ЕK$│"P" Бе 500-L┼ЕK$│"M" Бе 600-W╟Бе 185-h╚Е M│1 Бе 185-}╩M│Mм1:D│1:Бе 102-П╥Е M│12 Бе 185-д╘M│Mл1:D│1:Бе 102-╗▄Е M│1 ░ D│1 Бе 185-╠▐Е D│1 Бе 225-▌рD│Dм1:Бе 102-ЎсM│Mм1:D│ND(M):Бе 102.цЕ M│12 ░ D│30 Бе 185.$шЕ D│ND(M) Бе 235.5ъD│Dл1:Бе 102.JыM│Mл1:D│1:Бе 102.v,Ю:З@230,"TO-DO: ";:╗Й U$:Е U$│"" Бе 102.Н.NE│NEл1:EV$(NE)│U$.д0ED$(NE)│D1$:Бе 102.╬РЮ:З@230,"TO-DO: ";:╗Й U$:ЕU$│"" Бе102.хТNE│NEл1:EV$(NE)│U$.їФED$(NE)│D2$/ЦБе 102/(ЇЮ:З@226,"PRINT DATA FOR "D1$"? Y/N"/AЎK$│ Т:ЕK$│"N" Бе 102/S°ЕK$│"Y" Бе510/^¤Бе 502/h■PD│м2/zЕ NE│0 Бе 102/еЗ#PD,"TO-DO LIST FOR "D1$:NU│0:З#PD,""/╔А I│1 е NE:Е ED$(I)┤▓D1$ Бе 530/╒NU│NUл10З#PD,═"##. % % (!)";NU;EV$(I);SF$(I)0"Л0-WБе 1020DXNU│0:Е NE│0 Бе 1020│YЗ@256л128, б(125,32);:З@256л128," UP/DOWN ARROWS SPACEBAR (Q)UIT";0┬ZА I│1 е NE0▌\Е ED$(I)│D1$ з NU│NUл10у^Л0ьbPT│11dЗ@47лPTн32,"*";1fK$│ Т:ЕK$│"" Бе 6141;gЗ@47лPTн32," ";:ЕK$│"^" Бе 6201QhЕK$│ Л(10) Бе 6301diЕK$│" " Бе 6501ojБе 1021БlЕ PT│1 Бе 6121НnPT│PTм11ШoБе 6121лvЕ PT│NU Бе 6121╖xPT│PTл11┬zБе 6122 АЕ SF$(I)│"" з SF$(I)│"*":З@33л32нPT,"*"; :Д SF$(I)│"":З@33л32нPT," ";2ВБе 6122/КNI│0:F│0:А I│1 е NE2JМЕ ED$(I)│D1$ з NI│NIл12]ОЕ NI│PT Бе 6402cПЛ2nРБе 6122Ъ Е YRо4 │ Б(YRо4) з ND(2)│29 :Д ND(2)│282аГР2┬ДЮ:З:З" to-do list":З3ЖЗ" THIS PROGRAM CAN HELP YOU KEEP A LIST OF IMPORTANT THINGS THAT YOU HAVE TO DO."3ЬИЗ" USER FRIENDLY PROMPTS THROUGH- OUT THE PROGRAM GUIDE YOU IN ITS USE. IT WILL WORK WITH EITHER TAPE OR DISK."3┌КЗ" A PRINTOUT CAN BE OBTAINED FOR ANY DATE IN THE YEAR."4МЗ" IT LETS YOU MARK OFF THINGS AS FINISHED AS YOU DO THEM."4'НБж 90004-╡Р43▐Ю4O▀З@232,"OK TO QUIT? Y/N"4YрK$│ Т4kсЕK$│"N" Бе 704~тЕK$┤▓"Y" Бе9924ЖчЮ:К4б╨F$│"YEAR"л Р( И(YR),2)4з╤Р4╬#(З@484,"PRESS ANY KEY TO CONTINUE";4с#<Е Т│"" Бе 90204ч#PР4Їъ`└1:Бе 50THINGS A                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 м&9:ГCOPYRIGHT (C) T&D SOFTWARE 1991 dir ISSUE #110&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 #110&MХ 200&Е Е Ж(14000)│188 ░  Ж(14001)│188 ░  Ж(14002)│188 з 22&╡Е  Ж(186)│14 з ╙M "CVR-MOD" :Д ЧM "CVR-MOD"&╤IS$│" COCO ISSUE #110 "&ьDT$│" AUGUST 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. 110 AUGUST 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. 110 AUGUST 1991 +ўбЕ  Д(2)│1 з ┐ 0,1,жАTD                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    ┬ ╞ ├  ┼ ╚├┬╞╞╟╚$╞╚─()*+┬╞./0┼23╟56─89:;╚=>╚     DIR BAS пCOVER BAS!CVR-MOD BIN"wWEDDING BAS#hLEGEND BASKTODOLISTBAS°HELLO BAS%YDIAMOND BAS&╥ROSE BAS▐COLOROSEBASeBUTTRFLYBAS,;SCALE BAS1GMULFRAC BASDSIRIUS BAS-БDBINS BAS4cDISBASE3BAS7ыBIORHYTHBAS nMAZEY BAS'лNFLINS BASPNFL91 BAS<ЛNFL DAT Ш                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                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                                                                                                                                                                                                                                                                                                                                       eD:ГCOPYRIGHT (C) T&D SOFTWARE 1991 wedding planner ISSUE #110T╚0:Бе 60000_2Х 2000К4М TX$(100,3),CS(100,3),WH(100,3),X$(2)в6X$(1)│"b":X$(2)│"g"╞:Е  Ж(&HC000)│68 з DN│1 :Д DN│м1ы<Ю:З:З" wedding planner":ЗI>З" THIS PROGRAM CAN BE AN AID WHEN PLANNING A WEDDING, RECEPTION, AND ANY EXTRA THINGS."╟@З" IT WILL KEEP TRACK OF THE ITEMS NEEDED, THEIR COST, AND WHO'S SIDE OF THE FAMILY IS EXPECTED TO PAY FOR EACH ITEM."EAЗ" THIS PROGRAM WILL WORK WITH EITHER TAPE OR DISK, AND A PRINTER CAN BE USED TO MAXIMIZE YOUR OUTPUT."QBБж 9000\FЮ:З@64vHЗ" menu":ЗLJЗ" L. LOAD DATA FILE S. SAVE DATA FILE W. WEDDING DATA R. RECEPTION DATA G. GENERAL DATA P. PRINT REPORT Q. QUIT"cKK$│ Т:ЕK$│"" Бе 75zLP│ Ю("LSWRGPQ",K$)КMЕ P│0 Бе 75пOИ P Бе 80,90,100,200,300,800,990╔PБж 10000:ЕF$│"" Бе 70┘QЩ"I",#DN,F$эRЙ#DN,N1:Й#DN,N2∙SЙ#DN,N3:TЕ N1 з А I│1 е N1:╗Й#DN,TX$(I,1):Й#DN,CS(I,1):Й#DN,WH(I,1):Л{UЕ N2 з А I│1 е N2:╗Й#DN,TX$(I,2):Й#DN,CS(I,2):Й#DN,WH(I,2):Л╝VЕ N3 з А I│1 е N3:╗Й#DN,TX$(I,3):Й#DN,CS(I,3):Й#DN,WH(I,3):Л╩YЪ#DN:Бе70фZБж 10000:ЕF$│"" Бе 70Ї[Щ"O",#DN,F$\З#DN,N1:З#DN,N2]З#DN,N3T^Е N1 з А I│1 е N1:З#DN,TX$(I,1):З#DN,CS(I,1):З#DN,WH(I,1):ЛФ_Е N2 з А I│1 е N2:З#DN,TX$(I,2):З#DN,CS(I,2):З#DN,WH(I,2):Л╘`Е N3 з А I│1 е N3:З#DN,TX$(I,3):З#DN,CS(I,3):З#DN,WH(I,3):ЛуcЪ#DN:Бе 70∙dAA│1:T$│"WEDDING"fN│N1 hБж 399jN1│N mБе 708╚AA│2:T$│"RECEPTION"A╩N│N2L╠Бж 399U╬N2│N^╤Бе70t,AA│3:T$│"GENERAL"}.N│N3И0Бж 399С2N3│NЫ5Бе 70дПPT│1кРЮ╩ТЗ@0, б(32,191л16);:З@12,T$;цФЗ@480м96, б(32,191л16);2ХЗ@480м64," UP/DOWN ARROWS SCROLL LIST A) ADD E) EDIT Q) QUIT";гЮА I│1 е 11:З@32нI,═"## % % ##### !";IлPTм1;TX$(IлPTм1,AA);CS(IлPTм1,AA);X$(WH(IлPTм1,AA)):Л╗дK$│ Т:ЕK$│"" Бе 420╧жЕ K$│"A" Бе 450▀иЕK$│"Q" з РЄкЕK$│"E" Бе 500мЕK$│"^" Бе 440нЕK$│ Л(10) Бе 445%╖Бе4206╕Е PT│1 Бе420I║PT│PTм1:Бе 400\╜Е PT│88 Бе 420o╛PT│PTл1:Бе 400Щ┬З@416, б(95,32);:З@448,"ITEM:";:╗Й H$л─ЕH$│"" Бе 400┬╞N│Nл1:TX$(N,AA)│H$№╚З@448, б(63,32);:З@448,"COST:";:╗Й C$:CS(N,AA)│ Й(C$)2╠З@448, б(63,32);:З@448," BRIDE/GROOM? B/G";X╬K$│ Т:ЕK$│"B" з WH(N,AA)│1:Бе 470x╨ЕK$│"G" з WH(N,AA)│2:Бе 470Г╒Бе 462О╓Бе 400│ЇЕ N│0 Бе 420 :Д З@416, б(95,32);цЎЗ@448," EDIT WHICH? (1-"; Р( И(N),2);": ";Ё°╗Й H$·ЕH$│"" Бе 400■Q│ Й(H$)&Е Q┤1 ▒ Q▓N Бе 500;З@448, б(63,32);lЗ@448,"ITEM:";:╗Й A$:Е A$┤▓"" з TX$(Q,AA)│A$┤З @ 448,  б(63,32);:З@448,"COST:";:╗Й A$:Е A$┤▓"" з CS(Q,AA)│ Й(A$)┐Бе 400╦ B│0:G│0┘*B1│0:G1│0ч4B2│0:G2│0ї>B3│0:G3│0 @PD│м2BЗ#PD,"WEDDING",DЗ#PD,"-------":Бе 870IEB1│0:G1│0:З#PD:А I│1 е NеFЕ WH(I,A)│1 з З#PD,═"% % #####";TX$(I,A);CS(I,A):B│BлCS(I,A):B1│B1лCS(I,A)лGЛсHЗ#PD,═"% % ##### (BRIDE)";"TOTAL";B1ъJЗ#PD°LА I│1 е N TNЕ WH(I,A)│2 з З#PD,═"% % #####";TX$(I,A);CS(I,A):G│GлCS(I,A):G1│G1лCS(I,A) СPЛ:З#PD,═"% % ##### (GROOM)";"TOTAL";G1:З#PD ЧQР лfN│N1:A│1:Бж 837 └hЗ#PD,"RECEPTION" ╒jЗ#PD,"---------" щlN│N2:A│2:Бж 837 №nЗ#PD,"GENERAL"!pЗ#PD,"-------"!#rN│N3:A│3:Бж 837!,tЗ#PD!^vЗ#PD,"GRAND TOTAL (BRIDE): ";:З#PD,═"#####";B!РxЗ#PD,"GRAND TOTAL (GROOM): ";:З#PD,═"#####";G!ЩzЗ#PD!г~Бе 70!┴▐Ю:З@232,"ok to quit? y/n"!┘▀K$│ Т:ЕK$│"N" Бе 70!эрЕK$┤▓"Y" Бе 991!їчЮ:К"#(З@484,"PRESS ANY KEY TO CONTINUE";"/#*Е Т│"" Бе 9002"5#,Р"W'Ю:З@228,"filename: ";:╗Й F$:Р"dъ`└1:Бе 50,"GRAND TOTAL (GROOM): ";:З#PD,═"#####";G!ЩzЗ#PD!г~Бе 70!┴▐Ю:З@232,"ok to quit? y/n"!┘▀K$│ Т:ЕK$│"N" Бе 70!эрЕK$┤▓"Y" Бе 991!їчЮ:К"#(З@484                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 V&Т&H95C9,&H17:Т&HFF22,&H10&n т32:X│0:Y│61 :Т&HFFBD,X:Т&HFFBC,Y:З"JONCOM":АZ│1е500:ЛZ:З" HELLO"&мЗ:З"Printer on line?":З"Press any key when ready.":в44539&┴З:З"PRINTING..."&ю(Т150,18 :Г PRINTER BAUD RATE SET AT 2400'2З#м2, Л(18); Л(13)'<А R│1 е 5')FН N:Е N│999 з 120'LPЕ N▓│0 з З#м2, Л(128лN);:Бе 70'TZН M'vdЗ#м2, Л(28); Л(мN); Л(128лM);'АnБе 70'УxЗ#м2:Л R:Бе220'гВЗ#м2, Л(30)(ЖМЖ 127,3,5,9,17,34,68,8,16,32,127,3,5,9,17,34,68,8,16,32,64,-4,0,127,3,5,9,17,33,65,-8,1,2,4,8,16,32,64,-4,0,127,3,5,9,17,34,68,8,16,32,64,-14,0,127,3,5,9,17,34,68,8,16,32,64,-14,0,127,3,5,9,17,33,65,-8,1,2,4,8,16,32,64,999){ЦЖ 127,-6,0,1,2,4,8,17,34,68,8,16,32,65,2,4,8,17,34,68,8,31,32,64,-4,0,1,2,4,8,16,32,64,-7,0,1,2,4,8,31,32,64,-4,0,1,2,4,8,17,34,68,8,16,32,64,-7,0,127,-6,0,1,2,4,8,17,34,68,8,16,32,64,-7,0,127,-6,0,1,2,4,8,16,32,64,-7,0,1,2,4,8,16,32,64,999*uаЖ 127,-13,0,127,85,43,85,127,8,16,32,64,0,127,85,43,85,127,-10,0,127,85,43,85,123,53,91,21,27,53,91,117,27,53,127,-10,0,127,85,43,85,127,32,64,-4,0,127,-13,0,127,85,43,85,127,32,64,-4,0,127,-13,0,127,85,43,85,123,21,27,21,27,21,123,85,43,85,127,*кЖ 999+Y┤Ж 0,1,2,4,8,16,32,64,-6,0,127,42,85,42,119,42,54,42,54,43,119,42,85,42,127,8,16,32,64,-6,0,127,42,85,42,119,42,54,43,54,107,127,16,33,66,4,8,16,32,64,-6,0,127,42,85,42,127,4,8,17,34,68,8,16,33,66,4,8,16,32,64,-6,0+═╛Ж 127,42,85,42,127,4,8,17,34,68,8,16,33,66,4,8,16,32,64,-6,0,127,42,85,42,127,16,32,64,0,0,127,42,85,42,127,999,л╚Ж -8,0,1,2,4,8,16,32,127,85,106,85,127,2,4,8,16,32,127,85,106,85,127,-4,0,1,2,4,8,16,32,127,85,106,85,111,84,108,84,108,84,109,86,108,86,127,-4,0,1,2,4,8,16,32,127,85,106,85,111,84,108,84,108,84,109,86,108,86,127,-4,0-@╥Ж 1,2,4,8,16,32,127,85,106,85,111,84,108,84,108,84,109,86,108,86,127,-4,0,1,2,4,8,16,32,127,85,106,85,111,84,108,84,109,86,111,85,106,85,127,999-U▄Ю:З"END PROGRAM"86,127,-4,0,1,2,4,8,16,32,127,85,106,85,111,84,108,84,108,84,109,86,108,86,127,-4,0-@╥Ж 1,2,4,8,16,32,127,85,106,85,111,84,108,84,108,84,109,86,108,86,127,-4,0,1,2,4                                                                                                                                                                                                                                                                 ╧&) Т150,18 :ГPRINTER BAUD RATE AT 2400&XТ&H95C9,&H17:Т&HFF22,&H10 :ГTRUE LOWERCASE&Фт32:X│0:Y│15 :Т&HFFBD,X:Т&HFFBC,Y:З"JONCOM":АZ│1е500:ЛZ&╥(З:З"PRINTER ON LINE?":З"PRESS ANY KEY WHEN READY.":в44539&ч2З:З"PRINTING..."'<:Г***** DIAMOND *****'FЗ#м2, Л(18);' PА R│1 е 5'6ZН N:Е N│999 з 140'YdЕ N▓│0 з З#м2, Л(128лN);:Бе 90'anН M'ГxЗ#м2, Л(28); Л(мN); Л(128лM);'НВБе 90'аМЗ#м2:Л R:Бе200'▀ЦЖ -8,0,64,32,16,8,68,34,17,11,5,11,17,34,68,8,16,32,64,999(?аЖ -1,0,64,32,16,8,4,2,127,3,5,9,17,34,68,8,80,32,80,8,68,34,17,9,5,3,127,2,4,8,16,32,64,999(зкЖ 127,34,20,8,20,34,65,0,65,34,20,8,20,34,127,-3,65,127,34,20,8,20,34,65,0,65,34,20,8,20,34,127,999)┤Ж -1,0,1,2,4,8,16,32,127,96,80,72,68,34,17,8,5,2,5,8,17,34,68,72,80,96,127,32,16,8,4,2,1,999)D╛Ж -8,0,1,2,4,8,17,34,68,104,80,104,68,34,17,8,4,2,1,999)e╚Ю:З"Try Another One. [ Y/N ])}╥I$│ Т:Е I$│"" з210 )╬▄Е I$│"N" з З#м2, Л(30):Ю:З"END OF PROGRAM" :Д ЕI$│"Y" з О50 :Д а100,1:Бе20034,17,8,5,2,5,8,17,34,68,72,80,96,127,32,16,8,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 %и,;:ГCOPYRIGHT (C) T&D SOFTWARE 1991 mazey ISSUE #110,CБе3,KБе5,]╚0,1:╝:└5:Бе2,ЫЮ0:З@78,"mazey";:З@143,"by";:З@206,"mike";:З@270,"moore";-З@331,"submitted to";:Т1364,128:З@395,"t&d software";:Т1420,38:Т1422,128:З@459,"instructions";:Т1495,63-0И Ю("*YN", Т)Бе8,50000,10:а190,1:Бе8-Ж ╚4,1:Ю0:A│32:D│27:АX│м4е4:АY│ В(X)м4е4м В(X):Ь(Aл2нX,DлY,3):Ь(Aл1л2нX,DлY,3):ЛY,X-╜GP│10:Т&H1EA,GP:Т&H1EB,63мGP:B$│ б(32,128):Бж10000.АI│&H220 е&H225:ТI,0:Л:Т&H1FD,3:SH│3:WL│&H71 :Г3 SHIPS,SC=0, 3SHOTS.DST│96:LV│Lл32:LT│1:K0│20:K│K0:ZZ│3л(L┤5):C0│9:CT│C0:D0│3нL.Ы#АY│422е180йм32:З@Y, б(16,128);:Л:┐0,0:АY│0е7:АX│0е15:Е а(240лX,Y)│0зЬ(Xл24,Yл13,4).д(ЛX,Y.Ї<Т&H215,DAо256:Т&H216,255░DA:ЕSH▓1зАI│1еSHм1:┼(12,4л10нI)м(21,11л10нI),A,╜:Л/=?З@365,"push";:З@397,"fire";:З@428,"button";:╗(237,70)м(253,111),╛,BF/`AЕ1░ Ж(&HFF00)з65:Д┐1,1:в342лBE/ГFв990лBE:┼(220,92)м(229,99),A,▒/ЬPЕ(1░ Ж(&HFF00))│0з80/Їd╚4,1:─(0,8)м(9,15),A1,G:╚4,2:АA│64е184й120:АD│42е142й100:┼(A,D)м(Aл9,Dл7),A1,╜:ЛD,A0nАI│&H1EC е&H1EF:ТI,1:Л00ЯТ&H208,6:ЕL┤30зТ&H209,10л3нL0[аТ&H202,&H80:Т&H1FE, Ж(&HBA)м2:Т&H1F0,00q╝Т&H1FA,ST :ГSTART0З╞Т&H1FB,LV :ГLEVEL0Э╨Т&H1FC,LT :ГLIMIT0╥ Т&H204,6:Т&H205,&H70:Т&H206,6:Т&H207,WL:Т&H680,01 %Т&H600,92:Т&H601,220:Т&H602,1:Т&H603,0:Т&H604,&H8011*Т&H66B,0:Т&H670,0:Т&H675,0:Т&H67A,01X/АI│&H605 е&H669 й5:ТI,0:Л:Т&H20A,11й1Т&H20B,6:Т&H20C,&H87л2нL:АI│&H685 е&H6FF й5:ТI,0:Л:ЕL▓6зТ&H20C,&H8Fм5н(L▓13)1─4ЕL┤10з830:ДТ&H205,&H6B1ё9АI│L е20:Л:вWE:вBS:И Ж(&H20A)Бе825:Бе8352?>АI│D0 е9:Л:вBS:Е Ж(&H20A)│1зZZ│3мZZ:ИZZ Бе830:CT│CTм1:ИCT Бж850:вWE:Бе8302CЕ Ж(&H20A)│255з╗(28,12)м(229,179),╛,BF:Бж10180:SH│SHл1:Бе302█HSH│SHм1:Бж1010:ЕSH з╗(12,4л10нSH)м(21,11л10нSH),╛,BF:┼(220,92)м(229,99),A,╜:Бе820:Д20003RK│Kм1:ЕK зZ│(LV▓2):ST│STлZ:LV│LVлZ:Т&H1FA,ST:Т&H1FB,LV:CT│C0:Р3^\K│K0:ST│STл11:LV│LVл11:P│ Ж(&H209):ЕP┤80зТ&H209,Pл5:D0│D0л23hfБе8503nшК3вЄ╚4,1:D│ Ж(&H600):A│ Ж(&H601):─(0,32)м(9,39),A,G4№╚4,2:╔"O3T255L255V31GABGABGAB":─(A,D)м(Aл9,Dл7),A1,G:╔"O1GABGABGAB":┼(A,D)м(Aл9,Dл7),A,░:╔"O5GABGABGAB"4`┼(A,D)м(Aл9,Dл7),A,и:╔"O3GABGABGAB":─(A,D)м(Aл9,Dл7),A2,G:╔"O2CBAGFDO1CBAGFD"4╚┼(A,D)м(Aл9,Dл7),A1,╜:╔"O5CBAGFEDO4CBAGFED":┼(A,D)м(Aл9,Dл7),A,▒:╔"O3CBAGFED":┼(A,D)м(Aл9,Dл7),A2,░4яЕ Ж(&H1FD)┤3░SH▓0зТ&H1FD,3:в990лBE55I│5:Т&H20A,1:Т&H600,92:Т&H601,220:Т&H604,&H80:Т&H1FE, Ж(&HBA)м2:Р5д╨L│0:SC│0:АI│&H220 е&H225:SC│10нSCл Ж(I):Л:ЕSC▓HS зHS│SC:─(208,183)м(255,190),A2,G:┼(96,183)м(143,190),A2,╜6I╒╗(84,171)м(164,179),╛,BF:╞"BM94,173HL4GD5FR4EU3L2BM+5,4U4NR5M+3,-3M+3,3D4BR3U7F3E3D7BR3NR4U4NR3U3R4BR12D7R5U7NL5BR3D4F3E3U4BR3NR4D3NR3D4R4BR3U7R4FD2GL4R2M+3,+3"6─┌┼(84,172)м(164,175),A2,и:АY│4е87:┼(84,172л(7░Y))м(164,172л(7░Y)),A2,и:╗(28,4л2нY)м(229,2нYл5),╛,B:Л:DA│BE:Бж10180:Бе256▐&№З@511,B$;:Т1535,128:Р77'ZZ│1мZZ:ИZZ Бж9980:─(A,D)м(Aл9,Dл7),A,G:АI│0 е54й18:┼(AлI,Dл32)м(AлIл9,Dл39),A,╜:Л:Р7д'╚4,1:╗(80,31)м(0,24),╜,BF:╞"C0BRR3FD5GL3HU5BR10ED7LR2BR4NR5M+5,-5UHL3GBR8BUR5G3R2FD2GL3HBM+12,1U7M-4,4R58'╞"BM+3,2FR3EU2HL4U3R5BR7G4D2FR3EU2HL3BM+7,-3R5M-4,+7BR8HU2ENR3HUER3FDGFD2GL3BR8E4U2HL3GD2FR3"85'МA(3),A1(3),A2(9):─(0,24)м(7,31),A2,G:╚3,18М'$╞"BM0,4C3UF2M+1,-3EM+1,5EM+1,-3F2U":BE│256н Ж(27)л Ж(28)м2863:BS│BEл1110:WE│BEл6218│'.╞"BM65,10UERFDGLH":D│8:A│64:Бж99908ч'8╞"BM1,10C2U2M+7,7U2BU3U2M-7,7U2":A│0:D│8:Бж999094'B╞"BM129,10C2UEFD2EU":A│128:D│8:Бж9990:╞"BM193,10UERFDG":A│192:D│8:Бж99909u'L╞"BM65,2C2ND2E2D2BD2DF2U2BU2UE2D2BD2DE2U2D3":A│64:D│0:Бж99909╗'V╞"BM129,0D6M+2,1UBU2UBM+2,-3D3BD2D2R2UBU2UBM+2,-3D6":A│128:Бж99909¤'`╞"BM193,0D2BD3D2BR4U2L2U3BE2D3M+2,-1D3F2U2BU3U2":A│192:Бж9990:a'jA│0:D│0:Бж9990:┴4:╚4,2:╝:╗(230,0)м(255,191),╜,BF:╗(0,180)м(231,191),╜,BF:╗(24,10)м(27,181),╜,BF:│'t╞"BM8,183C0D7U4R4D4U7BR4R2LD7LR2BM+8,-3RD2GL3HU5ER3FBM+4,-1D7U4R4D4U7BM48,189;0'~A$│"FR3EU2HL3HUER3FBR9HL3GD5FR3EBR3U5ER3FD5GL3NHBR7U7R3FD2GL2M+3,3BR3NR4U4NR3U3R4":АA│96е136й8:┼(A,183)м(Aл7,190),A2,╜:Л;O'И╞ A$л"BM160,189":╞ A$л"C1";╣'Т╗(231,11)м(0,0),╜,BF:A$│ О(A$,15):╞"C0BM88,6XA$;BR5UD7U4R4U3D7BM+4,-1U5ER3FD5GL3BR10U7L3R6BM+3,6XA$;";■'Ь╞"BM192,0D7R5BR3NR5U4NR3U3R5BR3D5F2E2U5BR4NR5D3NR3D4R5BR3NU7R5C5<]'б╗(8,179)м(0,12),╜,BF:╞ "C0BD8XA$;BD10D3ND4L5NU3D4BM+1,2R2LD7RL2BM-3,2R4FD2GL4NU3D3BD9XA$;"б├PЮ:З@14,"MAZEY":З"YOUR MISSION IS EASY(!)- ALL YOUHAVE TO DO IS RESCUE FOUR MOTHS FROM EACH LEVEL OF THE MAZE. THESCREEN SHOWS THE RADAR VIEW FROMYOUR SHIP AS YOU USE THE RIGHT JOYSTICK TO STEER. YOU CAN SHOOTIN YOUR DIRECTION OF TRAVEL WHEN?d├ZЗ@256,"YOU PRESS THE FIRE BUTTON.":З"THE NUMBER OF SHOTS IN YOUR GUN IS SHOWN AT THE SCREEN TOP. YOU EARN EXTRA SHOTS BY COLLECTING THE MOTHS AND ALSO BY SHOOTING THE ENEMY SHIPS.":Бж49998@├dЮ:З@33,"THE WALLS OF THE MAZE OPEN AND CLOSE, SO YOU MAY NEED TO SHOOT AWAY OBSTRUCTIONS.":З@160,"THE ENEMY SHIPS APPEAR RIGHT IN THE CENTRE SQUARE, SO BE (VERY) CAREFUL OUT THERE!"@╩├nЗ@288,"THE ENEMY SHOTS ARE OF TWO TYPESBOTH FATAL TO YOU BUT ONLY ONE TYPE KNOCKS OUT THE WALLS.":З"YOU'LL SOON LEARN WHICH TYPE OF SHIP FIRES WHICH BULLETS.":Бж49998AХ├xЮ:З@33,"WHEN ALL FOUR MOTHS HAVE BEEN COLLECTED, AN EXTRA WILL APPEAR IN ONE CORNER TO SHOW YOU HOW TOGET TO THE NEXT LEVEL.":З@193,"IF YOU GET PAST LEVEL 9, THEN THINGS BEGIN TO GET REALLY FAST!"A■├ВЗ"YOUR MAGAZINE WILL ONLY HOLD ONEHUNDRED SHOTS, BUT YOU'LL NEVER NEED TO WORRY ABOUT THAT!":Бж49998Bт├МЮ:З@33,"WATCH OUT FOR SNEAKY TRICKS BY THE ENEMY. SOMETIMES TWO SHIPS WILL MOVE TOGETHER AND ONLY SHOWON THE RADAR AS A SLIGHT FLICKERSO YOU'LL HAVE TO BE REALLY WIDEAWAKE.":З@256,"TO START A LEVEL, PRESS THE FIREBUTTON,";Cd├ЦЗ" PLAY WILL BEGIN WHEN YOURELEASE IT.":З@384,"TO FIRE A SECOND SHOT, YOU MUST RELEASE AND PRESS THE BUTTON AGAIN":Бж49998D&├аЮ:З@33,"YOU GET A BONUS SHIP FOR EVERY LEVEL COMPLETED. THE SPARE SHIPSARE SHOWN TO THE LEFT OF YOUR SCREEN.":З@192,"WARNING: YOUR SHOTS WILL USUALLYBUT not always KNOCK OUT ENEMY SHOTS.D╢├кЗ@288,"UPON YOUR INEVITABLE DEATH, THE GAME WILL BEGIN AGAIN AT LEVEL 1":З"IF YOU DON'T WANT TO PLAY AGAIN,YOU MUST PRESS .":Бж49998E]├┤Ю:З" THE VARIABLE GP IN LINE 20 SETSHOW RESPONSIVE THE JOYSTICK CAN BE. A SMALL VALUE, LIKE 3, MEANSTHE STICK MUST BE AT THE EXTREMEEDGE TO MOVE/CHANGE DIRECTION.F=├╛З"THE MAXIMUM VALUE OF 30 MEANS ITIS DIFFICULT TO STOP AND YOU MAYCHANGE DIRECTION UNEXPECTEDLY. ASELF-CENTERING JOYSTICK MAY LET YOU USE SUCH A VALUE. YOU SHOULDSELECT A VALUE WHICH SUITS YOUR STYLE. 10 IS THE DEFAULT.Fx├╚З"EDIT LINE 20 TO CHANGE THE VALUEOF GP.":Бж49998:Бе10АЗс╧є╧є╧єЗс@└Г┴Пё╧єПёГ┴@Ас╟є╧є╟єс└└ГсПє╧єПєГсАЗс╧є╧є╧є╧э╧ П ОsЯёЯєЧє╧є╧є╧єЗс╦У├Г╚╚У└├╚╙ЁЁЁЁ°№?№?·_╠3 АББА ?°№?■sЄA■s№?°? ББїп▀√▀√█√ББ  АЗс╧є▀√▀√ЧщББГ┴чхяї╟у╟├╟ гБCБ╟ ╟├╟уяїчхГ┴HH@HHHHHH@@HH ╛╬ ╠¤Ё┐Ї0Й┐Ў╛Ї0И┐╛Ї╠? э─╠0эB┐°жа╖Sy$ь─ ьBкДэДэИ 0Й@x&ш╝Ў-┌╛°жB&0 ┬╠ Ёэ─╠0эB0╝/╗╛Ї0Й ┐°┐Ї╞╫жа╖Sy$ ╠зД0И Z&° 0Й╞АъЙ `чЙ `╛°0┐°x$ ╠0зД0И Z&° 0Й╞чЙ _╛°0┐°x&▓ &е╞ГчИ`╛Ї0Й@╝Ў-К9       ╢╞ =Ю║0ЛЎTTT:Ў─9╛mд&C╞Й\чд╞Бч!Жз$╞ Нw─ч"&ьдЙэдj$жд╞ =чдж!╞ =╦ч!─Ж└T'DDZ&√з#m"'ц!╦ч!жд¤ Мж#DD&Ж└з# ждЛздц!¤ rж#иДзДж#иИ зИ j$&oд1%╝- o94╢╞=4╢╞=усЙ_4╢╞=ус├8q¤Д'┘бф"╒2aЙ9Оь№┴╕$'┴@%!┴H"╞БО% БФ"mЕ'\9\Б*%Б0"mЕ&ё_9┴└"·_ ▄жд'ц!Н oд1%╝Ў-ю9¤■╨ы#■■3┼╢тЧь─иДшэД0И 3╚ &ю9╞ўт№¤ЎЦ║А╖■ОН░№ ¤ЎОЕtт|■НЮОАжд'ц!Неoд9╠И¤■o▐║3╔¤╢¤DDDDНЖ┤¤04P3╞╞╫ж─зД3╚ 0И &Є5╨О&OЙлВ А \Б $∙зДМ .ы╠╖╨¤■ ▐║3╔¤┐О жаН╡0М&%Ї╛9 НH╗Bж<а} ' 49О╠ ¤р╠¤тmд&6Ў·Ё√+■rё№"(Ў·■gё№"╠\|¤эд╠з$■RДLXXXэ"ЪН 1%╝-╝9ж"Е'?ЎсБ'╞■ы!ж䤤v╢T'DDZ&√ЧЎтT╫жДХ&Я0И@ &ё :вАвА ( (ЎтБ'╞■ыдўж!╖¤43М▀ь┼}+DTЧжДХ&d╫жХ&\ьд¤Н0Н╡ц"ьЕлды!¤э乤ы#■■3┼╢тЧь─иДшэД0И 3╚ &ю}р&j$&}*╞¤y┴-ц"ч"─X╦ ч$9}р&j}*^HХ'╞¤S ▐┼} '▀╢А'┌╖рРьд¤ИНЗoдБ№А¤tт|■r4 ж#╖ОАd boдA5 ╫■DХ& ¤)&Е 9ЖАз$9}Ё'▄рОЖ@╖╜й▐ж$Д'Z╞╫Ў[ж"Е' ЎZёъ.8С'Цб"' з"ЖIРHа$КАз$■`}Ё'ОO╖р╛Ёмд&J╖ Фx9ёы-┌ЦА ├№├¤√║'╞ ╞АхД&шДчД4 ╠АЧМ╜йQ5 ╞¤XН'жч" Э╢Z╞?Ё[▒[-ёZ/ ёы-,╠К9▒ы-#╠М9ёZ/▒ъ,╠М9ёъ,╠К9_9Ж@╖Нx9}А&ЕЖ┤ 'ш9}ш&·№ъ4╠#¤ъОНИўВ5¤ъЎВ'зр"─'ж$БА&╬0МЬ|шЎВZXьЕлды!И'Г¤╢¤'оЛ А╖¤№[№ОАэд¤╞ч#|■|рtт¤╖ ОАЖ@╖|■tт|р╞ўсTўу¤}р&|рь䤤ЗoдОz■╠ ¤р╠¤т╞ ўсЖ┤ 'ш9рБ 'Б░' ┴'┴р'|р9}+WDХ'Чж"Е'?цд└ўц!Е&╦┴ц'( └┴' ў·Ж└T'DDZ&√╞ЧжДШзД0И Z&Їр9ц!└ўцдЕ'└┴ 'щ ╦┴┤'сў∙╫Ж T'DDZ&√ЧиДзАзИЦDDCиДзДзИ ║·° ·Ў°° 0Мэц"ZXX:╬ьдлДы¤флы¤ць─▒ф%▒ц" ёх%ёч#-3E│-т╢Ё&·C&А9▒ф%▒ц" Ўёёх%ёч#h92НBьд¤Н;■╕№6ц#ўoдН,ОАН&р|■НtтЎTTT0Н!цЕ·╠╢¤Л╖¤·Й4 ЖЧМ_╜йQ М&°5а(HХ' Же#&■гр9№░+ЇБ.ЁЁ+ы┴.ч 9|■╠¤р╠¤т9ОЕЖА╖Нхmд'%√}р&|рьд¤√Сoд} '1%╝ -┌¤■╬m─'иь─░Ё+ Ч+ Ж╨'Т**L 'Ж╨'Г*J PЧ+Ж╨'s* Ж╨'i*Lз"аBД' дBHЛ бD&UЎ·Ё√+°┼ё№"E0Н№░ц"ZXьЕл─ыAОЕгД'/0╝ -Їэд¤цCЖ┴&Шз#·т0E жДц─з└чА╝-є D3E│- H 7Ж*┼'ЖО╖Ж@┴.Ж╕╖ZoЕ╫НnНOНj╠HЁ¤ўЧmД'0Й@ ЎН;╢¤Л╖¤∙НG╞d∙7№ь&№ю&Нр∙╫0Н$╓XьЕ¤Ё9№Ё¤ўP▐║3╔ 3┼╞╫ўр·M м ▄м▄40╠ЧМ╜йQ5░бD&UЎ·Ё√+°┼ё№"E0Н№░ц"ZXьЕл─ыAОЕгД'/0╝ -Їэд¤цCЖ┴&Шз#·т0E жДц─з└чА╝-R│1 е 8(nН N:Е N│999 з 160(@xЕ N▓│0 з З#м2, Л(128лN);:Бе 110(HВН M(jМЗ#м2, Л(28); Л(мN); Л(128лM);(uЦБе 110(ИаЗ#м2:Л R:Бе250(чкЖ -9,0,64,-3,0,64,0,-5,64,-5,0,64,96,64,96,112,16,16,32,112,88,24,16,112,56,30,127,7,3,999)j┤Ж 14,27,127,123,95,25,31,13,31,13,13,15,5,5,15,13,13,15,28,55,51,31,27,26,10,29,13,13,15,4,4,13,15,61,113,99,79,95,63,15,4,999)р╛Ж -3,0,3,7,15,28,24,58,62,127,98,120,124,28,12,70,98,99,112,112,56,24,24,12,12,6,6,66,98,34,49,89,76,70,3,1,1,999*H╚Ж -13,0,-3,1,-5,19,82,58,58,58,94,93,46,46,22,-3,23,-2,19,17,-4,32,96,96,48,48,112,112,32,96,64,999*╚╥Ж -17,0,4,100,50,57,60,62,27,25,25,25,12,12,12,6,6,2,2,66,65,65,96,32,48,120,124,115,98,24,29,127,34,47,63,112,96,96,64,999+0▄Ж -14,0,64,120,126,127,71,78,78,76,-3,12,6,6,68,96,32,62,55,11,27,27,12,10,19,30,7,4.4,7,3,-3,1,999+xцЖ -13,0,2,127,127,67,97,113,113,89,72,124,38,22,31,11,9,7,2,3,1,999+ШЁЖ -14,0,7,4,7,6,2,3,1,1,999+■·З#м2, Л(30); Л(27); Л(81); Л(1):З:З"PRESS ANY KEY FOR ANOTHER BUTTERFLY.":З"(A) TO ABORT.":Бж1000,'A$│ Т:ЕA$│""з260:ДЕA$│"A" з 270 :Д О,vЗ#м2, Л(30); Л(20); Л(27); Л(81); Л(0):З:З:З"The butterfly flew away !!":К,ХшАX│1е6:Y│ Д(240):аY,2:ЛX:Р+■·З#м2, Л(30); Л(27); Л(81); Л(1):З:З"PRESS ANY KEY FOR ANOTHER BUTTERFLY.":З"(A) TO ABORT.":Бж1000                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 8&2 Т&H95C9,&H17:Т&HFF22,&H10 :Г TRUE LOWERCASE"&ZТ150,18 :ГPRINTER BAUD RATE AT 2400&лт32:X│0:Y│58 :Т&HFFBD,X:Т&HFFBC,Y:З"JONCOM":АZ│1е500:ЛZ:З" BUTTERFLY"&щ(З:З"Printer on line?":З"Press any key when ready.":в44539&■2З:З"PRINTING..."'<З#м2, Л(18);'FА R│1 е 8'3PН N:Е N│999 з 130'VZЕ N▓│0 з З#м2, Л(128лN);:Бе 80'^dН M'АnЗ#м2, Л(28); Л(мN); Л(128лM);'КxБе 80'ЭВЗ#м2:Л R:Бе220'№МЖ -9,0,64,-3,0,64,0,-5,64,-5,0,64,96,64,96,112,16,16,32,112,88,24,16,112,56,30,127,7,3,999(ЦЖ 14,27,127,123,95,25,31,13,31,13,13,15,5,5,15,13,13,15,28,55,51,31,27,26,10,29,13,13,15,4,4,13,15,61,113,99,79,95,63,15,4,999(їаЖ -3,0,3,7,15,28,24,58,62,127,98,120,124,28,12,70,98,99,112,112,56,24,24,12,12,6,6,66,98,34,49,89,76,70,3,1,1,999)]кЖ -13,0,-3,1,-5,19,82,58,58,58,94,93,46,46,22,-3,23,-2,19,17,-4,32,96,96,48,48,112,112,32,96,64,999)▌┤Ж -17,0,4,100,50,57,60,62,27,25,25,25,12,12,12,6,6,2,2,66,65,65,96,32,48,120,124,115,98,24,29,127,34,47,63,112,96,96,64,999*E╛Ж -14,0,64,120,126,127,71,78,78,76,-3,12,6,6,68,96,32,62,55,11,27,27,12,10,19,30,7,4.4,7,3,-3,1,999*Н╚Ж -13,0,2,127,127,67,97,113,113,89,72,124,38,22,31,11,9,7,2,3,1,999*н╥Ж -14,0,7,4,7,6,2,3,1,1,999*╬▄Ю:З"Try Another One. [ Y/N ]*ццI$│ Т:Е I$│"" з230 +7ЁЕ I$│"N" з З#м2, Л(30):Ю:З"END OF PROGRAM" :Д ЕI$│"Y" з О50 :Д а100,1:Бе220,3,-3,1,999*Н╚Ж -13,0,2,127,127,67,97,113,113,89,72,124,38,22,31,11,9,7,2,3,1,999*н╥Ж -14,0,7,4,7,6,2,3,1,1,999*╬▄Ю:З"Try Another One. [ Y/N ]*ццI$│ Т:Е I$│"" з230 +7ЁЕ I$│"N" з З#м2, Л(3                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ~&E:ГCOPYRIGHT (C) T&D SOFTWARE 1991 siege on serius ISSUE #110&Lуў&X ф4:у0,0&оч1:ю(10,0),"SIEGE ON SIRIUS - JONCOM: January 1990":ю(10,1),"---------------"' ю(0,3),"The new colony in the Sirian solar system has come under attack. The aliens want"'\(ю(0,4),"to move in & take over. You are to defend against this aggression."'╖2ю(0,6),"1 or 2 players take turns against the computer which controls the alien ship."(k<ю(0,7),"The player will use both joystks at once for the controls. Pistol grip joystks":ю(0,8),"are highly recommended. The left joystk controls the weaponry crosshairs & the") Fю(0,9),"left button will activate the multiple warhead torpedos. The right joystk is you":ю(0,10),"& the right button activates the exploding warhead lasers. The object of the")╤Pю(0,11),"game is to hit the alien 5 times per level, while avoiding any hits from the":ю(0,12),"alien. A direct hit in the center is required to break the enemies shields."*└Zю(0,14),"Your score is determined by how much time it takes to destroy the aliens, how":ю(0,15),"much energy is used firing weapons, (torpedos take 10 times more energy than":ю(0,16),"lasers) & how many hits the alien makes upon you."*°[ч3:ю(10,20),"HIT BUTTON TO ENTER HOW MANY PLAYERS."+(\Е  к(0) ▒  к(1) ▒  к(2) ▒  к(3) з 100 :Д 92+kd:Г SIEGE ON SIRIUS - COPYRIGHT (C) JAN. 1990 BY JOHN L. FRENCH+Йnф2:у0,0:Т65497,0:И ЁБе680+УxБж850,/Вч2,0:ю(12,0),"SIEGE ON SIRIUS":ю(24,2),"(C) JAN.1990 JLF":ч1,0:ю(3,5),"Use both joystks to control craft.":ю(3,6),"Computer will control second craft.",КМч3,0:ю(3,8),"Hit computer 5 times to complete":ю(3,9),"the level. There are 3 levels.",ъЦч6,0:ю(3,11),"Right joystk button(1) = fazers.":ю(3,12),"Left joystk button(3) = torpedos."-кач11,0:ю(3,14),"Score 100 units of energy per alien":ю(3,15),"ship destroyed. You use 1 unit per":ю(3,16),"lazer shot and 10 units per torpedo.":ю(3,17),"1 second = 1 unit of energy spent"- кч9,0:ю(3,19),"100 units off for each hit of alien":ю(3,20),"T = time in seconds". ┤X│30:Y│23.T╛Бж210:ч8,0:ю(X,Y),"1 OR 2 PLAYERS ???????":I$│ Т:ЕI$│"" з190 :Д230.t╚чC,0:C│Cл1:ЕC▓3 зC│2:Р :ДР/╥АL│1е30:Бж220:ЛL:Бж200:ъ(200,184)м(215,192),╜,BF:Бж200:ъ(215,184)м(230,192),╜,BF:Бж200:ъ(200,184)м(215,192),╜,BF:X│Xм1:ЕX┤4 зX│29:Р :ДР/▄I$│ Т:ЕI$│"" зР :Д230/XцLV│1:PU│1:CU│5:ЕI$│"1"зPL│1 :ДЕI$│"2" зPL│2 :Да10,2:Бе180/hЁЕPU│3 зPU│1/·ЕPU│1 зCU│5 :ДCU│6/ЩTA│0:SF│0:Бж850:Бж280/гБе290/уч0,0:ъ(0,0)м(80,7),╜,BF:ч3,0:ю(0,0),"LV:":чCU,0:ю(2,0),LV:Р/Ў" Я│0:WS│0:BS│00N,XA│ Д(280)л20:YA│ Д(152)л20:QQ│0:ЕLV│1 зQ│ Д(18) :ДЕLV│2 зQ│ Д(14) :ДЕLV│3 зQ│ Д(8)0h6X│ Н(0)н5:ЕX┤20 зX│200w@ЕWS│5 з8700ЙJЕX▓300 зX│3000дTY│ Н(1)н3:ЕY┤20 зY│20 0╢^ЕY▓172 зY│1720╘hЕPU│1 зCU│5 :ДЕPU│2 зCU│60яrчCU,0:Бж520:ч0,0:Бж5201|XX│ Н(2)н5:ЕXX┤20 зXX│20 :ДЕXX▓300 зXX│3001MЖYY│ Н(3)н3:ЕYY┤20 зYY│20 :ДЕYY▓172 зYY│1721gРч9,0:Бж530:ч0,0:Бж5301вЪЕ к(1) зSF│SFл1:ч3,0:╔"V10;O4;L255;A":Бж540:ч0,0:Бж54028дЕ к(3) зTA│TAл10:ч7,0:Бж550:╔"V20;L150;O4;F;G;F;G;A;G;A;G":ч0,0:Бж550:ч2,0:АL│1е20:PX│XXл Д(20)м10:PY│YYл Д(20)м10:АLL│1е6:╔"V10;L250;O1;1":Бе4402BоБе4502Ы╕ъ(PX,PY)м(PXл Д(20)м10,PYл Д(20)м10),╜:ЛLL:є(PX,PY,2):Е л(PX,PY)│ л(XA,YA) з700 :ДЛL2н┬ЕXA┤20 зXA│202┴╠ЕXA▓300 зXA│3002╙╓ЕYA┤20 зYA│202чрЕYA▓172 зYA│1722№ъщ(XA,YA),6,CU,.73ЇXB│XBл1:ЕXB│5 зXB│0:Бж5603$■Бе3103Tъ(X,Y)м(Xм4,Yм4),╜,B:ъ(X,Y)м(Xл4,Yл4),╜,B:Р3Иъ(XXм2,YY)м(XXл2,YY),╜:ъ(XX,YYм2)м(XX,YYл2),╜:Р3∙ъ(X,Y)м(XX,YY),╜:АM│1е9:ъ(XX,YY)м(XXл Д(20)м10,YYл Д(20)м10),╜:ЛM:є(XX,YY,3):Е л(XX,YY)│ л(XA,YA) зБе700 :ДР4%&ъ(Xл4,Y)м(XX,YY),╜:ъ(X,Yл4)м(XX,YY),╜:Р4^0щ(XA,YA),6,0,.7:Е LV│1 зXD│ Д(5):ЕXD│3 з ч4,0:Бж610 4Д:ЕLV│2 зXD│ Д(3):ЕXD│3 зч4,0:Бж6104кDЕLV│3 зXD│ Д(2):ЕXD│2 зч4,0:Бж6104шNXA│XAл Д(20)м10:YA│YAл Д(20)м10:QQ│QQл1:ЕQQ│Q зQQ│0:Бе3004юXР5bXF│Xл Д(20)м10:YF│Yл Д(20)м105"lЕXF┤20 зXF│2056vЕXF▓300 зXF│3005HАЕYF┤20 зYF│205\КЕYF▓172 зYF│1725╝Фъ(XA,YA)м(XF,YF),╜:╔"V30;O4;L255;A;B":ч9,0:АM│1е9:ъ(XF,YF)м(XFл Д(20)м10,YFл Д(20)м10),╜:ЛM6Юч0,0:ъ(XF,YF)м(XA,YA),╜:є(XF,YF,9):Е л(XF,YF)│ л(X,Y) зБе730 :ДР6иТ65496,0:уў6▓К6╣╝И я Бе300:WS│WSл1:а200,8:ч0,0:ъ(X,Y)м(XX,YY),╜:LL│ Д(2):ЕLL│1 з710 :ДАL│1е20:ч11,0:ъ(XA,YA)м(XAл Д(19),YAл Д(19)),╜:ъ(XA,YA)м(XAм Д(19),YAм Д(19)),╜:ЛL:Бе7207╞И я Бе300:АL│1е20:ч11,0:ъ(XA,YA)м(XAл Д(19),YAм Д(19)),╜:ъ(XA,YA)м(XAм Д(19),YAл Д(19)),╜:ЛL7R╨B│1:АL│1е15:C│ Д(15):щ(XA,YA),B,C,.4:B│Bл1:ЛL:Бе3007П┌BS│BSл1:╔"V20;L25;O1;A;L10;B":Бж280:ч3,0:ю(6,0),BS:Бе3107ЩфБе7408 юБж840:ч3,0:ю(0,0),"HITS:":чCU,0:ю(4,0),BS:ч3,0:ю(7,0),"TORPEDOS USED:":чCU,0:ю(20,0),TAо10:ч3,0:ю(23,0),"LAZERS:":чCU,0:ю(29,0),SF8R°ч3,0:ю(33,0),"T=":чCU,0:TT│ Я:ю(34,0),TTо60:Р8═ч0,0:ъ(20,47)м(93,55),╜,BF:ъ(7,62)м(49,71),╜,BF:ч5,0:ю(3,6),"PLAYER 1":ч1,0:ю(1,8),"LEVEL":ч0,0:ъ(23,78)м(98,104),╜,BF9c ч5,0:ю(3,10),"1.":WA│ Б((WAн100)л.5)о100:ю(5,10),WA:ю(3,11),"2.":WB│ Б((WBн100)л.5)о100:ю(5,11),WB:ю(3,12),"3.":WC│ Б((WCн100)л.5)о100:ю(5,12),WC9єч0,0:ъ(38,119)м(128,128),╜,BF:ч5,0:ю(5,15),"TOTAL SCORE":ч0,0:ъ(45,135)м(98,143),╜,BF:ч3,0:TW│ Б((TWн100)л.5)о100:ю(5,17),TW:ЕPL│2 з800 :ДР:^ ч0,0:ъ(190,46)м(262,56),╜,BF:ч6,0:ю(24,6),"PLAYER 2":ч0,0:ъ(175,63)м(217,72),╜,BF:ч1,0:ю(22,8),"LEVEL";*ч0,0:ъ(190,78)м(265,104),╜,BF:ч6,0:ю(24,10),"1.":PA│ Б((PAн100)л.5)о100:ю(26,10),PA:ю(24,11),"2.":PB│ Б((PBн100)л.5)о100:ю(26,11),PB:ю(24,12),"3.":PC│ Б((PCн100)л.5)о100:ю(26,12),PC;а4ч0,0:ъ(209,119)м(295,128),╜,BF:ч6,0:ю(26,15),"TOTAL SCORE":ч0,0:ъ(210,135)м(264,143),╜,BF:ч3,0:TP│ Б((TPн100)л.5)о100:ю(26,17),TP:Р;к>Бе310;╔Hч0,0:ъ(0,0)м(320,8),╜,BF:Р; Rц0:АL│1е75:Бж860:є(SX,SY,2):Бж860:є(SX,SY,4):ЛL:Р<\SX│ Д(320):SY│ Д(192):Р<ЩfTT│ Я:ЕLV│1 ░PU│1 з880 :Д ЕLV│2 ░PU│1 з920 :ДЕLV│3 ░PU│1 з930 :ДЕLV│1 ░PU│2 з1050 :ДЕLV│2 ░PU│2 з1060 :ДЕLV│3 ░PU│2 з1070<ЄpБж750:WA│500м(BSн100)м(TTо60)мSFмTA:TW│WA:Бж770:ЕPL│2 зPU│PUл1:CU│6 :ДPU│1:LV│2:CU│5=|zЕ к(1) ▒ к(3) ▒ к(2) ▒ к(0) з 240 :Д Бж900:чCU,0:ю(16,23),"button...":Бж900:чCU,0:ю(17,23),"for":Бж900:чCU:ю(16,23),"battle!!!":Бе890=═ДАL│1е Д(200):Бж910:ЛL:ч0,0:ъ(100,184)м(200,192),╜,BF:АL│1е Д(200):Бж910:ЛL:Р=ўОЕ к(1) ▒ к(0) ▒ к(2) ▒  к(3) з240 :ДР>_ШБж750:WB│500м(BSн100)м(TTо60)мSFмTA:TW│(WAлWB):Бж770:ЕPL│2 зPU│2:CU│6:LV│2:Бе890 :ДPU│1:LV│3:Бе890>╗вБж750:WC│500м(BSн100)м(TTо60)мSFмTA:TW│(WAлWBлWC):Бж770:ЕPL│2 зPU│PUл1:CU│6:Бе890 :Д940?мАL│1е75:Е к(0) ▒ к(1) ▒ к(2) ▒ к(3) зО100 :ДЛL:C│ Д(15):чC,0:ю(15,23),"GAME OVER"?K╢C│ Д(15):чC,0:ю(13,2),"SIEGE ON SIRIUS":C│ Д(15):чC,0@ └ЕTW▓│0 ░TW┤200 зю(0,19),"0-200 TERRIBLE !!" :ДЕTW│▓200 ░TW┤400 зю(0,19),"200-400 PRETTY BAD" :ДЕTW│▓400 ░TW┤600 зю(0,19),"400-600 1ST DAY ?" :ДЕTW│▓600 ░TW┤700 зю(0,19),"600-700 B GUNNER" @╒╩ЕTW│▓700 ░TW┤800 зю(0,19),"700-800 A GUNNER" :ДЕTW│▓800 ░TW┤900 зю(0,19),"800-900 GREEN ACE" :ДЕTW│▓900 ░TW┤1000 зю(0,19),"900-1000 SNOOPY ACE" :ДЕTW│▓1000 ░TW┤1100 зю(0,19),"1000-1100 VERY ELITE"A ╘ЕTW│▓1100 ░TW┤1200 зю(0,19),"1100-1200 PRE-MASTER"A├▐ЕTW┤0 зю(0,19),"BELOW 0 GO HOME" :ДЕTW│▓1200 ░TW┤1250 зю(0,19),"1200-1250 *MASTER*" :ДЕTW│▓1250 ░TW┤1300 зю(0,19),"1250-1300 SUPER GUN" :ДЕTW│▓1300 зю(0,19),"1300+ IMPOSSIBLE ??"BeшЕPL│1 з1040 :ДC│ Д(15):чC,0:ЕTP┤0 зю(23,19),"BELOW 0 GO HOME!!" :ДЕTP│▓0 ░TP┤200 зю(26,19),"0-200 TERRIBLE" :ДЕTP│▓200 ░TP┤400 зю(22,19),"200-400 PRETTY BAD"C#ЄЕTP│▓400 ░TP┤600 зю(23,19),"400-600 1ST DAY ?" :ДЕTP│▓600 ░TP┤700 зю(24,19),"600-700 B GUNNER" :ДЕTP│▓700 ░TP┤800 зю(24,19),"700-800 A GUNNER" :ДЕTP│▓800 ░TP┤900 зю(26,19),"800-900 ACE"C┼№ЕTP│▓900 ░TP┤1000 зю(21,19),"900-1000 SNOOPY ACE" :ДЕTP│▓1000 ░TP┤1100 зю(20,19),"1000-1100 VERY ELITE" :ДЕTP│▓1100 ░TP┤1100 зю(22,19),"1100-1200 PRE-MASTER"D]ЕTP│▓1200 ░TP┤1250 зю(20,19),"1200-1250 *MASTER*" :ДЕTP│▓1250 ░TP┤1300 зю(20,19),"1250-1300 SUPER GUN!" :ДЕTP▓1300 зю(20,19),"1300+ IMPOSSIBLE ??"DЙЕ к(1) ▒ к(3) ▒ к(0) ▒ к(2) зО100 :Д940D╥Бж750:PA│500м(BSн100)м(TTо60)мSFмTA:TP│PA:Бж770:PU│1:CU│5:LV│2:Бе890E $Бж750:PB│500м(BSн100)м(TTо60)мSFмTA:TP│(PAлPB):Бж770:PU│1:CU│5:LV│3:Бе890Eb.Бж750:PC│500м(BSн100)м(TTо60)мSFмTA:TP│(PAлPBлPC):Бж770:Бе940E}8R│ Б((Aн100)л.5)о100:Р100 :Д940D╥Бж750:PA│500м(BSн100)м(TTо60)мSFмTA:TP│PA:Бж770:PU│1:CU│5:LV│2:Бе890E $Бж750:PB│500м(BSн100)м(TTо60)мSFмTA:TP│(                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 D&@:ГCOPYRIGHT (C) T&D SOFTWARE 1991 penny scale ISSUE #110&Ъ Е  Ж(31847)│142 з10:ДХ1,31846:Ю:З@102,"OLD-TIME PENNY SCALE":З@168,"BY BILL BERNICO" 'ФЖ142,124,253,252,1,104,191,1,104,253,125,144,142,124,134,220,169,159,169,253,124,157,158,186,191,127,252,127,127,250,57,129,158,38,21,52,22,158,186,191,127,252,204,255,255,237,129,156,183,38,250,53,22,126,16,0,129,135,38,5,115,127,255,32,244,129(МЖ64,39,9,129,32,39,236,127,127,255,32,231,125,127,255,39,226,127,127,255,52,22,134,32,23,0,241,189,179,228,16,131,4,200,16,36,55,123,16,131,0,50,35,8,131,0,51,124,127,255,32,242,134,5,61,52,4,196,7,247,127,250,182,127,255,53,4,84,84,84,211,186)Г(Ж253,127,252,127,127,255,53,22,134,32,32,159,13,111,16,38,0,140,52,22,129,31,38,15,134,240,177,127,249,38,4,141,94,32,134,141,92,32,130,129,8,38,21,23,1,44,134,32,23,0,145,134,32,23,0,140,23,1,31,23,1,28,32,54,129,12,38,19,158,186,191,127,252*v2Ж127,127,250,204,255,255,237,129,156,183,38,250,32,31,141,72,190,127,252,156,183,37,22,48,137,255,0,191,127,252,158,186,236,137,1,0,237,129,188,127,252,38,245,32,214,134,95,141,74,23,0,221,53,150,134,15,183,127,249,198,94,142,126,115,48,3+h<Ж182,127,249,129,15,38,4,170,132,32,2,164,132,167,128,90,38,236,57,126,16,0,129,13,38,19,141,216,134,32,141,25,23,0,172,127,127,253,124,127,252,127,127,250,57,129,32,16,37,254,237,129,128,16,34,254,231,198,4,247,127,254,128,32,61,195,126,[FЖ115,31,2,190,127,252,166,160,52,2,138,15,141,22,53,2,72,72,72,72,138,15,141,12,122,127,254,38,233,48,137,255,0,141,66,57,246,127,250,92,247,127,251,52,2,204,248,0,138,8,253,127,247,53,2,198,255,122,127,251,39,14,26,1,70,86,28,254,118,127-NPЖ247,118,127,248,32,237,52,6,252,127,247,170,132,234,1,167,132,231,1,53,6,164,132,228,1,237,132,48,136,32,57,246,127,250,203,5,193,7,35,4,48,1,192,8,193,7,38,15,30,16,193,31,38,7,76,95,30,1,95,32,2,30,1,247,127,250,191,127,252,57,52,4,246.CZЖ127,250,190,127,252,192,5,42,20,203,8,48,31,30,16,193,255,38,8,198,31,30,16,198,2,32,2,30,16,191,127,252,247,127,250,53,132,255,255,255,255,221,221,223,223,85,255,255,255,153,9,9,159,177,123,209,191,243,45,180,207,181,91,37,175,219,255,255/8dЖ255,219,119,123,223,189,238,237,191,246,144,150,255,251,177,187,255,255,255,157,191,255,240,255,255,255,255,253,223,255,237,191,255,150,64,38,159,217,221,221,143,150,237,183,15,150,233,230,159,217,80,221,223,7,30,230,159,219,113,102,159,140*nЖ237,183,127,150,105,102,159,150,104,237,191,253,223,221,255,253,223,221,191,237,183,189,239,255,15,15,255,123,222,219,127,150,237,191,191,150,66,71,143,150,96,102,111,53,81,102,31,150,119,118,159,26,170,170,31,7,113,119,15,7,113,119,1271xЖ150,116,102,159,102,96,102,111,141,221,221,143,206,238,230,159,101,51,53,111,119,119,119,15,96,6,102,111,98,36,68,111,150,102,102,159,22,97,119,127,150,102,37,175,22,97,53,111,150,121,230,159,13,221,221,223,102,102,102,159,102,102,105,1592ВЖ102,102,0,111,102,153,150,111,102,96,221,223,14,201,55,15,139,187,187,143,255,251,222,255,29,221,221,31,253,141,221,255,255,255,255,15,189,255,255,255,255,30,134,143,119,113,102,31,255,241,119,31,238,232,102,143,255,150,7,157,159,218,177,1873МЖ191,255,6,14,143,119,22,102,111,223,157,221,143,239,238,230,159,247,100,22,111,59,187,187,31,255,96,102,111,255,22,102,111,255,150,102,159,255,6,7,127,255,134,174,239,255,22,119,127,255,7,14,15,187,27,187,191,255,102,102,159,255,102,1053╙ЦЖ159,255,102,96,111,255,105,150,111,255,102,157,159,255,14,219,15,219,179,187,223,189,220,221,191,255,10,170,175,170,170,170,170,85,85,85,85,0,0,0,0,83,84,65,82,84,124,103,0,0,69,88,142,128,222,206,14аАX│31847е32767:НY:ТX,Y:Л:╚4,1:╝1:┐1,1:┴0,1:в31847:Х2004╢к┬(178,85),60:┬(177,25),2:┬(204,32),2:┬(222,45),2:┬(234,64),2:┬(238,85),2:┬(233,106),2:┬(222,125),2:┬(203,139),2:┬(179,145),2:┬(155,139),2:┬(135,127),2:┬(123,107),25┤┬(119,84),2:┬(122,64),2:┬(131,48),2:┬(148,34),2:╞"BM100,20R152D140L152U1405Н╛З@2,"'SCALE'":З@102,"YOUR WEIGHT":З@153,"AND FORTUNE":З@255,"(C) 1991 BY":З"T&D SOFTWARE":З@663,"HIT ANY KEY":З@714,"TO TRY SCALE" 5╠╚╞"BM178,85C0D50NH3E3":а191,1:в44539:╞"BM178,85C1D50NH3E3C06^╥RD│ Д(16):З@1140," ":З@1132,"FORTUNE: ";:И RD Бе220,230,240,250,260,270,280,290,300,310,320,330,340,350,360,3706╚▄Бж390:З"100":╞"BM178,85C0U50NG3F3":З@1141,"LONG LIFE AHEAD FOR YOU":Бж380:╞"BM178,85C1U50NG3F3":Бе20076цБж390:З"150":╞"BM178,85C0R50NH3G3":З@1141,"YOU WILL BE RICH AND FAMOUS":Бж380:╞"BM178,85C1R50NH3G3":Бе2007ЧЁБж390:З"50":╞"BM178,85C0L50NE3F3":З@1141,"JOB OPPORTUNITY":Бж380:╞"BM178,85C1L50NE3F3":Бе2008·Бж390:З"75":╞"BM178,85C0H35NR3D3":З@1141,"GOOD DAY TO BUY T AND D":Бж380:╞"BM178,85C1H35NR3D3":Бе2008aБж390:З"25":╞"BM178,85C0G35NU3R3":З@1141,"BETTER EAT MORE":Бж380:╞"BM178,85C1G35NU3R3":Бе2008┬Бж390:З"175":╞"BM178,85C0F35NU3L3":З@1141,"CUT OUT SNACKS":Бж380:╞"BM178,85C1F35NU3L3":Бе2009&Бж390:З"125":╞"BM178,85C0E35NL3D3":З@1141,"STAY IN BED TODAY":Бж380:╞"BM178,85C1E35NL3D3":Бе2009м"Бж390:З"187":╗(178,85)м(202,130),╜:╗м(203,125),╜:╗(202,130)м(197,128),╜:З@1141,"DIM OUTLOOK":Бж380:╗(177,84)м(204,131),╛,BF:Бе200:=,Бж390:З"162":╗(178,85)м(223,105),╜:╗м(221,101),╜:╗(223,105)м(218,106),╜:З@1141,"COMPUTER CAREERS AWAIT":Бж380:╗(177,84)м(224,106),╛,BF:Бе200:─6Бж390:З"137":╗(178,85)м(226,70),╜:╗м(222,68),╜:╗(226,70)м(223,75),╜:З@1141,"READ A BOOK TODAY":Бж380:╗(177,86)м(229,67),╛,BF:Бе200;M@Бж390:З"112":╗(178,85)м(200,37),╜:╗м(196,38),╜:╗(200,37)м(202,41),╜:З@1141,"BRIGHTER DAYS AHEAD":Бж380:╗(177,86)м(203,36),╛,BF:Бе200;╔JБж390:З"87":╗(178,85)м(155,37),╜:╗м(153,42),╜:╗(155,37)м(159,39),╜:З@1141,"CAUTION":Бж380:╗(179,86)м(152,36),╛,BF:Бе200|АX│1е1000:ЛX:Р>%ЖЗ@30,"WEIGHT: ";:Р>CР╗(139,16)м(200,10),╛,BF:Р":Бж380:╗(179,84)м(156,134),╛,BF:Бе200=√rБж390:З"199":╗(178,85)м(182,134),╜:╗м(185,130),╜:╗(182,134)м(179,130),╜:З@1141,"ONE AT A TIME PLEASE":Бж380:╗(177,84)м(186,135),╛,BF:Бе200>                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 `&M:ГCOPYRIGHT (C) T&D SOFTWARE 1991 disk base 3 instructions ISSUE #110&W Ю:т40& З"DISBASE3 - COCO3 version of DISKBASE":З:З"This is a COCO3 version of the DISKBASE version 1 program. It was done to take care of two problems that can occur in"'╫З"that version and add a few enhancements.";:З:З"The instructions for that one are prettymuch the same for this, except for a fewthings. This program was written for a 40/80 column screen format. I don't know";(б(З"how the 80 columns will look. All I had to work with was 40 columns.":З:З"This program takes care of the problems which may have required the use of the recovery DBRECOVE utility in version 1.")S2З:З"1 - It error traps option 4 so that the DIRECT.DAT file can not be overwritten. It informs the user that the file existsor creates the file if not.":З:З" <^> Next page";)n Next page Dwn arrow = Back one",яВIN$│ Т:ЕIN$│""з130-МЕIN$│"^"з170-ЦЕIN$│ Л(10)з10-аБе130-нкЮ:З"the following example will show how thisfield character can be used. Let's say that you typed the following ID for the DISKBASE file.".N┤З:З"T&D SOFTWARE:DISK#5:NOV:1982":З:З"With version 1.00 of DISKBASE the user could only search the first part of the string. And here, one can do the same".ў╛З"thing. For example; one can type T&D andfind all occurances of T&D SOFTWARE on the disk. But if you want to work withinthe string (fields). You have to precede";/О╚З"the string with the delimiter character.":З"To find disk#5, type :DISK#5":З"To find Nov disks, type :NOV":З"to find the 1982 disks, type :1982"/ц╥З:З"(The user has to use a delimiter when typing the ID for the DISKBASE file.)"0▄З:З" <^> Next page Dwn arrow = Back one";0,цIN$│ Т:ЕIN$│""з2300?ЁЕIN$│ Л(10)з700P·ЕIN$│"^"з2700ZБе2300■Ю:З"Another feature of this version is that a printer set-up routine has been added.There is one problem with this, and thisproblem will be brought out later."1БЗ:З"The routine is found in lines 2820-3050.It was written for an SP 1200 AS, some modifications may be needed for others.":З2P"З"Line 2870 sets the baud rate to 1200.":З"Line 2910 sets page length to 66 lines.":З"Line 2990 sets the skip over perforationto produce a 1-inch top of form. This iswith a pitch of 1/6 (6-lines/inch)."3$,З"Line 3040 sets the left & right margins to 5 and 75.":З"Don't alter line 3050.":З:З"Make needed changes for your printer. I don't know how to set all printers. But I can give some ideas of how I use mine."3P6З" <^> Next page Dwn arrow = Back one"3g@IN$│ Т:ЕIN$│""з3203{JЕIN$│ Л(10)з1703МTЕIN$│"^"з3603Ц^Бе3204АhЮ:З"The SP-1200 AS has a default baud ratingof 1200. Change this as needed for your printer - line #2870.":З:З"My printer goes on-line with a default of 10 CPI and a pitch of 1/6. A pitch of1/6 means that there is 6-lines/inch."5+rЗ:З"A standard page is 11-inches long (from one perforation to the next). On a pitchof 1/6, this means there's 66-lines/pge.Line 2910 sets it for that page length.":З5№|З"The SP-1200 AS has two ways of setting the top of form. To avoid some confusionon this I will explain how it is done. Set the head 1-inch below the top perf and turn the printer on. With 6-lines at";6ЩЖЗ"the bottom of the page and 6 more lines for the top of the next page - this is 12-lines for the skip over perforation. That's what is in line #2990."6╚РЗ:З" <^> Next page Dwn arrow = Back one";6▀ЪIN$│ Т:ЕIN$│""з4106єдЕIN$│ Л(10)з2707оЕIN$│"^"з4507╕Бе4107ы┬Ю:З"The one problem with the printer routineis that if a user breaks or exits from the program after getting hardcopy and then runs the program again to continue getting hardcopy - it messes things up alittle bit."8н╠З:З"When the routine is first run, it sets aflag so that the routine does not run again. It could set a new top of form each time it executes. But the flag willstop it from doing that."9{╓З:З"If one breaks or exits and then returns to get more hardcopy, the flag will not be set. It could set a new top of form at the current head position and mess upthe running line count for the page."9щрЗ:З"Make sure the printer is ready to go before executing the routine. The systemwill hang up if not.":ъЗ:З" <^> Next page Dwn arrow = Back one";:/ЇIN$│ Т:ЕIN$│""з500:C■ЕIN$│ Л(10)з360:TЕIN$│"^"з540:^Бе500;/Ю:З"One final note here. Version 1.00 used alot of memory to do what it does. This version uses less memory. Memory clearedis for 2000, I found this satisfactory for my needs. But others may need more.";_&З"One can change this as needed in line 10"Ю:З"One final note here. Version 1.00 used alot of memory to do what it does. This version uses less memory. Memory clearedis for 2000, I found this satisf)з2340B .ЮB 8Л LLB) BЕ LL ░ 1│1 з З:ЗBK LЗ"PRESS [ENTER] TO CONTINUE";Bi VIN$│ Т:ЕIN$┤▓ Л(13)з 2390Bw `ЛL:Бе2250BФ jВ **********************B▒ tВ SEARCH FOR SPECIFIC IDB╬ ~В **********************C ИЮ:З"SEARCH FOR WHAT ID:":Й"";ID$:ЕID$│""з1660Cn жCF│1:╧1:Бж4070:T│RC:АL│1еT:Щ"I",#1,RF$(L):Й#1,RC:╗Й#1,FI$(L):Е О(FI$(L), З(ID$))│ID$з2590 :Д Ъ1:ЛL:Бе2600Cе F2│1:CF$(CF)│RF$(L):ID$(CF)│FI$(L):CF│CFл1:Ъ#1:Л LD (Е F2│0 з А L│1 е T:RF$(L)│"":CF$(L)│"":ID$(L)│"":FI$(L)│"":Л L:ID$│"":RC│0:T│0:L│0:LL│0:╧0:Бе 1660DР 2F2│0:АL│1еCFм1:Ю:З"THERE IS";CFм1;"MATCHING ID(S)":З"IDENTIFICATION:";L"-";CF$(L):З:З"";ID$(L):З:З"IEW FILE EXT XIT"Dи dIN$│ Т:ЕIN$│""з2660D╜ nЕ IN$│"V" з 2710D█ xЕ IN$│"N" з Ю:Л L:Бе 2600DЁ ВЕ IN$│"E" з 2600D№ МБе 2660EM ЦЮ:Щ"I",#1,CF$(L):Й#1,T:╗Й#1,ID$:АLL│1еT:Й#1,RF$(LL):ЛLL:Ъ1:АLL│1еT:ЗRF$(LL),Ep ЁЕ LL│20 ▒ LL│40 ▒ LL│60 з 2850E| Бе 2880Eб "З:З"PRESS [ENTER] TO VIEW MORE";E┐ ,IN$│ Т:Е IN$┤▓ Л(13)з2860E┼ 6ЮE╬ @Л LLEу JЕ LL ░ 1│1 з З:ЗF TЗ"PRESS [ENTER] TO CONTINUE";F" ^IN$│ Т:ЕIN$┤▓ Л(13)з2910F* hЛ LF6 rБе 2600FS |В **********************Fo ЖВ SEARCH FOR .EXTENSIONFМ РВ **********************F╚ ЪЮ:З"SEARCH FOR WHAT .EXT:":Й"";EX$:╧1:CF│0:ЕEX$│""з1660G~ оБж4070:АL│1еRC:Ю:З"THERE IS";RC;"FILES THIS DISK." +ш&A:ГCOPYRIGHT (C) T&D SOFTWARE 1991 disk base 3 ISSUE #110&d:Г****************************&Д:ГDISBASE:RAYMOND DOSS:7/91&Ч:ГVERSION 2.00&╕:ГTHIS PROGRAM IS A MODIFIED&█:ГVERSION OF THE COCO DISKBASE&■:ГPROGRAM. IT HAS BEEN WRITTEN'!:ГFOR COCO3 USE ONLY. RGD'(:Г'K :Г****************************'b Х2000:HF│0:FD$│":"'МFI$(68),EX$(68),RF$(68)'Т:ГWIDTH80:WC=5'Я(т40:WC│3'л2Бж 3090'Ї<З" <1> 40-Column <2> 80 Column":З:З"Choose Option [<1> or <2>]"( FIN$│ Т:ЕIN$│""з70(#PЕIN$│"1"з WC│3:Бе110(@ZЕIN$│"2"з WC│5:т80:Бе110(IdБе70(╝nЮ:ё 0,0:З"This utility requires two drives place the disk to be checked in drive0 and theBASEDISK in drive1."(рxё 0,4:З"Directory File Options")ЗВё 5,6:З"<1> View the directory listings":ё 5,7:З"<2> Search for specific extension":ё 5,8:З"<3> Get hardcopy of directory":ё 5,10:З"<4> Set-Up for DISKBASE files"* Мё 5,11:З"<5> Create DISKBASE files":ё 5,12:З"<6> Search DISKBASE files":ё 5,14:З"<7> Exit":ё 0,16:З"Choose option: [<1> - <7>]"*"ЦIN$│ Т:ЕIN$│""з150*3аЕIN$│"1"з270*DкЕIN$│"2"з310*U┤ЕIN$│"3"з460*f╛ЕIN$│"4"з790*w╚ЕIN$│"5"з930*Й╥ЕIN$│"6"з1060*Ъ▄ЕIN$│"7"зЮ:К*дцБе150*┬ЁВ ************************р·:ГVIEW DIRECTORY LISTINGS*■В ***********************+4Бж2690:Бж2540:АN│1еT:FI$(N)│"":EX$(N)│"":ЛN:Бе110+RВ ***********************+q":ГSEARCH FOR SPECIFIC .EXT+П,В ***********************+┼6Ю:Й"Search for what file [.EXT]";EX$:Е EX$│""з110+▐@Бж2690:LC│0:Ю:АL│1еT+їJЕ EX$┤▓EX$(L) з370,TЗFI$(L);:LC│LCл1:Е LC┤▓WC зЗ" ";,6^ЕLC│WC зLC│0:Е WC│5 зЗ,LhЕL│30 ▒ L│60 з390,XrЛL:LC│0,q|ЕL▓T зЗ"[D O N E]":З,ХЖЗ:З"Press a key to continue...",мРIN$│ Т:ЕIN$│""з400,╛ЪЕL┤T зЮ:Бе370,╩дЮ:Бе110,шоВ ***********************-╕:ГGET HARDCOPY LISTING-!┬В ***********************-╘╠Ю:З"The printer must be on line and ready togo. If the printer is not ready to go itwill hang up the system.":З:З"ontinue eturn to options xit":З:З"Choose option:"-ы╓IN$│ Т:ЕIN$│""з470-№рЕIN$│"R"з110. ъЕIN$│"E"зЮ:К.ЇЕIN$│"C"з520.(■Бе470.:Е HF│0зБж2870.QЕ DF│1 ▒ PF│1 з600.ОЮ:З"Do you wish to date the hardcopy files?":З"[/].е&IN$│ Т:ЕIN$│""з550.╛0ЕIN$│"N"з PF│1:Бе600.█:ЕIN$│"Y"зDF│1:PF│1:Бе590.хDБе550. NЗ:╗Й"WHAT DATE: ";DA$/XБж2690:RC│0/hbЮ:З"Printed lines =";PL:З"PAGE FORMAT:":З:З"pace orm feed

rint directory"/lIN$│ Т:ЕIN$│""з620/╡vЕIN$│"S"зЗ#м2:PL│PLл1:ЕPL│▓54зPL│0:Бе610 :Д Бе610/┌АЕIN$│"F"зЗ#м2, Л(12);:PL│0:Бе610/яКЕIN$│"P"зЮ:Бе670/∙ФБе6200ЮЗ"Disk ID:":╗Й"";ID$0VиЕ DF│1зЗ#м2,DA$,"Free granules:";GC :Д З#м2,"Free granules:";GC0g▓З#м2:PL│PLл10Е╝TL│ Б( З(ID$)о70):TL│TLл10Ч╞PL│PLлTL:TL│00▒╨З#м2,ID$:З#м2:PL│PLл20ю┌АL│1еT:З#м2,FI$(L)" ";:RC│RCл1:Е RC│5зRC│0:З#м2:PL│PLл11фЛL:З#м2:PL│PLл1:ЕPL│▓54зPL│01;юАL│1еT:EX$(L)│"":FI$(L)│"":ЛL:L│0:Бе1101Y°В ***********************1y:ГSET-UP FOR DISKBASE FILES1Ч В ***********************1зЮ:И я Бе8501┐ ╧1:Щ"I",#1,"DIRECT"1╩*Й#1,RC2a4Ъ#1:З"Cannot create a DISKBASE set-up.":З"This disk is already set up for files.":З:З"Files contained on disk:";RC:З:З"Press a key to continue..."2x>IN$│ Т:ЕIN$│""з8302ЕH╧0:Бе1102ЧRЕ  м┤▓26 з8702╚\Щ"O",#1,"DIRECT":З#1,0:З#1,"DB0":Ъ1:╧0:Бе1102щfЗ"UNKNOWN ERROR IN LINE#:" н2№pЗ"ERROR #:"; м3zК3 ДВ ***********************3<О:ГCREATE DISKBASE FILES3ZШВ ***********************3Гв╧1:Щ"I",#1,"DIRECT":Й#1,RC:ЕRC▓0з9503ЩмЙ#1,RF$(RC):Бе9603│╢АL│1еRC:Й#1,RF$(L):ЛL49└Ъ1:╧0:Бж2690:Ю:З"Disk ID:":╗Й"";ID$:RF│ Й( П(RF$(RC), З(RF$(RC))м2)):RF│RFл1:TS$│ И(RF):RC│RCл1:RF$(RC)│"DB"л П(TS$, З(TS$)м1):╧14_╩Е  г(1)┤│8 з1000 :Д ╥"DIRECT.DAT"4╞╘Щ"O",#1,"DIRECT":З#1,RC:АL│1еRC:З#1,RF$(L):ЛL:Ъ1:Щ"O",#1,RF$(RC):З#1,T,ID$:АL│1еT:З#1,FI$(L):ЛL:Ъ15▐АL│1еT:FI$(L)│"":EX$(L)│"":ЛL:АL│0е RC:RF$(L)│"":ЛL:╧0:Бе1105шЮ:З"Disk in DRIVE1 has 8 granules or less. Please insert another disk into DRIVE1.":З:З"Press a key when ready..."5аЄIN$│ Т:ЕIN$│""за200,2:Бе10105╛№RF$(1)│RF$(RC):RC│1:Бе9705▄В ***********************5√:ГSEARCH DIRECTORY OPTIONS6В ***********************6с$Ю:З" Search Options for DISKBASE":ё 5,3:З"<1> View disk file ID's":ё 5,4:З"<2> Search for specified ID":ё 5,6:З"<3) Search for specified extension":ё 5,7:З"<4> Search for specified filename"7_.ё 5,8:З"<5> View all files on disk":ё 5,10:З"<6> Return to directory options":ё 5,11:З"<7> Exit":ё 0,14:З"Choose option:"7w8IN$│ Т:ЕIN$│""з10807ЙBЕIN$│"1"з12007ЫLЕIN$│"2"з14107нVЕIN$│"3"з19007┐`ЕIN$│"4"з20907╤jЕIN$│"5"з23107тtЕIN$│"6"з1107є~ЕIN$│"7"зЮ:К7■ИБе10808ТВ ***********************85Ь:ГVIEW ALL DISK ID'S8SжВ ***********************8в░Ю:З"Insert a DISKBASE file disk into drive1 and press a key when ready..."8║║IN$│ Т:ЕIN$│""з12108ў─CF│1:╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ19$╬А LL│1еRC:Щ"I",#1,RF$(LL):Й#1,T:╗Й#1,ID$9@╪АL│1еT:Й#1,FI$(L):ЛL:Ъ19фтЮ:З"There are";RC;"file(s) this disk":З"File ";RF$(LL);" has";T;"filenames":З:З"disk ID:":ЗID$:З:З"iew filenames eturn to options":З"ext ID xit"9№ьIN$│ Т:ЕIN$│""з1260:ЎЕIN$│"R"з1370: ЕIN$│"V"з1350:2 ЕIN$│"N"з1360:IЕIN$│"E"зЮ:Ъ1:╧0:К:TБе1260:q(В ======================:К2:ГVIEW THE FILENAMES:з<В ======================:▓FБж2540:╝PЮ:ЛLL:∙Z╧0:АL│1е68:FI$(L)│"":RF$(L)│"":ЛL:CF│0:ID$│"":T│0:Бе1060;dВ **********************;4n:ГSEARCH FOR SPECIFIED ID;QxВ **********************;уВЮ:З"This version of DISKBASE can recognize field search delimiters.":З:З" The default is <"FD$">":З:З"Do you wish to change this [/]?";√МIN$│ Т:ЕIN$│""з1420< ЦЕIN$│"Y"з1490<аЕIN$│"N"з1550<*кБе1420В =======================aЮ:╗Й"Search for what ID: ";SI$=Ъ╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1е RC:Й#1,RF$(L):ЛL:Ъ1=╖"А L│1е RC:Щ"I",#1,RF$(L)=╥,Й#1,T:╗Й#1,ID$:CS$│ID$=Є6АLL│1еT:Й#1,FI$(LL):ЛLL:Ъ#1>@Е О(ID$, З(SI$))│SI$з1770>HJЮ:З"Searching file ";RF$(L);" for ID:":З"[";SI$;"]">`TЕ О(SI$,1)│FD$з1680>Й^:ГIFLEFT$(ID$,LEN(SI$))=SI$ THEN1675>ЧhЛL:Бе1860>┤rВ ======================>╨|:ГSEARCH THROUGH FIELDS>эЖВ ======================?РSI│ З(SI$):LC│0?ЪАLL│1е  З(ID$)?/дЕ Р(ID$,LL,1)│FD$з1720?FоLC│LCл1:ЛLL:Бе1640?f╕CS$│ П(ID$, З(CS$)мLC):LC│0?}┬Е SI▓ З(CS$) з1640?Ц╠Е О(CS$,SI)│SI$з1770?б╓Бе1710?╖рВ DISPLAY ID DATA@ъЮ:З"Search ID = [";SI$"]":З"One field found in ";RF$(L):З"Number of filenames:"T:З"Disk ID = ";ID$@lЇЗ:З"iew file ontinue search xit":З"eturn to search options"@Д■IN$│ Т:ЕIN$│""з1790@ШЕIN$│"E"зЮ:╧0:К@▒ЕIN$│"C"зLL│0:Бе1640@├ЕIN$│"V"з1850@╒&ЕIN$│"R"з1860@р0Бе1790@ў:CF│1:Бж2540:Бе1640AVDАL│1е68:RF$(L)│"":FI$(L)│"":ЛL:CS$│"":SI$│"":ID$│"":LC│0:SI│0:LL│0:L│0:CF│0:TL│0:╧0:Бе1060AsNВ **********************AТX:ГSEARCH FOR SPECIFIED EXTAпbВ **********************AыlЮ:Й"Search for what EXT:";EX$:╧1:LC│0:CF│0:ЕEX$│""з1060B vЩ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ1BйААL│1еRC:Ю:З"There is";RC;"files this disk.":З"Search for "; Л(91);EX$; Л(93);" in ";RF$(L):Щ"I",#1,RF$(L):Й#1,T:╗Й#1,ID$:З"ID =";ID$CКЗ:З"Files found (if any):":АLL│1еT:Й#1,FI$(LL):Е П(FI$(LL), З(EX$))│EX$з1940 :Д Бе1990C7ФЗ"";FI$(LL);:LC│LCл1:CF│CFл1:Е LC┤▓WC з З" ";CRЮЕLC│WC зLC│0:Е WC│5 зЗCПиЕCF│30 ▒ CF│60зЗ:З"Press a key to continue..." :Д Бе1990Cз▓IN$│ Т:ЕIN$│""з1970Cн╝ЮCх╞ЛLL:Ъ1:З:З"ontinue xit eturn to options"C¤╨IN$│ Т:ЕIN$│""з2000D┌ЕIN$│"E"з╧0:Ю:КD3фЕIN$│"C"з CF│0:LC│0:ЛL:Бе2050DEюЕIN$│"R"з2050DP°Бе2000DМАL│1е68:FI$(L)│"":RF$(L)│"":ЛL:CF│0:LC│0:RC│0:╧0:Бе1060Dй В **********************D├:ГSEARCH FOR FILENAMEDр В **********************E*Ю:Й"Search for what FILENAME:";FI$:ЕFI$│""з1060E14Е З(FI$)▓8зFI$│ О(FI$,8)Es>CF│0:LC│0:╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ1E─HАL│1еRC:Ю:З"Search ";RF$(L);":";FI$:Щ"I",#1,RF$(L):Й#1,T:╗Й#1,ID$:З"ID=";ID$F%RЗ:З"Filename(s) found (if any):":АLL│1еT:Й#1,FI$(LL):Е О(FI$(LL), З(FI$))│FI$з2140 :Д Бе2190Fb\CF│CFл1:LC│LCл1:ЗFI$(LL);:Е LC┤▓WC зЗ" "; :Д Е LC│WC зЗF{fЕCF│30 ▒ CF│60 з2170FЖpБе2190FЮzIN$│ Т:ЕIN$│""з2170FдДЮF╣ОЛLL:Ъ1:LC│0:CF│0FъШЗ:З"ontinue eturn to options xit"GвIN$│ Т:ЕIN$│""з2210GмЕIN$│"E"з╧0:Ю:КG(╢ЕIN$│"C"з2260G:└ЕIN$│"R"з2270GE╩Бе2210Gc╘АLL│1еT:FI$(LL)│"":ЛLL:ЛLG║▐АL│1е68:RF$(L)│"":FI$(L)│"":ЛL:T│0:L│0:LL│0:RC│0:CF│0:LC│0:ID$│"":FI$│"":╧0:Бе1060G╫шВ **********************GЁЄ:ГVIEW ALL FILENAMESH №В **********************HE ╧1:Щ"I",#1,"DIRECT":Й#1,RC:АL│1еRC:Й#1,RF$(L):ЛL:Ъ1HЯ АLL│1еRC:Ю:Щ"I",#1,RF$(LL):Й#1,T:╗Й#1,ID$:З"Viewing all files on disk":З"ID=";ID$:З:ЗI З T;"Files in ";RF$(LL):З"Filenames are:":АL│1еT:Й#1,FI$(L):ЛL:Ъ1:CF│1:Бж2540:Ю:З"ontinue eturn to options xit"I6 $IN$│ Т:ЕIN$│""з2340IJ .ЕIN$│"E"з╧0:Ю:КI\ 8ЕIN$│"C"з2390In BЕIN$│"R"з2400Iy LБе2340IБ VЛLLI─ `АL│1е68:RF$(L)│"":FI$(L)│"":ЛL:ID$│"":LL│0:L│0:T│0:CF│0:Бе1060I╩ jКIш tВ ***********************J ~В DBMOD0 - SUBROUTINEJ ИВ THIS MODULE IS DESIGNEDJ> ТВ TO DISPLAY FILENAMES ONJ[ ЬВ THE SCREEN. CONDITIONSJp жВ FOR ENTRY ARE:JЗ ░:ГFI$(N)=FILENAMESJа ║:Г WC=WIDTH COUNTJ╣ ─:Г 3=40 COLUMNJ╥ ╬:Г 5=80 COLUMNJє ╪:Г T=NUMBER OF FILENAMESJ∙ тВK ьЮ:АAL│1еTK. ЎЗFI$(AL);:LC│LCл1:Е LC┤▓WC зЗ" ";KJ ЕLC│WC зLC│0:Е WC│5 з ЗKZ ЕAL│30з2620Kj ЕAL│60з2620Kw ЛAL:LC│0KЗ (Е CF│1з2620Kк 2ЕAL▓T зЗ:З"Free Granules =";GCK╬ <З:З"Press a key to continue..."Kц FIN$│ Т:ЕIN$│""з2630K√ PЕAL┤T з Ю:Бе2590L ZЮ:РL! dВ ***********************L> n:ГGET DIRECTORY LISTINGSL\ xВ ***********************Lv ВDN│0:N│1:T│0:А D│3е11LЛ М▀DN,17,D,F1$,F2$LЯ ЦF2$│ О(F2$,127)Lп аCS$│F1$лF2$L╗ кАNN│1е8Lс ┤Е  О(CS$,1)│ Л(255)з N│Nм1:Бе2810M ╛Е  О(CS$,1)│ Л(0)з N│Nм1:Бе2790M ╚G$│ О(CS$,8)M- ╥EX$(N)│ Р(CS$,9,3)ML ▄FI$(N)│G$л"."лEX$(N):T│Tл1M_ цCS$│ Р(CS$,33)Mp ЁN│Nл1:ЛNN:ЛDM ·GC│ г(0):РMЭ В ***********************M┤ :ГSET LINE PRINTERM╥ В ***********************Mю ":ГSET BAUD RATE TO 1200N ,:Г==========================N 6Т&H96,41N= @:Г==========================N^ J:ГSET PAGE LENGTH - 66 LINESN T:Г==========================NЮ ^З#м2, Л(27); Л(67); Л(66);N┐ h:Г==========================N▀ r:ГSET SKIP OVER PERFORATIONO |:ГSUBTRACT 12 LINES FROM PGEO! Ж:ГLENGTH - PRODUCE AUTOMATICOB Р:ГLINEFEED FOR ONE-INCH TOF.Oc Ъ:ГW/DEFAULT 1/6 (SP 1200 AS)OД д:Г==========================Oг оЗ#м2, Л(27); Л(78); Л(12);O─ ╕:Г==========================Oх ┬:ГSET LEFT AND RIGHT MARGINSP ╠:ГTO 5 AND 75 (RESPECTIVELY)P' ╓:Г==========================PL рЗ#м2, Л(27); Л(88); Л(5); Л(75);PW ъHF│1:РPw Ї:Г*************************PТ ■:ГDISPLAY TITLE SCREENP▓ :Г*************************Q$ Ю:ё 17,0:З"COCO-3":ё 16,1:З"DISKBASE":ё 15,2:З"VERS. 2.00":ё 19,3:З"By":ё 14,4:З"Raymond Doss":ё 18,5:З"7/91"QО З:З" DISKBASE requires two drives. Place the disk to be checked in drive0 - the BASE disk in drive1."QХ &:ГQЬ 0:ГQ┬ :З:З"Press [ENTER] to continue..."Q▀ DIN$│ Т:ЕIN$┤▓ Л(13)з3140Qч NЮ:Р. 2.00":ё 19,3:З"By":                                                                                                                                                                                                                                                                 И<:ГCOPYRIGHT (C) T&D SOFTWARE 1991 nfl 91 ISSUE #110I╚0:Бе152XХ3000:DN│1aЮ::ГУМN$(28),W(28),L(28),F(28),A(28),G$(17),Z$(28)Ж"INDIANAPLS.",7,9,281,353," BUFFALO",13,3,428,263,"NEW ENGLAND",1,15,181,446," N.Y. JETS",6,10,295,345," MIAMI",12,4,336,242ВЖ" CINCINNATI",9,7,360,352," CLEVELAND",3,13,228,462," HOUSTON",9,7,405,307,"PITTSBURGH",9,7,292,240 Ж" DENVER",5,11,331,374,"KANSAS CITY",11,5,369,257,"LA RAIDERS",12,4,337,268," SAN DIEGO",6,10,315,281," SEATTLE",9,7,306,206К Ж" DALLAS",7,9,244,308,"N.Y. GIANTS",13,3,335,211,"PHILADEPHIA",10,6,396,299," PHOENIX",5,11,258,396,"WASHINGTON",10,6,381,301 Ж" CHICAGO",11,5,348,280," DETROIT",6,10,373,413," GREEN BAY",6,10,271,347," MINNESOTA",6,10,351,326," TAMPA BAY",6,10,264,367| Ж" ATLANTA",5,11,348,365," L.A. RAMS",5,11,345,412,"NEW ORLEANS",8,8,274,275," SAN FRANC",14,2,353,239┬ Ж"09012511061015071208050223200301172218261309142724042119522816"Ж"09082024070310122221010526162325271104141817090213280806591915"NЖ"09152513020406070112052103091620171518192823141024222627661108"ФЖ"09220224071621012205080312252628232709171310141119061518730426"╥Ж"092920022226011411130504031827251615281224211023801719"Ж"100615221008050323210407172418161312140619200901570211"JЖ"10130615071908040102051127171823132628251214641609"КЖ"10172022702518071321280805111026122303040114092427710602"╚Ж"102720270608152110032224262523180907131428171916781211"Ж"110325280706212022040819050103022726181524230910541617"LЖ"11102519022215082124010411261210161817070906282714130305612023"ТЖ"11172001061715161011262123222713040318281412242519090708680205"╪Ж"11240203151910142123080901221107120605201624171813042527752826"Ж"122820210915510701222511140310272816060402240519261213521708"bЖ"12082526021210072220010327150421171609081311281419182324590605"кЖ"1214112824206506091517212208072623051303041619181014250201661227"ЄЖ"1221222308167225150709101321020124111203062718040519172614732028"АX│1е28:НN$(X),W(X),L(X),F(X),A(X):ЛX2АX│1е17:НG$(X):ЛXЄ Ю:З@70,"main menu":З:З" 1. LOAD NFL DATA":З" 2. SAVE NFL DATA":З" 3. VIEW AND EDIT NFL DATA":З" 4. RUN PREDICTIONS":ЕDN│м1зЗ" 5. CHANGE I/O DEVICE - tape":ДЗ" 5. CHANGE I/O DEVICE - disk"!З:З" enter 1-5"*"I$│ Т:Е Й(I$)▓0░ Й(I$)┤6з35:Д347#I│ Й(I$)R$ИIБе126,129,132,37,150У%Ю:З@128," WHAT WEEK OF PLAY DO YOU WISH TO SEE (1-17)";:ЙWи&ЕW┤1▒W▓17зЮ:Бе37ё'З:З" ENTER 'Y' IF YOU WANT THE SCORES PRINTED TO THE PRINTER";(I$│ Т:ЕI$│""з40:ДЕI$│"Y"зQ3$│"Y":ДQ3$│"E"Y)Z│5:A$│G$(W):M│ Й( Р(A$,1,2)):DA│ Й( Р(A$,3,2)):Бж117╚*ЕQ3$│"Y"зЗ#м2," ":З#м2," ":З#м2,д10)"WEEK";W;д34)"STARTING ";M$;DA:З#м2,д10)"VISITORS";д40)"HOME":З#м2," "╒+ЕZ┤5зZ│5∙,ЕZ▓ З(A$)зZ│Zм4:ЕQ3$│"Y"зЮ:Бе320-T1│ Й( Р(A$,Z,2)):ЕT1▓28зDA│T1м50:Бж117:Z│Zл2:Бе45t.Ю:З@162,N$(T1):З@175,"AT";:Z│Zл2:T2│ Й( Р(A$,Z,2)):З@180,N$(T2)▒/З@9,"NFL PREDICTIONS";:З@65,M$;DA;"1989":З@86,"WEEK #";W┘0АV│64е95:З@Vл32,"*";:З@320лV,"*":ЛVї1З@234,"COMPUTER PICKS"; 2Е З(Z$(20))┤3з53 Y3A│0:АQ│ З(Z$(T1))е З(Z$(T1))м5йм1:A│Aл1:Q$│ Р(Z$(T1),Q,1):Z(A)│ К(Q$)м75:Л й4A│0:АQ│ З(Z$(T2))е З(Z$(T2))м5йм1:A│Aл1:Q$│ Р(Z$(T2),Q,1):Z2(A)│ К(Q$)м75:Л ╟5P│ Б(F(T1)о(W(T1)лL(T1))) ц6P2│ Б(F(T2)о(W(T2)лL(T2)))!(7X1│ Б((F(T1)лA(T1)лF(T2)лA(T2))о(W(T1)лL(T1)лW(T2)лL(T2)))н.5!68X1│ Б(X1)!@9X2│X1!R:V│W(T1)мL(T1)!p;ЕV▓м5░V┤5зX1│X1лV:X2│X2мV!Е<Е З(Z$(20))┤3з62!ы=X1│X1л(Z(3)лZ(4)лZ(5))н.4м(Z2(3)лZ2(4)лZ2(5))н.4:X2│X2л(Z2(3)лZ2(4)лZ2(5))н.4м(Z(3)лZ(4)лZ(5))н.4">ЕV┤м4зX1│X1м5:X2│X2л5"?ЕV▓4зX1│X1л5:X2│X2м5"0@U│W(T2)мL(T2)"FAЕU▓м5░U┤5зX2│X2лU"\BЕU▓м5░U┤5зX1│X1мU"nCЕU┤м4зX2│X2м5"АDЕU┤м4зX1│X1л5"СEЕU▓4зX2│X2л5"вFЕU▓4зX1│X1м5"юGЕ З(Z$(20))▓3зF(T1)│F(T1)лZ(1)н4л(Z(2)н4):F(T2)│F(T2)лZ2(1)н4л(Z2(2)н4)# HC│ Б((F(T1)мA(T1))о40):D│ Б((F(T2)мA(T2))о40)#LIX1│ Б(X1):X2│ Б(X2):X1│X1лCмD:X2│X2мCлD#`JX1│X1м3:X2│X2л3#oKЕX1┤6зX1│3#~LЕX1│8зX1│7#ХMЕX1│10▒X1│11зX1│14#жNЕX1│12зX1│14#╜OЕX1│16▒X1│15зX1│14#╘PЕX1│22▒X1│23зX1│21#уQЕX2┤6зX2│3#ЄRЕX2│8зX2│7$ SЕX2│10▒X2│11зX2│14$TЕX2│12зX2│14$1UЕX2│22▒X2│23зX2│24$HVЕX2│15▒X2│16зX2│14$[WЕX1▓X2зA(Y)│X1$nXЕX1▓X2зB(Y)│X2$БYЕX1┤X2зA(Y)│X2$ФZЕX1┤X2зB(Y)│X1$з[ЕX1│X2зX1│X1л3$┐\ЕX1▓X2зZ$(Y)│N$(T1)$╫]ЕX1▓X2зW$(Y)│N$(T2)$я^ЕX1┤X2зZ$(Y)│N$(T2)%_ЕX1┤X2зW$(Y)│N$(T1)%3`З@290,Z$(Y);:З@302,"OVER";:З@308,W$(Y);%XaЗ@324,A(Y);" TO ";B(Y)%pbL$│N$(T1):R$│N$(T2)%╣cH│ З(N$(T1)):АV│1е5:Е Р(N$(T1),V,1)│" "зL$│ Р(N$(T1),Vл1,Hм(Vм1)):ЛV&dV│0:H│ З(N$(T2)):АV│1е5:Е Р(N$(T2),V,1)│" "зR$│ Р(N$(T2),Vл1,Hм(Vм1)):ЛV&4eЕQ3$│"Y"зЗ#м2,д10)L$;д23)X1;д40)R$;д53)X2&bfЕQ3$┤▓"Y"зЗ@452,"TYPE U/UP D/DOWN X/EXIT"&вgЕQ3$│"Y"зI$│"U":Бе106:ДI$│ Т:ЕI$│"U"▒I$│"D"▒I$│"X"з104:Д103&╜hЕI$│"U"░Z▓ З(A$)м2з103&╨iЕI$│"X"зЮ:Бе32&чjЕI$│"U"зZ│Zл2:Бе43&∙kЕI$│"D"зZ│Zм6'"lT1│ Й( Р(A$,Zл2,2)):ЕT1▓28зZ│Zм2:Д43'KmАV│Zе3йм2:Е Й( Р(A$,V,2))▓28з111:ДЛV'lnDA│ Й( Р(A$,3,2)):Бж117:Бе43'ЦoZZ│ Й( Р(A$,V,2)):DA│ZZм50:Бж117:Бе43'Яp║T│Y'мqАY│1еTм1'╝rАN│1е600:ЛN'┌sЗZ$(Y);A(Y);" "W$(Y);B(Y)'сtЛY'шu:Г'°vЕDA┤2зM│Mл1(wM1│Mм8:ИM1Бе120,121,122,123(-xM$│"SEPTEMBER":Р(@yM$│"OCTOBER":Р(TzM$│"NOVEMBER":Р(h{M$│"DECEMBER":Р(О|З@483," hit any key to continue";(ж}I$│ Т:ЕI$│""з125:ДР)~Ю:ЕDN│1зЗ@96," READY DISK AND PRESS ENTER";:ЙO$:ДЗ@96," READY TAPE AND PRESS ENTER";:ЙO$)Щ"I",#DN,"NFL")9ААV│1е28:Й#DN,Z$(V):Л:Ъ#DN:Бе32)ЦБЮ:ЕDN│1зЗ@96," READY DISK AND PRESS ENTER";:ЙO$:ДЗ@96," READY TAPE AND PRESS ENTER";:ЙO$)йВЩ"O",#DN,"NFL")═ГАV│1е28:З#DN,Z$(V):ЛV:Ъ#DN:Бе32)фДЕ З(Z$(20))┤3зБе32*bЕЮ:АV│1е14:Z1$│ Р(Z$(V),1, З(Z$(V))м5):Z2$│ Р(Z$(Vл14),1, З(Z$(Vл14))м5):З@(32нV)м1,V;" ";Z1$;:З@(32нV)л16,Vл14;" ";Z2$:ЛV*ОЖZ1│1:З" ENTER 1-28 OR '0' FOR MENU";:ЙT*еЗЕT│0з32:ДЕT▓28з133+ ИA│0:Ю:З@115м( З(Z$(T)))о2, Р(Z$(T),1, З(Z$(T))м5):АY│ З(Z$(T))е З(Z$(T))м5йм1:A│Aл1:Q$│ Р(Z$(T),Y,1):Z(A)│ К(Q$)м75:ЛY+АЙЗ@194,"defense":З@226,"offense":З@258,"coaching staff":З@290,"injuries":З@322,"intangibles"+╗КАV│1е5:ЕZ(V)▓м1зЗ@178л32нV,"+";Z(V):ДЗ@178л32нV,"-"; В+┬ЛЛV, МЗ:З" USE THE ARROW KEYS TO CHANGE VALUES AND SPACEBAR TO RETURN",AНI$│ Т:З@161лZ1н32,"<";:З@161лZ1н32," ";:ЕI$│""з141,]ОЕI$│ Л(10)░Z1┤5зZ1│Z1л1,ИПЕI$│ Л(8)░Z(Z1)▓м9зZ(Z1)│Z(Z1)м1:Бе138,▓РЕI$│ Л(9)░Z(Z1)┤9зZ(Z1)│Z(Z1)л1:Бе138,┼СЕI$│ Л(32)з148,сТЕI$│ Л(94)░Z1▓1зZ1│Z1м1,ыУБе141-RФI$│Z$(T):Z$(T)│ Р(I$,1, З(I$)м5)л Л(Z(5)л75)л Л(Z(4)л75)л Л(Z(3)л75)л Л(Z(2)л75)л Л(Z(1)л75):Бе133-\ХБе149-sЦЕDN│м1зDN│1:ДDN│м1-|ЧБе32-ЗШ└1:Бе3▓РЕI$│ Л(9)░Z(Z1)┤9зZ(Z1)│Z(Z1)л1:Бе138,┼СЕI$│ Л(32)з148,сТЕI$│ Л(94)░Z1▓1зZ1│Z1м1,ыУБе141-RФI$│Z$(T):Z$(T)│