П( И(D),2)л"/"л П( И(Y),2)/&
рБж 1770/8
ъH│0:MI│0:SE│0/Z
ЇPR$│"COMMAND READY...":Бж1770/d
■K$│ Т/uЕK$│"W"з1190/ЖЕK$│"S"з1200/ЧЕK$│"E"з1220/и&ЕK$│"D"з1230/╣0ЕK$│"R"з1250/╩:ЕK$│"F"з1260/█DЕK$│"T"з1270/ьNЕK$│"G"з1290/¤XЕK$│"Y"з13100bЕK$│"H"з13300lЕK$│"A"з135000vЕK$│"Z"з13800AАЕK$│"C"з14000[КБж 1690:Е  Я┤60 з 8100yФ Я│0:SE│SEл1:Е SE┤1 з 8100ШЮSE│0:H│Hл1:ЕH│24 зH│0:ND│10йиЕ F1│0 з 7100╗▓Е D1┤▓H з 7100я╝PR$│"PUMP NO. 1 - REPAIR COMPLETE":Бж 1770:F1│01╞Е F2│0 з 7401╨ЕD2┤▓H з 7401E┌PR$│"PUMP NO. 2 - REPAIR COMPLETE":Бж 1770:F2│01VфЕ EF│0 з 7701hюЕ DE┤▓H з 7701Ц°PR$│"ECCS - REPAIR COMPLETE":Бж 1770:EF│01вБж 16901▓GR(H)│ROоPG1╦Е P1┤▓0 з P1│ Д(3)л31ф Е P2┤▓0 з P2│ Д(3)л31ї*Е ND│0 з 91024OD│D:OY│Y:OM│M:D│Dл1:Е D┤│31 з 8402(>Бе 14902sHPR$│"DAILY REPORT FOR "л П( И(OM),2)л"/"л П( И(OD),2)л"/"л П( И(OY),2)2RБж 17702▒\PR$│"HOURLY AVERAGE POWER GRID RATIO":Бж 17702═fA│0:АI│0е23:A│AлGR(I):Л2╪pA│Aо232юzPR$│ И(A):Бж 17702·ДTA│TAлA3ОЕ RC$│"OFF" з RO│0:Бе109032ШRO│(FRм(.65нCR))н10003DвЕ RO┤0 з RO│03[мЕ CR│0 з CR│1:FC│13М╢OT│T:T│ Б(FRо(.45нCR)м.5н(P1лP2)):ЕT┤0 з T│03г└Е FC│1 з CR│0:FC│03╛╩Е EC$┤▓"ENGAGED" з10203ё╘T│Tм10:EF│1:RT│ Д(5):DE│HлRT:ЕDE▓23 з DE│DEм244
▐EC$│"OFF":ЕT┤0 з T│040шPR$│"ECCS IS DAMAGED ...":Бж 17704;ЄБж17804M№Е T▓26 з 15604wЕ T┤│26 ░ T▓│22 ░  Д(100)│ Д(3)з 16104ЮЕOT┤│26 ░ OT▓│22 з З@OTл5, Л(191);4┼ЕOT┤│21 ░ OT▓│12 з З@OTл5, Л(159);4▀$ЕOT┤│11 зТ OTл1029,325.PG│PGл(3000л Д(1000))н А( Д(3)м2):Е PG┤0 з PG│10005"8Бж 16905XBЕP1$│"OFF" ▒ F1│1 з 1130 :ДЕ  Д(4)┤▓ Д(80) з 11305ЕLRT│ Д(7):F1│1:D1│RTлH:Е D1▓23 з D1│D1м245▓VPR$│"PUMP NO. 1 DAMAGED":Бж 1770:Бж 17805┼`P1$│"OFF":P1│05№jЕ P2$│"OFF" ▒ F2│1 з 1170 :ДЕ  Д(3)┤▓ Д(80) з 11706(tRT│ Д(6):F2│1:D2│RTлH:ЕD2▓23 з D2│D2м246U~PR$│"PUMP NO. 2 DAMAGED":Бж 1770:Бж 17806hИP2$│"OFF":P2│06ТЕND│1 з ND│0:Бе4706ЙЬБе5106вжP1$│"OFF":P1│0:Бе6506┼░ЕF1│0 зP1$│"ON":P1│ Д(5):Бе6507║PR$│"PUMP NO. 1 DAMAGED - CANNOT":Бж 1770:PR$│"ACTIVATE":Бж 1770:Бе6507)─P2$│"OFF":P2│0:Бе6507L╬ЕF2│0 зP2$│"ON":P2│ Д(5):Бе6507Ч╪PR$│"PUMP NO. 2 DAMAGED - CANNOT":Бж 1770:PR$│"ACTIVATE":Бж 1770:Бе6507░тRC$│"OFF":RO│0:Бе6507├ьRC$│"ON":Бе6507▐ЎЕ FR▓0 з FR│FRм1:Бе6508PR$│"CAN'T RAISE-NONE LOWERED":Бж1770:Бе6508*
ЕFR┤999 з FR│FRл1:Бе6508\PR$│"CAN'T LOWER MORE THAN 999":Бж 1770:Бе6508vЕCR▓0 з CR│CRм1:Бе6508Б(Бе12808Ю2Е CR┤999 з CR│CRл1:Бе6508й<Бе13008╩FЕ EF│0 зEC$│"STANDBY":Бж16908█PЕ EF│0 з 6509ZPR$│"ECCS DAMAGED - CANNOT ACTIVATE":Бж 1770:Бе6509;dЕEC$│"STANDBY" з EC$│"ENGAGED":Бе6509rnPR$│"CANNOT ENGAGE - NOT ON STANDBY":Бж 1770:Бе6509дxPR$│"W & S - TURN PUMP NO.1 OFF & ON":Бж 17709╓ВPR$│"E & D - TURN PUMP NO.2 OFF & ON":Бж 1770:МPR$│"R & F - TURN REACTOR OFF & ON  ":Бж 1770::ЦPR$│"T & G - RAISE/LOWER FUEL RODS  ":Бж 1770:lаPR$│"Y & H -RAISE/LOWER CONTROL RODS":Бж 1770:ЦкPR$│"A - PUT ECCS ON STANDBY":Бж 1770:╕┤PR$│"Z - ENGAGE ECCS":Бж 1770;╛PR$│"C - PRINT LIST OF COMMANDS":Бж 1770:PR$│"COMMAND READY...":Бж 1770;╚Бе 650;-╥Ю:З"CONGRATULATIONS !!!!";F▄З"YOU SURVIVED !!!!";xцЗ"YOUR DAILY POWER RATIO AVERAGE  WAS ";TAо31;аЁЕ TAо31┤1 зЗ"BETTER LUCK NEXT TIME";╩·Е TAо31▓1 зЗ"YOU DID A VERY GOOD JOB";шЕTAо31│1 зЗ"YOU DID O.K.";єБе1650<PR$│"SYSTEM CRITICAL ..."<"Бж 1770<9,АI│0е10:а  Д(6), Д(2):Л<a6АI│0е8:ЮI:аIл1,Iл1:АTD│1 е Iн10:Л:Л<О@Ю:З"THE REACTOR HAS EXPLODED ...":Бе1650<уJPR$│"MELT DOWN HAS OCCURED ...":Бж 1770:PR$│"RADIATION IS SPREADING ...":Бж 1770="TАI│1е30:┐0,1:АTD│1е (31мI)н10:Л:┐0,0:АTD│1 е (31мI)н10:Л:Л=_^Ю:З"THE REACTOR WAS TOO BADLY DAM-  AGED FOR USE AGAIN."=jhБе1650=ОrЗ:З"ANOTHER SIMULATION ? (Y/N)"=▓|K$│ Т:ЕK$┤▓"Y" ░ K$┤▓"N" з 1660=─ЖЕ K$│"Y" з 30=╩РК=∙ЪЗ@33,═"PUMP NO. 1 % %/#### OUTPUT";P1$;P1;>(дЗ@65,═"PUMP NO. 2 % %/#### OUTPUT";P2$;P2;>7оЗ@Tл5,"^";>\╕З@ 97,═"ECCS       %     %";EC$;>П┬З@129,═"REACTOR    % %/###,### OUTPUT";RC$;RO;>┬╠З@161,═"FUEL RODS ### CONTROL RODS ###";FR;CR;>ё╓З@193,═"POWER GRID RATIO ####.####";ROоPG;>ўрР?MъАI│1344е1471:ТIм32, Ж(I):Л:З@416, б(32,32);:З@416л((31м З(PR$))о2),PR$;:а 200,1:Р?ЗЇPR$│"EST. REPAIR TIME IS"л И(RT)л" HOUR(S)":Бж 1770:Р?о■З@484,"PRESS [ENTER] TO CONTINUE";?┼Е Т┤▓ Л(13) з 1800?╦Р"POWER GRID RATIO ####.####";ROоPG;>ўрР?MъАI│                                                                                                                                                                                                                                                                IS UNDERSTOOD     BY THE MICROPROCESSOR ?":AS│2:CA│3:Бж560/а
rQ$│"10. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDA 179 ?":AS│1:CA│2:Бж560/╛
|Бж510:Зд10)"YOUR SCORE :"/╒
ЖЗд9);C;"OUT OF 10"/·
РЗд7)"PERCENTAGE = ";Cо10н100;"%"0!
ЪЕC▓│9 ░ C┤│10 зЗд10)"OUTSTANDING!"0B
дЕC▓│6░C┤9 зЗд11)"VERY GOOD!"0p
оЕC▓│0 ░ C┤6 зЗд5)"BETTER LUCK NEXT TIME!"0А
╕Бж480:Бж5100и
┬Зд11)"NEXT MONTH":Зд11)"----------"1&
╠З:З"   THE SUBJECT OF NEXT MONTH'S  MACHINE LANGUAGE TUTORIAL IS    THE CONDITION CODES REGISTER ANDBRANCH INSTRUCTIONS."1,
╓К1S
рЗ@484,"PRESS [ENTER] TO CONTINUE";1g
ъЕ Т┤▓ Л(13)з4901m
ЇР1в
■SS│ Д(9):АZ│0е15:U│ Г1(0):а20н(SSм1)лZл1,1:Л:Ю:Р2Ж 182,4,32,183,63,192,142,4,32,166,136,32,167,132,48,136,32,140,5,224,38,243,166,1,167,128,140,5,255,38,247,166,1362АЖ224,167,132,48,136,224,140,4,31,38,243,166,31,167,132,48,31,140,4,0,38,245,182,63,192,167,132,573zЖ79,183,63,192,31,137,79,195,4,0,31,1,198,15,166,136,32,167,132,48,136,32,90,38,245,134,96,167,132,182,63,192,139,2,129,32,38,219,134,1,183,63,192,31,137,79,195,5,224,31,1,198,15,166,136,224,167,132,48,136,224,90,38,245,134,96,167,132,182,63,1923Ц&Ж139,2,129,33,38,219,573▓0Бж510:ЗQ$:Бж570:Бж610:Р3╩:И AS Бе 580,590,6004DЗд7)"1) IMMEDIATE":Зд7)"2) DIRECT":Зд7)"3) EXTENDED":Р4SNЗд7)"1) MNEMONICS":Зд7)"2) ASSEMBLY LANGUAGE":Зд7)"3) MACHINE LANGUAGE":Р4РXЗд7)"1) RELATIVE":Зд7)"2) IMMEDIATE":Зд7)"3) INDIRECT":Р4нbЗ"   ENTER YOUR ANSWER";4їlЙA:ЕA┤▓1░A┤▓2░A┤▓3▒A┤▓ Б(A)зЗ"   ENTER A 1, 2, OR 3, PLEASE";:Бе6205vЕA┤▓CA з65058АЗ" *****      CORRECT!      *****":C│Cл1:Бе6605`КЗ"SORRY, THE CORRECT ANSWER WAS";CA5jФБж4805pЮРMMEDIATE":Зд7)"3) INDIRECT":Р4нbЗ"   ENTER YOUR ANSWER";4їlЙA:ЕA┤▓1░A┤▓2░A┤▓3▒A┤▓ Б(A)зЗ"   ENTER A 1, 2, OR 3, PLEASE";:Бе6205vЕA┤▓C                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╠&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&A
В nuclear power plant&M╚0,1:└1&Y(Ю:Х4000&f2М GR(23)&б<Зд7);"NUCLEAR POWER PLANT ":Зд7);"------- ----- -----"&ёFЗ:З"   IN THIS SIMULATION, YOU ARE  CONTROLLING A NUCLEAR POWER     PLANT."'FPЗ"YOU MUST CONTROL THE COOLANT    PUMPS AND THE FUEL AND CONTROL  RODS.":Бж 1790'юZЮ:З"   THE FUEL RODS, WHEN LOWERED, WILL INCREASE THE POWER OUTPUT. THE CONTROL RODS ARE USED TO    STABILIZE THE FUEL RODS AND     HELP CONTROL CORE TEMPERATURE."(БdЗ"   THE TEMPERATURE GUAGE AT THE TOP OF THE SCREEN IS A RELATIVE INDICATION OF THE CORE TEMPERA- TURE. (GREEN=OK,YELLOW=CAUTION, RED=DANGER)"(НnБж 1790(УxЮ(╡ВЗ"   THESE ARE THE COMMANDS:"(╬МЗ"   W - PUMP 1 OFF"(цЦЗ"   S - PUMP 1 ON"( аЗ"   E - PUMP 2 OFF")кЗ"   D - PUMP 2 ON")1┤З"   R - REACTOR OFF")J╛З"   F - REACTOR ON")h╚З"   T - RAISE FUEL RODS")Ж╥З"   G - LOWER FUEL RODS")з▄З"   Y - RAISE CONTROL RODS")╚цЗ"   H - LOWER CONTROL RODS")фЁЗ"   A - ACTIVATE ECCS")■·З"   Z - ENGAGE ECCS"*$
З"   C - PRINT THIS COMMAND LIST"*0
Бж 1790*ж
Ю:З"   THE ECCS, EMERGENCY CORE     COOLANT SYSTEM, WILL PROVIDE A  QUICK, BUT SHORT COOL DOWN OF   THE REACTOR."+

"З"   ONCE AGAIN, TO INCREASE THE  POWER OUTPUT, LOWER THE FUEL    RODS OR RAISE THE CONTROL RODS."+Р
,З"   THE POWER GRID RATIO IS YOUR OUTPUT OVER THE POWER ON THE    POWER GRID. IF THE RATIO IS LESSTHAN 1, THEN YOU ARE BUYING",

6З"POWER FROM OTHER PLANTS TO MEET YOUR NEEDS. IF THE RATIO IS     GREATER THAN 1, THEN YOU ARE DO-ING WELL.",

@Бж 1790,j
JЮ:З"   THE OBJECT IS TO PRODUCE AS  MUCH POWER AS POSSIBLE IN THE   TIME YOU ARE GIVEN."-
TЗ"   THIS SIMULATION IS REAL-TIME,OR MORE ACCURATELY, YOU WILL    HAVE CONTROL FOR 1 MONTH (ROUGH-LY 15 MINUTES REAL-TIME). EACH  REAL SECOND AMOUNTS TO 1 SIMULA-TOR HOUR."-'
^Бж 1790-Щ
hЮ:З@0,"TEMP:"; б(12,143); б(10,159); б(5,191);:АI│1029е1040:ТI,32:Л:З@224,"< C O M P U T E R  O U T P U T >";-п
rЗ@256, б(32,"-");-┼
|З@480, б(31,"-");-ч
ЖP1$│"OFF":P2$│"OFF":EC$│"OFF"-ї
РP1│0:P2│0.
ЪRC$│"OFF":RO│0."
дT│0:CR│0:FR│0:PG│1000.3
оM│1:D│1:Y│83.?
╕Бж 1690.╚
┬З@288,"";:З"WELCOME ...                     THIS IS THE PRINT OUT OF YOUR   FAITHFUL STATUS-REPORT COMPUTER.           GOOD LUCK !!".▌
╠АI│0е1000:Л: Я│0/
╓PR$│"DATE: "л П( И(M),2)л"/"л0/	.ЕK$│ Л(13)з2410/(	8ЕK$┤▓ Л(8)з2390/W	BЕ З(T$)▓0 з ЗK$;:T$│ О(T$, З(T$)м1):Бе2340/b	LБе2340/Й	VЕ  З(T$)┤│3 з ЗK$;:T$│T$лK$:Бе2340/Ф	`Бе2340/а	jK$│T$:Р/к	tT$│""/└	~K$│ Т:ЕK$│""з2430/╒	ИЕK$│ Л(13)з 2510/щ	ТЕK$┤▓ Л(8)з24900	ЬЕ З(T$)▓0 зЗK$;:T$│ О(T$, З(T$)м1):Бе24300#	жБе 24300G	║Е З(T$)┤│3зЗK$;:T$│T$лK$:Бе24300R	─Бе24300X	╬Р0Т	╪P$│"YOU ARE CORRECT !!":Бж890:АI│1е32:Бж 910:A(I)│0:Л0╝	тCS(ML)│CS(ML)лS(ML):ЕCS(ML)▓│20 з 7300х	ьP$│"THE CORRECT WORD WAS "лWT$:Бж8901	ЎS(1)│0:S(2)│0:Бж860:Бе2201*
З@484,"PRESS [ENTER] TO CONTINUE";1I

R│ Д(100):Е Т┤▓ Л(13)з25701O
Р1U
К1aъ`└1:Бе40 ARE CORRECT !!":Бж890:АI│1е32:Бж 910:A(I)│0:Л0╝	тCS(ML)│CS(ML)лS(ML):ЕCS(ML)▓│20 з 7300х	ьP$│"THE CORRECT WORD WAS "лWT$:Бж8901	ЎS(1)│0:S(2)│0:Бж860:Б                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 q&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&E
В <--------------------->&cВ <-  MACHINE LANGUAGE ->&БВ <-     TUTORIAL      ->&Я(В <-     PART 3-B      ->&╜2В <--------------------->&█<В <-   T & D SOFTWARE  ->&∙FВ <--------------------->'P╚0:└1'ZЮ:Х1500,16200'?dАI│16323 е 16383:НD:ТI,D:Л:╣ Г0│16323'inАI│16240 е 16317:НD:ТI,D:Л:╣ Г1│16240'НxЗд3)"MACHINE LANGUAGE TUTORIAL"'ХВI│1'╣МаI,1:U│ Г0(0):I│Iл1:ЕI┤186 з140'■ЦЗд12)"PART 3-B":Зд12)"--------":╔"T255O5V31ABCDABFBDBECBADCAGEF"(eаЗ:З"   THIS IS THE CONTINUATION OF  THE THIRD PART IN THE SERIES ON MACHINE LANGUAGE PROGRAMMING."(uкБж480:Бж510)o┤З"   IN SUMMARY, MACHINE LANGUAGE PROGRAMMERS PROGRAM IN ASSEMBLY LANGUAGE, WHICH IS THE MNEMONIC FORM OF THE MICROPROCESSOR IN-  STRUCTIONS. MNEMONICS ARE ENG-  LISH-TYPE WORDS AND ABBREVIA-   TIONS WHICH ARE EASIER FOR PEO- PLE TO UNDERSTAND.")╛Бж480:Бж510*d╚З"   ALSO, THE 6809 MICROPROCESSORPROVIDES THE PROGRAMMER WITH    MANY DIFFERENT DIVERSIFIED AND  POWERFUL MODES OF ADDRESSING.   NOTE THAT A PARTICULAR INSTRUC- TION MAY ONLY USE SOME OF THE   ADDRESSING MODES WHICH ARE A-"+\╥З"VAILABLE. SO, YOU MUST NOT ONLY LEARN THE INSTRUCTION SET; YOU  MUST ALSO LEARN WHICH ADDRESSINGMODE(S) EACH PARTICULAR INSTRUC-TION USES. HOWEVER, THE INSTRUC-TION SET AND APPLICABLE ADDRESS-ING MODES WILL BE COVERED IN A  FUTURE TUTORIAL."+l▄Бж480:Бж510+ЙцЗд7)"READY FOR A QUIZ ?"+ЪЁАTD│1е1000:Л+┤·З:Зд10)"HERE WE GO !"+─
АTD│1е300:Л+╠
C│0,2
Q$│"1. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDA #32 ?":AS│1:CA│1:Бж560,Ц
"Q$│"2. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDB 1 ?":AS│1:CA│2:Бж560,√
,Q$│"3. WHAT ARE THE ENGLISH-TYPE       WORDS AND ABBREVIATIONS         CALLED ?":AS│2:CA│1:Бж560-c
6Q$│"4. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDA 16383 ?":AS│1:CA│3:Бж560-╦
@Q$│"5. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDA [863] ?":AS│3:CA│3:Бж560.
JQ$│"6. WHAT LANGUAGE IS BETTER UN-     DERSTOOD BY PEOPLE ?":AS│2:CA│2:Бж560.Б
TQ$│"7. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          LDB #1 ?":AS│3:CA│2:Бж560.х
^Q$│"8. WHAT ADDRESSING MODE DOES       THIS INSTRUCTION USE :          BNE 5 ?":AS│3:CA│1:Бж560/9
hQ$│"9. WHAT LANGUAGE │"SORRY, YOU ARE INCORRECT":Бж890:S(ML)│0:Бж860:АTD│1е1000:Л:TA│0:АI│1е32:TA│TAлA(I):Л:Е S(1)┤▓0 ▒ S(2) ┤▓0 ▒ TA┤▓0 з710В
■Бе2540кP$│"GUESS OR 1 ST CHOICE -> ":Бж890╨Бж2420:Е Й(T$)│0 з490 :ДC1│ Й(T$)
Е C1▓0 ░ C1┤33 ░ C1│ Б(C1) з Е A(C1)┤▓0 з570&Бж560:Бе520F0P$│"BAD INPUT ... RE-ENTER":Бж890:АTD│1е1500:Л:РU:I│C1:Бж820┼DP$│"ENTER YOUR 2 ND CHOICE -> ":Бж890:Бж2420:C2│ Й(T$):ЕC2▓0 ░ C2┤33 ░ C2│ Б(C2) ░ C1┤▓C2 з Е A(C2)┤▓0 з600╒NБж560:Бе580фXI│C2:Бж820√bЕ A(C1)│A(C2) з650 lP$│"NO MATCH":Бж890:АTD│1е1500:Л:vI│C1:Бж780:I│C2:Бж780DАБе710YКP$│"match":Бж890sФI│C1:Бж910:I│C2:Бж910ЗЮA(C1)│0:A(C2)│0ЯиS(ML)│S(ML)л1:Бж860п▓АTD│1е600:Ль╝P$│N$(ML)л" GETS ANOTHER TURN":Бж 890:АTD│1е1000:Л:Бе450 
╞З@448л(MLм1)н16," ";:Л:Бе420 9╨P$│"TIE GAME":Бж 890:АTD│1е2000:Л:Бе740 g┌P$│N$(ML)л" WINS !!!":Бж 890:АTD│1е3000:Л ЛфP$│"ANOTHER GAME? (Y/N)":Бж 890 нюK$│ Т:ЕK$┤▓"Y" ░ K$┤▓"N" з750 ┐°Е K$│"Y" з 10 ╦Бе 2590!P│32л Б((Iм1)о8)н96л Б((((Iм1)о8)м Б((Iм1)о8))н8л.5)н4!=З@P, б(4,255);:З@Pл32, б(4,255);:З@Pл64, б(4,255);!Q З@Pл33,═"##";I;!W*Р!Т4P│32л Б((Iм1)о8)н96л Б((((Iм1)о8)м Б((Iм1)о8))н8л.5)н4!╪>З@P, б(4,C$(A(I)));:З@Pл32, б(4,C$(A(I)));:З@Pл64, б(4,C$(A(I)));!шHа A(I)н10,1!юRР"$\З@450, О(N$(1),10);"'S";:З@466, О(N$(2),10);"'S";"lfЗ@482,═"SCORE: ##/##";CS(1);S(1);:З@498,═"SCORE: ##/##";CS(2);S(2);"rpР"ЯzЗ@416, б(31,32);:З@416л(31м З(P$))о2,P$;"еДР"рОP│32л Б((Iм1)о8)н96л Б((((Iм1)о8)м Б((Iм1)о8))н8л.5)н4" ШЕ Iо2│ Б(Iо2) з K│2 :Д K│1#вIR│ Б(((Iо8)м Б(Iо8))н8л.5)#7мЕIR│1 ▒ IR│2 з DS│1#O╢ЕIR│3 ▒ IR│4 з DS│2#g└ЕIR│5 ▒ IR│6 з DS│3#╩ЕIR│7 ▒ IR│0 з DS│4#С╘L│ Б((Iм1)о8)#р▐З@P,L$(D(DS),3нLл1,K);:З@Pл32,L$(D(DS),3нLл2,K);:З@Pл64,L$(D(DS),3нLл3,K);#цшР$БЄЖTIME,TAME,RATE,GATE,LAME,LATE,SALE,SAIL,SITE,SEAT,LEGS,GEAR,LIME,TEAM,MILE,GRAM,REAM,LEAN,NAIL,MINE,NETS,NAME,LANE,LAIR,TREE,RAIN,NEAR,REAL,RISE,RAIL$┬№ЖTALL,TALE,MEAT,MAIL,MALE,MEET,NINE,MANE,MAIN,TILE,GNAT,STAR$╔ЖA$▐Ж0,0,0,0,0,0,0,0$єЖ0,0,0,1,1,0,0,0%$Ж0,0,1,0,0,1,0,0%.Ж0,1,0,0,0,0,1,0%28Ж0,1,0,0,0,0,1,0%GBЖ0,1,0,0,0,0,1,0%\LЖ0,1,1,1,1,1,1,0%qVЖ0,1,0,0,0,0,1,0%Ж`Ж0,1,0,0,0,0,1,0%ЫjЖ0,1,0,0,0,0,1,0%░tЖ0,1,0,0,0,0,1,0%┼~Ж0,0,0,0,0,0,0,0%╠ИЖE%сТЖ0,0,0,0,0,0,0,0%ЎЬЖ0,1,1,1,1,1,1,0&жЖ0,1,0,0,0,0,0,0& ░Ж0,1,0,0,0,0,0,0&5║Ж0,1,0,0,0,0,0,0&J─Ж0,1,1,1,1,0,0,0&_╬Ж0,1,0,0,0,0,0,0&t╪Ж0,1,0,0,0,0,0,0&ЙтЖ0,1,0,0,0,0,0,0&ЮьЖ0,1,0,0,0,0,0,0&│ЎЖ0,1,1,1,1,1,1,0&╚Ж0,0,0,0,0,0,0,0&╧
ЖI&фЖ0,0,0,0,0,0,0,0&∙Ж0,0,1,1,1,1,0,0'(Ж0,0,0,1,1,0,0,0'#2Ж0,0,0,1,1,0,0,0'8<Ж0,0,0,1,1,0,0,0'MFЖ0,0,0,1,1,0,0,0'bPЖ0,0,0,1,1,0,0,0'wZЖ0,0,0,1,1,0,0,0'МdЖ0,0,0,1,1,0,0,0'бnЖ0,0,0,1,1,0,0,0'╢xЖ0,0,1,1,1,1,0,0'╦ВЖ0,0,0,0,0,0,0,0'╥МЖT'чЦЖ0,0,0,0,0,0,0,0'№аЖ0,1,1,1,1,1,1,0(кЖ0,0,0,1,1,0,0,0(&┤Ж0,0,0,1,1,0,0,0(;╛Ж0,0,0,1,1,0,0,0(P╚Ж0,0,0,1,1,0,0,0(e╥Ж0,0,0,1,1,0,0,0(z▄Ж0,0,0,1,1,0,0,0(ПцЖ0,0,0,1,1,0,0,0(дЁЖ0,0,0,1,1,0,0,0(╣·Ж0,0,0,1,1,0,0,0(╬Ж0,0,0,0,0,0,0,0(╒ЖM(ъЖ0,0,0,0,0,0,0,0( "Ж0,1,1,0,0,1,1,0),Ж0,1,1,0,0,1,1,0))6Ж0,1,0,1,1,0,1,0)>@Ж0,1,0,1,1,0,1,0)SJЖ0,1,0,0,0,0,1,0)hTЖ0,1,0,0,0,0,1,0)}^Ж0,1,0,0,0,0,1,0)ТhЖ0,1,0,0,0,0,1,0)зrЖ0,1,0,0,0,0,1,0)╝|Ж0,1,0,0,0,0,1,0)╤ЖЖ0,0,0,0,0,0,0,0)╪РЖR)эЪЖ0,0,0,0,0,0,0,0*дЖ0,1,1,1,1,0,0,0*оЖ0,1,0,0,0,1,0,0*,╕Ж0,1,0,0,0,1,0,0*A┬Ж0,1,0,0,0,1,0,0*V╠Ж0,1,0,0,0,1,0,0*k╓Ж0,1,1,1,1,0,0,0*АрЖ0,1,0,0,1,0,0,0*ХъЖ0,1,0,0,0,1,0,0*кЇЖ0,1,0,0,0,1,0,0*┐■Ж0,1,0,0,0,0,1,0*╘Ж0,0,0,0,0,0,0,0*█ЖG*ЁЖ0,0,0,0,0,0,0,0+&Ж0,1,1,1,1,1,1,0+0Ж0,1,0,0,0,0,0,0+/:Ж0,1,0,0,0,0,0,0+DDЖ0,1,0,0,0,0,0,0+YNЖ0,1,0,0,0,0,0,0+nXЖ0,1,0,0,1,1,1,0+ГbЖ0,1,0,0,0,0,1,0+ШlЖ0,1,0,0,0,0,1,0+нvЖ0,1,0,0,0,0,1,0+┬АЖ0,1,1,1,1,1,1,0+╫КЖ0,0,0,0,0,0,0,0+▐ФЖL+єЮЖ0,0,0,0,0,0,0,0,иЖ0,1,0,0,0,0,0,0,▓Ж0,1,0,0,0,0,0,0,2╝Ж0,1,0,0,0,0,0,0,G╞Ж0,1,0,0,0,0,0,0,\╨Ж0,1,0,0,0,0,0,0,q┌Ж0,1,0,0,0,0,0,0,ЖфЖ0,1,0,0,0,0,0,0,ЫюЖ0,1,0,0,0,0,0,0,░°Ж0,1,0,0,0,0,0,0,┼Ж0,1,1,1,1,1,1,0,┌Ж0,0,0,0,0,0,0,0,сЖS,Ў Ж0,0,0,0,0,0,0,0-*Ж0,1,1,1,1,1,1,0- 4Ж0,1,0,0,0,0,0,0-5>Ж0,1,0,0,0,0,0,0-JHЖ0,1,0,0,0,0,0,0-_RЖ0,1,1,1,1,1,1,0-t\Ж0,0,0,0,0,0,1,0-ЙfЖ0,0,0,0,0,0,1,0-ЮpЖ0,0,0,0,0,0,1,0-│zЖ0,0,0,0,0,0,1,0-╚ДЖ0,1,1,1,1,1,1,0-▌ОЖ0,0,0,0,0,0,0,0-фШЖN-∙вЖ0,0,0,0,0,0,0,0.мЖ0,1,1,0,0,0,1,0.#╢Ж0,1,1,0,0,0,1,0.8└Ж0,1,0,1,0,0,1,0.M╩Ж0,1,0,1,0,0,1,0.b╘Ж0,1,0,1,1,0,1,0.w▐Ж0,1,0,1,1,0,1,0.МшЖ0,1,0,0,1,0,1,0.бЄЖ0,1,0,0,1,0,1,0.╢№Ж0,1,0,0,0,1,1,0.╦	Ж0,1,0,0,0,1,1,0.р	Ж0,0,0,0,0,0,0,0.ъ	T$│""/	$K$│ Т:ЕK$│""з23422,EYл11),E1,╜:P│ Г1(P):EX│EXм16:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S6,╜:Бе408┤1┼(EX,EY)м(EXл22,EYл11),E1,╜:P│ Г1(P):EX│EXм7:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S7,╜:Бе408є2SC│SCл(25нAW):XS│SC:АE│142е84йм10:┼(E,8)м(Eл22,19),B1,╜:ЛE983ЕSC┤0зSC│0:АQ│1е6:╞"XSG$(Q);C0;XN$(0);":ЛQ:╞"C5":Е Я▓2500з60:Д379C4АQ│1е69Ш5YS│ Б(XSо10)н10:ZS│XSмYS:XS│YSо10:╞"XSG$(Q);C0":╞N$(ZS):ЛQ:╞"C5":Е Я▓2500з60:Д379ш6Ю6:а1,1:З@106,;"game";:З@111,"over";:З@198,"YOUR SCORE WAS";SC;:АT│1е2000:Л9■7ЕSC┤RT з58:ДRT│SC:Ц8АV│1е6:Ю( Д(8)):а  Д(50)л100,1:ЛV:Ю:З@64,"         GREAT SCORE!":З:З" PLEASE HIT ENTER AND THEN TYPE  IN YOUR FIRST THREE INITIALS.":З@461,"enter";:п9Е Т┤▓ Л(13)з57:ДБж68:ц:Ю3:З@230,"";:З"PLAY AGAIN (Y/N)?";:I$│ Т:ЕI$│""з58;(;ЕI$│"N"зТ65494,0:К::ДSL│3:AW│1:SC│0:EX│240:EY│ Д(125)л25:Бе21;У<АC│1е3:Ю3:АT│1е100:ЛT:З@228,"attack"; Л(175);"wave";AW;"completed";:АT│1е200:ЛT:ЛC:АT│6592е7103:ТT,0:Л;┤=Бж26:SC│SCл(AWнBN):BN│0:╔TU$;╩>AW│AWл1:┐1,1:Бе36<}?╗(EX,EYл5)м(DYл20,EYл5),╜:а150,1:╗(EX,EYл5)м(DYл20,EYл5),╛:ЕEYл5▓DXл3░EYл5┤DXл8зSL│SLм1:АX│1е11:┐0,1:┐1,1:Л:╔VL$:┼(EX,EY)м(EXл21,EYл11),E1,╜:EX│240:Бж65:ЕSL│0з54:ДИSL Бе67,66<Ж@Бе42<иA┼(DY,DX)м(DYл22,DXл10),E1,╜:Р<╤B┼(26,7)м(48,17),E1,╜:АT│1е450:Л:Бе37<∙C┼(3,7)м(25,17),E1,╜:АT│1е450:Л:Бе37='D╞"BM100,100":ЕLT$(1)│""зАT│0е25:НLT$(T):Л=<E┐1,1:DQ$│"":Бе83=rFЖ BD1D6U4NR5U2E1R3F1D6,ND7R4F1D1G1NL4F1D2G1NL4BR1=кGЖ BD1D5F1R3E1U1BU3U1H1L3G1BDGBR5,D7R4E1U5H1L4BD7BR5=╦HЖ NR5D3NR4D4R5,NR5D3NR4D4BR5= IЖ BD1D5F1R3E1U2NL2BU2U1H1L3G1BDGBR5,D7U4R5NU3D4>$JЖ R4L2D7L2R4BR1,BD5D1F1R3E1U6BD7>AKЖ D7U4R3E2NU1G2F2D2,D7R5>bLЖ ND7F2ND1E2D7BR1,ND7F4NU4D3>ЦMЖ BD1D5F1R3E1U5H1L3G1BDGBR5,ND7R4F1D2G1L4BD3BR5>╩NЖ BD1D5F1R3E1U5H1L3G1D4BR3F2,ND7R4F1D1G1NL4F1D3>·OЖ BD1D1F1R3F1D2G1L3H1BU5E1R3F1BD6,R4L2D7BR3?PЖ D6F1R3EU6BD7,D5F2E2U5BD7BR1?DQЖ D7E2F2U7BD7BR1,D1F5D1BL5U1E5U1BD7?gRЖ D2F2ND3E2U2BD7BR1,R5D1G5D1R5?ЗSYM│1:─(102,6)м(152,18),FI,G?ЫTA$│ Т:ЕA$│""з84?┐UЕA$┤"A"▒A$▓"Z"з84:ДKN│ К(A$)м65@V╞"S4;XSQ$(YM);XLT$(KN);":LT(YM)│KN:YM│YMл1:ЕYM│4зАT│1е1000:Л:Р@WБе84@ЭXP│ Г1(P):ЕDXл6▓EYм2░DXл6┤EYл10░EX┤DYл15░EX▓DYм10  з SL│SLм1:┐0,1:З:┐1,1:╔VL$:┼(EX,EY)м(EXл21,EYл11),E1,╜:EX│240:Бж65:Е SL│0з 54 :ДИSL Бе67,66@гYР"▒A$▓"Z"з84:ДKN│ К(A$)м65@V╞"S4;XSQ$(YM);XLT$(KN);":LT(YM)│KN:YM│YMл1:ЕYM│4зАT│1е1000: b':ГCOPYRIGHT (C) T&D SOFTWARE 1983A
В  COCO-CONCENTRATIONP╚0:Бе60000\(Ю:Х2500З2МC$(16),A(32),L$(10,12,2),D(4),WD$(42)╡<Зд7); б(18,175):Зд7);"COCO-CONCENTRATION"╔FЗд7); б(18,191)ХPЗ:З"   THIS TWO-PLAYER GAME WILL    TEST YOUR MEMORY AND CREATIVITY.":З"   IN THIS GAME, YOU ARE FACED  WITH A BOARD CONTAINING 32 NUM- BERED BOXES. BEHIND EVERY BOX IS1 OF 16 DIFFERENT SHAPES. YOU "ZЗ"MUST MATCH THE PAIRS OF SHAPES  BECAUSE BEHIND THE SHAPES IS    HIDDEN A PART OF A LETTER OF A  SCRAMBLED FOUR-LETTER WORD."#dБж2560 nЮ:З"   WHEN THE SHAPES ARE MATCHED, TWO THINGS WILL HAPPEN:           1) THE HIDDEN PARTS OF LETTERSWILL BECOME VISIBLE":Бж2560:Ю:З"  2) YOU WILL RECEIVE ONE MORE  POINT ON YOUR 'TEMPORARY SCORE',HOWEVER YOU CANNOT"╝xЗ"COLLECT THE POINTS IN YOUR TEMP-ORARY SCORE UNTIL YOU CORRECTLY GUESS THE FOUR-LETTER WORD. IF  YOU GUESS INCORRECTLY, YOU LOSE YOUR TEMPORARY SCORE. IF YOU    GUESS CORRECTLY, YOUR"·ВЗ"TEMPORARY SCORE WILL BE ADDED TOYOUR CUMULATIVE SCORE."МБж 2560:ЮмЦЗ"IF YOUR CUMULATIVE SCORE IS 20  OR MORE, THEN YOU WIN, OTHERWISEA NEW BOARD WILL BE STARTED.    YOUR CUMULATIVE POINTS WILL BE  CARRIED FROM BOARD TO BOARD."fаЗ:З"YOUR SCORES ARE DISPLAYED AT THEBOTTOM OF THE SCREEN. THE SCORE TO THE LEFT OF THE SLASH IS YOURCUMULATIVE SCORE. THE SCORE TO  THE RIGHT OF THE SLASH IS YOUR  TEMPORARY SCORE."rкБж 2560x┤Ю▓╛Й"PLAYER ONE'S NAME";N$(1):Й"PLAYER TWO'S NAME";N$(2)╨╚Ю:З@8,"INITIALIZING ...";ф╥CS(1)│0:CS(2)│0■▄S(1)│0:S(2)│0:АI│1е163цK$│ Л( Д(112)л127):Е К(K$)о16│ Б( К(K$)о16) з230@ЁЕI│1з270a·F│0:АJ│1е Iм1:ЕC$(J)│K$ зF│1q
Л:ЕF│1 з230~
C$(I)│K$Д
ЛР
"АI│1е16Ы
,АJ│1е2╡
6R│ Д(32):ЕA(R)┤▓0з310─
@A(R)│I:Л:Л▄
JП:АI│1е42:НWD$(I):Лщ
TR│ Д(42)■
^W$│WD$(R):WT$│W$T
hАI│1е10:R1│ Д(4):R2│ Д(4):T$│ Р(W$,R1,1): Р(W$,R1,1)│ Р(W$,R2,1): Р(W$,R2,1)│T$:Л╨
rАJ│1е10:НL$(J,0,0):АI│1е12:АK│1е2:НC1,C2,C3,C4:L$(J,I,K)│ Л(C1н63л128)л Л(C2н63л128)л Л(C3н63л128)л Л(C4н63л128):ЛK,I,J
|АI│1е4:T$│ Р(W$,I,1):АJ│1е10:ЕL$(J,0,0)│T$зD(I)│J:J│11
ЖЛ:Л9
РЗ@0,"";:Зд7)"COCO-CONCENTRATION";M
ЪАI│1е32:Бж780:ЛW
дБж860i
оАML│1е2:Бж860Ь
╕P$│N$(ML)л"'S TURN":Бж890:З@448л(MLм1)н16,"*";н
┬АTD│1е1000:Л╖
╠Бе520╓
╓K$│ Т:ЕK$┤▓"Y"░K$┤▓"N"з470ц
рЕK$│"N"з520°
ъЕT$│WT$ з2520w
ЇP$ д&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&М
Х 50,16280:╚4,1:╝:┐1,1:TU$│"V30;O1;T255;1;V-;2;V-;1;V-;1;V-;2;V-;1;1;2;V-;2;1;1;V-;1;V-;1;2;2;1"'M╞"BM3,120;S36;C5D7R4E1U5H1L4BD7BR5":╞"BM28,50;S36NR5D3NR4D4R5":╞"BM77,5;S36;NR5D3NR4D4BR5":╞"BM132,5;S36;NR5D3NR4D4R5":╞"BM183,50;S36;D1ND6E1R3F1D6":╞"BM208,120;S36;D7R4E1U5H1L4BD7BR5":Бе4'ьSG$(1)│"BM145,8":SG$(2)│"BM137,8":SG$(3)│"BM129,8":SG$(4)│"BM121,8":SG$(5)│"BM113,8":SG$(6)│"BM105,8":SW$(1)│"BM231,8":SW$(2)│"BM221,8":SW$(3)│"BM211,8":Р(:╣ Г0│16281:╣ Г1│16300:АX│16281 е 16291:НY:ТX,Y:Л:АT│16300е16352:НZ:ТT,Z:Л)!Ж 173,159,160,10,79,246,01,93,126,180,244,16,142,25,223,16,191,63,226,142,25,192,198,1,166,132,183,63,225,58,166,132,167,31,188,63,226,38,246,182,63,225,167,132,30,18,198,32,58,198,1,30,18,16,191,63,226,58,140,27,192,38,217,57)ЦSC│0:AW│1:EX│240:EY│30л Д(70):SL│3:М S1(6):М E1(6):М B1(6):SM$(1)│"BM75,180":SM$(2)│"BM85,180":SM$(3)│"BM95,180"*М FI(16):М LT$(25):М S2(6):М S3(6):М S4(6):М S5(6):М S6(6):М S7(6):SP$│"V30;T10;L100;O1;1;2;3;4;5;6;7;8;L1;9"*ИSH$│"T255L255;V30;O3;7;3;1;O2;V20;9;5;3;1;O1;V10;7;3;1":VL$│"V31;T5;L255;O1;D;V-;E;F;V<;P15;G;V<;P15;F;E;P15;V-;D;V<;P15;C"+h	N$(1)│"S4BR2D8":N$(2)│"S6R3D3L3D3R3":N$(3)│"S6R3D3L3R3D3L3":N$(4)│"S1D16R20L7U16D34":N$(5)│"S6BR3L3D3R3D3L3":N$(6)│"S3D11R6U6L6":N$(7)│"S1R19D33":N$(8)│"S2R8L8D17R8U8L8R8U8":N$(9)│"S4R4D4L4U4D4R4D4":N$(0)│"S2R9D16L9U16"+┬
╚4:Бж3:SH$(1)│"S4R6;D4;R5;U2;D2;R2;D2;R6;L3;U2;D4;U2;L4;D2;L7;U4;R1;L2;G2;L2;R2;F2;R1,i╞"BM1,96":╞SH$(1):─(1,96)м(23,106),S1,G:SH$(2)│"S4;F3;R1;R1;E3;G3;D1;R3;L3;D1;F3;H3;L1;L1;G3;E3;U1;L3;R3;U1":SQ$(1)│"BM110,90":SQ$(2)│"BM120,90":SQ$(3)│"BM130,90",╠╞"BM121,100":╞SH$(2):─(121,99)м(142,110),S2,G:SH$(3)│"S3;D10;R10;U10;L10;R5;U3;R10;D10;L10;U6"-H
╞"BM85,100":╞SH$(3):─(85,98)м(106,109),S3,G:SH$(4)│"S4;R3;U2;D4;U2;R3;E1;R5;U3;D1;H2;F2;E2;G2;D2;R5;F1;D1;G1;L10;H1;U1"-z╞"BM150,105":╞SH$(4):─(150,98)м(171,109),S4,G-├SH$(5)│"S3;D6;U3;R5;D2;R4;D3;G2;E2;U3;R3;U2;R5;U3;D6;U3;L5;U2;L7;D2"-Ї╞"BM85,135":╞SH$(5):─(85,132)м(106,143),S5,G.SH$(6)│"S3;G4;L5;U6;R5;F4".F╞"BM129,136":╞SH$(6):─(121,131)м(142,142),S6,G.МSH$(7)│"S4;R1;U3;D3;R1;D1;F3;H3;D1;F3;H3;L1;L1;G3;E3;U1;G3;E3;U1".┐╞"BM160,135":╞SH$(7):─(155,131)м(176,142),S7,G/АX│1е100:╚3:┐1,0:╚4:┐1,1:Л:Ю3:З@172,"defend";:З@206,"by";:З@237,"tony";:З@268,"naseef";:╝/ЯЗ@32, Л(175);"use"; Л(144);"left"; Л(144);"joystick"; Л(144);"for"; Л(144);"movement"; Л(175); Л(175);"and"; Л(144);"firing";0`З@352,"joystick"; Л(144);"position"; Л(144);"corresponds"; Л(144);"to"; Л(144); Л(144); Л(144);"position"; Л(144);"of"; Л(144);"ship"; Л(144);"on"; Л(144);"screen"; Л(144); Л(144); Л(144);0╜З@449,"can";:З@453,"computer";:З@462,"handle";:З@469,"high";:З@474,"speed";:З@494,"y/n";1	АYM│1е3:╞"S4;XSM$(YM);XLT$(LT(YM));":ЛYM:┼(108,177)м(158,189),FI,╜:Бе3114A│ Д(40):B│158л Д(15):╗(0,168)м(A,B),╜1]A│Aл4л Д(40):ЕA▓254зA│255:B│168:Бе291nB│158л Д(15)1Ж╗ м(A,B),╜:ЕA│255зР1РБе 272AE(1)│26:AE(2)│3:Бж26:╗(0,20)м(255,20),╜:╗(50,0)м(50,20),╜:╗(200,0)м(200,19),╜:├(55,0),5:─(50,0)м(72,11),B1,G:╗(0,0)м(255,20),╛,B2Л АE│142е84йм10:┼(E,8)м(Eл22,19),B1,╜:ЛE:АT│1е6:╞"C0;XSG$(T);XN$(0);C5":Л:┼(3,7)м(25,17),S1,╜:┼(26,7)м(48,17),S1,╜2╥!┐0,1:АPA│1е5:ЛPA:┐0,0:АPA│1е5:ЛPA:IK$│ Т:Е IK$┤▓"Y" ░ IK$┤▓"N"з 332Ў"Ю:┐1,1:╔TU$:ЕIK$│"Y"з Т 65495,03#─(1,30)м(22,41),E1,G3Ъ$ Я│0:XW│AW:АE│231е211йм10:┼(E,8)м(Eл22,19),E1,╜:ЛE:АQ│1е3:YW│ Б(XWо10)н10:ZW│XWмYW:XW│YWо10:╞"XSW$(Q);":╞N$(ZW):ЛQ:АX│1е32:P│ Г1(P):ЛX3ж%R│ Д(6)3░&DX│964Z'P│ Г1(P):P│ Г(0):P2│ Ж(&H15C):┼(DY,DX)м(DYл22,DXл11),E1,╜:P│ Г1(P):DX│Pн2л20:DY│P2л4:┼(DY,DX)м(DYл22,DXл11),S1,╜:P│ Г1(P):Е Д(50)┤AWлBNлR ░ EX┤225 ░EX▓DY зБе63:ДБе424є(P│ Г1(P):ЕDY┤EX ░ Ж(65280)│125 ▒ DY┤EX ░ Ж(65280)│253з╗(DYл22,DXл6)м(EXл8,DXл6),╜:╔SH$:P│ Г1(P):SC│SCмAW:╗(DYл22,DXл6)м(EXл8,DXл6),╛:P│ Г1(0)::ДБе395У)P│ Г1(P):ЕDXл6▓EYл1░DXл6┤EYл9з :АT│1е11:┐0,1:┐1,1:Л:╔VL$:P│ Г1(P):┼(EX,EY)м(EXл22,EYл11),E1,╜:EX│240:EY│ Д(125)л25:┼(DY,DX)м(DYл22,DXл11),E1,╜:BN│BNл1:Бе506;*Бж88:ЕEX┤10з┼(EX,EY)м(EXл22,EYл11),E1,╜:SC│SCм(27нAW):EX│240:Бж65:╔SP$:Бе50::ДЕEY▓140з┼(EX,EY)м(EXл22,EYл11),E1,╜:EY│140::ДЕEY┤31з┼(EX,EY)м(EXл22,EYл11),E1,╜:EY│316`+P│ Г1(P):И R Бе44,45,46,47,48,496├,┼(EX,EY)м(EXл22,EYл11),E1,╜:P│ Г1(P):EX│EXм9:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S2,╜:Бе407'-┼(EX,EY)м(EXл22,EYл11),E1,╜:P│ Г1(P):EX│EXм15:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S3,╜:Бе407К.┼(EX,EY)м(EXл22,EYл11),E1,╜:P│ Г1(P):EX│EXм8:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S4,╜:Бе407э/┼(EX,EY)м(EXл22,EYл11),E1,╜:P│ Г1(P):EX│EXм6:EY│EYл(6м Д(12)):┼(EX,EY)м(EXл21,EYл11),S5,╜:Бе408Q0┼(EX,EY)м(EXл Ж&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&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)n
ЖK│POн32л8:Т529,&H80:A│ Г0(K):Т529,&H8B)Г
РE│(P1м1)н10лPOм3)ю
ЪЕ Ж(341)│T ░ PO│4 ░ P1▓1 з P1│P1м1:PO│13:A│ Г0(K):Бе310 :Д Е  Ж(341)│T ░ PO▓4 з A│ Г0(K):PO│POм1:Бе390*d
дЕ  Ж(342)│T ░ PO┤13 ░ E┤Yм1 з A│ Г0(K):PO│POл1:Бе390 :Д Е  Ж(342)│T ░ P1┤P2 ░ PO│13 з P1│P1л1:PO│4:A│ Г0(K):Бе310*z
оЕ  Ж(338)│191з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+0
ъБе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") з Т 359,126:╙MT$:в                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 b&'
:ГCOPYRIGHT (C) T&D SOFTWARE 1983&9╚3:┐1,1:╝:Х35&▄╞"BM5,40C2R235F2R1F2D135BF10U135H10D135L30ND2U1H1U3H1U3H1U3H1U3H1U3H1U3H1U3H1L169G1D3G1D3G1D3G1D3G1D3G1D3G1D3G1D3NR185U2L30U135E2R1E2BR8BD8R219F5D93L229U93E5"'^(╞"BM0,180F10R30NH4F2R185H2NR30H2BH6L185BR6BD2NR32F6R32H6BR18BD1NR4F4R4H4BR18BU1NR32F6R32H6BR19BD1NR4F4R4H4BU1BR18NR32F6R32H6"'┘2├(248,55),2,2:╞"BM35,182C5NF8BR182NF8":╞"BM52,168C2E3R3F3D3G3L3H3U3BR128E3R3F3D3G3L3H3U3":├(54,168),2,2:├(182,168),2,2(К<╞"C3":X│20:Y│32:Бж 390:A$│"T AND D SOFTWARE":X│50:Y│20:Бж420:X│220:Y│32:Бж390:X│50:Y│30:A$│"HOLLAND MICHIGAN":Бж420:X│14:A$│"REPRODUCTION OF ANY OF THE":Y│Yл32:╞"C4":Бж 420(╛FA$│"FOLLOWING IS PROHIBITED.":Y│Yл10:X│22:Бж420(ЇPA$│"T AND D SOFTWARE SHALL HAVE":X│6:Y│Yл18:Бж420)+ZA$│"NO LIABILITY OR RESPONSIBIL-":Y│Yл10:X│6:Бж420)bdA$│"ITY TO CUSTOMER WITH RESPECT":Y│Yл10:X│6:Бж420)╔nA$│"TO ERROR, LOSS, OR DAMAGES":Y│Yл10:X│14:Бж420:A$│"CAUSED BY THESE PROGRAMS.":Y│Yл10:X│14:Бж420*]xA$│"COCO CASSETTE NO.":X│46:Y│158:╞"C3":Бж420:╞"BM+10,+1;U4R4D4L4U2R4":A$│"FEBRUARY":X│70:Y│Yл10:Бж420:╞"BM+10,+4;U4R4D2NL2D2NL4BR4R4U2NL4U2L4"*pВАPA│1е1500:ЛPA*еМП:┴4,2:╝:┐1,0:АY│1е79:НX:╜(128мX,Y):╜(127лX,Y):Л+ЦЖ42,43,44,45,46,47,48,49,49,50,51,52,52,52,52,52,52,52,52,51,51,50,50,49,49,48,48,47,47,46,46,45,45,44,44+@аЖ 43,42,41,40,39,38,37,36,35,34,33,32,31+ЩкЖ 30,29,28,27,26,25,24,23,22,21,20,19,18,17,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0+╛┤АX│24е40:╜(128мX,0):╜(127лX,0):Л+х╛АY│1е25:НX:╜(128мX,Y):╜(127лX,Y):Л,-╚Ж 22,21,20,19,18,18,17,17,16,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,=╥├(128,60),4,▌▄╞"S4":A$│"T AND D":B│4:X│76:╞"C4":Y│90:Бж430:A$│"SOFTWARE":X│72:Y│110:Бж430:B│0:A$│"PRESENTS":X│94:Y│130:Бж420:A$│"THE TRUE VALENTINE":B│4:X│13:Y│150:Бж430,ЄцА PA│1е 1500:ЛPA,¤ЁБе 830-!·╞"S4":Бж260:АPA│1е500:ЛPA:Бе280-Л
╝:╞"C2":╗(0,156)м(256,156),╜:├(50,172),2:╞"BM207,155C4U60L28H11R8L8E4F15H15R52D15L16R4D12L4R4D48L4C2"-╧
Y│155:АX│196е248й16:╗(X,Y)м(Xм3,Yм4),╜:╗(X,Y)м(Xл3,Yм4),╜:Л X:Р-╒
В.2
"C│1:Y│154:АX│20 е 90 й 10:╞"C3":Бж310:╔"T250O1C":АPA│1е200:ЛPA:ЕX▓60з300:Д╞"C5":Бж310:ЛX.m
,АPA│1е1000:ЛPA:╞"C4BM188,96D18L8U18":А PA│1е1000:ЛPA:Р.А
6╗(X,Y)м(X,Y),╛.ч
@╞"BM+0,+0;R16E3R1F3R12U20D20R30E2U2H2L4H4U5D5F4L4G2L12H2L6U1L8H1L10H1L7H1L7G2D3F2D2BU12BR4NG4E3U8"/<
J╞"BM+0,+0H1L5H1L5R5                                                                                                                                                                                                                                                                                    ╚╟├╔╞"#╟%&┬╟)*+,├.╟0╚                   ND  BASз3-D MAZEBAS$╧COCOCONCBASAUTOLINEBAS'вMLT 3-A BAS(гMLT 3-B BAStDIR     BAS ЙCOVER8  BAS!eDEFEND  BASз3-D MAZEBAS$╧COCOCONCBASeAUTOLINEBAS'вMLT 3-A BAS(гMLT 3-B BAStNUCPLANTBAS╧DUAL    BAS-^BRICKS  BAS/;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R40U2L45BU2R45"/╙
T╞"BM+0,+0;H20L48G2F20BR3BU2H16R41F16BL13BU21H1L4H1L4H1L4U32L72D20E1R3E1R3BL6BG2L3G1L3G1L3G1L1G1L1G2L1G3D2F7R30U1H3U1E3U1L22U1E1R3BR24U24R30D24L30"0_
^╞"BM+0,+0;E3U18H3F3R24E3G3D18F3H3L24BR5BU8U8R4D8L4BR2BU2R1BR8U6R4D8L4U2BR2R1BD6BL3L6BR21BD9R7BU3L7BU3R7BU3L7BU5U12R8D12L8BU3BR2R3BU4L3"1
h╞"BM-65,+35;R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1R5F1H5L5H1L5H1U6D6L5H1U5D5L5H1U4D4L5H1U3D3L5H1L5H1L5H1L3G1D2F1R1G2D1F2BR32BU12H2U2E2R5G2D2F2L5R12E1H1L4R4E1R1U1H1L4R4"1x
r╞"BM+0,+0;L9U2R4F2D1G2BR20BD10R2BR4R2BR4R2BR4R2BR4R2BR4R2BD4L2BL4L2BL4L2BL4L2BL4L2BD4R2BR4R2BR4R11BR4R2BR4R2"1~
|Р2
Ж╗(X,Y)м(X,Y),╛:╞"BM+0,+0;R3U2R5D2L5R7U6L10D6BU6BR3U1L2H2U1R3L7H2U1R4L9H2U1R22D3G3D2R2E3R2E2R2U3H7U1L2G1D2F2H2L2G1D2F2H2L2G1BD17BL6BU5":Р2>
Р╗(X,Y)м(X,Y),╛:╞"BM+0,+0R3U2R5D2L5R7U6L10D6":Р2K
ЪX│0:Y│422U
д╞"S2"2Д
оА P│1 е  З(A$):I$│ Р(A$,P,1):I│ К(I$)м64  2╡
╕X│Xл8лB:Е X▓(252м(Bн1.5)) з X│8:Y│Yл10л(Bо2)2╚
┬Е I│м19 з I│282█
╠Е I│м18 з I│292ю
╓Е I│м20 з I│302 
рЕ I┤0 з I│273С
ъ╗(X,Y)м(X,Y),╛:И I Бж 530,540,550,560,570,580,590,600,610,620,630,640,650,660,670,680,690,700,710,720,730,740,750,760,770,780,790,800,810,8203и
ЇЕ S│0 з ╔"T250O1C"3╕
■Л P:╞"S4":Р3├Бе 5203ч╞"BM+0,+0;BR4ND4NF4G4D4BR8U4":Р4╞"BM+0,+0;ND8R8D4NL8D4L8":Р4 &╞"BM+0,+0;NR8D8R8":Р4?0╞"BM+0,+0;ND8R6F2D4G2L6":Р4]:╞"BM+0,+0;NR8D4NR6D4R8":Р4yD╞"BM+0,+0;NR8D4NR6D4":Р4ЦN╞"BM+0,+0;NR8D8R8U4L1":Р4│X╞"BM+0,+0;D4ND4R8U4D8":Р4╟b╞"BM+4,+0;D8":Р4тl╞"BM+0,+0;BR6D8L4U2":Р5v╞"BM+0,+0;D8U4R4NE4NF4":Р5А╞"BM+0,+0;D8R8":Р::ГL58К╞"BM+0,+0;ND8R4ND3R4D8":Р5QФ╞"BM+0,+0;ND8R8D8":Р5kЮ╞"BM+0,+0;D8R8U8L8":Р5Жи╞"BM+0,+0;ND8R8D4L8":Р5к▓╞"BM+0,+0;R8D8NH3NF2L8U8":Р::ГQ5╦╝╞"BM+0,+0;R8D4L4NF4L4D4U8":Р5ш╞╞"BM+0,+0;NR8D4R8D4L8":Р6
╨╞"BM+0,+0;R4ND8R4":Р6┌╞"BM+0,+0;D8R8U8":Р63ф╞"BM+0,+0;D4F4E4U4":Р6Pю╞"BM+0,+0;D8R4NU3R4U8":Р6i°╞"BM+0,+0;F8BL8E8":Р6В╞"BM+0,+0;F4ND4E4":Р6Ъ╞"BM+0,+0;R8G8R8":Р6иР::ГSPACE6└ ╞"BM+1,+4;R6":Р::Г-6┌*╞"BM+2,+6;D2R2U2L2":Р6Ў4╞"BM+2,+6D2R2ND2U2L2":Р7>┴3,1:╝:┐1,1:B│0:Бж26078H╞"C2BM192,94R15U9L16D9":├(193,92),27BRБж2807y\A$│"I RECEIVED SOME VALENTINES ...":X│0:Y│10:Бж4207КfАPA│0е1500:Л7Рp╝7лzX│96:Y│171:╞"C3":Бж3107щД╞"C4":A$│"I THINK I WILL GO FOR A WALK ..":X│0:Y│10:Бж4207·ОАPA│0е1500:Л8Ш╝8вX│40:Y│80:Бж11908*мX│60:Y│85:Бж11908b╢X│73:Y│92:Бж1190:X│90:Y│97:Бж1190:X│107:Y│88:Бж11908К└X│174:Y│90:Бж1190:X│191:Y│87:Бж11908б╩X│160:Y│110:Бж11909^╘Y│185:АX│20е150й8:╞"C3":Бж310:╔"T250O5C":ЕX│76  з TX│X:TY│Y:A$│"LISTEN TO THE BIRDS ...":X│20:Y│10:Бж420:АN│1е5:╔"V5T10O5L2CO5L8EP7EP7EP7EP7EP7EP7EP7EV15":АTD│1е Д(30)л30:Л:Л:X│TX:Y│TY9{▐АTD│0е90:Л:╞"C1":Бж310:Л9бш╝:┬(255,160),80,2,.7:├(250,160),29╟ЄX│30:Y│90:Бж1190:X│52:Y│94:Бж1190:№Y│185:АX│20е60й8:╞"C3":Бж310:╔"T250O5C":АTD│1е90:Л:╞"C1":Бж310:Л:'X│68:Y│185:╞"C3":Бж310:ЖA$│"THERE IS THE LAKE ...":X│20:Y│10:Бж420:A$│"SHOULD I TAKE A SWIM ...":Y│Yл10:X│20:Бж420:ЧАPA│0е1500:Л:Э$╝:т.Y│185:АX│20е68й8:╞"C3":Бж310:╔"T250O5C":АTD│0е90:Л:╞"C1":Бж310:Л:¤8X│76:Y│185:╞"C3":Бж310;B╔"T250O5C";PLY│30:АX│20е92й4:╞"C4":Бж390:╔"T250O2C":АTD│0е10:Л:╞"C1":Бж390:Л;vV╞"C4":X│100:Y│30:Бж390:╔"T250O2C";╗`X│100:АY│40е60й2:╞"C4":Бж400:╔"T255O1C":АTD│0е10:Л:╞"C1":Бж400:Л;фj╔"T255L255O5DCEFO4DEO2DEO1DFEO3EDFC"<StX│100:АY│60е140й2:╞"C4":Бж1220:╔"T255L255O5CO4C":TX│X:TY│Y:X│76:Y│185:╞"C3":Бж310:Y│TY:X│TX:╞"C1":Бж1230:Л<Щ~X│100:Y│140:Бж1230:X│76:Y│185:╞"C3":Бж310:X│100:Y│140:╞"C4":Бж400<▀ИY│30:АX│100е240й4:╞"C4":Бж390:╔"T250O2C":АTD│0е10:Л:╞"C1":Бж390:Л=Т╞"C4":A$│"AT LAST, MY TRUE VALENTINE.":X│10:Y│10:Бж420=0ЬАPA│0е4500:Л:Бе20=Cж╗(X,Y)м(X,Y),╛=Ц░╞"C2BM+0,+0;E5R4ND3R2NF4U30D2NE19D28L1NU30L1NU30L1U30NH9R1NU3R1U5NH13D5E8G3F2"=Ь║Р=·─Бж400:╞"BM+5,-8C2NH10R2E10C4U1L1U1L1U1L1U1L1U1L14D1L1D1L1D1L1D1L1D1L1R20":├(Xл5,Yм20),4:Р>a╬Бж400:╞"BM+5,-8C1NH10R2E10U1L1U1L1U1L1U1L1U1L14D1L1D1L1D1L1D1L1D1L1R20U1L20U1R20U1L20U1R20U1L20":Р2NE19D28L1NU30L1NU30L1U30NH9R1NU3R1U5NH13D5E8G3F2"=Ь║Р=·─Бж400:╞"BM+5,-8C2NH10R2E10C4U1L1U1L1U1L1U1L1U1L14D1L1D1L1D1L1D1L1D1L1R20":├(Xл5,Yм20),4:Р>a╬                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╠&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&3
╚1,1:└2&BЮ:Х10:┴2,3&kМ M(31,31):C$│"^"л Л(9)л Л(10)л Л(8)&Ч(Ю:Зд11);"SUPER-MAZE":Зд11);"----- ----"'02З:З"  THIS GAME WILL PUT YOU IN A 3 DIMENSIONAL MAZE, WHICH YOU MUSTFIND YOUR WAY OUT OF. YOU WILL  ACTUALLY SEE THE MAZE AS THOUGH YOU WERE IN IT."'╤<З"   USE THE ARROW KEYS TO MOVE:   UP ARROW ..... MOVE FORWARD     RIGHT ARROW .. TURN RIGHT       DOWN ARROW ... TURN 180 DEGREES LEFT ARROW ... TURN LEFT"'№FЗ:Зд8)"INITIALIZING ...":АTD│1е300:Л:╝(V╥АI│0е31:M(I,0)│1:M(I,1)│1:M(I,30)│1:M(I,31)│1:M(0,I)│1:M(1,I)│1:M(30,I)│1:M(31,I)│1:Л(v▄АI│2е29:АJ│2е29:НM(I,J):Л:Л(ЪцFX│2:FY│2:PX│29:PY│29:D│1:┐ 1,0(╡·И D Бе 260,270,280,290)
L│M(PY,PXм1):R│M(PY,PXл1):U│M(PYм1,PX):UL│M(PYм1,PXм1):UR│M(PYм1,PXл1):AU│M(PYм2,PX):Бе300)s
L│M(PYм1,PX):R│M(PYл1,PX):U│M(PY,PXл1):UL│M(PYм1,PXл1):UR│M(PYл1,PXл1):AU│M(PY,PXл2):Бе300)╥
L│M(PY,PXм1):R│M(PY,PXл1):U│M(PYл1,PX):UL│M(PYл1,PXл1):UR│M(PYл1,PXм1):AU│M(PYл2,PX):Бе300*+
"L│M(PYл1,PX):R│M(PYм1,PX):U│M(PY,PXм1):UL│M(PYл1,PXм1):UR│M(PYм1,PXм1):AU│M(PY,PXм2)*F
,ЕUL│1░UR│1░U┤▓1 з10000*b
6ЕUL┤▓1░UR│1░U┤▓1 з11000*~
@ЕUL│1░UR┤▓1░U┤▓1 з12000*Н
JЕU│1з13000*к
TЕUL┤▓1░UR┤▓1░U┤▓1 з14000*╢
^АC│1е10*ф
hK$│ Т:ЕK$│""з370:ДP│ Ю(C$,K$):ЕP┤▓0зC│100*Ї
rЛ:ЕC┤20з350+
|И P Бе 450,430,410,390+$
ЖD│Dм1:ЕD┤1зD│Dл4+.
РБе250+C
ЪD│Dл2:ЕD▓4зD│Dм4+M
дБе250+b
оD│Dл1:ЕD▓4зD│Dм4+l
╕Бе250+З
┬И D Бе 460,470,480,490+Ю
╠U│M(PYм1,PX):Бе500+╡
╓U│M(PY,PXл1):Бе500+╠
рU│M(PYл1,PX):Бе500+▌
ъU│M(PY,PXм1)+ь
ЇЕU┤▓1 з520,1
■╝3:АI│1е10:АTD│1е10:Л:┐1,1:а200,1:АTD│1е10:Л:┐1,0:а100,1:Л:Бе250,LИ D Бе 530,540,550,560,^PY│PYм1:Бе570,pPX│PXл1:Бе570,В&PY│PYл1:Бе570,О0PX│PXм1,й:ЕPX┤▓FX ▒ PY┤▓FY з 250,╔ДЮ:З@263,"YOU MADE IT !!!!";-ОАI│1е20:АTD│1е10:Л:┐ 0,1:а150,1:АTD│1е10:Л:┐0,0:а50,1:Л-&╢З@357,"ANOTHER GAME? (Y/N)";-H└K$│ Т:ЕK$┤▓"Y" ░ K$┤▓"N" з960-W╩ЕK$│"Y"з20-]▐К-Ъ#(Ж0,1,1,1,0,1,1,1,1,1,0,1,0,0,0,0,1,0,0,0,1,0,0,1,0,0,0,0-╫#-Ж0,1,1,1,0,0,0,0,0,0,0,1,0,1,0,0,1,0,1,0,1,1,0,1,1,1,1,0.#2Ж0,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,1,0,1,0,0,0,0,0,1,1,0,0.Q#7Ж0,0,0,0,1,1,0,1,0,1,0,0,0,1,0,0,0,0,1,0,1,1,1,0,1,1,0,1.О#<Ж1,1,1,0,1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,0,1.╦#AЖ0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,1,1,1,0,1/#FЖ0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,0,1,0,0,0/E#KЖ0,0,0,0,0,0,0,1,0,0,0,0,0,1,1,1,1,0,1,0,1,1,1,0,1,1,1,0/В#PЖ0,1,1,1,1,1,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0/┐#UЖ0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1/№#ZЖ0,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,1,0,1,0,1,0,1,1,0,0,009#_Ж0,1,1,0,0,0,1,0,0,0,0,1,1,1,1,1,0,1,0,0,0,1,0,1,1,0,1,00v#dЖ0,0,0,0,1,0,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,1,0,1,0,1,0,00│#iЖ1,1,1,1,1,0,1,0,0,0,0,0,0,1,0,1,0,1,1,1,0,1,1,1,1,1,0,10Ё#nЖ0,1,0,0,1,0,1,0,1,1,0,1,1,1,0,1,1,1,0,1,0,0,1,0,0,0,0,11-#sЖ0,0,0,1,1,0,1,0,0,1,0,1,0,0,0,0,0,0,0,1,1,0,1,1,1,1,0,11j#xЖ0,1,0,0,1,0,1,1,0,1,1,1,0,1,1,1,1,0,1,0,0,0,1,0,1,1,0,11з#}Ж1,1,1,0,1,0,0,0,0,1,0,1,0,0,0,0,1,0,1,1,0,1,1,0,0,0,0,11ф#ВЖ0,0,1,0,1,1,1,1,1,1,0,1,1,1,0,1,1,0,1,0,0,0,1,0,1,1,1,12!#ЗЖ1,0,0,0,0,0,0,0,0,0,0,1,0,1,1,1,0,0,1,1,1,0,1,0,0,0,0,02^#МЖ1,0,1,1,1,1,1,1,1,1,0,1,1,1,0,1,1,0,1,0,0,0,1,0,1,1,1,12Ы#СЖ1,0,1,0,0,0,1,0,1,1,0,1,1,1,1,1,0,0,1,0,1,1,1,0,0,0,0,02╪#ЦЖ1,0,1,0,1,0,1,0,1,0,0,0,0,0,0,0,0,1,0,0,0,0,1,1,1,1,1,03#ЫЖ1,0,0,0,1,0,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,03R#аЖ1,1,1,1,1,0,0,0,1,0,1,1,0,1,0,1,0,0,0,0,0,0,1,0,0,0,1,13П#еЖ0,1,0,1,1,1,0,1,1,1,1,0,0,0,0,1,0,1,1,1,0,1,1,0,1,0,0,03╠#кЖ0,0,0,0,0,0,0,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,1,0,1,1,1,04	#пЖ0,1,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,1,0,0,0,1,04)'╝:X1│85:X2│170:Y1│64:Y2│1284V'╗(0,0)м(X1,Y1),╜:╗м(X1,Y2),╜:╗м(0,191),╜4{'$╗(X1,Y2)м(X2,Y2),╜:╗м(255,191),╜4Ю'.╗(X2,Y2)м(X2,Y1),╜:╗м(255,0),╜4╥'8├(X1м10,Y1),4,2:├(X2л10,Y1),4,2:├(X1,Y2л10),4,24■':ЕAU│1з ╗(X1,Y1)м(X2,Y1),╜:├(128,96),4,25'BБе3505/*°╝:X1│31:X2│170:Y1│30:Y2│161:Y3│1285\+╗(0,0)м(X1,Y1),╜:╗м(X1,Y2),╜:╗м(0,191),╜5Н+╗(255,0)м(X2,64),╜:╗м(X2,Y3),╜:╗м(255,191),╜5е+╗(85,64)м(85,128),╜5╤+ ╗(X1,64)м(85,64),╜:╗(X1,128)м(85,128),╜5ъ+*╗(85,128)м(X2,128),╜6	+4├(4,96),4,2:├(128,185),4,26(+>├(60,96),4,2:├(250,96),4,26W+HЕ AU│1 з ╗(85,64)м(170,64),╜:├(128,96),4,26a+\Бе3506П.р╝:X1│224:X2│85:X3│170:Y1│30:Y2│161:Y3│1286╝.ъ╗(0,0)м(X2,64),╜:╗м(X2,Y3),╜:╗м(0,191),╜6э.Ї╗(255,0)м(X1,Y1),╜:╗м(X1,Y2),╜:╗м(255,191),╜7.■╗(X1,64)м(X3,64),╜:╗м(X3,Y3),╜:╗м(X1,Y3),╜73/╗(X2,Y3)м(X3,Y3),╜7`/├(4,96),4,2:├(250,96),4,2:├(128,185),4,27r/&├(220,96),4,27а/0ЕAU│1 з ╗(85,64)м(170,64),╜:├(128,96),4,27к/DБе3507╔2╚╝4:X1│0:X2│255:Y1│0:Y2│1917є2╥╗(X1,Y1)м(X2,Y1),╜:╗(X1,Y2)м(X2,Y2),╜82▄Е L│1 з ╗(X1,Y1)м(X1,Y2),╜812цЕ R│1 з ╗(X2,Y1)м(X2,Y2),╜8;3,Бе3508u6░╝:X1│31:X2│85:X3│170:X4│224:Y1│30:Y2│64:Y3│128:Y4│1618в6║╗(0,0)м(X1,Y1),╜:╗м(X1,Y4),╜:╗м(0,191),╜8╙6─╗(255,0)м(X4,Y1),╜:╗м(X4,Y4),╜:╗м(255,191),╜96╬╗(X1,Y2)м(X2,Y2),╜:╗м(X2,Y3),╜:╗м(X1,Y3),╜916╪╗(X4,Y2)м(X3,Y2),╜:╗м(X3,Y3),╜:╗м(X4,Y3),╜9H6т╗(X2,Y3)м(X3,Y3),╜9e6ь├(4,96),4,2:├(50,96),4,29Ф6Ў├(250,96),4,2:├(200,96),4,2:├(128,185),4,29┴7ЕAU│1 з╗(85,64)м(170,64),╜:├(128,96),4,29╦7Бе35091),╜96╬╗(X1,Y2)м(X2,Y2),╜:╗м(X2,Y3),╜:╗м(X1,Y3                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Я&
В  AUTO-LINE&8:ГCOPYRIGHT (C) T&D SOFTWARE 1983&Y╚0:└1:Е  У▓17000 зF1│1:ДF1│0&{(Х Ум500:ЕF1│1зNS│1000:ДNS│700&И2М L$(NS)'R<Ю:Зд11)"AUTO-LINE":Зд11)"####-####":З:З" THIS PROGRAM WILL GIVE YOU THE CONVENIENCE OF AUTOMATIC LINE   NUMBERING. THIS IS MEANT TO BE  USED ONLY WHEN INITIALLY TYPING IN A BASIC PROGRAM. ONCE THE"(FЗ"PROGRAM IS ENTERED USING THIS   PROGRAM, IT IS SAVED ON TAPE OR DISK IN ASCII FORMAT. IT CAN    THEN BE CLOAD-ED (OR LOAD-ED    FROM DISK) LIKE ANY OTHER BASIC PROGRAM. ONCE LOADED, IT CAN BE"(7PЗ"DEBUGGED, EDITED, ETC."(BZБж 360(░dЮ:З"   WHEN YOU ARE FINISHED ENTER- ING YOUR PROGRAM, ENTER A '/'   WHEN PROMPTED WITH A LINE NUM-  BER.")4nЗ"   IF YOU WISH TO CORRECT THE   PRECEDING LINE AFTER IT HAS BEENENTERED, ENTER A '^' WHEN       PROMPTED WITH A LINE NUMBER.")?xБж 360)EВЮ)oМЙ"START LINE NO.";S:ЕS┤0▒S┤▓ Б(S)з140)ХЦЙ"INCREMENT";I:ЕI┤│0▒I┤▓ Б(I)з150)даJ│0:LN│S:Ю)╘кLN$│ П( И(LN), З( И(LN))м1):ЗLN$;" ";:╗ЙLI$)ш┤Е LI$│"/" з 260*╛Е LI$│""зЗ"INVALID LINE.... RE-ENTER":Бе170*-╚Е LI$┤▓"^" з 230*=╥Е J│0 з 170*_▄J│Jм1:LN│LNмI:L$(J)│"":Бе 170*лцL$(J)│LN$лLI$:J│Jл1:Е Jл1▓NS з З"MAXIMUM NUMBER OF LINES ENTERED":Бе260*шЁLN│LNлI:ЕLN▓│64000зЗ"LINE NUMBER EXCEEDS MAXIMUM.":Бе260*є·Бе 170+1
╗Й"FILENAME:";F$:Е З(F$)▓8 ▒ F$│"" зЗ"BAD FILENAME":Бе260+Q
З"CASSETTE OR DISK ? (C/D)"+s
K$│ Т:ЕK$┤▓"C" ░ K$┤▓"D" з280+О
"Е K$│"C" з D│м1 :Д D│1+└
,З:З"READY ";:ЕK$│"C" зЗ"CASSETTE"; :ДЗ"DISK";+╪
6З" - PRESS [ENTER]"+ь
@Е Т┤▓ Л(13)з320,+
JЩ"O",#D,F$:АN│0е Jм1:З#D,L$(N):Л:Ъ#D:З"SAVE AGAIN ? (Y/N)",W
TK$│ Т:ЕK$┤▓"Y"░K$┤▓"N"з340:ДЕK$│"Y"з260,]
^К,Д
hЗ@484,"PRESS [ENTER] TO CONTINUE";,Ш
rЕ Т┤▓ Л(13)з370,Ю
|РK$│"C" зЗ"CASSETTE"; :ДЗ"DISK";+╪
6З" - PRESS [ENTER]"+ь
@Е Т┤▓ Л(13)з320,+
JЩ"O",#D,F$:АN│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 &а&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&E
В <--------------------->&cВ <-  MACHINE LANGUAGE ->&БВ <-     TUTORIAL      ->&Я(В <-     PART 3-A      ->&╜2В <--------------------->&█<В <-   T & D SOFTWARE  ->&∙FВ <--------------------->'P╚0:└1'ZЮ:Х200,16200'>dАI│16323 е 16383:НD:ТI,D:Л:╣ Г0│16323'hnАI│16240 е 16311:НD:ТI,D:Л:╣ Г1│16240'МxЗд3)"MACHINE LANGUAGE TUTORIAL"'ФВI│1'╕МаI,1:U│ Г0(0):I│Iл1:ЕI┤186 з140'¤ЦЗд12)"PART 3-A":Зд12)"--------":╔"T255O5V31ABCDABFBDBECBADCAGEF"(PаЗ:З"   THIS IS THE THIRD PART IN THESERIES ON MACHINE LANGUAGE PRO- GRAMMING."(VкЗ(┬┤З"   THIS PART DEALS WITH ASSEMBLYLANGUAGE AND THE ADDRESSING     MODES OF THE 6809 MICROPROCES-  SOR."(╠╛Бж990)╝╚Бж1020:З"   MACHINE LANGUAGE PROGRAMS AREWRITTEN IN A MORE UNDERSTANDABLELANGUAGE CALLED ASSEMBLY LAN-   GUAGE. OFTEN, THESE TWO TERMS   ARE CONFUSED. MACHINE LANGUAGE  IS THE ACTUAL NUMBERS THAT ARE  PLACED IN MEMORY THAT THE MICRO-";*Ы╥З"PROCESSOR CAN UNDERSTAND. ASSEM-BLY LANGUAGE IS AN ENGLISH-TYPE LANGUAGE THAT PEOPLE CAN MORE   READILY UNDERSTAND. ASSEMBLY    LANGUAGE INSTRUCTIONS ARE WRIT- TEN IN SMALL WORDS OR ABBREVIA- TIONS CALLED MNEMONICS."*ж▄Бж 990+ПцБж1020:З"   AN EXAMPLE OF ASSEMBLY LAN-  GUAGE WOULD BE : RTS WHICH MEANS'RETURN FROM SUBROUTINE' (SIM-  ILAR TO BASIC'S RETURN STATE-   MENT). HOWEVER, THIS SAME IN-   STRUCTION WOULD APPEAR AS 57 IN MACHINE LANGUAGE. NOW YOUR",}ЁЗ"PROBABLY WONDERING 'HOW DO I    CONVERT ASSEMBLY LANGUAGE TO MA-CHINE LANGUAGE ?' THIS CAN BE   DONE 1 OF 2 WAYS: 1) USE AN ED- ITOR/ASSEMBLER WHICH WILL ALLOW YOU TO ENTER, EDIT, AND ASSEM-  BLE AN ASSEMBLY LANGUAGE PROGRAM":Бж990-G·Бж1020:З"OR 2) ASSEMBLE THE ASSEMBLY LAN-GUAGE BY HAND USING TABLES. I   WOULD HEARTILY RECOMMEND THAT   YOU USE AN EDITOR/ASSEMBLER BE- CAUSE HAND ASSEMBLY IS TEDIOUS, DIFFICULT, AND ERROR-PRONE."-╬
З"NOTE THAT THERE ARE MANY DIFFER-ENT NAMES FOR ASSEMBLY LANGUAGE,SUCH AS ASSEMBLY CODE, SOURCE   CODE, AND SOMETIMES, ASSEMBLER."-╪
Бж990.╚
Бж1020:З"   NOW LET ME JUMP INTO THE SUB-JECT OF ADDRESSING MODES. AS YOUMAY ALREADY BE AWARE, EVERY MEM-ORY LOCATION IN THE COLOR COM-  PUTER IS LABELED BY A NUMBER.   THIS NUMBER IS CALLED THE AD-   DRESS OF THAT LOCATION. WHEN YOU";/│
"З"ARE WORKING WITH ASSEMBLY LAN-  GUAGE, COMMANDS LIKE PMODE,     PSET, FOR, NEXT, ETC. WILL NOT  BE AVAILABLE TO YOU. IN FACT, A BASIC COMMAND LIKE RESTORE MAY  BE COMPOSED OF SEVERAL ASSEMBLY LANGUAGE INSTRUCTIONS.":Бж990:Бж10200Ю
,З"   WHEN WORKING WITH ASSEMBLY   LANGUAGE, YOU WILL BE MANIPULAT-ING NUMBERS AND THE CONTENTS OF MEMORY LOCATIONS AND INPUT/OUT- PUT DEVICES. THE MEMORY IS USED MOST OFTEN TO HOLD THE PROGRAM  AND THE DATA FOR THE PROGRAM.":Бж9901l
6Бж1020:З"   LET'S SUPPOSE WE WANT TO ADD 10 TO THE A REGISTER. THIS IN-  STRUCTION WOULD LOOK LIKE:        ADDA #10. THE MNEMONIC IS     ADDA, AND THE OPERAND OR NUMBER TO BE OPERATED WITH IS 10. NOTE"2C
@З"THE # SYMBOL. THIS MEANS 'USE   THE ACTUAL VALUE OF 10'. THIS ISCALLED IMMEDIATE ADDRESSING. IF THE INSTRUCTION LOOKED LIKE:      ADDA 10, THEN IT WOULD MEAN   ADD THE CONTENTS OF MEMORY LOCA-TION 10 WITH A."2▌
JБж990:Бж1020:З"   AS YOU CAN SEE, THE TYPE OF  ADDRESSING MODE USED TELLS THE  COMPUTER WHERE YOU ARE GETTING  THE DATA FOR THE INSTRUCTION    FROM."3З
TЗ:З"   AS YOU CAN ALSO SEE, IT IS   VERY IMPORTANT TO HAVE MANY DIF-FERENT TYPES OF ADDRESSING MODESAS THIS MAKES THE MICROPROCESSORMORE VERSATILE AND USEFUL.":Бж9903─
^Бж1020:З"   THERE ARE 8 DIFFERENT MODES  OF ADDRESSING:"4
hЗ"   1. INHERENT":З"   2. IMMEDIATE":З"   3. EXTENDED":З"   4. EXTENDED INDIRECT"4`
rЗ"   5. DIRECT":З"   6. REGISTER":З"   7. INDEXED (5 VARIATIONS)"4v
|З"   8. RELATIVE"4А
ЖБж9904ф
РБж1020:З"   IN THE INHERENT ADDRESSING   MODE, THE INSTRUCTION ACTUALLY  CONTAINS THE OPERAND."5%
ЪЗ"EXAMPLES:":З"ABX - ADD ACCUMULATOR B TO X,   RESULT IN X."5{
дЗ"ASRA - SHIFT ACCUMULATOR A ONE  BIT TO THE RIGHT.":З"CLRB - LOADS B WITH ZERO."5Е
оБж9906.
╕Бж1020:З"   IN THE IMMEDIATE ADDRESSING  MODE, THE BYTE(S) FOLLOWING THE INSTRUCTION ARE THE ACTUAL OP-  ERAND. IMMEDIATE ADDRESSING IS  DENOTED BY THE SYMBOL '#'."6к
┬З"EXAMPLES:":З"LDA #20 - LOADS ACCUMULATOR A   WITH THE VALUE OF 20.":З"LDX #1045 - LOADS X WITH THE    VALUE OF 1045."7/
╠З"NOTE THAT THE OPERAND FOR AN IM-MEDIATE INSTRUCTION MAY BE EI-  THER ONE OR TWO BYTES LONG DE-  PENDING ON THE REGISTER USED."79
╓Бж9907╘
рБж1020:З"   IN THE EXTENDED MODE, THE    CONTENTS OF THE TWO BYTES FOL-  LOWING THE OPCODE ARE THE ACTU- AL ADDRESS OF THE DATA FOR THE  INSTRUCTION."84
ъЗ"EXAMPLES:":З"LDA 3276 - LOADS ACCUMULATOR A  WITH THE CONTENTS OF MEMORY LOC-ATION 3276."8▄
ЇЗ"LDX 4598 - LOADS THE MOST SIG-  NIFICANT BYTE OF X WITH THE DATAAT MEMORY ADDRESS 4598 AND THE  LEAST SIGNIFICANT BYTE OF X WITHTHE DATA AT MEMORY ADDRESS 4599."8ц
■Бж9909aБж1020:З"   IN THE EXTENDED INDIRECT     MODE, THE TWO BYTES FOLLOWING   THE OPCODE CONTAIN THE ADDRESS  OF THE DATA.":,З"EXAMPLE:":З"LDB [876] - LOADS ACCUMULATOR B WITH THE DATA AT THE ADDRESS    WHICH IS CONTAINED AT 876 AND   877, WHERE 876 IS THE MOST SIG- NIFICANT BYTE AND 877 IS THE    LEAST SIGNIFICANT BYTE.":xЗ"NOTE THAT INDIRECT ADDRESSING   IS DENOTED WITH BRACKETS, '[' & ']'.":В&Бж990;O0Бж1020:З"   IN THE DIRECT MODE, ONLY ONE BYTE IS USED TO SPECIFY THE AD- DRESS OF THE DATA, MEANING THAT THE ADDRESS MAY ONLY BE IN THE  RANGE 0<=ADDRESS<=255. THIS MODEIS INCLUDED ONLY BECAUSE IT IS";Л:З"FASTER AND USES LESS MEMORY THANEXTENDED ADDRESSING.";ЫDЗ"EXAMPLE:"<ANЗ"LDX 2 - LOADS THE MOST SIGNIF-  ICANT BYTE OF X WITH THE DATA ATMEMORY LOCATION 2, AND LOADS THELEAST SIGNIFICANT BYTE OF X WITHTHE DATA AT MEMORY LOCATION 3."<KXБж990< bБж1020:З"   IN THE REGISTER ADDRESSING   MODE, THE BYTE FOLLOWING THE OP-CODE (SOMETIMES CALLED A POST-  BYTE) SPECIFIES WHICH REGISTER  OR SET OF REGISTERS ARE TO BE   USED."=>lЗ"EXAMPLES:":З"TFR X,Y - TRANSFER THE CONTENTS OF X TO Y."=qvЗ"EXG A,B - EXCHANGES THE CONTENTSOF A AND B."={АБж990>kКБж1020:З"   THE INDEXED ADDRESSING MODE  HAS FIVE DIFFERENT VARIATIONS,  EACH OF WHICH WILL BE EXPLAINED INDIVIDUALLY. INDEXED ADDRESSINGIS BASICALLY USING A POINTER RE-GISTER, SUCH AS X, Y, U, S, AND SOMETIMES PC, TO POINT AT A MEM-";>ЯФЗ"ORY LOCATION WHICH CONTAINS THE NEEDED DATA.">кЮБж 990>ЄиБж1020:З"   THE SIMPLEST TYPE OF INDEXINGUSES A ZERO OFFSET VALUE."?O▓З"EXAMPLES:":З"LDA ,X - LOADS A WITH THE DATA  AT THE MEMORY LOCATION POINTED  AT BY X."@!╝З"LDY ,X - LOADS THE MOST SIGNIF- ICANT BYTE OF Y WITH THE DATA ATTHE MEMORY LOCATION POINTED AT  BY X, AND LOADS THE LEAST SIG-  NIFICANT BYTE OF Y WITH THE DATAAT THE MEMORY LOCATION POINTED  AT BY X+1."@+╞Бж990A╨Бж1020:З"   THE NEXT TYPE OF INDEXING IS CALLED CONSTANT OFFSET INDEXING.HERE, THE OFFSET (IN THE RANGE  -32768 TO 32767) IS ADDED TO THEPOINTER REGISTER TO OBTAIN THE  EFFECTIVE ADDRESS. NOTE THAT THEPOINTER REGISTER IS NOT ALTERED!"A*┌З"EXAMPLE:"AКфЗ"LDB 1,Y - LOADS ACCUMULATOR B   WITH THE DATA AT THE MEMORY LOC-ATION POINTED AT BY Y+1."AФюБж990B°Бж1020:З"   THE ACCUMULATORS, A, B, AND  D, MAY ALSO BE USED AS OFFSETS  FOR AN INDEXED INSTRUCTION. IN  THIS CASE, THE ACCUMULATOR AND  THE POINTER REGISTER ARE ADDED  TO FORM THE EFFECTIVE ADDRESS.  NEITHER THE POINTER REGISTER"B╠З"NOR THE ACCUMULATOR ARE ALTERED UNLESS SPECIFIED IN THE INSTRUC-TION."C*З"EXAMPLE:":З"LDA B,Y - LOADS A WITH THE DATA AT THE MEMORY LOCATION POINTED  AT BY B+Y."C4Бж990C? Бж1020D*З"   THE NEXT MODE IS THE AUTOINC-REMENT/AUTODECREMENT MODE. IN   THIS MODE, THE POINTER REGISTER IS AUTOMATICALLY INCREMENTED OR DECREMENTED AFTER BEING USED IN THE INSTRUCTION. THE REGISTER"Ds4З"MAY BE INCREMENTED OR DECREMENT-ED BY ONE OR TWO. THIS MODE IS  MOST HELPFUL WHEN STEPPING      TABLES."Dя>З"EXAMPLE:":З"LDA ,X+  - LOADS ACCUMULATOR A  WITH THE DATA AT THE MEMORY LOC-ATION POINTED AT BY X, THEN ADDS 1 TO X."D∙HБж990E?RБж1020:З" AUTOINCREMENT/AUTODECREMENT         INDEXING CONTINUED"E╕\З"EXAMPLE:":З"LDB ,Y-   - DECREMENTS Y BY 1,  THEN LOADS B WITH THE DATA AT   THE MEMORY ADDRESS POINTED AT   BY Y."FЕfЗ"NOTE THAT THIS MODE ALLOWS A    ZERO OFFSET ONLY. ALSO, THE AUTOINCREMENT ADDS 1 TO THE REGISTERAFTER THE ADDRESS HAS BEEN USED;WHEREAS THE AUTODECREMENT SUB-  TRACTS 1 BEFORE THE ADDRESS IS  USED."FПpБж990G7zБж1020:З"    THE INDIRECT INDEXING MODE  USES THE POINTER REGISTER AND   OFFSET TO POINT AT MEMORY LOCA- TIONS, WHICH IN TURN,POINT AT   OTHER MEMORY LOCATIONS. ";G╢ДЗ"ALL OF  THE PREVIOUSLY DESCRIBED INDEX- ING MODES MAY BE USED INDIRECT- LY, EXCEPT AUTOINCREMENT/ AUTO- DECREMENT BY 1."HQОЗ"EXAMPLE:":З"LDA [5,X] - LOADS A WITH THE    DATA WHICH IS CONTAINED IN THE  MEMORY LOCATION POINTED AT BY   THE MEMORY LOCATION POINTED AT  BY X+5."H[ШБж990IвБж1020:З"   THE LAST TYPE OF ADRESSING TOBE EXPLAINED IS RELATIVE AD-    DRESSING. THIS MODE, USED MOST  FREQUENTLY IN BRANCH INSTRUC-   TIONS, USES AN 8 OR 16 BIT"I3мЗ"SIGNED OFFSET WHICH IS ADDED TO THE PC."IЁ╢З"EXAMPLE:":З"BNE 5 - (BRANCH IF NOT EQUAL TO ZERO), IF THE ZERO BIT IN THE   CCR IS 0 (FALSE) THEN THE BYTE  FOLLOWING THE OPCODE IS ADDED TOTHE PC, WHERE EXECUTION WILL    CONTINUE."I·└Бж990JH╩Бж1020:З"   TO CONTINUE THIS LESSON,":Зд8)"CLOAD"; Л(34);"MLT 3-B"; Л(34)JN╘КJu▐З@484,"PRESS [ENTER] TO CONTINUE";JКшЕ Т┤▓ Л(13)з1000JРЄРJ┼№SS│ Д(9):АZ│0е31:U│ Г1(0):а20н(SSм1)лZл1,1:Л:Ю:РK=Ж 182,4,32,183,63,192,142,4,32,166,136,32,167,132,48,136,32,140,5,224,38,243,166,1,167,128,140,5,255,38,247,166,136KгЖ224,167,132,48,136,224,140,4,31,38,243,166,31,167,132,48,31,140,4,0,38,245,182,63,192,167,132,57LУЖ79,183,63,192,198,32,61,195,4,0,31,1,198,31,166,1,167,128,90,38,249,134,96,167,132,182,63,192,139,2,129,16,38,223,134,1,183,63,192,198,32,61,195,4,31,31,1,198,31,166,31,167,132,48,31,90,38,247,134,96,167,132,182,63,192,139,2,129,17,38LЯ$Ж221,577LУЖ79,183,63,192,198,32,61,195,4,0,31,1,198,31,166,1,167,128,90,38,249,134,96,167,132,182                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 [&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&H
:ГWRITTEN BY B. VANDEN BOSCH&c:Г    FOR T&D SOFTWARE&iЮ&y(Х 356,16027&Й2╣  Г0│16333&Щ<╣  Г1│16353&йF╣  Г2│16282&╣P╣  Г3│16302&╔Z╣  Г4│16205&┘d╣  Г5│16028&щn╣  Г6│16054'xА X│2 е 15:З  б(32,143л Б(Xо2)н16);:Л X',ВА X│1 е 13:Н G1,G2'TМЗ@233лX, Л(G1);:З@265лX, Л(G2);:Л X'╦Ц╔"T200O3CDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGABCDEFGAB"'▀аА Y│1 е 150:Л Y'°кА X│1 е 20:R│ Д(511)($┤З@R, Л(128);:╔"T250O1V30CBAGV15FED":Л X(8╛А Y│1 е 250:Л Y(b╚З@482,"HIT ANY KEY FOR INSTRUCTIONS";(Ж╥X$│ Т:╔"T20O2L4A":Е X$│"" з 210(г▄Ю:З@8,"INSTRUCTIONS":З:З(╟цЗ"   DUAL IS A GAME FOR TWO ":З(яЁЗ" PLAYERS. EACH PLAYER OPERATES":З)·З" ONE OF THE GUNS USING THE":З)5
З" CORRESPONDING JOYSTICK.":З)[
З" USE IT TO MOVE UP AND DOWN.":З)}
З" PRESS THE BUTTON TO FIRE.")Р
"А X│1 е 50:Н M)д
,Т 16332лX,M:Л X)╖
6А X│1 е 51:Н M)╦
@Т 16281лX,M:Л X)▐
JА X│1 е 73:Н M)Є
TТ 16204лX,M:Л X*#
^З@483,"HIT ANY KEY TO CONTINUE";:╔"T20O2L4A"*;
hX$│ Т:Е X$│"" з 360*h
rЮ:З:З:З"   THE OBJECT OF THE GAME IS ":З*П
|З" TO BREAK THROUGH THE BARRIER":З*╡
ЖЗ" AND KILL THE OPPONENT. THE ":З*┌
РЗ" THE FIRST PLAYER WITH FIVE":З*ў
ЪЗ" KILLS WINS THE GAME."+
дА X│1 е 171:Н M+
оТ 16027лX,M:Л X+M
╕З@484,"HIT ANY KEY TO BEGIN";:╔"T20L4O2A"+e
┬X$│ Т:Е X$│"" з 450+x
╠Ю(0):R│10:L│10+▓
╓А X│0 е 15:З@32нXл14, Л(175); Л(191); Л(207); Л(255);+║
рЛ X+╧
ъЗ@6,LS;:З@25,RS;+у
ЇА Y│1 е 500:Л Y+√
■Е RS│5 ▒ LS│5 з 790,Бе 590,╔"V10T60L4O2D",=R│ Н(0):R│ Н(1):L│ Н(2):L│ Н(3),J&A│ Г6(0),Z0P│ Ж(16200),u:И P Бе 590,580,690,740,РD╔"O3T250V30CBAGV15FED",жNЕ R┤15 з A│ Г0(0),╝XЕ R▓48 з A│ Г1(0),╥bЕ L┤15 з A│ Г2(0),шlЕ L▓48 з A│ Г3(0),їvA│ Г4(0)-АA│ Г5(0)-КP│ Ж(16200)--ФИ P Бе 530,670,690,740-HЮ╔"O3T250V30CBAGV15FED"-SиБе 540-_▓LS│LSл1-к╝RP│ Ж(16381)н256л Ж(16382):А Y│144 е 255 й 3:Т RP,Y:╔"T250O3V30BD":Л Y-╖╞Т RP,141-╦╨А Y│1 е 250:Л Y-╓┌Бе 470-тфRS│RSл1.,юLP│ Ж(16331)н256л Ж(16332):АY│144 е 255 й 3:Т LP,Y:╔"T250O3V30BD":Л Y.9°Т LP,142.MА Y│1 е 250:Л Y.XБе 470.iЕ RS│5 з 840.╬ Ю:╔"T200O1CDEFGABO2CDEFGABO3CDEFGABO4CDEFGABO5CDEFGABAGFEDCO4BAGFEDCO3BAGFEDCO2BAGFEDCO1BAGFEDC".Є*Ю:З@229,"THE LEFT PLAYER WINS!"/4З:З:З:З:З/>Бе 870/pHЮ:╔"T200O1CDEFGABO2CDEFGABO3CDEFGABO4CDEFGABO5CDEFGABAGFEDCO4BAGFEDCO3BAGFEDCO2BAGFEDCO1BAGFEDC"/ХRЮ:З@229,"THE RIGHT PLAYER WINS!"/г\З:З:З:З:З/╕fА Y│1 е 1000:Л Y/шpЮ:З@225,"";:Й"WANT TO PLAY AGAIN (Y/N) ";A$0zЕ A$│"Y" з LS│0:RS│0:Бе 4400ДК0{ОЖ128,128,142,139,137,134,128,128,138,137,133,134,128,128,134,142,137,141,128,128,138,139,128,131,128,1280╫ШЖ190,63,253,140,4,63,39,39,134,128,167,132,48,136,224,191,63,253,32,19,190,63,253,140,517вЖ255,39,19,134,128,167,136,224,48,136,32,191,63,253,76,167,136,224,134,141,167,132,57,4,2551УмЖ190,63,203,140,4,32,39,40,134,128,167,132,48,136,224,191,63,203,32,19,190,63,203,140,51ў╢Ж224,39,20,134,128,167,136,224,48,136,32,191,63,203,134,130,167,136,224,134,142,167,132,57,5,962P└Ж142,4,14,16,142,4,14,182,4,14,183,63,150,198,15,48,136,32,166,132,167,164,49,168,322о╩Ж90,193,0,38,241,48,1,166,132,167,160,198,15,48,136,224,166,132,167,164,49,168,224,90,1932 ╘Ж0,38,241,48,1,166,132,167,160,198,15,140,4,18,38,203,182,63,150,183,4,17,573V▐Ж182,255,0,68,68,37,12,246,63,74,38,37,198,1,247,63,74,32,78,198,0,247,63,74,32,233╛шЖ182,255,0,68,37,12,246,63,71,38,12,198,1,247,63,71,32,9,198,0,247,63,71,134,1,32,114,198,30,16,1904ЄЖ63,253,49,63,134,156,167,164,166,63,129,128,46,5,90,38,241,32,4,134,128,167,63,142,64t№Ж232,48,31,38,252,167,160,16,188,63,253,38,248,32,56,198,30,16,190,63,203,49,33,134,1564╬Ж167,164,166,33,129,128,46,5,90,38,241,32,4,134,128,167,33,142,6,232,48,31,38,252,1675*Ж164,49,63,16,188,63,203,38,246,166,159,63,253,129,128,38,16,134,3,32,14,166,159,63,2035ZЖ129,128,38,4,134,4,32,2,134,2,183,63,72,5790,63,203,49,33,134,1564╬Ж167,164,166,33,129,128,46,5,90,38,241,32,4,134,128,167,33,142,6,232,48,31,38,252,1675*Ж164,49,63,16,188,63,203,38,246,166,159,63,2                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 8&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&U
В BRICKS BY DAVID HERING FOR T&D SOFTWARE&[Ю&ЖЗ @ 225,"CAN YOU USE HIGH SPEED (Y/N)"&╢(A$│ Т:Е A$│""з 40 :Д Е A$│"Y"з NM│1 :Д NM│0&╠2Е NM│1з Т 65495,0&т<Е NM│1 з 70 :Д 90'FЗ @ 224,"SKILL LEVEL 1 OR 2"'2PA$│ Т:Е A$│"" з 80 :Д Е A$│"1" з Т 65494,0'TZ╚ 3:┴ 2,4:╝:┐ 1,0:S1│16:S2│74'ГdА T│70 е 170 й 20:╗(T,40)м(Tл16,60),╜,BF:Л'СnА S│1 е 6'·xА T│S1 е S2 й 8:┴ 4:╗(256,170)м(0,190),╜,BF:┴ 3:╗(T,186)м(Tл12,180),╜,BF:╗(Tл4,180)м(Tл8,174),╜,BF:Л(
ВS1│S2:S2│S2л20(lМF│((Sм1)н20)л80:А Y│168 е 60 й м4:┴ 3:╗(F,Y)м(F,Yм4),╜:┴ 4:╗(F,Y)м(F,Yм4),╜:Л:╞"C2":Бж 240(ЬЦ├(F,Yм8),4,4:И S Бж 180,190,200,210,220,230(даЛ S)кА T│S2 е 122 й м4:┴ 4:╗(256,170)м(0,190),╜,BF:┴ 3:╗(T,186)м(Tл12,180),╜,BF:╗(Tл4,180)м(Tл8,174),╜,BF:Л:Бе 250)<┤╞"BM 70,40;ND8R16D8NL16D8L16U8":Р)^╛╞"BM90,40;ND16R16D8L8NL8F8":Р)~╚╞"BM110,40;R8NR8D16R8L16":Р)Ы╥╞"BM130,40;NR16D16R16":Р)▀▄╞"BM150,40;D16":┴ 2:╗(150,48)м(166,40),╜:╗(150,48)м(166,56),╜:Р*
ц╞"BM 170,40;NR16D8R16D8L16":Р*`Ё╔"L200;O2;V30;B;V28;A;V26;G;V24;F;V22;E;V20;D;V18;C;01;V16;B;V14;A;V12;G;V10;F;V8;E;D;C":Р*╢·А X│0 е 250 й 8:┴ 2:╗(X,164)м(Xл6,164),╜:А T│1 е 100:Л:┴ 4:╗(X,164)м(Xл6,164),╜:Л+
А X│0 е 124 й 8:┴ 2:╗(X,178)м(Xл6,178),╜:А T│1 е 100:Л:┴ 4:╗(X,178)м(Xл6,178),╜:Л+B
А T│1 е 10:├(124,182),2,4:а 10,1:├(124,182),3,4:Л+w
А T│1 е 30:┴ 2:╜(118л Д(20),170л Д(20)):а 10,1:Л+ж
"┴ 4:╗(0,160)м(256,191),╜,BF:А T│1 е 3000:Л+м
,Ю+┌
6З  б(32,"*"):З @ 45,"BRICKS":З  б(32,"*"),#
@З"IN THIS GAME YOU TRY TO KNOCK   OUT THE BRICKS BY SHOOTING THEM ";,u
JЗ"OUT.TO DO THIS YOU USE THE RIGHTJOYSTICK. YOU CAN MOVE RIGHT ANDLEFT ONLY.",д
TЗ"YOU SHOOT BY USING THE FIRE     BUTTON."-!
^З"BUT YOU HAVE TO WATCH OUT FOR   THE SMALL BRICKS WORKING THEIR  WAY DOWN THE SCREEN.YOU MUST    SHOOT THEM DOWN ALSO."-D
hЗ"HIT ANY KEY TO START GAME.";-\
rA$│ Т:Е A$│"" з 370-s
|NS│3:SC│0:H│1:H1│6-Й
Ж╚ 1:┐ 1,0:┴ 2,4:╝-║
РА X│10 е 242 й 16:╗ (X,8)м(Xл12,16),╜,BF:Л X-ы
ЪА X│10 е 242 й 16:╗(X,20)м(Xл12,28),╜,BF:Л X-є
д┴ 1.$
оА X│10 е 242 й 16:╗(X,36)м(Xл12,44),╜,BF:Л X.U
╕А X│10 е 242 й 16:╗(X,48)м(Xл12,56),╜,BF:Л X.Г
┬А X│10 е 242й 16:╗(X,64)м(Xл12,72),╜,BF:Л.▓
╠А X│10 е 242 й 16:╗(X,76)м(Xл12,84),╜,BF:Л.┴
╓X│128:NS│3.ф
р┴ 4:╗(Xм8,191)м(Xл20,170),╜,BF/
ъ┴ 3:╗ (X,186)м(Xл12,180),╜,BF/$
Ї╗(Xл4,180)м(Xл8,174),╜,BF/7
■Е E│1 з Бж 670/GP│ Ж(65280)/b┴ 4:╗(H,H1)м(H,H1м4),╜/Е P│126 ▒ P│254 з Бж 890/Т&Е G│1 з Бж 690/╛0Е  Н(0)┤25 з X│Xм8 :Д Е  Н(0)▓40 зX│Xл8/╤:Е E│0 з Бж 740/тDP│ а(H,H1м6)/ЎNЕ P┤▓4 з Бж 7800XP│ а(Fл6,F1)0!bЕ F1▓170 з 620 :Д 63005lЕ P┤▓4 з Бж 8500EvЕ X┤8 з X│80YАЕ X▓248 з X│2480dФБе 4800ЮЮ┴ 4:╗(F,F1)м(Fл4,F1),╜:Е F▓248 ░ F1│172 з 1100 :Д 9400╗и┴ 3:╗(F,F1)м(Fл4,F1),╜:Р0╓▓┴ 4:╗(H,H1)м(H,H1м4),╜0т╝H1│H1м80ї╞Е H1┤12 з 12001╨┴ 3:╗(H,H1)м(H,H1м4),╜1┌Р1#фT│ Д(25)13юЕ T│5 з 77019°Р1NE│1:F│4:F1│124:Р1pЕ Fл2│H ▒ Fл3│H ▒ Fл4│H з 8401ИЕ F│H ▒ Fл1│H з 8401б*Е  а(H,H1м6)│1 з 9201║4Е  а(H,H1м6)│2 з 9301└>Р1■H┴ 4:╗(F,F1)м(Fл4,F1),╜:╗(H,H1)м(H,H1м4),╜:G│0:E│0:Бе 12102:RNS│NSм1:Е NS│0 з 1110:E│0:┴ 4:╗(F,F1)м(Fл4,F1),╜:Бе 9502U\├ (H,H1м6),4,4:Бе 10402gf├(H,H1м6),4,42spБе 12102КzG│1:H│Xл6:H1│170:Р2бДF│2:F1│F1л8:Бе 6802▓ОF│Fл8:Бе 6802╔ШG│0:SC│SCл2:Бе 8702рвG│0:SC│SCл4:Бе 8602∙мЕ F▓248 з 900 :Д 9103$╢┴ 4:╗(H,H1)м(H,H1м4),╜:┴ 2:А H3│1 е 103?└├ (Xл6,184),2,4:а 10,13R╩├(Xл6,184),3,43[╘Л H33}▐K1│256м(256мX)м4:K2│164:┴ 2,23мшG│0:┴ 4:╗(H,H1)м(H,H1м4),╜:┴ 2:А H3│1 е 403фЄ╜(K1л Д(20),K2л Д(27)):╛(K1л Д(20),K2л Д(20)):а 1,14№Л:┴ 4:╗(0,88)м(256,191),╜,BF4
NS│NSм1:Е NS│0з 11104$Р4WT1│0:TB│0:А JN│16 е 248 й 16:TB│TBл а(JN,10):Л4hG│0:H│1:H1│64{$Е TB│60 з 10804З.Бе 12104┴8А JN│1 е 10:┐ 1,1:А TH│1 е 60:Л:┐ 1,0:А TH│1 е 60:Л:Л4╠BБе 3904█LE│0:Бе 9504юVЕ SC▓HC з 11805`Ю:З @ 11,"HIGH SCORE":З @ 42,HC55jЗ @ 75,"YOUR SCORE":З @ 106,SC5MtЗ @ 236,"GAME OVER"5j~Зд7)"ANOHTER GAME (Y/N)"5ФИA$│ Т:Е A$│"Y" ▒ A$│"N"з 1165 :Д 11605жНЕ A$│"Y"з 3805мТК5╨ЬHC│SC:А X│140 е 220 й 4:а X,1:Л5▄жБе 11205ц░G│0:Р61║Т 65494,0:╔"L200;O2;B;A;G;F;E;D;C;O1;B;A;G;F;E;D;C":Е NM│1 з Т 65495,067─РЗ @ 236,"GAME OVER"5j~Зд7)"ANOHTER GAME (Y/N)"5ФИA$│ Т:Е A$│"Y" ▒ A$│"N"з 1165 :Д 11605жНЕ A$│"Y"з 3805мТК5╨ЬHC│SC:А X│140 е 220 й 4:а X,1:Л5▄жБе 11205ц░G│0:Р61║Т 65494,0:╔"L200;O2;