&'
В COPYRIGHT (C) T&D SOFTWARE 1983&1Х1000&>М G1(68)&_Ю:Зд7)"DISK PURGE UTILITY":З&·З"   IF YOU'VE EVER HAD TO TYPE A SEEMINGLY ENDLESS LIST OF KILL  COMMANDS TO ERASE SEVERAL FILES ON YOUR DISKETTE, YOU'LL APPRE- CIATE THIS UTILITY."'╬З"   IF YOU HAVE TO KILL SEVERAL  FILES ON A DISK, USE THIS UTIL- ITY. WHEN THIS PROGRAM IS RUN,  THE FILENAME OF EACH FILE ON THEDISKETTE WILL APPEAR ONE AT A   TIME FOLLOWED BY THE PROMPT     '(Y/N/Q) ?'."'╫Бж45(ИЮ:З"   PRESSING 'Y' WILL CAUSE THE  FILE TO BE KILLED. PRESSING 'N' WILL SKIP TO THE NEXT FILE.     PRESSING 'Q' WILL STOP THIS PRO-GRAM AND RETURN TO THE 'OK'     PROMPT."(О	З(╚
Й"WHICH DRIVE (0-3)";DN:ЕDN┤0 ▒ DN▓3 ▒ DN┤▓ Б(DN) з10(ЄЗ:З"INSERT THE DISKETTE TO BE PURGED")
Зд9)"PRESS [ENTER]")
Е Т┤▓ Л(13) з13)$Ю),S│3)@▀ DN,17,S,A$,B$)UC$│A$л О(B$,127))]P│1)ВЕ К( Р(C$,(Pм1)н32л1,1))│255 з23)жЕ К( Р(C$,(Pм1)н32л1,1))┤▓0 з24)╣P│Pл1:ЕP┤9 з19)╠S│Sл1:ЕS┤12з16)╥К)юE$│ Р(C$,(Pм1)н32л1,16)* F$│ О(E$,8):EX$│ Р(E$,9,3):FG│ К( Р(E$,14,1))*@ЗF$;" ";EX$;"  (Y/N/Q) ? ";*kK$│ Т:ЕK$┤▓"Y" ░ K$┤▓"N" ░ K$┤▓"Q" з27*БЗK$:Е K$│"Y" з 31*УЕ K$│"N" з 21*еЕ K$│"Q" з 23*├ Р(C$,(Pм1)н32л1,1)│ Л(0)*ч A$│ О(C$,128):B$│ Р(C$,129)л" "*√!р DN,17,S,A$,B$+"NG│1+#G1(NG)│FG+$GP│FG+0%▀ DN,17,2,A$,B$+d&G$│ Р(A$,GPл1,1):G│ К(G$):Е G▓&H43 ░ G┤▓255 з40+Г'NG│NGл1:G1(NG)│G:GP│G:Бе38+Т(А I│1 е NG+░) Р(A$,G1(NG)л1,1)│ Л(255)+╢*Л+╩+р DN,17,2,A$,B$+╙,Бе21+·-З@484,"PRESS [ENTER] TO CONTINUE";,
.Е Т┤▓ Л(13)з46,/Р$GP│FG+0%▀ DN,17,2,A$,B$+d&G$│ Р(A$,GPл1,1):G│ К(G$):Е G▓&H43 ░ G┤▓255 з40+Г'NG│NGл1:G1(NG)│G:GP│G:Бе38+Т(А I│1 е NG+░) Р(A$,G1(NG)л1,1)│ Л(255)+╢*Л+╩+р DN,17,2,A$,B$+╙,Бе21+·-З@484,"PRESS [ENTER] TO CONTINUE";,
.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
╘&'
В COPYRIGHT (C) T&D SOFTWARE 1983&1└4:╚4&:Х500&_Т359,57:HT│ Ж(27)н256л Ж(28)м700&lЮ:╝:┐1,1&ВЗд12)"PEG*JUMP":З&╪З"   TEST YOUR LOGICAL DEDUCTION  ABILITY TRYING TO SOLVE THIS    LITTLE PUZZLE."'╤З"   THE GAME BOARD HAS 33 HOLES  IN IT. THERE ARE 32 PEGS. WHEN  YOU JUMP A PEG WITH ANOTHER PEG,IT IS REMOVED FROM THE BOARD.   YOU MAY JUMP ONLY ONE PEG AT A  TIME. YOU MAY JUMP ONLY IN ONE  OF FOUR DIRECTIONS.(UP, DOWN,   LEFT, AND RIGHT.)"'┌	Бж87'т
╝:Ю(ЙЗ"   TO INPUT YOUR MOVES, TYPE THEROW LETTER AND COLUMN NUMBER OF THE PEG YOU WANT TO JUMP FOLLOW-ED BY THE ROW LETTER AND COLUMN NUMBER OF THE DESTINATION HOLE."(═З"   WHEN YOU CANNOT MOVE ANY     MORE, TYPE 'Q' TO QUIT.":Бж87(╒
Ю:╝(▐┐1,1(єЗ@11,"PEG*JUMP";)2АI│0е6:З@104лIн2, Л(49лI);:Л:АI│0е6:З@134лIн32, Л(65лI);:Л)_АJ│0е1:АI│2е4:З@136лJн32лIн2, Л(92);:Л:Л)МАJ│0е2:АI│0е6:З@200лJн32лIн2, Л(92);:Л:Л)╣АJ│0е1:АI│2е4:З@296лJн32лIн2, Л(92);:Л:Л)╦З@238, Л(91);)їNP│32:З@456,═"###";NP;:З" PEGS LEFT";)¤вHT*З@215,"MOVE ?";:вHT*.З@247,">";:E│1:T$│""*6вHT*JK$│ Т:ЕK$│""з26*`╔"V31O5T200L200A"*qЕ K$│"Q" з69*МЕ Ю("ABCDEFG",K$)│0з26*вT$│T$лK$:ЗK$;:вHT*─K$│ Т:K│ Й(K$):ЕK┤1 ▒ K▓7 з31*┌ ╔"V31O5T200L200A"*Ё!ЗK$;:вHT:T$│T$лK$+"E│Eл1:ЕE┤3 зЗ":";:вHT:Бе26+/#Y1$│ О(T$,1):X1$│ Р(T$,2,1)+O$Y2$│ Р(T$,3,1):X2$│ П(T$,1)+o%Y1│ К(Y1$)м65:Y2│ К(Y2$)м65+Н&X1│ Й(X1$)м1:X2│ Й(X2$)м1+╓'Е (X1┤2 ░ Y1┤2) ▒ (X1┤2 ░ Y1▓4) ▒ (X1▓4 ░ Y1┤2) ▒ (X1▓4 ░ Y1▓4) з 63,(Е (X2┤2 ░ Y2┤2) ▒ (X2┤2 ░ Y2▓4) ▒ (X2▓4 ░ Y2┤2) ▒ (X2▓4 ░ Y2▓4) з 63,?)Е X1│X2 ░ Y1м2│Y2 зD│1:Бе46,_*Е X1│X2 ░ Y1л2│Y2 зD│3:Бе46,+Е Y1│Y2 ░ X1м2│X2 зD│2:Бе46,Я,Е Y1│Y2 ░ X1л2│X2 зD│4:Бе46,й-Бе 65,├.C│ Ж(1160лY1н32лX1н2),╘/Е C┤▓92 з 63,ю0C│ Ж(1160лY2н32лX2н2), 1Е C┤▓91 з 65-2И D Бе 51,52,53,54--3TX│X1:TY│Y1м1:Бе55-D4TX│X1м1:TY│Y1:Бе55-[5TX│X1:TY│Y1л1:Бе55-m6TX│X1л1:TY│Y1-З7C│ Ж(1160лTYн32лTXн2)-Ш8Е C┤▓92 з 65-┤9Т1160лY1н32лX1н2,91:вHT-╠:╔"V31T200L100O3AAA"-ш;Т1160лY2н32лX2н2,92:вHT.<Т1160лTYн32лTXн2,91.0=NP│NPм1:З@456,═"###";NP;:З" PEGS LEFT";:вHT.L>З@247,"         ";:Бе23.v?З@215,"INVALID";:З@247," MOVE  ";:вHT.@Бе66.йAЗ@215,"INVALID";:З@247," JUMP  ";:вHT.┐B╔"O1AAAABBBBAAAA".╨CАTD│1е2000:Л.№DЗ@215,"        ";:З@247,"       ";:Бе23/EЮ//FЕNP│1 ▒ NP│2 зЗ"CONGRATULATIONS !!!!!!!"/NGЗ"YOU LEFT ";NP;" PEG(S)."/eHЗ"YOUR RATING IS:"/ШIЕNP▓7 з З"FAIR. COULD USE MORE PRACTICE.":Бе82/╣JИ NP Бе 75,76,77,78,79,80,81/╫KЗ"OUTSTANDING !!!!!":Бе82/ЄLЗ"EXCELLENT !!!!":Бе820MЗ"VERY GOOD !!!!!":Бе820%NЗ"GOOD !!!!!":Бе8206OЗ"O.K.":Бе820KPЗ"NOT BAD.":Бе820XQЗ"SO-SO"0wRЗ:З"ANOTHER GAME ?  (Y/N)"0SвHT0ХTK$│ Т:ЕK$│"Y" з130жUЕ K$┤▓"N"з840╡VТ359,126:К0▄WЗ@484,"PRESS <ENTER> TO CONTINUE";0фXвHT0ўYЕ Т┤▓ Л(13)з890¤ZРHTОs└IОNDJВNPoНОoНЛoНЕжНБ╞ =уН{├
жДБ@%А@╞=0НЭ0Л1Нc╞жАзаZ&∙жНS╞└=эНVжНH╞└=уНK├`╙║
OцН70Л╞1Н0жазД0И Z&ЇжНLзНБ &ПoНжНLзНБ& |9@Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є<B:JJ<"">""|""<""|"   "|"""""|>  <  >>  <   "  &"""">"""B<""$8$""      >"6*""""""2*&"">"""""><""<   """*$<""<$""" ">""""""""""""""*6""""""""> > БББ      *I ~ ?? |qRt%G">>>0
 @"&*2"">""$D~>  <<" <"">""""""">>  "



 ╨Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є?? |qRt%G"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 >&'
В COPYRIGHT (C) T&D SOFTWARE 1983&1╚0:└1&JХ2000:М E$(8),E(8,2)&sАI│1е8:НE$(I),E(I,0),E(I,1),E(I,2):Л'ЖMAXIMUM,1440,151,31,VERY HEAVY,1008,141,26,HEAVY,864,131,21,FAIRLY HEAVY,720,121,19,MODERATE,576,111,17,LIGHT,432,101,15,VERY LIGHT,288,71,11,RESTING,100,1,1'.Ю:Зд12)"DR. COCO":З'╩З"   WITH THIS HOME APPLICATIONS- TYPE PROGRAM, YOU WILL BE ABLE  TO USE YOUR COLOR COMPUTER TO   PERFORM VARIOUS MEDICAL AND     HEALTH MEASUREMENTS."(ВЗ"   YOU WILL BE ABLE TO MEASURE  PULSE RATE AND RESPIRATION,     TIME YOUR EXERCISE SESSIONS,    TIME YOUR SPEED WITH A COMPUTER STOPWATCH, AND CALCULATE BLOOD  ALCOHOL CONTENT."(Л	Бж99(╩
Ю:З"   THIS PROGRAM IS MENU-DRIVEN  AND STRAIGHT-FORWARD.")EЗ:З"   PLEASE NOTE: THE PULSE AND   RESPIRATION MEASUREMENT SEGMENTSOF THIS PROGRAM FUNCTION IN THE FOLLOWING MANNER:"*7З"   YOU WILL ASKED TO PRESS ANY  KEY DURING EACH BEAT/BREATH, THECOMPUTER WILL THEN WAIT FOR THE NEXT BEAT/BREATH. THE TIME INT- ERVAL BETWEEN EACH BEAT/BREATH  IS MEASURED AND THE RATE PER    MINUTE IS THEN CALCULATED AND   DISPLAYED."*@
Бж99*bЮ:Зд14)"MENU":Зд14)"----":З:З+З"   1.  MEASURE PULSE RATE          2.  MEASURE RESPIRATION RATE    3.  USE AS TIMER/ALARM          4.  STOPWATCH                   5.  CALCULATE BLOOD ALCOHOL     6.  END PROGRAM"+=З:Зд8)"YOUR CHOICE ?  (1-6)"+_K$│ Т:K│ Й(K$):ЕK┤1 ▒ K▓6 з17+|И K Бе 19,34,48,74,91,98+ЗЮ:PR│0+лЗ"  PRESS ANY KEY ON EACH BEAT"+╪З@480,"PRESS [CLEAR] TO RETURN TO MENU";+цЕ Т│""з22+я Я│0,K$│ Т:ЕK$│""з24,ЕK$│ Л(12)з14,$Е  Я│0 з24,YPR│ Б(3600о Я):З@32,"PULSE RATE: ";:З═"####";PR;,iЕ PR│0 з 23,ГАI│1е8:ЕPR▓│E(I,1)з31,ЙЛ,═З@64,"INTENSITY OF EXERCISE: ":З@96,═"%                %";E$(I)- З@128,"CALORIES BURNED/HOUR:";:З═"#####";E(I,0);-!Бе23-"Ю:RR│0-:#З"PRESS ANY KEY ON EACH BREATH"-g$З@480,"PRESS [CLEAR] TO RETURN TO MENU";-u%Е Т│""з37-~& Я│0-Т'K$│ Т:ЕK$│""з39-з(Е K$│ Л(12) з 14-с)RR│ Б(3600о Я):З@32,"RESPIRATION RATE:";:З═"####";RR;-ё*Е RR│0 з 38.+АI│1е8:ЕRR▓│E(I,2)з45.,Л.U-З@64,"INTENSITY OF EXERCISE: ":З@96,═"%                %";E$(I).К.З@128,"CALORIES BURNED/HOUR:";:З═"#####";E(I,0);.У/Бе38.ї0Ю:Зд10)"TIMER/ALARM":З"   THIS TIMER WILL COUNT UP TO  59 MINUTES.":╗Й"MINUTES:SECONDS ->";A$/31P│ Ю(A$,":"):ЕP│0 ▒ P│1 ▒ P│ З(A$) ▒ A$│"" ▒  З(A$)│0 з48/H2M│ Й( О(A$,Pм1))/]3S│ Й( Р(A$,Pл1))/k4Е S┤0 з48/Е5Е S▓60 з M│Mл1:S│Sм60/Х6Е M▓59 з 48/к7Е M│59 ░ S▓0 з48/╝8Ю:З"TIMER: ";/╧9M$│ Р( И(M),2)/т:S$│ Р( И(S),2)/№;Е  З(M$)┤2 зM$│"0"лM$0<Е  З(S$)┤2 зS$│"0"лS$0)=З@7,M$;":";S$;0<>ЕM│0 ░ S│0 з680E? Я│00U@Е  Я┤60 з640kA╔"V31T200L100O5A"0ЖBS│Sм1:ЕS┤0 зM│Mм1:S│590ПCБе570╙DАI│0е7:ЮI:╔"T10L10ABC":З@480,"PRESS ANY KEY TO SHUT OFF ALARM";0▄E Я│00ыFЕ Т┤▓""з730√GЕ  Я┤30 з701HЛ:Бе681IБе1414JЮ:З"PRESS ANY KEY TO START/STOP"1BKЕ Т│""з751SLS│0:M│0: Я│01hMЮ:З"STOPWATCH:";1xNЕ Т┤▓"" з881ЗOЕ  Я┤1 з781ЭPTS│TSл1:ЕTS┤10з821╝QS│Sл1:TS│0:ЕS│60зM│Mл1:S│01╤RTS$│ Р( И(TS),2)1єSM$│ Р( И(M),2):S$│ Р( И(S),2)2
TЕ  З(M$)┤2 зM$│"0"лM$2'UЕ  З(S$)┤2 зS$│"0"лS$2CVЗ@12,M$;":";S$;".";TS$;2QW Я│0:Бе782~XЗ@480,"PRESS [ENTER] TO RETURN TO MENU";2СYЕ Т┤▓ Л(13)з892ЪZБе142╛[Ю:Й"OUNCES OF DRINK CONSUMED";A2╠\ЕA┤│0 з912э]Й"PROOF OF DRINK";P:ЕP┤│0з933^Й"BODY WEIGHT (LBS.)";W:ЕW┤│0з943%_C│(AнPн.037)оW3э`З:З"BLOOD ALCOHOL CONTENT = ":З"    ";C:З:З"(.01 - .02, LEGALLY DRUNK)":З"(.02 - .04, SLIGHTLY BUZZED)":З"(.04 - .07, SLIGHTLY STAGGERED)":З"(.07 - .09, GETTING THERE)":З"(.10 - 1.00, PLASTERED)"3ЎaБе883№bК4#cЗ@484,"PRESS [ENTER] TO CONTINUE";47dЕ Т┤▓ Л(13)з1004=eРENT = ":З"    ";C:З:З"(.01 - .02, LEGALLY DRUNK)":З"(.02 - .04, SLIGHTLY BUZZED)":З"(.04 - .07, SLIGHTLY STAGGERED)":З"(.07 - .09, GETTING THERE)":З"(.10 - 1.00, PLASTERED)"3ЎaБе883№bК4#                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                2нSXл28)м(Yн16л4,Xн12л28),╛:Бж105/:4ЕS(X,Y)┤▓28 зS(X,Y)│0/]5Бж81:Бж85:Бж91:ЕKK│KG з121:Д16/}6Е TR▓0 з TR│TRм1:Бе44 :Д 16/б7Е З(T$)│1 зT│0 :ДT│ Й( Р(T$,2))/╣8ЕT▓S зE│Eм(TмS):S│T/╤9ЕS▓T зE│Eл(SмT):S│T/▀:Бж85:Бе160;АI│32 е 320 й32:З@I, б(18,32);:Л:Р0-<АI│50 е 243 й32:З@I, б(14,32);:Л:Р0U=АI│352 е 448 й32:З@I, б(10,32);:Л:Р0f>АTD│1е2000:Л0О?З@370, б(11,32);:З@402, б(11,32);:Р0е@З@339, б(12,32);:Р0╠AЗ@484,"PRESS [ENTER] TO CONTINUE";0▀BЕ Т┤▓ Л(13)з660хCР1<DАI│1е8:АJ│1е8:S(I,J)│0:Л:Л:SX│ Д(8):SY│ Д(8):S(SX,SY)│28:NK│ Й( П( И(G(GX,GY)),1))1JEЕNK│0 з731XFАI│1 е NK1ЩGX│ Д(8):Y│ Д(8):ЕS(X,Y)┤▓0 з71 :ДS(X,Y)│27:K(I,0)│X:K(I,1)│Y1ЯHЛ1╗IЕG(GX,GY)┤│9 зBX│0:Бе751ЇJX│ Д(8):Y│ Д(8):ЕS(X,Y)┤▓0 з74 :ДS(X,Y)│31:BX│X:BY│Y2KАI│1 е  Д(6)23LX│ Д(8):Y│ Д(8):ЕS(X,Y)┤▓0з76 :ДS(X,Y)│292EMЛ:АI│1е  Д(3)2sNX│ Д(8):Y│ Д(8):ЕS(X,Y)┤▓0з78 :ДS(X,Y)│302yOЛ2ЕPБж117:Р2├QБж59:З@32,"SHORT RANGE SENSOR";:З@64,"  1 2 3 4 5 6 7 8";3RАI│1 е 8:З@64лIн32, Л(48лI);" ";:АJ│1 е 8:ЕS(I,J)│0 зЗ"  ";:Бе843 SЗ Л(S(I,J)л64);" ";3.TЛ:Л:вHT:Р3cUБж60:З@54,"STATUS";:З@82,"ENERGY: ";:З═"####";E;3VЗ@114,"QUDRNT: ";GX;GY;3ЫWЗ@146,"SECTOR: ";SX;SY;3╜XЗ@178,"SHIELD: ";:З═"####";S;3рYЗ@210,"TORPS.: ";:З═"####";TR;3ъZвHT:Р4[Бж61:З@352,"LONG RANGE SENSOR";4П\Е GX│1 ░ GY│1 зЗ@387,"**  **  **";:З@419,"**  ";:З═U$;G(GX,GY);G(GX,GYл1);:З@451,"**  ";:З═U$;G(GXл1,GY);G(GXл1,GYл1);:Бе1045]Е GX│8 ░ GY│8 зЗ@387,═U$;G(GXм1,GYм1);G(GXм1,GY);:З"  **";:З@419,═U$;G(GX,GYм1);G(GX,GY);:З"  **";:З@451,"**  **  **";:Бе1045С^Е GX│1 ░ GY│8 зЗ@387,"**  **  **";:З@419,═U$;G(GX,GYм1);G(GX,GY);:З"  **";:З@451,═U$;G(GXл1,GYм1);G(GXл1,GY);:З"  **";:Бе1046_Е GX│8 ░ GY│1 зЗ@387,"**  ";:З═U$;G(GXм1,GY);G(GXм1,GYл1);:З@419,"**  ";:З═U$;G(GX,GY);G(GX,GYл1);:З@451,"**  **  **";:Бе1046D`Е GX│1 зЗ@387,"**  **  **";:Бж102:Бж103:Бе1046vaЕ GX│8 зБж101:Бж102:З@451,"**  **  **";:Бе1047bЕ GY│1 зЗ@387,"**  ";:З═U$;G(GXм1,GY);G(GXм1,GYл1);:З@419,"**  ";:З═U$;G(GX,GY);G(GX,GYл1);:З@451,"**  ";:З═U$;G(GXл1,GY);G(GXл1,GYл1);:Бе1047ЪcЕ GY│8 зЗ@387,═U$;G(GXм1,GYм1);G(GXм1,GY);:З"  **";:З@419,═U$;G(GX,GYм1);G(GX,GY);:З"  **";:З@451,═U$;G(GXл1,GYм1);G(GXл1,GY);:З"  **";:Бе1047╢dБж101:Бж102:Бж103:Бе1047ЎeЗ@387,═"##  ##  ##";G(GXм1,GYм1);G(GXм1,GY);G(GXм1,GYл1);:Р80fЗ@419,═"##  ##  ##";G(GX,GYм1);G(GX,GY);G(GX,GYл1);:Р8pgЗ@451,═"##  ##  ##";G(GXл1,GYм1);G(GXл1,GY);G(GXл1,GYл1);:Р8{hв HT:Р8 i╔"O4ADADAD":АI│1е6:┬(Yн16л4,Xн12л28),I,1:┬(Yн16л4,Xн12л28),I,0:Л:З@64лXн32л2нY," ";:Е S(X,Y)│0 зЗ@370,"EMPTY SPACE";:вHT:Бж62:Р9>jЕ S(X,Y)│29 зЗ@370,"*STAR*";:З@402,"DESTROYED";:вHT:Бж62:Р9}kЕ S(X,Y)│30 зЗ@370,"PLANET";:З@402,"DESTROYED";:вHT:Бж62:Р9╙lЕ S(X,Y)│31 зЗ@370,"STARBASE";:З@402,"DESTROYED";:вHT:Бж62:G(GX,GY)│G(GX,GY)м10:Р9чmЕ S(X,Y)│28 з Р:nЗ@370,"*KLINGON*";:З@402,"DESTROYED";:вHT:Бж62:CoАI│1 е NK:ЕX│K(I,0) ░ Y│K(I,1) з 113:IpЛ:ZqЕ I│NK з 115:МrАJ│I е NKм1:K(J,0)│K(Jл1,0):K(J,1)│K(Jл1,1):Л:дsG(GX,GY)│G(GX,GY)м1:║tNK│NKм1:KK│KKл1:Р:╟uЕ BX│0зР;vDS│ Ы((SXмBX)п2л(SYмBY)п2):Е  Б(DS)│1 з E│5000:TR│10:S│0;
wР;TxЮ:┐0:З"YOU WERE DESTROYED, BUT MANAGED TO DESTROY ";KK;" KLINGONS.":К;ЯyЮ:┐0:З"CONGRATULATIONS !! YOU WERE ABLETO DESTROY THE ENTIRE FLEET.":КIОlФNTОoНОoНЛoНЕжНБ╞ =уН{├
жДБ@%А@╞=0НЭ0Л1Нc╞жАзаZ&∙жНS╞└=эНVжНH╞└=уНK├`╙║
OцН70Л╞1Н0жазД0И Z&ЇжНLзНБ &ПoНжНLзНБ& |9@Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є<B:JJ<"">""|""<""|"   "|"""""|>  <  >>  <   "  &"""">"""B<""$8$""      >"6*""""""2*&"">"""""><""<   """*$<""<$""" ">""""""""""""""*6""""""""> >]A>IIAI**I>>"UIU"?? |qRt%G">>>0
 @"&*2"">""$D~>  <<" <"">""""""">>  "



 ╨Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є?? |qRt%G">>>0
 @"&*2"">""$D~>  <<" <"">""                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                HER CALCULATION (Y,N)?"80фK$│ Т:Е K$│"" з Бе9968EхЕ K$│"Y" з Бе 858bцЕK$│"N" з Ю:З"BYE-BYE":К8h╨Ю8У╒З ═" ONE TROY OZ OF GOLD= $#####.##";W8╗┌З"********************************"8╪фЗ"         JEWEL VALUES"8▐щЗ9
юC│(Vо480)н3.086о100:CD│ Б(Cн100л.5)о10092°З ═"  1  POINT.........$####.##";CD9Q¤E│25нC:ED│ Б(Eн100л.5)о1009yЗ ═"  25 POINTS........$####.##";ED9ЯL│Vо480н3.086:LR│ Б(Lн100л.5)о1009╟З ═"  1  CARAT(100PTS).$####.##";LR9╓З:З:а200,19са200,1:З"  ANOTHER CALCULATION (Y,N)?": K$│ Т:ЕK$│"" Бе 2080:0#ЕK$│"Y" Бе 85:W%Е K$┤▓"N" Бе2000 :Д Ю:З"BYE-BYE":К  25 POINTS........$####.##";ED9ЯL│Vо480н3.086:LR│ Б(Lн100л.5)о1009╟З ═"  1  CARAT(100PTS).$####.##";LR9╓З:З:а200,19са200,1:З"  ANOTHER CALCULATION (                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 i&
└4:╚4&1В COPYRIGHT (C) T&D SOFTWARE 1983&=Т359,57&СХ30:М G(8,8),S(8,8),K(9,1):U$│"##  ##":HT│ Ж(27)н256л Ж(28)м700:Ю:Зд14)"TREK":З&їЗ"WHAT LEVEL DO YOU WISH TO PLAY  AT ? (1 = EASY, 2 = NOVICE,        3 = EXPERT, 4 = SUICIDAL)"'K$│ Т:K│ Й(K$):ЕK┤1 ▒ K▓4 з6'NGL│K:NB│ Д(6мGL):NK│ Д(GLн10)лGLн10:ЕGL│3 зNK│NKл50'dЕ GL│4 зNK│NKл200'r	АI│1 е NB'и
X│ Д(8):Y│ Д(8):ЕG(X,Y)┤▓0 з10 :ДG(X,Y)│G(X,Y)л10'╖Л:АI│1е NK'∙X│ Д(8):Y│ Д(8):Е Й( П( И(G(X,Y)),1))│9 з12 :ДG(X,Y)│G(X,Y)л1(
Л:KG│NK(_Ю:З"   THERE ARE ";NK;" KLINGONS.":З"   YOU HAVE ";NB;" STARBASES.":Бж65:E│5000:TR│10(д╝:Ю:GX│ Д(8):GY│ Д(8):SX│ Д(8):SY│ Д(8):┐1,0:Бж68:Бж81:Бж85:Бж91)Бж64:З@306,"COMMAND ?";:З@338,">";:вHT:T$│"":ЕE┤│0зЗ@370,"ENTERPRISE";:З@402,"DESTROYED";:вHT:Бе120)#АGC│1 е (6мGL)н100)7K$│ Т:ЕK$│""з24)V╔"V31O5T50A":ЕK$│ Л(13)з34)СЕK$│ Л(8) ░  З(T$)▓0 зT$│ О(T$, З(T$)м1):ЗK$;:вHT:Бе24)вЕK$│ Л(8)з24)┤Е З(T$)▓5 з24)╩T$│T$лK$:ЗK$;:вHT)╙Л GC)рЕNK│0з17)№B1│ Ж(&H88):B2│ Ж(&H89)*
АW│1 е NK*DX1│SYн16л4:Y1│12нSXл28:X2│K(W,1)н16л4:Y2│K(W,0)н12л28+З@370,"*KLINGON*";:З@402,"* ATTACK*";:вHT:╗(X2,Y2)м(X1,Y1),╜:┬(X1,Y1),5,1:┬(X1,Y1),5,0:АTD│1е10:╔"O5A":Л:╗(X2,Y2)м(X1,Y1),╛:Бж63:ЕS│0 зЗ@370,"ENTERPRISE";:З@402,"DESTROYED";:вHT:Бе120+)D│ Д(70лGLн20)лGLн20:S│SмD:ЕS┤0 зS│0+vЗ@370,═"####";D;:З" UNITS";:З@402,"  DAMAGE";:вHT:Бж85:АTD│1е1000:Л:Бж63+| Л+Ч!Т&H88,B1:Т&H89,B2:Бе17+й"Е З(T$)│0 з16+╒#C$│ О(T$,1):PS│ Ю("WIPTS",C$):ЕPS│0 з16+Ё$Е PS┤▓5 ░  З(T$)┤3 з16,
%И PS Бе38,41,44,54,55,L&X│ Й( Р(T$,2,1)):Y│ Й( Р(T$,3,1)):Е X┤1 ▒ X▓8 ▒ Y┤1 ▒ Y▓8 з16,y'DS│ Ы((SXмX)п2л(SYмY)п2):ER│DSн20л Д(20),┤(╔"O1CDEFGAB":E│EмER:GX│X:GY│Y:Бж68:Бж81:Бж85:Бж91:Бе16,Ў)X│ Й( Р(T$,2,1)):Y│ Й( Р(T$,3,1)):Е X┤1 ▒ X▓8 ▒ Y┤1 ▒ Y▓8 з16-/*ЕS(X,Y)│0 зE│Eм4:S(SX,SY)│0:SX│X:SY│Y:S(X,Y)│28:Бж81-C+Бж117:Бж85:Бе16-Е,X│ Й( Р(T$,2,1)):Y│ Й( Р(T$,3,1)):Е X┤1 ▒ X▓8 ▒ Y┤1 ▒ Y▓8 з16-Ц-Е C$│"P" з51-╞.X1│SYн16л4:Y1│SXн12л28:X2│Yн16л4:Y2│Xн12л28./Е X1│X2 зАYC│Y1 е Y2 й А(Y2мY1):╜(X1,YC):╔"O3A":╛(X1,YC):Л:Бж105:Бе52.,0M│(Y1мY2)о(X1мX2):YC│Y1.a1АXC│X1 е X2 й А(X2мX1):ЕX1▓X2 зYC│YCмM :ДYC│YCлM.Л2╜(XC,YC):╔"O3A":╛(XC,YC):Л:Бж105:Бе52/ 3╗(SYн16л4,12нSXл28)м(Yн16л4,Xн12л28),╜:АI│255е210йм1:аI,1:Л:DS│ Ы((SXмX)п2л(SYмY)п2):E│ Б(EмDSн100):╗(SYн16л4,1 X&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&A
:Г       *CREATED BY*&c:Г **************************&Е:Г * JIM WAITS, P.O.BOX 937 *&з:Г * DESTIN  FL.    32541   *&╔:Г **************************&╧Ю'
В: THIS PROGRAM WILL SHOW THE VALUE OF GOLD IN MANY WEIGHT UNITS.'PВ: IT IS BASED ON THE VALUE OF ONE TROY OUNCE OF GOLD.'vЗ"   THIS PROGRAM CALCULATES THE"'Ы(З"   VALUE OF GOLD IN MANY DIF-"'╛2З"    FERENT UNITS OF WEIGHT."'х7З" * * * * * * * * * * * * * * * *'є<З:З:Бе110'∙UЮ(!ZЗ @ 96,"     DO YOU WISH TO CHANGE"(K_З@128,"   THE VALUE OF 1 OZ OF GOLD?"(Wdа 200,1(veЗ@224,"            (Y-N)?"(ОgK$│ Т:Е K$│""Бе 103(вhЕ K$│"Y" Бе 107(└iЕK$│"N" Бе 170 :Д Ю:Бе 90(╞kЮ(╬lЗ:З(ЄnЗ"   BEGIN BY ENTERING TODAY'S")xЗ" PRICE OF GOLD IN DOLLARS AND")&ВЗ" CENTS.").МЗ:З)9Уа200,1)VЦЙ"           $$$.CC";V:З)mаW│ Б(Vн100л.5)о100)sкЮ)Э┤З ═"  ONE TROY OZ OF GOLD=$####.##";W)─╢З"********************************)ъ╚З"  WHAT STANDARD WOULD YOU LIKE"*╥З"  VALUES SHOWN FOR?":З*ЁЗ"       1. TROY"*:·З"       2. AVOIRDUPOIS"*R
З"       3. METRIC"*n
З"       4. APOTHECARY"*К
З"       5. GOLD COINS"*в
"З"       6. JEWELS"*п
,З:а200,1*╦
6З"       SELECT (1-6)?"*у
@K$│ Т:ЕK$│"" Бе 320*ї
JSEL│ К(K$)м48*√
TЮ+!
^И SEL Бе 370,600,700,800,900,2000+,
hБе 180+2
pЮ+]
rЗ ═" ONE TROY OZ OF GOLD = $####.##";W+Д
wЗ"********************************+е
|GN│Vо480:Z│ Б(GNн100л.5)о100+╟
ЪЗ"      TROY WEIGHT VALUES":З+Ё
дЗ ═ "  1  GRAIN.........$#####.##";Z,
оDWT│GNн24:Y│ Б(DWTн100л.5)о100,<
┬З ═ "  1  PENNYWEIGHT...$#####.##";Y,S
╠W│ Б(Vн100л.5)о100,|
╓З ═ "  1  OZ(20DWT).....$#####.##";W,Ъ
рU│Vн12:S│ Б(Uн100л.5)о100,├
ЇЗ ═ "  1  LB (12OZ).....$#####.##";S,╥
■З:З:а200,1,ЎЗ"  ANOTHER CALCULATION (Y,N)?"-K$│ Т:Е K$│"" з Бе 540-%&Е K$│"Y"з Бе 85-B(Е K$│"N"з Ю:З"BYE-BYE":К-[)Е K$┤▓"N" з Ю:Бе 370-a+Ю-МXЗ ═"ONE TROY OZ OF GOLD = $#####.##";W-┤ZЗ"********************************"-║[З-┌\З"      AVOIRDUPOIS VALUES"-р]З.
_GN│Vо480:Z│ Б(GNн100л.5)о100.)lЗ ═"   1 GRAIN.........$#####.##";Z.PqDM│27.34375нGN:D│ Б(DMн100л.5)о100.xvЗ ═"   1 DRAM..........$#####.##";D.ЪАA│437.5нGN:B│ Б(Aн100л.5)о100.┬КЗ ═"   1 OZ(16 DRAMS)..$#####.##";B.фМP│7000нGN:PR│ Б(Pн100л.5)о100.№ОPR│ Б(Pн100л.5)о100/%ПЗ ═"   1 LB(16OZ)......$#####.##";PR/6ФЗ:З:З:а200,1/ZЮЗ"   ANOTHER CALCULATION (Y,N)?/sгK$│ Т:Е K$│"" Бе 675/ЗнЕ K$│"Y"  Бе 85/░░Е K$┤▓"N"з Бе 555 :Д Ю:З"BYE-BYE":К /╢╝Ю/с╛З ═"ONE TROY OZ OF GOLD = $#####.##";W0	┴З"********************************"0├З0-─З"         METRIC VALUES"03╞З0^╚GN│Vо480:M│GNн.015:MR│ Б(Mн100л.5)о1000З╨З ═"   1 MILLIGRAM.....$#####.##";MR0л╥G│15.432нGN:GR│ Б(Gн100л.5)о1000╘╒З ═"   1 GRAM..........$#####.##";GR0ї┌K│1000нG:KR│ Б(Kн100л.5)о1001▀З ═"   1 KILOGRAM......$#####.##";KR1/фЗ:З:З:а200,11TюЗ"   ANOTHER CALCULATION (Y,N)?"1m°K$│ Т:Е K$│"" Бе 7601А¤Е K$│"Y" Бе 851жЕK$┤▓"N" Бе 700 :Д Ю:З"BYE-BYE":К1м Ю1╫"З ═"ONE TROY OZ OF GOLD = $#####.##";W1 %З"********************************"2'З2%(З"       APOTHECARY VALUES"2+*З2L,GN│Vо480:Z│ Б(GNн100л.5)о1002t4З ═"   1 GRAIN.........$#####.##";Z2Ц9SC│GNн20:SR│ Б(SCн100л.5)о1002┐HЗ ═"   1 SCRUPLE(20G)..$#####.##";SR2сMDA│GNн60:DR│ Б(DAн100л.5)о1003
RЗ ═"   1 DRAM(3SCR)....$#####.##";DR32WЗ ═"   1 OZ(8DRAMS)....$#####.##";W3>YAP│12нW3g\З ═"   1 LB(12OZ)......$#####.##";AP3Й^З"    OZ AND LB SAME AS TROY"3ЦaЗ:а200,13╗kЗ"   ANOTHER CALCULATION (Y,N)?"3╙pK$│ Т:Е K$│"" Бе8803цuЕ K$│"Y" Бе0854zЕK$┤▓"N" Бе 800 :Д Ю:З"BYE-BYE":К4ДЮ44ЖЗ"     U.S. GOLD COIN VALUES"4_ИЗ ═" ONE TROY OZ OF GOLD=$#####.##";W 4ДКO│.04837нV :OA│  Б(Oн100л.5)о1004КЛЗ4╡МЗ ═" $1,ALL DATES.........$####.##";OA4▄ОFT│.1287922нV:FA│ Б(FTн100л.5)о1005УЗ ═" $2-1/2,1796-1834.....$####.##";FA5/ФSD│.12084079нV:SA│ Б(SDн100л.5)о1005ZЦЗ ═" $2-1/2,LATE 1834-1839$####.##";SA5БШTD│.1209483нV:TA│ Б(TDн100л.5)о1005мЬЗ ═" $2-1/2,1840-1929.....$####.##";TA5╥аBA│.145109нV:BC│ Б(BAн100л.5)о1005¤вЗ ═" $3,1854-1889.........$####.##";BC6$жCA│.2578792нV:CR│ Б(CAн100л.5)о1006OиЗ ═" $5,1795-1834.........$####.##";CR6vкEA│.2416816нV:ER│ Б(EAн100л.5)о1006бмЗ ═" $5,LATE 1834-1838....$####.##";ER6╞оFA│.24187нV:FR│ Б(FAн100л.5)о1006ё░З ═" $5,1839-1929.........$####.##";FR7╢HA│.5157583нV:HR│ Б(HAн100л.5)о1007C╗З ═" $10,1795-1804........$####.##";HR7k╛HB│.48375353нV:HO│ Б(HAн100л.5)о1007Ц└З ═" $10,1838-1933........$####.##";HO7╗┼JG│.96750нV:JR│ Б(JGн100л.5)о1007ц╩З ═" $20,1850-1933........$####.##";JR7ё╧а200,18уЗ"   ANOT Ъ&':ГCOPYRIGHT (C) T&D SOFTWARE 1986&9
Т 359,57:┐0,1&u╛Ю:Х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)'4цА N│0е7:A$(Y)│ Р(C$,Nн32л1,8)л"."л Р(C$,Nн32л9,3)л" "'[Ё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"(
Е R│0 ▒  П(A$(Y),1)┤▓"B" ▒ ( Р(A$(Y),10,3)┤▓"BAS" ░  Р(A$(Y),10,3)┤▓"BIN") з A$(Y)│"":Бе290(<
A$(Y)│ О(A$(Y),12):Y│Yл1(F
"Л N,X(q
,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) 
^Е A$(X)│"" зЗ:Бе370)/
hЗд9);A$(X))5
rЛ)C
|Т&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*y
дЕ 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$:в+:
рЕ  Ю(A$(E),"BAS") з Т359,126:╙T$,R+D
ъБе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);+
╓Е  Ю(A$(E),"BIN"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ▀&'
:ГCOPYRIGHT (C) T&D SOFTWARE 1983&=╚4:┐1,1:╚3:╝:Х200&hТ359,57:HT│ Ж(27)н256л Ж(28):HT│HTм700'
╝:╞"BM5,40C2R235F2R1F2D135BF10U135H10D135L30ND2U1H1U3H1U3H1U3H1U3H1U3H1U3H1U3H1L169G1D3G1D3G1D3G1D3G1D3G1D3G1D3G1D3NR185U2L30U135E2R1E2BR8BD8R219F5D93L229U93E5"'П╞"BM0,180F10R30NH4F2R185H2NR30H2BH6L185BR6BD2NR32F6R32H6BR18BD1NR4F4R4H4BR18BU1NR32F6R32H6BR19BD1NR4F4R4H4BU1BR18NR32F6R32H6"(
├(248,55),2,2:╞"BM35,182C5NF8BR182NF8":╞"BM52,168C2E3R3F3D3G3L3H3U3BR128E3R3F3D3G3L3H3U3":├(54,168),2,2:├(182,168),2,2(╔Ю:X│220:Y│32:╞"C3":Бж83:X│20:Y│32:Бж83:З@40,"T & D SOFTWARE";:З@71,"HOLLAND MICHIGAN";:З@130,"REPRODUCTION OF ANY OF THE       FOLLOWING IS PROHIBITED.":З@194,"T & D SOFTWARE SHALL HAVE")gЗ@226,"NO LIABILITY OR RESPONSIB-      ILITY TO CUSTOMER WITH RE-       SPECT TO ERROR, LOSS, OR         DAMAGES CAUSED BY THESE               PROGRAMS.")е	З@421,"COCO CASSETTE NO. 15               SEPTEMBER 1983")н
вHT)╛АTD│0е3000:Л*╝:Ю:З:З"T & D SOFTWARE PRESENTS:":З"THE MYSTERY OF THE MISSING COCO-CARRIER (PART 2)"* 
вHT*1АTD│1е3000:Л*ъ╝:Ю:З" AS WE LEFT OFF IN OUR LAST     EPISODE, THE COCO-ROBOT WAS EN- LISTING THE AID OF PRIVATE DE-  TECTIVE COCOCLUE, BECAUSE THE   COCO-CARRIER HAD BEEN ABDUCTED  BY A VILLIAN."* вHT:АTD│1е4000:Л+╝:Ю:X│20:Y│180:╞"C3":Бж74+W╞"C4BM"л И(Xл28)л","л И(Yм75)л"NG10R10NF10U4H4L4G4D4"+Ф╞"C2BM"л И(Xл32)л","л И(Yм40)л"U4R2D4L2U4H4U2E4R2F4D2G4"+пX│150:Y│180:╞"C3":Бж74+юЗ"I THINK WE SHOULD EXAMINE THE   SCENE OF THE CRIME.":вHT,╗(128,50)м(68,100),╜,АTD│1е2000:Л,F╗(128,50)м(68,100),╛:╗(0,0)м(255,50),╛,BF,ZЮ:Зд14)"OK":вHT,t╗(128,50)м(170,100),╜,ЕАTD│1е3000:Л,Т╝:Ю:Бж68,нX│100:Y│155:╞"C3":Бж74,ч╞"C4BM"л И(Xл28)л","л И(Yм75)л"NG10R10NF10U4H4L4G4D4"-$╞"C2BM"л И(Xл32)л","л И(Yм40)л"U4R2D4L2U4H4U2E4R2F4D2G4"-> X│16:Y│155:╞"C3":Бж74-s!З"HMMMM...":вHT:╗(90,28)м(130,70),╜:АTD│1е1000:Л-Ю"З"I DON'T SEE ANYTHING IMPORTANT.":вHT-п#АTD│1е4000:Л-═$╝:Ю:X│20:Y│180:╞"C3":Бж74.%╞"C4BM"л И(Xл28)л","л И(Yм75)л"NG10R10NF10U4H4L4G4D4".D&╞"C2BM"л И(Xл32)л","л И(Yм40)л"U4R2D4L2U4H4U2E4R2F4D2G4"._'X│150:Y│180:╞"C3":Бж74.Ш(З"WHAT SHOULD WE DO NOW ?":вHT:╗(128,50)м(170,100),╜.╘)АTD│1е2000:Л:╗(128,50)м(170,100),╛:╗(0,0)м(255,50),╛,BF/*Ю:З"JUST A MINUTE...":З"I'M THINKING..                                                                                                                                                                                                                                                                                    ╟ ┼╞╟├╞"#─%╟'(─*+╔-┬                      VALSBAS[TREKINS BAS$єTREK    BASlHITXTMODBAS&ФASTRDODGBAS)яDR COCO BASADIR     BAS ЭMYSTCOV2BAS!тGOLDVALSBAS[TREKINS BAS$єTREK    BASlHITXTMODBAS&ФASTRDODGBAS)яDR COCO BASAPEGJUMP BAS╫MORSCODEBAS,рPURGEUTLBAS                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                .":вHT/U+╗(128,50)м(68,100),╜:АTD│1е2000:Л:╗(128,50)м(68,100),╛:╗(0,0)м(255,50),╛,BF/С,Ю:З"WHEN AND WHERE ARE YOU SUPPOSED TO MAKE THE DROP ?"/Щ-вHT/▓.╗(128,50)м(68,100),╜/э/АTD│1е2000:Л:╗(128,50)м(68,100),╛:╗(0,0)м(255,50),╛,BF0
0Ю:З"WHAT ?":вHT0S1╗(128,50)м(170,100),╜:АTD│1е2000:Л:╗(128,50)м(170,100),╛:╗(0,0)м(255,50),╛,BF0▒2Ю:З"YOU KNOW... THE RANSOM... WHEN  AND WHERE ARE YOU SUPPOSED TO   PUT THE RANSOM ?":вHT1
3╗(128,50)м(68,100),╜:АTD│1е2000:Л:╗(128,50)м(68,100),╛:╗(0,0)м(255,50),╛,BF1"4Ю:З"OH ...  THE RANSOM.":вHT1<5╗(128,50)м(170,100),╜1M6АTD│1е1000:Л1Щ7З"I AM SUPPOSED TO PUT THE RANSOM IN THE MAILBOX AT NOON TOMORROW.":вHT1к8АTD│1е2000:Л1┘9╗(128,50)м(170,100),╛:╗(0,0)м(255,50),╛,BF2D:Ю:З"WE ARE GOING TO HAVE A LITTLE   SURPRISE IN STORE FOR THAT      VILLIAN.":вHT:╗(128,50)м(68,100),╜2U;АTD│1е3000:Л2▄<╝:Ю:З"WHAT IS THE SURPRISE THAT P.I.  COCOCLUE HAS IN STORE ?":вHT:АTD│1е2000:Л:З:З"WILL IT WORK TO SAVE THE COCO-  CARRIER ?":вHT2э=АTD│1е2000:Л3>З:З"TUNE IN NEXT MONTH AND FIND OUT."3?вHT30@АTD│1е4000:Л38AБе43JBТ359,126:Бе663]CВ DRAW MAILBOX3╟D╝:╞"C2":╗(0,156)м(256,156),╜:├(50,172),2:╞"BM207,155C4U60L28H11R8L8E4F15H15R52D15L16R4D12L4R4D48L4C2"4EY│155:АX│196е248й16:╗(X,Y)м(Xм3,Yм4),╜:╗(X,Y)м(Xл3,Yм4),╜:Л X:Р4&FВ MOVE COCO TO MAILBOX4АGC│1:Y│154:АX│20 е 90 й 10:╞"C3":Бж74:╔"T250O1C":АPA│1е200:ЛPA:ЕX▓60з72:Д╞"C5":Бж74:ЛX4╗HАPA│1е1000:ЛPA:╞"C4BM188,96D18L8U18":А PA│1е1000:ЛPA:Р4╤IВ DRAW COCO-ROBOT4фJ╗(X,Y)м(X,Y),╛5KK╞"BM+0,+0;R16E3R1F3R12U20D20R30E2U2H2L4H4U5D5F4L4G2L12H2L6U1L8H1L10H1L7H1L7G2D3F2D2BU12BR4NG4E3U8"5аL╞"BM+0,+0H1L5H1L5R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R40U2L45BU2R45"67M╞"BM+0,+0;H20L48G2F20BR3BU2H16R41F16BL13BU21H1L4H1L4H1L4U32L72D20E1R3E1R3BL6BG2L3G1L3G1L3G1L1G1L1G2L1G3D2F7R30U1H3U1E3U1L22U1E1R3BR24U24R30D24L30"6├N╞"BM+0,+0;E3U18H3F3R24E3G3D18F3H3L24BR5BU8U8R4D8L4BR2BU2R1BR8U6R4D8L4U2BR2R1BD6BL3L6BR21BD9R7BU3L7BU3R7BU3L7BU5U12R8D12L8BU3BR2R3BU4L3"7jO╞"BM-65,+35;R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1H5L5H1L5H1U6D6L5H1U5D5L5H1U4D4L5H1U3D3L5H1L5H1L5H1L3G1D2F1R1G2D1F2BR32BU12H2U2E2R5G2D2F2L5R12E1H1L4R4E1R1U1H1L4R4"7▄P╞"BM+0,+0;L9U2R4F2D1G2BR20BD10R2BR4R2BR4R2BR4R2BR4R2BR4R2BD4L2BL4L2BL4L2BL4L2BL4L2BD4R2BR4R2BR4R11BR4R2BR4R2"7тQР7·RВ DRAW COCO-CARRIER8ЗS╗(X,Y)м(X,Y),╛:╞"BM+0,+0;R3U2R5D2L5R7U6L10D6BU6BR3U1L2H2U1R3L7H2U1R4L9H2U1R22D3G3D2R2E3R2E2R2U3H7U1L2G1D2F2H2L2G1D2F2H2L2G1BD17BL6BU5":Р8ЫTВ DRAW CASSETTE8╬U╗(X,Y)м(X,Y),╛:╞"BM+0,+0R3U2R5D2L5R7U6L10D6":РIОoРHXЕ YЖTDЛ└SCR · · ·oНОoНЛoНЕжНБ╞ =уН{├
жДБ@%А@╞=0НЭ0Л1Нc╞жАзаZ&∙жНS╞└=эНVжНH╞└=уНK├`╙║
OцН70Л╞1Н0жакДзД0И Z&ЇжНLзНБ &ПoНжНLзНБ& |9@Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є<B:JJ<"">""|""<""|"   "|"""""|>  <  >>  <   "  &"""">"""B<""$8$""      >"6*""""""2*&"">"""""><""<   """*$<""<$""" ">""""""""""""""*6""""""""> >8     8@ 
*I ~ ?? |qRt%G">>>0
 @"&*2"">""$D~>  <<" <"">""""""">>  "



 ╨Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є?? |qRt%G"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Ё&'
:ГCOPYRIGHT (C) T&D SOFTWARE 1983&IЮ:З @39,"trek instructions":З&╡З@128,"   WELCOME TO THE WONDERFUL      WORLD OF SPACE TRAVEL AND BAT-  TLE AS YOU PLAY THE GAME TREK."'7(З"   IN THIS GAME, YOU MUST MOVE   AND FIRE UPON THE KLINGON       FLEET WHICH IS INVADING YOUR    QUADRANTS OF SPACE.":Бж280( 2Ю:З@32,"   YOUR QUADRANTS ARE NUMBERED  FROM 1 1 TO 8 8. YOU WILL HAVE  64 QUADRANTS TO PROTECT. THE    QUADRANTS ARE SET UP IN AN 8 BY 8 MATRIX. IF YOU WERE TO SCAN   ACROSS THE TOP ROW, THE QUAD-   RANTS WOULD BE LABELED 1 1,"(Ы<З"1 2, 1 3, 1 4, ETC. IF YOU WERE TO SCAN DOWN THE FIRST COLUMN,  THE QUADRANTS WOULD BE LABELED  1 1, 2 1, 3 1, ETC."(ьFЗ"   THE WARP DRIVE IS USED TO    MOVE FROM ONE QUADRANT TO ANOTH-ER.":Бж280)┘PЮ:З@32,"   TO ACTIVATE THE WARP DRIVE,  WHEN ASKED FOR A COMMAND, TYPE  'W' FOLLOWED BY THE QUADRANT    NUMBERS YOU WISH TO WARP TO.    YOU MUST TERMINATE THIS COMMAND WITH [ENTER]. FOR EXAMPLE, TO   WARP TO QUADRANT 3 4, YOU WOULD")√ZЗ"HAVE TO TYPE 'W34[ENTER]'."*dБж280*РnЮ:З@32,"   IN EACH QUADRANT IS 64 SECT- ORS. THEY, TOO, ARE SET UP IN   AN 8 BY 8 MATRIX. THEY ARE NUM- BERED SIMILARLY TO QUADRANTS."+vxЗ"   TO MOVE FROM ONE SECTOR TO   ANOTHER, TYPE 'I' FOLLOWED BY   THE SECTOR NUMBERS THAT YOU WISHTO GO TO. AGAIN, THIS COMMAND   MUST ALSO BE TERMINATED BY      [ENTER]. FOR EXAMPLE, TO MOVE TOSECTOR 5 2, TYPE 'I52[ENTER]'."+АВБж280,!МЮ:З@32,"   YOU WILL HAVE 2 WEAPONS AT    YOUR DISPOSAL. THEY ARE THE     PHASERS AND PHOTON TORPEDOES.   THEY BOTH HAVE THIER ADVANTAGES AND DISADVANTAGES:",ыСЗ:З" THE PHASERS USE VALUABLE ENERGY WHILE PHOTON TORPEDOES DO NOT.  HOWEVER, YOU ARE GIVEN ONLY A   LIMITED SUPPLY OF TORPEDOES,    WHILE PHASERS MAY BE FIRED AS   LONG AS THERE IS ENERGY.":Бж280"-жаЮ:З@32,"   TO FIRE THE PHASERS, TYPE    'P' FOLLOWED BY THE SECTOR NUM- BERS YOU ARE AIMING AT. FOR EX- AMPLE, TO FIRE THE PHASERS AT A KLINGON AT SECTOR 5 8, TYPE     'P58[ENTER]'.".кЗ"   PHOTON TORPEDOES ARE FIRED INA SIMILAR MANNER, EXCEPT THE    COMMAND 'T' IS USED INSTEAD OF  'P'.":Бж280/┤Ю:З@32,"   YOU HAVE ONE DEFENSE MECHAN- ISM AT YOUR DISPOSAL. THIS IS   THE SHIELD. TO USE THE SHIELD,  ENERGY MUST BE SUPPLIED TO IT.  TO APPLY ENERGY, TYPE 'S' FOL-  LOWED BY THE NUMBER OF ENERGY   UNITS WHICH ARE TO BE APPLIED."/Ч╛З"   THIS COMMAND MUST BE TERM-   INATED BY [ENTER]. FOR EXAMPLE, TO APPLY 1000 UNITS OF ENERGY TOTHE SHIELDS, TYPE 'S1000[ENT-   ER]'.":Бж2800C╚Ю:З@32,"   THE PREVIOUSLY DESCRIBED     1000 UNITS, HOWEVER, ARE NOT    LOST WHEN PUT TO THE SHIELDS.   (UNLESS YOU ARE HIT BY KLINGON  FIRE - SOME UNITS MAYBE LOST.)"0 ╥З"SOME OR ALL OF THE SHIELD UNITS MAY BE TRANSFERED BACK TO THE   SHIPS MAIN SUPPLY IF NEED BE.   SIMPLY ENTER A LOWER NUMBER FOR THE SHIELDS THAN WHAT THERE PRE-SENT VALUE IS.":Бж2801┤▄Ю:З@32,"   FOR EXAMPLE, IF THE SHIELDS  ARE AT 1000 UNITS, THEN ENTERING400 FOR THE SHIELD VALUE WOULD  CAUSE 600 UNITS TO BE TRANSFEREDFROM THE SHIELDS TO THE MAIN    SUPPLY."2%цЗ"BUT BE WARNED !!!! IF THE SHIP  IS HIT WITH A SHIELD VALUE AT   ZERO, THE SHIP WILL BE DESTROY- ED.":Бж2803ЁЮ:З@32,"   YOU WILL ALSO HAVE LONG AND  SHORT RANGE SENSORS CONSTANTLY  DISPLAYED ON THE SCREEN. THE    SHORT RANGE SENSORS DETAIL THE  CONTENTS OF EACH SECTOR. THE    LONG RANGE SENSORS SHOW YOU WHATIS LOCATED IN NEIGHBORING QUAD-"3Й·З"RANTS. (NOTE: THE QUADRANT YOU  ARE CURRENTLY IN WILL BE IN THE MIDDLE OF THE LONG RANGE SENSOR DISPLAY.)":Бж2804A№Ю:З@32," SHOULD YOU EVER NEED MORE       ENERGY OR WEAPON POWER, YOU     MAY DOCK BY A STARBASE.         DOCKING IS ACCOMPLISHED BY OC-  CUPYING A SECTOR NEXT TO A      STARBASE."4М■З:З" warning: WHEN DOCKING, YOUR     SHIELDS WILL DROP TO ZERO!":Бж2805A
Ю:З@32," ONE LAST NOTE, THOSE OF YOU     WITH 16K AND DISK DRIVES MAY    HAVE TO UNPLUG THE DISK CAR-    TRIDGE IN ORDER TO GET THE      PROGRAM TO RUN DUE TO MEMORY    SPACE."5k
З:З"  READY TAPE TO LOAD trek.":Бж2805г
Ю:З"TREK":З@483,"TYPE RUN WHEN 'OK' APPEARS";:б И:Ч5й
К5╨
З@484,"PRESS [ENTER] TO CONTINUE";5ф
"Е Т┤▓ Л(13)з2905я
,а1,1:РCAR-    TRIDG                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 С&'
В COPYRIGHT (C) T&D SOFTWARE 1983&1╚0:└1&@Х500,15599&lЮ:Зд2)"HIGHTEXT MODIFICATION UTILITY":З&сЗ"   IT HAS BEEN DISCOVERED THAT  HIGHTEXT MAY BE MORE FLEXIBLE   THAN WHAT IT WAS ORIGINALLY IN- TENDED TO BE."'ЭЗ"   AS YOU MAY ALREADY KNOW,     HIGHTEXT, WHICH APPEARS IN COCO-CASSETTE # 14, WAS ORIGINALLY   DESIGNED TO PRODUCE TEXT CHAR-  ACTERS IN THE HIGH RESOLUTION   GRAPHICS MODES.":Бж96(ГЮ:З"   HIGHTEXT'S CHARACTER SET     WHICH RESIDES IN RAM. MAY BE RE-DEFINED BY YOU TO CREATE SPEC-  IAL CHARACTERS WHICH YOU DESIRE.WITH THIS MODIFICATION UTILITY, YOU MAY DEFINE FROM 1 TO ALL    CHARACTERS USED BY HIGHTEXT.")kЗ"   THE DATA FOR HIGHTEXT CHAR-  ACTERS IS SET-UP IN THE FOLLOW- ING FORMAT. EACH CHARACTER IS   SEVEN BYTES LONG WITH THE FIRST BYTE DEFINING THE TOP ROW OF THECHARACTER, THE SECOND BYTE DE-  FINING THE SECOND ROW, ETC.":Бж96**	Ю:З"   WHEN IN PMODE4, THE BITS IN  EACH BYTE DETERMINE WHETHER A   DOT IS LIT OR NOT. FOR EXAMPLE, IF A DATA BYTE IS 128, THEN THE FIRST DOT OF THAT ROW IS LIT    (THE REST ARE UNLIT)."*■
З"   WHEN IN PMODE3, THE BITS IN  EACH BYTE DETERMINE WHAT COLOR  A PARTICULAR DOT IS. FOR EXA-   MPLE, IF THE DATA BYTE IS 192,  THEN THE FIRST DOT OF THAT ROW  WILL BE RED (THE REST WILL BE   GREEN).":Бж96+цЮ:З"   YOU NEED NOT, HOWEVER, CON-  CERN YOURSELF WITH SUCH DETAILS.THIS PROGRAM PROVIDES A ROUTINE WHICH WILL ALLOW YOU TO DEFINE  THE CHARACTERS WITH THE ARROW   KEYS AND A LOW RESOLUTION GRA-  PHIC SYSTEM. THIS PROGRAM WILL",FЗ"THEN CALCULATE THE CORRECT CODE NUMBERS AND MODIFY THE HIGHTEXT DATA SET AS YOU SPECIFY.",Q
Бж96:Ю-7З"   FOR EVERY CHARACTER THAT YOU REDEFINE, YOU MUST SPECIFY WHICHTEXT SCREEN CODE YOU WISH TO    ASSIGN TO THAT CHARACTER. FOR   EXAMPLE, IF YOUR PROGRAM DOES   NOT USE THE UP ARROW, ('^', CODE94) THEN YOU MAY WISH TO REDE-"-XЗ"FINE THAT CHARACTER.":Бж96-НЮ:З"IS HIGHTEXT CURRENTLY IN MEM-   ORY ? (Y/N)"-вK$│ Т:ЕK$│"Y"з21-│Е K$┤▓"N"з17-└F│1:Бж99-шЕ DN│1 з╙M"HIGHTEXT" :ДЧM"HIGHTEXT".╬Ю:З"   AS HIGHTEXT CURRENTLY IS,    IT IS SET UP TO BE NON-DESTRUCT-IVE TO ANYTHING THAT IS ALREADY OF THE HIGH RESOLUTION SCREEN.  THIS MEANS THAT TO CLEAR A SPEC-IFIC PART OF THE SCREEN, SOME   TYPE OF BASIC HI-RES COMMAND"/ВЗ"MUST BE USED. FOR SOME PROGRAMS,IT MAY BE MORE DESIRABLE TO COPYTHE TEXT SCREEN EXACTLY, AUTO-  MATICALLY IGNORING WHAT IS CUR- RENTLY ON THE HIGH RESOLUTION   SCREEN.":Бж960kЮ:З"   FOR EXAMPLE, WITH HIGHTEXT   AS IT IS, IF YOU PRINT AN 'A'   AT THE UPPER-LEFT CORNER, THEN  EXECUTE HIGHTEXT, PRINT A 'B'   AT THE UPPER-LEFT CORNER, THEN  EXECUTE HIGHTEXT AGAIN, THE 'A' AND 'B' WILL APPEAR TO OVERLAP."1(З"   HIGHTEXT CAN BE CHANGED BY   THIS PROGAM SO THAT IF THE ABOVESEQUENCE OF INSTRUCTIONS IS     DONE, THEN THE ONLY THING AP-   PEARING ON THE HIGH RESOULTION  SCREEN IS A 'B'.":Бж961ЭЮ:З"DO YOU THE PREVIOUSLY DESCRIBED MODIFICATION MADE TO THE HIGH-  TEXT PROGRAM CURRENTLY IN MEM-  ORY ? (Y/N)"1▓K$│ Т:ЕK$│"N"з291├Е K$┤▓"Y"з261█Т15702,18:Т15703,182%Ю:З"WHICH PMODE DO YOU WISH TO USE  ( 3 OR 4 )";:ЙP:Е P┤▓3 ░ P┤▓4 з292HЮ:З"   HERE ARE THE COMMANDS:"2NЗ3 З"    C - TOGGLE COLOR                @ - PUT COLOR AT CURRENT            CURSOR POSITION             S - TOGGLE COLOR SET            Q - QUIT DRAWING, CALCULATE         CODES, MODIFY HIGHTEXT":Бж963f!Ю:Й"WHICH CODE IS TO BE MODIFIED    ";MC:ЕMC┤0 ▒ MC▓127 ▒ MC┤▓ Б(MC) з333}"Е MC▓63 з MC│MCм643е#Ю0:CS│0:X│12:Y│4:Е P│4 з C│1 :Д C│44%$АI│107 е 363 й32:З@I, Л(246);:З@Iл9, Л(246);:Л:З@107, б(10,246);:З@363, б(10,246);:ЕP│3 з АI│140 е 332 й32:З@I, б(8,143);:Л4a%З@0,"COLOR:";:З═"###";C;:З@32,"COLOR SET:";:З═"###";CS;4|&M│Yн32лXл1024:CC│ Ж(M)4Щ'Т M,249:Е P│3 з ТMл1,2494г(K$│ Т4╝)Т M,CC:ЕP│3 зТMл1,CC4╦*Е K$│""з394■+PS│ Ю("CS@Q^"л Л(10)л Л(8)л Л(9),K$):ЕPS│0 з395",И PS Бе 45,48,55,58,65,67,69,725=-C│Cл1:ЕP│4 ░ C▓1 з C│05S.Е P│3 ░ C▓4 з C│15\/Бе375t0CS│CSл1:ЕCS│2 зCS│05Н1АJ│4 е 10:АI│12 е 195г2K│ Ж(Jн32лIл1024)5▓3Е K│128з545╨4Е CS│0 з K│Kм64 :Д K│Kл645ф5Т Jн32лIл1024,K5ё6Л:Л:Бе3767Е P│4 з ТM,CSн64л128лCн15:Бе38618CC│CSн64л128л(Cм1)н16л156H9ТM,CC:ТMл1,CC:Бе386Y:M│MCн7л158006g;Е P│3 з756<АI│0е6:B│0:АJ│0 е 76Ь=K│ Ж(1024л(Iл4)н32л12лJ)6╖>Е K┤▓128 з B│Bл2п(7мJ)6╞?Л:ТMлI,B:Л6╧@Бе826▐AЕ Y│4 з 386эBY│Yм1:Бе386¤CЕ Y│10 з 387DY│Yл1:Бе387#EX│Xм1:ЕP│3 з X│Xм175FЕ X┤12 з X│127>GБе387UHX│Xл1:ЕP│3 з X│Xл17wIЕ X▓19 з Е P│3 з X│18 :Д X│197АJБе387ШKАI│0 е 6:B│0:АJ│0е37╖LK│ Ж(1024л(Iл4)н32л12лJн2)7╨MЕ K│143 ▒ K│207 з 817∙NЕ K│159 ▒ K│223 з B│Bл2п(6мJн2):Бе818"OЕ K│175 ▒ K│239 з B│Bл2п(7мJн2):Бе818PPЕ K│191 ▒ K│255 з B│Bл2п(7мJн2)л2п(6мJн2)8_QЛ:ТMлI,B:Л8┬RЮ:З"THE CHARACTER THAT YOU JUST DE- FINED CAN BE ACCESSED BY ANY OF THE FOLLOWING THREE WAYS:"8фSЗ"   1. POKE SCREEN WITH ";MC9	TЗ"   2. POKE SCREEN WITH ";MCл649,UЗ"   3. PRINT CHR$(";MCл64;")"9gVЗ:З"DO YOU WISH TO REDEFINE ANOTHER CHARACTER ? (Y/N)"9|WK$│ Т:ЕK$│"Y"з339НXЕ K$┤▓"N"з879▄YЮ:З"DO YOU WISH TO SAVE THIS MOD-   IFIED VERSION OF HIGHTEXT ?     (Y/N)"9ёZK$│ Т:ЕK$│"N"з95:
[ЕK$┤▓"Y"з90:\F│0:Бж99:L]Е DN│1 з ╪MF$,15600,16300,15600 :Д ШMF$,15600,16300,15600:b^З"SAVE COMPLETE.":h_К:П`З@484,"PRESS [ENTER] TO CONTINUE";:вaЕ Т┤▓ Л(13)з97:иbР:╩cЮ:Зд6)"TAPE OR DISK ?  (T/D)":шdK$│ Т:ЕK$│"T"зDN│м1:Бе104:∙eЕK$┤▓"D"з100;fDN│1;gЕ F│1 з105;/hЮ:Зд8)"FILENAME: ";:╗Й F$;^iЮ:З"   READY ";:ЕDN│1 зЗ"DISK"; :ДЗ"TAPE";;vjЗ" - PRESS [ENTER]";КkЕ Т┤▓ Л(13)з107;РlРaЕ Т┤▓ Л(13)з97:иbР:╩cЮ:Зд6)"TAPE OR DISK ?  (T/D)":шdK$│ Т:ЕK$│"T"зDN│м1:Бе104:∙eЕK$┤▓"D"з100;fD                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ь&':ГCOPYRIGHT (C) T6D SOFTWARE 1983&1└1:╚0&:
Х500&wА RO│&H1FE е &H218:Н X1$:X1$│"&H"лX1$:X1│ Й(X1$):Т RO,X1&}Л&М(╣ Г0│&H1FE&Ы2╣ Г1│&H219&з<Бж 1710&░FSH│3&╣PSC│0&─ZNS│200'dЮ3:З"CAN YOUR COMPUTER HANDLE THE":З"HIGH-SPEED POKE? (Y/N)"'@nHP$│ Т:Е HP$│"Y" з Т 65495,0 :Д Е HP$│"N" з 120 :Д 110'KxБж 620'QВЮ'ZМA│16'ГЦЕ  Ж(343)│247 ░ A▓7 з З@A," ";:A│Aм1'оаЕ  Ж(344)│247 ░ A┤│22 з З@A," ";:A│Aл1'чкЕ  Ж(338)│191 з З@A," ";:A│ Д(17)л6:З@A,"V";:а 145,1(┤Е  Ж(339)│191 з 1320(╛R$│ Т:Е R$│"A" з 1290(+╚╔"O3V5L255G"(8╥З@A,"V";(D▄З@0,SC;(YцЗ@24, б(SH,"^");(|ЁИ  Д(4) Бж 1250,1260,1270,1280(Ь·А XH│1 е SK:Бж 260:Л:Бе 270(║
З@ Д(32)л 479,A$лA$лA$;:Р(└
З(█
Е  Д(45)│1 з З:З:З:З:З(¤
"Е  Д(10)│1 з З@ Д(510),A$лA$;)

,З@A,"V";)'
6З@0,SC;:З@24, б(SH,"^");)8
@╔"O3V5L255C")Ц
JЕ  С (Aн2,3)│7 з 390 :Д Е  С(Aн2,3)│5 з 390 :Д Е  С(Aн2,3)│3 з 390 :Д Е  С(Aн2,3)│8 з 390)г
TSC│SCлPO)о
^Бж 950)э
hЕ SC▓NS з а 245,1:SH│SHл1:Е SK│1 з NS│NSл1200 :Д NS│NSл400) 
rЕ SH▓8 з SH│8*

|Бе 150*
ЖА O│1 е 3*3
РЗ@A,"@";:А T│1 е 50:ЛT*=
Ъ┐ 0,5*d
д╔"L1T255V31O1ABDGCFEBBCGDEFCGAEDF"*~
оЗ@A," ";:А T│1 е 50:Л*Е
╕ЛO*С
┬SH│SHм1*в
╠Е SH│0 з 480*н
╓Бе 340*▀
рЮ:Е HS▓SC з 520 :Д З@166,"YOUR GAME IS OVER."+2
ъЕ SC▓HS з╔"V10L1O3T32CDET16GT32ET8G": З@192,"     YOU MADE HIGH SCORE!";:HS│SC+m
Ї З@224,"";:З"PLEASE ENTER YOUR INITIALS ";:┐ 0,1:╗ЙHS$+Е
■Е  З(HS$)▓3 з Бе500+ЛЮ+ЦБж 660+ЯKK│0+╚&З@19,"HIGH SCORE";:З@52,"---------";+▌0З@84,HS$;" ";HS;+·:З@294,"ASTRO DODGE!!!!";,DЗ@483,"ANOTHER GAME (Y/N)?";,SNW$│ Т:Е W$│"Y" з SH│3:SC│0:NS│200:Ю:Бж 820:Ю:Бе 140,ЪXЕ W$│"N" з Ю:К :Д RO│ Г1(0):KK│KKл1:Е KK│15 з US│ Г(0):KK│0:Бе 590,еbБе 590,лlЮ,╔vA$│"A S T R O  D O D G E",┌АВ TITLE PAGE,ьКБж 660:Бе 730-ФЮ:KK│0:АSS│0 е 15-ЮRD(1)│ Д(7)н16л143-@иЕ RD(1)│RD(2) з 670 :Д RD(2)│RD(1)-Г▓З@SSн32, Л(RD(1)); Л(RD(1));:З@SSн32л30, Л(RD(1)); Л(RD(1));:Л-м╝Е RD(2)│175 з RD(1)│191 :Д RD(1)│175.╞З@480, Л(RD(1)); Л(RD(1));:Е RD(1)│191 з З@510, Л(191);:Т 1535,191 :ДЗ@510, Л(175);:Т 1535,175.╨Р.4┌A$│"A S T R O   D O D G E".pфА S│1 е 21:З@196лS, Р(A$,S,1);:RO│ Г1(0):а 50л(Sн9),1:Л.ВюА G│1 е 500:Л.п°З@320л6,"BY STEVE SKRZYNIARZ";:RO│ Г1(0).┐А G│1е750:Л.цЗ@448л9,"PRESS <space>";:RO│ Г1(0)/АG│1е50:Е  Ж(345)┤▓247 з Л:Бе 800 :Д 810/ US│ Г(0):З@448л9,"press"л Л(128)л"<SPACE>";:RO│ Г1(0):АG│1е50:Е  Ж(345)┤▓247 з Л:US│ Г(0):Бе 780 :Д 810/╢*А X9│1 е 500:Л:АX9│1 е 16:З:а X9н5,1:Л:АX9│1е500:Л0Р4З"YOUR MISSION IS TO MANUEVER     THROUGH THE ASTEROIDS SAFELY.   YOU WILL START AS A PRIVATE     BUT CAN BE PROMOTED. EVENTUALLY,YOU WILL REACH YOUR HOME BASE.  IF YOU WANT TO ABORT THE GAME,  PRESS THE 'A' KEY."1Ж>З"AFTER OBTAINING POINTS,YOU WILL BE PROMOTED AS FOLLOWS:              0-999   PRIVATE              1000-3999  SERGEANT             4000-7999  MAJOR                8000-15999 COLONEL             12000-15999 GENERAL             16000-      ";1ЧHЗ"COMMANDER"1╣RЗ"PRESS <enter> TO CONTINUE";2\Е  Ж(338)┤▓191 з 860 :Д АX9│1е500:Л:АX9│1 е 16:З:а X9н5,1:Л:АX9│1е500:Л2╪fЗ"YOUR SPACEDODGER APPEARS AS A   'V' AT THE TOP OF THE SCREEN.   TO CONTROL IT, USE THE LEFT AND RIGHT ARROW KEYS. TO WARP INTO  HYPERSPACE, PRESS THE <ENTER>   KEY. YOU MAY ALSO STOP THE      ACTION BY ";3дpЗ"PRESSING <CLEAR>, AND RESUME ACTION BY PRESSING THE   SPACEBAR WHEN YOU ARE READY.    BEFORE YOU PLAY, SELECT THE     SKILL LEVEL.":З" 1....NOVICE":З" 2.......PRO":З" 3....EXPERT":Й"SKILL LEVEL";SK3тzSK│ Б(SK):Е SK│1 з PO│5 :Д Е SK│2 з PO│2 :Д Е SK│3 з PO│14ДАX9│1 е 500:Л:АX9│1е16:З:аX9н5,1:Л:АX9│1е500:Л4&ОЕ SK│0 з 8704;ШЕ SK│1 з NS│NSн24VвЕ SK┤1 ▒ SK▓3 з Бе 8704bмБж 15104w╢Е SC│1000 з 10104М└Е SC│4000 з 10704б╩Е SC│8000 з 11304╖╘Е SC│12000 з 11904═▐Е SC│16000 з 13304╙шР4эЄЮ:З"    HORRAY!!!!!!"5%№З"YOU HAVE BEEN PROMOTED TO           *** SERGEANT"5ВЗ:З:З"YOU ARE BEING AWARDED 100 BONUS POINTS!! ALSO YOU ARE GETTING   ONE BONUS SHIP!!!"5ШSC│SCл100:SH│SHл15╜З:З"HIT THE '1' KEY TO CONTINUE"5ф$W$│ Т:Е W$┤▓"1" з 1060 :Д Ю:Бе 1506.Ю:З"      ALL RIGHT!!!"648З"YOU HAVE BEEN PROMOTED TO          *** MAJOR"6ЖBЗ:З:З"YOU ARE NOW BEING AWARDED 200   BONUS POINTS, AND TWO EXTRA     SHIPS."6ЬLSH│SHл2:SC│SCл2006╞VЗ:З:З"PRESS THE '1' KEY TO CONTINUE";6э`W$│ Т:Е W$┤▓"1" з 1120 :Д Ю:Бе 1507jЮ:З"    CONGRATS!!!!!"7?tЗ"YOU HAVE JUST BEEN PROMOTED TO      *** COLONEL"7╢~З:З:З"YOU ARE BEING AWARDED THREE     BONUS SHIPS AND 300 POINTS.     JUST TWO MORE PROMOTIONS TO     COMMANDER!!"7▀ИЗ:З:З"PRESS THE '1' KEY TO CONTINUE"7їТSC│SCл300:SH│SHл38ЬW$│ Т:Е W$┤▓"1" з 1180 :Д Ю:Бе 1508BжЮ:З:З"EXCELLENT PERFORMANCE!!!!!"8z░З:З"YOU HAVE BEEN PROMOTED TO          *** GENERAL"9║З:З"AFTER A SPECTACULAR PREFORMANCE,";:З"YOU HAVE BEEN PROMOTED. YOU ARE":З"BEING GIVEN 300 BONUS POINTS IN  ADDITION TO THREE BONUS SHIPS."94─З:З:З"PRESS THE '1' KEY TO CONTINUE"9J╬SH│SHл3:SC│SCл3009q╪W$│ Т:Е W$┤▓"1" з 1240 :ДЮ: Бе 3409ВтA$│ Л(175):Р9УьA$│ Л(207):Р9дЎA$│ Л(239):Р9╡A$│ Л(255):Р9╓
Ю:З"YOU ABORTED THE GAME!!!"9щА T│1 е 1500:Л9ЎЮ:Бе 480:(Е  Ж(345)┤▓247 з 1320 :Д 150:2Ю:*<A$│"-=<":KFА G│453 е 474:З@G, Л(239);:Л:lPА G│484 е 507:З@G, Л(239);:Л:ОZЗ@423, Л(239);:З@440, Л(239);:┬dА G│0 е 12:З@Gл1,"V";:З@G," ";:А C│1 е 100:ЛC:Л;nАG│1 е 50:Л:А G│29 е 15 й м1:З@G,"   ";:З@Gм1,A$;:А H│1 е 100:Л:Л;xА G│1 е 100:Л;(ВЗ@12," ";;6МЗ@16," ";;pЦА G│13 е397 й 32:З@G,"   ";:З@Gл32,A$;:А H│1 е 45:Л:Л;ВаА G│1 е 200:Л;екЗ@133,"YOU HAVE BEEN PROMOTED";╛┤З@170,"TO COMMANDER";▀╛З@198,"UPON ARRIVAL TO YOUR";ї╚З@235,"HOME BASE"<:╥А X│1е4:А G│1 е 4:╔"O2T255CBAGFED":Л:АG│1е4:╔"O2T255CDEFGAB":Л:Л<[▄А G│1 е 3000:Л:Бж 480:Бе 150<~цЮ:А G│484 е 507:З@G, Л(239);:Л<ЯЁА G│453 е 474:З@G, Л(239);:Л<┴·З@423, Л(239);:З@440, Л(239);<сA$│"V":B$│"<==>":C$│"-":C│5<∙З@426,B$;:З@435,A$;=З@430,"-----";=Н"А G│1 е 10:З@140,"fueling":А H│1 е 100:Л:З@140,"FUELING";:А H│1 е 100:Л:Л:З@139,"FINISHED";:А G│1 е 1000:Л:З@139,"        ";=а,А H│4 е 0 й м1=╒6З@426,B$;:З@435,A$;:А G│1 е 50:Л:З@430лH," ";:ЛH=ц@А G│1е 300:Л=ЁJSO│50>KTА G│394 е 10 й м32:SO│SOл15:З@G,B$;:З@Gл32,"    ";:А H│1 е 75:Л:а SO,1:ЛG:З@10,"    ";>]^АG│1 е 1500:Л>shЗ@492,"LIFTOFF!";>{rS│0>┴|А G│403 е 19 й м32:З@G,A$;:S│Sл5:З@Gл32," ";:а S,1:А H│1 е 50:Л:Л>╧ЖЗ@19," ";>ЎРЗ@75,"GOOD LUCK";:З@140,"PRIVATE";?
ЪА G│1 е 3500:Л:Ю:Р?]дЖ 8E,4,0,A6,84,81,41,24,4,8B,40,20,6,81,80,24,2,80,40,A7,80,8C,6,0,26,E9,39?ЫоАX8│1 е 21:НRO$:RO$│"&H"лRO$:RO│ Й(RO$):Т X8л&H218,RO:Л:Р?█╕Ж 8E,3,FF,30,1,A6,84,2C,4,8B,10,8A,80,A7,80,8C,6,1,2F,F1,39?Ё┬:Г *************@╠:Г *           *@╓:Г *ASTRO DODGE*@/р:Г *    BY     *@Dъ:Г *   STEVE   *@YЇ:Г * SKRZYNIARZ*@n■:Г *           *@Г:Г *************@╓:Г FOR USE WITH 16K COLOR          COMPUTER WITH EXTENDED          COLOR BASIC@ы:Г JUNE 16, 1983**@╠:Г *       
▌&'
В COPYRIGHT (C) T&D SOFTWARE 1983&1╚0:└1&FХ2000:М C$(25,1)&eАI│0е25:НC$(I,0),C$(I,1):Л&}ЖA,01,B,1000,C,1010&УЖD,100,E,0,F,0010&кЖG,110,H,0000,I,00&├ЖJ,0111,K,101,L,0100&╪	ЖM,11,N,10,O,111&ё
ЖP,0110,Q,1101,R,010'ЖS,000,T,1,U,001'ЖV,0001,W,011,X,1001'2
ЖY,1011,Z,1100'LЮ:Зд11)"MORSE CODE":З'зЗ"   THIS TUTORIAL WILL ATTEMPT   TO TEACH AND DRILL ONE IN RE-   CEIVING MORSE CODE."(З"   YOU WILL BE ABLE TO REVIEW   THE LETTERS, THE SOUNDS AND SYM-BOLS AS THEY WOULD APPEAR IN    MORSE CODE."(vЗ"   EXERCISES INCLUDE RECOGNIZAT-ION OF SINGLE LETTERS AND MULTI-LETTER COMBINATIONS."(оЗ"   TRANSLATIONS CAN ALSO BE DONEBY THIS PROGRAM."(╣Бж71:Ю(їЗ"   PLEASE ADJUST THE VOLUME SET-TING ON YOUR TV SET."(■Бж71)Ю:Зд14)"MENU":З)нЗ:З"   1) REVIEW ALL CODES             2) PRACTICE SINGLE LETTERS      3) PRACTICE MULTI-LETTERS       4) TRANSLATE MESSAGE            5) END PROGRAM")╬З:Зд7)"YOUR CHOICE ?  (1-5)")ЄK$│ Т:Е Й(K$)┤1 ▒  Й(K$)▓5 з 25*K│ Й(K$):И K Бе 27,39,49,56,80*I│0*7Ю:З@207,C$(I,0);"  ";*FT$│C$(I,1)*|АJ│1 е  З(T$):U$│ Р(T$,J,1):ЕU$│"0"зЗ"."; :ДЗ"-";*ДЛ:З*Н Бж74*Є!З@416,"    PRESS  'U' TO MOVE UP                  'D' TO MOVE DOWN                'X' FOR MENU";+"K$│ Т:ЕK$┤▓"U"░ K$┤▓"D" ░ K$┤▓"X" з34+=#Е K$│"U" ░ I┤25 з I│Iл1:Бе28+]$Е K$│"D" ░ I▓0 з I│Iм1:Бе28+n%Е K$│"X" з22+w&Бе34+Л'Ю:Зд13)"READY?"+Ы(АTD│1е200:Л+╡)R│ Д(26)м1:T$│C$(R,1)+╛*Бж74+▐+Й"WHAT LETTER WAS THAT ";L$+э,Е L$│""з43,-Е  К(L$)┤64 ▒  К(L$)▓90 з 43,S.Е L$│C$(R,0) зЗд12)"CORRECT" :ДЗ"SORRY, THE LETTER WAS ";C$(R,0),g/Бж77:ЕK$│"Y"з39,p0Бе22-1Ю:З"   YOU WILL NOW RECEIVE LETTERS IN GROUPS OF FIVE. THE FIVE     LETTERS ARE TO BE INPUT AS A    GROUP. THE GROUPS OF LETTERS    WILL NOT NECESSARILY FORM WORDS.":Бж71-?2Ю:Зд13)"READY?":АTD│1е200:Л-f3W$│"":АI│1е5:W$│W$л Л( Д(26)л64):Л-о4АI│1 е  З(W$):V│ К( Р(W$,I,1)):V│Vм65:T$│C$(V,1):Бж74:АTD│1е200:Л:Л./5Й"WHAT WERE THE FIVE LETTERS ?    (NO COMMAS, PLEASE)";L$:ЕL$│W$ з Зд12)"CORRECT!" :Д З"SORRY, THE FIVE LETTERS WERE    ";W$.C6Бж77:ЕK$│"Y"з50.L7Бе22.╗8Ю:З"   NOW, I WILL TRANSLATE ALPHA  TEXT TO MORSE CODE FOR YOU.":╗Й"     TYPE IN YOUR MESSAGE       >>";M$.╬9Е З(M$)│0 з 22.р:АI│1 е  З(M$).№;V│ К( Р(M$,I,1)):V│Vм65/!<Е V│м33 зАTD│1е200:Л:З"  ";:Бе67/7=Е V┤0 ▒ V▓25 з 67/[>T$│C$(V,1):Е З(T$)▓ 32м Ъ(0) зЗ/Н?АJ│1 е  З(T$):Е  Р(T$,J,1)│"0" зЗ"."; :ДЗ"-";/У@Л/ЬAБж74/▓BАTD│1е200:Л:З" ";/╕CЛ/╛DЗ/╥EБж77:ЕK$│"Y"з56/█FБе220GЗ@484,"PRESS [ENTER] TO CONTINUE";0HR│ Д( Я):Е Т┤▓ Л(13)з720$IР0_JАJ│1 е  З(T$):U$│ Р(T$,J,1):Е U$│"0" за150,1 :Д а150,40nKАTD│1е50:Л0vLЛ:Р0░MЗ"WOULD YOU LIKE TO TRY ANOTHER?               (Y/N)"0╬NK$│ Т:ЕK$┤▓"Y"░K$┤▓"N"з780╘OР0▄PЮ:КGЗ@484,"PRESS [ENTER] TO CONTINU