г#
М T(10),S(4),C(6),Z(2,4),K(4))ЮPЗ"THIS IS THE GAME OF BOGGLE.":З:Зp(Й"INSTRUCTIONS (Y OR N)";A$Л2З:Е A$│"Y" з 60 :Д 490С<Ю╕FЗ"I AM GOING TO PICK A FOUR DIGIT"╪PЗ"NUMBER USING DIGITS 1-6."▐ZЗdЗ"YOU ARE TO TRY TO DEDUCE THAT"&nЗ"NUMBER IN AS FEW GUESSES AS"7xЗ"POSSIBLE."_ВЗ:З"EVERY TIME YOU MAKE A GUESS, I"ДМЗ"WILL GIVE YOU CLUES AS TO HOW"йЦЗ"CLOSE YOU ARE TO THE NUMBER I"╕аЗ"PICKED."▌кЗ:З"THE CLUES WILL BE THE WORDS"Ї┤З"BLACK OR WHITE." ╛З:Й"HIT <ENTER> TO CONTINUE...";W  ╚Ю E╥З"WHEN I SAY BLACK IT MEANS ONE" i▄З"OF THE DIGITS IS CORRECT BUT" ~цЗ"OUT OF ORDER." еЁЗ:З"WHEN I SAY WHITE IT MEANS ONE" ╔·З"OF THE DIGITS IS CORRECT AND" ц
З"IN THE CORRECT ORDER."!
З:Й"HIT <ENTER> TO CONTINUE...";W!
Ю!&
"З"FOR EXAMPLE:"!B
,З"THE NUMBER IS 5216":З!\
6З"YOU GUESS:  2413":З!Б
@З"YOU WOULD GET A BLACK BECAUSE"!з
JЗ"THE DIGIT 2 IS CORRECT BUT OUT"!╠
TЗ"OF ORDER, AND A WHITE BECAUSE"!ё
^З"THE DIGIT 1 IS CORRECT AND IN""
hЗ"THE CORRECT ORDER.""1
rЗ:Й"HIT <ENTER> TO CONTINUE...";W"7
|Ю"[
ЖЗ"THERE ARE TWO GAME VERSIONS.""Д
РЗ:З"THE BEGINNER'S VERSION WILL NOT""й
ЪЗ"HAVE THE SAME DIGIT USED MORE""╟
дЗ"THAN ONCE IN A NUMBER.""ю
оЗ:З"THE EXPERT'S VERSION CAN HAVE"#
╕З"ANY OR ALL THE DIGITS THE SAME."#:
┬З:З"ONE TO TEN PEOPLE CAN PLAY."#\
╠З:З"SEE WHO CAN DO THE BEST."#Е
╓З:З"********** GOOD LUCK **********"#л
рЗ:Й"HIT <ENTER> TO CONTINUE...";W#╤
ъЮ:Й"E = EXPERT : B = BEGINNER";A$#є
ьЕ  Я▓1000 з  Я│ Ям1000:Бе 492#¤
юTI│ Я$

ЁА SS│1 е TI$
ЄTT│ Д(6):Л SS$'
ЇЗ:З$F
■Й"HOW MANY WISH TO PLAY";Q$zЕ Q▓10 з 510 :Д Е Q┤1 з 510 :Д Е Q┤▓ Б(Q) з 510$ИА P│1 е Q$ОЮ$в&З"PERSON";P;":"$╜2З"WHAT IS YOUR GUESS?"$╞4 Я│0$▀:А I│1 е 6:C(I)│0:Л I$ёDN│0:А I│1 е 4%
NN1│ Д(6):Е A$│"E" з 610%,XЕ C(N1)│1 з 590 :Д C(N1)│1%HbN│Nл(N1н(10п(Iм1))):Л I%VlN1│N:T5│0%tvT1│ Б(Nо1000):N│NмT1н1000%РАH1│ Б(Nо100):N│NмH1н100%кКE1│ Б(Nо10):N│NмE1н10%└ФN│ Б(N):N1│ Б(N1)%ыЮZ(1,1)│T1:Z(1,2)│H1:Z(1,3)│E1:Z(1,4)│N&иЗ:Е T5│25 з З :Д 710&▓З"TOO MANY TRIES."&:╝З"THE ANSWER IS";N1:Бе 930&B╞Й G&L╦З" ";&]╨T5│T5л1:G1│G&В┌А I│1 е 4:S(I)│0:K(I)│0:Л I:X1│0&ЮфT│ Б(Gо1000):G│GмTн1000&╕юH│ Б(Gо100):G│GмHн100&╨°E│ Б(Gо10):G│GмEн10&°Z(2,1)│T:Z(2,2)│H:Z(2,3)│E:Z(2,4)│G'
Е G1│N1 з 910'%UV│32нT5л73:З @ UV,"";'3А L│1 е 4'T Е Z(2,L)│Z(1,L) з 810 :Д 830'f*S(L)│1:K(L)│1's4З" WH ";'{>Л L'вHА X│1 е 4:Е S(X)│1 з 890 :Д S(X)│1'═RА L│1 е 4:Е Z(2,X)│Z(1,L) з 860 :Д 880'ъ\Е K(L)│1 з 880 :Д K(L)│1'■fЗ" BL ";:Бе 900(pЛ L(zЛ X(.ДX1│X1л1:Е X1│4 з 680 :Д 840(YОЗ:З"YOU GOT THE NUMBER IN";T5;"TRIES."(cРUU│ Я(xТVU│ Б(UUо1800)л1(УФVU│VUмT5:Е VU┤0 з VU│0(аХT5│T5лVU(╟ЦЗ:З"TIME PENALTY OF"VU"GUESSES.":З(эШЙ"HIT <ENTER> TO CONTINUE...";W:Ю)вT(P)│T(P)лT5:Л P:R│Rл1)'мЗ"AT THE END OF ROUND";R:З)O╢З"PERSON  TOTAL  AVERAGE  CATEGORY")]└А I│1 е Q)y╩T9│ Б((T(I)оR)н100)о100)Ь╘З д2);I;д8);T(I);д16);T9;д25);)и▐Бж 1040)░шЛ I)╢ЄЗ)╫№Й"ANOTHER ROUND (Y OR N)";M$)яЕ M$│"Y" з 530 :Д К)їВ*Е T9┤5 з З"EXPERT":Р*$$Е T9┤9 з З"PRO":Р*<.Е T9┤13 з З"GOOD":Р*T8Е T9┤16 з З"FAIR":Р*lBЕ T9┤21 з З"POOR":Р*ГLЕ T9┤25 з З"BAD":Р*ЬVЗ"KEEP PRACTICING":Р*в`К                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          MЗ"I CAN'T.":Бе150/0NЗ"25 CENTS PLEASE.":Бе150/TOЗ"I DON'T UNDERSTAND ";J$:Бе152/mPЗ"NEEDS BAIT.":Бе150/ПQO(12)│60:T│1:T(37,1)│38:Бе150/зRЗ"IT'S OPEN.":Бе150/┐SЗ"NO EFFECT.":Бе150/┘TЗ"IT'S CLOSED.":Бе1500UЕB$│"NO"зW│0:ДЕB$│"EA"зW│1:ДЕB$│"WE"зW│2:ДW│30#VV│T(L,W):Бж43:Бе1030MWЕO(17)┤60▒L│41з88:ДБж39:ЗP$(17);" IN"0]XБж145:Бе1500~YМ T(57,3),P$(25),O(25),D$(3)0╞ZАI│1е25:НP$(I),O(I):ЛI:АI│0е3:НD$(I):ЛI:АI│1е57:АJ│0е3:НT(I,J):ЛJ,I1о[Ж STONE,1,BIRD,60,FEATHERS,60,TIN CAN,60,FISH HOOKS,60,VINES,60,SHELL,1,OYSTER,60,PEARLS,60,FISH,60,BOAT WITH OARS,13,QUARTER,60,SPADE,21,PAPER,60,FLASHLIGHT,60,MAP,60,DIAMONDS,60,DUST,39,BAR OF GOLD,60,SIGN,45,KEY,60,HAMMER,601э\Ж PLANK,56,SAND,1,FISHING LINE,60,NORTH ,EAST ,WEST ,SOUTH26]Ж 1,1,1,3,2,3,2,6,1,4,2,7,4,4,3,8,5,6,5,5,2,7,5,10,3,8,6,11,4,9,7,122Ю^Ж 9,9,8,9,6,11,10,10,7,12,10,13,8,12,11,12,11,13,13,13,13,14,14,15,14,15,15,16,15,16,16,17,17,17,172ї_Ж 18,17,18,18,18,19,20,18,25,20,20,19,20,21,21,20,21,18,22,22,22,23,18,26,24,23,243I`Ж 24,24,19,25,25,25,26,23,26,26,24,27,27,28,27,31,29,30,29,28,29,29,28,30,30,303ЧaЖ 32,33,28,35,32,32,32,31,34,33,31,33,34,34,34,33,31,37,35,36,35,36,36,363хbЖ 37,37,35,37,38,38,37,38,39,39,39,40,40,40,40,41,40,42,41,41,52,42,41,4343cЖ 42,48,49,43,57,44,44,48,45,45,45,46,45,47,46,49,53,47,46,47,44,49,43,534еdЖ 46,43,48,49,50,51,50,50,51,52,51,51,52,53,51,42,48,54,52,47,54,55,53,57,55,55,54,55,56,56,55,56,54,57,57,444│eE│100:L│14╧fЮ:З:З"LOCATION IS:":V│L5
gИ V Бж129,136,136,135,136,131,136,131,136,1365=hЕV▓10з И Vм10 Бж136,136,136,130,130,130,136,136,136,1405yiЕV▓20з И Vм20 Бж137,136,136,132,136,136,132,136,136,1365╡jЕV▓30з И Vм30 Бж136,136,136,136,136,136,134,133,139,1415эkЕV▓40з И Vм40 Бж125,138,138,125,138,138,138,138,1386!lЕV▓49з И Vм49 Бж128,142,138,138,138,143,144,1386=mЗ:З"VISIBLE ITEMS ARE:"6XnАI│1е25:ЕL│O(I)зЗP$(I)6_oЛI6rpЕL│10зЗ"SNAKE"6ДqЕL│13зЗ"BEAR"6╢rЕL│18зЕU│0зЗ"ANGRY NATIVES":ДЗ"HAPPY NATIVES"6╩sЕL│50зЗ"COFFIN"6▄tЕL│21зЗ"DESK"6ЄuЕL│53зЗ"GRAFITTI"7vЕL│41▒L│44зЗ"PLANK OVER PIT"7EwЕ Д(10)│1░L▓38░L┤58зЗ"A BAT FLIES BY MY HEAD"7OxБе1237ВyЕO(25)▓0з122:ДЕO(8)▓0зР:ДG│1:O(8)│60:IN│INм1:Р7┬zЕO(6)▓0▒O(5)▓0зР:ДO(6)│60:O(5)│60:G│0:IN│INм1:O(25)│0:Бе1217я{З:З"EXITS:  ";:АI│0е3:ЕL┤▓T(L,I)зЗD$(I);7■|ЛI:З:Бе1508}ЕA$│"LO"з145:ДV│528V~ЕL│41░(O(23)│40▒O(23)│42)з147:ДЕL│44░(O(23)│48▒O(23)│57)з1478ГАI│251е1йм10:З"FALLING DOWN!!":аI,1:ЛI:К8ЫАЗ"WELL LIT CRYPT":Р8кБЗ"BEACH":Р8╣ВЗ"OCEAN":Р8╚ГЗ"TREES":Р8·ДЗ"BRIDGE":ЕO(22)▓0зР:ДT(24,3)│27:T(27,0)│24:Р9kЕЗ"AIRPORT":ЕL┤▓38зР:ДЕO(9)▓0▒O(17)▓0▒O(19)▓0з57:ДЗ"YOU FOUND ALL 3 TREASURES AND   WIN A FREE TRIP HOME!!":К9ЖЖЗ"AIRPORT TURNSTILE":Р9ХЗЗ"RIVER":Р9йИЗ"STONE PATH":Р9║ЙЗ"OLD HUT":Р9╙КЗ"WINDING TUNNELS":Р9чЛЗ"THRONEROOM":Р:МЗ"GATE TO OLD HUT":Р:"НЗ"STONE SLAB BY THRONEROOM":Р:BОЗ"WALL IN FRONT OF CRYPT":Р:`ПЗ"ENTRANCE TO TOOLROOM":Р:rРЗ"TOOLROOM":Р:╞СЗ"A BIG PIT":Е(V│41░O(23)│42)▒(V│44░(O(23)│48▒O(23)│57))зЗ"CROSSED BY A PLANK.":╠ТР:ЇУЮ:ЕIN┤3зЗ"PLANK GROANS AND BENDS":Р;.ФЗ"PLANK BREAKS! YOU'RE TOO HEAVY!":АI│1е1000:ЛI:Бе127;aХЗ"YOU HIT YOUR HEAD IN THE DARK   AND DIED!":К;╡ЦЕF│0з152:ДE│Eм1:ЕE▓0з151:ДЗ"FLASHLIGHT BATTERIES ARE DEAD":ЕL▓38░L┤▓50з149:ДE│0;┌ЧЗ"BATTERIES HAVE";E;"TURNS LEFT";√ШЗ:З"WHAT DO YOU WANT TO DO?"<IЩЙJ$:A$│ О(J$,2):ЕA$│"IN"з31:ДЕA$│"DI"з30:ДЕJ$│"LO"▒J$│"LOO"▒J$│"LOOK"з109<ДЪЕ З(J$)┤5з79:ДАI│3е З(J$):Е Р(J$,I,1)│" "з155:ДЛI:Бе79<ШЫB$│ Р(J$,Iл1,2)<║ЬЕF│0зЕL▓38░L┤▓50зЕA$│"GO"з149<╠ЭЕA$┤▓"LO"з194<ёЮЕB$│"BI"зЕO(2)│0зЕA│1з36:Д34:Д37=ЯЕB$│"SN"зЕL│10з38:Д35=0аЕB$│"CA"зЕO(4)│0зЕB│0з40:Д34:Д37=gбЕB$│"SH"зЕO(7)│0зЕC│0з41:ДЕC│1з71:ДЕC│2з42:Д34:Д37=ГвЕB$│"PE"зЕO(9)│0з44:Д37=ЭгЕB$│"BE"зЕL│13з38:Д35=║дЕB$│"BO"зЕO(11)│0з45:Д37=▌еЕB$│"NA"зЕL│18зЕU│0з46:Д47:Д35=·жЕB$│"PA"зЕO(14)│0з48:Д37>зЕB$│"MA"зЕO(16)│0з49:Д37>4иЕB$│"DI"зЕO(17)│0з44:Д37>QйЕB$│"GO"зЕO(19)│0з44:Д37>kкЕB$│"SL"зЕL│40з50:Д35>РлЕB$│"SI"зЕL│O(20)▒O(20)│0з51:Д35>нмЕB$│"KE"зЕO(21)│0з52:Д37>╨нЕB$│"WA"зЕL│51зЕN│0з53:Д82:Д35>ъоЕB$│"CO"зЕL│50з54:Д35?пЕB$│"EN"зЕL│55зЕO│0з55:ДЕO│1з56:Д82:Д35?3░ЕB$│"PL"зЕO(23)│0з45:Д37?b▒ЕB$│"TR"зЕL│6з58:ДЕL│8░A│0з72:ДЕL│8з34:Д35?|▓ЕB$│"GR"зЕL│53з59:Д35?Ц│ЕB$│"IN"зЕL│50з60:Д35?╡┤ЕB$│"BR"зЕL│24▒L│27з61:Д35?с╡ЕB$│"DE"зЕL│21зЕQ│0з62:ДЕQ│1з63:Д34:Д35?·╢ЕB$│"RI"зЕL│4з76:Д35@P╖ЕB$│"NO"▒B$│"EA"▒B$│"WE"▒B$│"SO"з85:ДЕB$│"DO"░(L│41▒L│44)з87:ДЕB$│"DO"▒B$│"UP"з34@v╕ЕB$│"LI"зЕO(25)│0зЕG│0з80:Д68:Д37@д╣ЕB$│"PO"зЕR│1з34:ДЗ"A QUARTER!":R│2:Бе150@┤║ЕB$│"BA"з35@╬╗ЕB$│"TU"зЕL│37з78:Д35@ё╝ЕB$│"GA"зЕL│20зЕS│0з84:Д82:Д35A╜ЕB$│"PI"з0LQ│10Бе 11300В0GЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);0Y+Е FK│0 з 17900b-FK│00m.Бе 7300s:Ю0КDЗ д11)"PACMAN 7":З0░NЗ:З"   IN THIS GAME YOU WILL TRY"0╙XЗ"TO GATHER AS MANY POINTS AS"0∙bЗ"POSSIBLE BEFORE THE COMPUTER'S"1lЗ"7 MEN CAPTURE YOU."19vЗ"   YOU ARE GIVEN THREE CHANCES"1WАЗ"OR MEN, ONE AT A TIME."1|КЗ"   YOU EARN AN ADDITIONAL MAN"1ЬФЗ"EACH TIME YOU COMPLETELY"1╛ЮЗ"TRAVERSE ALL OF THE PATHS."1фиЗ"   EACH POINT ALONG THE WAY IS"2▓З"WORTH ONE POINT FOR SCORE."2-╝З:Й"HIT <ENTER> TO CONTINUE...";A$23╞Ю2X╨З"   EACH TIME YOU PASS OVER AN"2s┌З"ENERGIZER SPOT, YOU"2ЩфЗ"CAN CAPTURE THE COMPUTER'S MEN"2║юЗ"AND EARN 20 BONUS POINTS."2▀°З"   BUT THIS EXTRA ENERGY ONLY"3З"LASTS FOR 30 SECONDS, AND THAT"3-З"ENERGIZER CAN ONLY BE USED ONCE."3LЗ:З д7)"GOOD LUCK ! ! !":З3s З:Й"HIT <ENTER> TO CONTINUE...";A$3y!Ю3/З3ж4З"PLUG IN RIGHT JOYSTICK AND HOLD"3╠6З"WITH RED BUTTON AWAY FROM YOU."4:З"   HIT SPACE BAR AT END OF GAME":З"TO REPLAY.":З4">Й"HIT <ENTER> TO BEGIN";A$4(HР48ШXI│ Д(30)н24HвYI│ Д(14)н24fмЕ  С(XI,YI)│7 з Z(I)│96:Р4Д╢Е  С(XI,YI)│5 з Z(I)│64:Р4Р└Бе 22004Ы	─Бе 735                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ў<Х 500FЮ1PЙ"INSTRUCTIONS (Y OR N)";A$HZЕ A$│"Y" з Бж 1850rdМ E(6),ZZ(5),Z(5),X(5),Y(5),A(5),B(5){nML│3ДxSC│0Н}PK│0ЦВCT│0ЮМЮ 0┤ЦЗ @ 0,"MEN LEFT";┬аЗ @ 9,ML;╫кЗ @ 14,"POINTS";ц┤З @ 21,SC;Ё╡TM│ Я╢Е TM┤1001 з 185╖TM│TMм1000╕Бе 182.╣А QL│1 е TM;║QM│ Д(6)D╗Л QLU╛Ж 2,12,20,30k╚А I│64 е 448 й 64z╥А J│2 е 30Т▄З @ IлJ, Л(143л96);ЪцЛ JвЁЛ I░·А I│1 е 4╕
Н K╬
А J│96 е 416 й 64ц
З @ KлJ, Л(143л96);ю
"Л JЎ
,Л I д
6Ж 103,112,121,163,164,170,171,173,174,178,179,181,182,188,189,230,232,239,241,248,250,294,296,303,305,312,314,355,356,362,363,365,366,370,371,373,374,380,381,423,432,441 │
@А I│1 е 42 ╗
JН J ╤
TЗ @ J, Л(143л96); ┘
^Л I Ё
hЖ 3,11,13,19,21,29 ■
rА I│1 е 6!	
|Н E(I)!
ЖЛ I!'
РЖ 128,192,320,384!5
ЪА J│1 е 4!=
дН K!K
оА I│1 е 6!c
╕З @ KлE(I), Л(128);!k
┬Л I!s
╠Л J!Й
╓З @ 263, Л(128); !Ю
рЗ @ 272, Л(128);!│
ъЗ @ 281, Л(128);!├
ЇXP│ Д(30)н2!╙
■YP│ Д(14)н2!ьЕ  С(XP,YP)┤▓7 з 500!°CT│CTл1"SC│SCл1"&З @ 21,SC;"5DЗ @ 32н Б(YPо2)л Б(XPо2),"X";"CXА I│1 е 5"NbA(I)│0"YlB(I)│0"kvX(I)│ Д(30)н2"}АY(I)│ Д(14)н2"ЪКЕ  С(X(I),Y(I))┤▓7 з 630"╟иЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);"╙╝Z(I)│96"█╞Л I"Ё╨А I│1 е 1000:Л I"■┌LQ│0:FJ│0#J0│ Н(0):J1│ Н(1):PX│0:PY│0#DЕ J0▓3 з 800 :Д PX│м2:PY│0:Бе 830#j Е J0┤60 з 810 :Д PX│2:PY│0:Бе 830#Р*Е J1▓3 з 820 :Д PX│0:PY│м2:Бе 830#░4Е J1┤60 з 1260 :Д PX│0:PY│2#╧>Е  С(XPлPX,YPлPY)│7 з 1130#юHЕ  С(XPлPX,YPлPY)│5 з 1170$
RЕ  С(XPлPX,YPлPY)│0 з 1260$,WЕ  С(XPлPX,YPлPY)│6 з 1260$K\Е  С(XPлPX,YPлPY)│3 з 1070$V]Бе 870$Ж^З @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));$Щ`X(I)│X(I)лA(I)$мbY(I)│Y(I)лB(I)$╡cFK│1$└dБе 895$щfЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л64);$ pXP│XPлPX:YP│YPлPY%FK│0%ДА I│1 е 3%8ОЗ @ 32н Б(YPо2)л Б(XPо2),"X";%BШа 1,5%kвЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л48);%uма 1,5%}╢Л I%Л╖А I│1 е 5%й╕Е XP│X(I) ░ YP│Y(I) з 954%▒╣Л I%р║Е Z(I)│96 ░ FJ│0 з CT│CTл1:SC│SCл1:Z(I)│64%ь└ML│MLм1%·╩З @ 9,ML;&╘Е ML▓0 з 995&╒З @ 21,SC;&2╓Е  Т│" " з П:Бе 110&=╪Бе 982&MуXP│ Д(30)н2&]шYP│ Д(14)н2&vЄЕ  С(XP,YP)│5 з 1040&ПЇЕ  С(XP,YP)┤▓7 з 995&ШЎLQ│1&║З @ 32н Б(YPо2)л Б(XPо2),"X";&╬А J│1 е 500:Л J&▀$Е LQ│0 з 730&ыjCT│CTл1&ўtSC│SCл1'~З @'уXP│ Д(30)н2'шYP│ Д(14)н2'8ЄЕ  С(XP,YP)│5 з 1040'QЇЕ  С(XP,YP)┤▓7 з 995'ZЎLQ│1'|З @ 32н Б(YPо2)л Б(XPо2),"X";'РА J│1 е 500:Л J'й$Е LQ│0 з 730 :Д 1130'▒.E│1'╫8PE│32н Б((YPлPY)о2)л Б((XPлPX)о2)'хBА I│1 е 6(LЕ E(I)│PE з E(I)│0 :Д Л I(V Я│0(%`З @ 27,30м Б( Яо60);(1jCT│CTл1(=tSC│SCл1(L~З @ 21,SC;(ЕТЕ LQ│1 з 730 :Д З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);(ТЬXP│XPлPX(ЯжYP│YPлPY(┴░З @ 32н Б(YPо2)л Б(XPо2),"X";(щ║Е CT┤242 з 1260 :Д ML│MLл1:П:Бе 130)$─Е  Я▓1800 з 1230 :Д а 100,1:З @ 27,30м Б( Яо60):Бе 780),╬E│0)=╙А IT│27 е 31)Q╪З @ IT, Л(128);)Z▌Л IT)eтБе 780)sьА I│1 е 6)|ёFJ│1)ЕЎNO│0)УC│XPмX(I))б
D│YPмY(I))║Е  В(C)▓ В(D) з 1355)▄Е NO▓1 з 1410 :Д Е D▓0 з 1330*Е  С(X(I),Y(I)м2)│0 з NO│NOл1:Бе 1355*%Е B(I)│2 з NO│NOл1:Бе 1355*0#A(I)│0*<(B(I)│м2*H-Бе 1490*r2Е  С(X(I),Y(I)л2)│0 з NO│NOл1:Бе 1355*Т7Е B(I)│м2 з NO│NOл1:Бе 1355*Э<A(I)│0*иAB(I)│2*┤FБе 1490*╓KЕ NO▓1 з 1410 :Д Е C▓0 з 1385+PЕ  С(X(I)м2,Y(I))│0 з NO│NOл1:Бе 1300+UЕ A(I)│2 з NO│NOл1:Бе 1300++ZA(I)│м2+6_B(I)│0+BdБе 1490+liЕ  С(X(I)л2,Y(I))│0 з NO│NOл1:Бе 1300+МnЕ A(I)│м2 з NO│NOл1:Бе 1300+ЧsA(I)│2+вxB(I)│0+о}Бе 1490+║ВR│ Д(4)+┘ЗИ R Бе 1420,1430,1440,1450+°МЕ  С(X(I),Y(I)м2)│0 з 1430,СЕ B(I)│2 з 1430 :Д 1315,3ЦЕ  С(X(I),Y(I)л2)│0 з 1440,PЫЕ B(I)│м2 з 1440 :Д 1340,oаЕ  С(X(I)м2,Y(I))│0 з 1450,ЛеЕ A(I)│2 з 1450 :Д 1370,ккЕ  С(X(I)л2,Y(I))│0 з 1420,╟пЕ A(I)│м2 з 1420 :Д 1395,╓╥ZZ(I)│Z(I)-╫Е  С(X(I)лA(I),Y(I)лB(I))┤▓7 з 1500 :Д Z(I)│96:Бе 1520-L▄Е  С(X(I)лA(I),Y(I)лB(I))┤▓5 з 1510 :Д Z(I)│64:Бе 1520-sцЕ  С(X(I)лA(I),Y(I)лB(I))│м1 з 862-ЭыЕ  С(X(I)лA(I),Y(I)лB(I))│4 з Бж 2200-═ЁЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));-я·X(I)│X(I)лA(I):Y(I)│Y(I)лB(I).
№Е XI│0 з 1540.(■X(I)│XI:Y(I)│YI:A(I)│0:B(I)│0:XI│0.UЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);.]Л I.hБе 730.q"NO│1.~,RN│ Д(4).Р6Е RN│1 з 1320.в@Е RN│2 з 1350.┤JЕ RN│3 з 1390.└OБе 1420.╞TВ.шrЗ @ 32н Б(YPо2)л Б(XPо2),"X";.ЎwА I│1 е 3/
|а 30,1/	ЖЛ I/РSC│SCл20/%ЪЗ @ 21,SC;/3дА I│1 е 6/RоЕ Y(I)│YP ░ X(I)│XP з 1730/Z╕Л I/i┬ZZ(I)│Z(I)/{╠X(I)│ Д(30)н2/Н╓Y(I)│ Д(14)н2/╡рЕ  С(X(I),Y(I))│7 з Z(I)│96:Бе 1800/▌ъЕ  С(X(I),Y(I))│5 з Z(I)│64:Бе 1800/щЇБе 1740/ ■Е ZZ(I)┤▓96 з 7300LQ│10Бе 11300В0GЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);0Y+Е FK│0 з 17900b-FK│00m.Бе 7300s:Ю0КDЗ д11)"PACMAN 6":З0░NЗ:З"   IN THIS GAME YOU WILL TRY"0╙XЗ"TO GATHER AS MANY POINTS AS"0∙bЗ"POSSIBLE BEFORE THE COMPUTER'S"1lЗ"6 MEN CAPTURE YOU."19vЗ"   YOU ARE GIVEN THREE CHANCES"1WАЗ"OR MEN, ONE AT A TIME."1|КЗ"   YOU EARN AN ADDITIONAL MAN"1ЬФЗ"EACH TIME YOU COMPLETELY"1╛ЮЗ"TRAVERSE ALL OF THE PATHS."1фиЗ"   EACH POINT ALONG THE WAY IS"2▓З"WORTH ONE POINT FOR SCORE."2-╝З:Й"HIT <ENTER> TO CONTINUE...";A$23╞Ю2X╨З"   EACH TIME YOU PASS OVER AN"2s┌З"ENERGIZER SPOT, YOU"2ЩфЗ"CAN CAPTURE THE COMPUTER'S MEN"2║юЗ"AND EARN 20 BONUS POINTS."2▀°З"   BUT THIS EXTRA ENERGY ONLY"3З"LASTS FOR 30 SECONDS, AND THAT"3-З"ENERGIZER CAN ONLY BE USED ONCE."3LЗ:З д7)"GOOD LUCK ! ! !":З3s З:Й"HIT <ENTER> TO CONTINUE...";A$3y!Ю3/З3ж4З"PLUG IN RIGHT JOYSTICK AND HOLD"3╠6З"WITH RED BUTTON AWAY FROM YOU."4:З"   HIT SPACE BAR AT END OF GAME":З"TO REPLAY.":З4">Й"HIT <ENTER> TO BEGIN";A$4(HР48ШXI│ Д(30)н24HвYI│ Д(14)н24fмЕ  С(XI,YI)│7 з Z(I)│96:Р4Д╢Е  С(XI,YI)│5 з Z(I)│64:Р4Р└Бе 22004Ы	─Бе 735                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     WITH 0 OR 1 LIVE                NEIGHBORS, THE CELL DIES        OF LONELINESS.  WITH 4          TO 8 LIVE NEIGHBORS, THE        CELL DIES OF                    OVERPOPULATION."/с
TЗ@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$0з
^Ю:З"YOUR COLOR COMPUTER WILL KEEP   TRACK OF THESE RULES FOR YOU.   IT WILL PLAY NATURE AND CONTROL THE RULES OF LIFE FOR THE CELLS.YOU WILL BE GIVEN A CHOICE WITH THE MENU ON THE NEXT SCREEN."1J
hЗ"YOU MAY CHOOSE TO START WITH    YOUR OWN ARRANGEMENT OF CELLS ORWATCH WHAT HAPPENS TO SOME      SPECIAL ARRANGEMENTS THAT HAVE  BEEN PREPROGRAMMED FOR YOU."1а
rЗ"THE CURRENT NUMBER OF CYCLES    WILL BE DISPLAYED AT THE RIGHT  OF THE SCREEN."1╬
|З@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$2й
ЖN$(0)│"R4D8L4U8":N$(1)│"BR2D2NL2D6NL2R2":N$(3)│"R4D4NL4D4L4":N$(4)│"D4R4NU4D4":N$(5)│"NR4D4R4D4L4":N$(2)│"R4D4L4D4R4":N$(6)│"NR4D8R4U4L4":N$(7)│"R4D8":N$(8)│"D8R4U4NL4U4L4":N$(9)│"ND4R4D4NL4D4L4":BL$│"C5D8R2U8R2D8"2╫
РЮ:З"MENU":╚1,1:╝:CY│0:PD│0:PE│0:PF│0:PG│03╞
ЪЗ"1. YOUR OWN ARRANGEMENT         2. BLACKOUT - DIES AFTER 1 CYCLE3. BLINKER - OSCILLATES BY CYCLE4. STILL LIFE - STABLE=0 CYCLES 5. T TETROMINO - STABLE=9 CYCLES6. R PENTOMINO - STABLE=1103 CY.7. GLIDER - MOVES ONE DIRECTION 8. QUIT"3═
дЙC3ч
оЕC┤1▒C▓8▒C┤▓ Б(C)з4004
╕ИC Бе460,720,730,740,750,760,7704
┬Т65494,0:К4╒
╠Ю:З"YOU WILL BE WORKING ON A GRID   120 X 96.  YOU MAY TURN ON UP TO99 PIXELS AT ANY POSITIONS YOU  WISH.  KEEP LIFE'S RULES IN MINDWHEN SETTING UP YOUR STARTING   ARRANGEMENT.":З:З4▌
╓N│04ч
рN│Nл15	
ъЙ"X-COORDINATE (0-119)";XC(N)56
ЇЕ XC(N)┤0▒XC(N)▓119▒XC(N)┤▓ Б(XC(N))з4905W
■Й"Y-COORDINATE (0-95)";YC(N)5ВЕYC(N)┤0▒YC(N)▓95▒YC(N)┤▓ Б(YC(N))з5105Ы╜(2нXC(N),2нYC(N),6)5йЕN│99з5705╩&Й"DONE OR MORE (D OR M)";ZC$5ю0ЕZC$│"D"з570:ДЕZC$│"M"з480:Д5506Ь:Ю:З@224,"PRESS AND HOLD <CLEAR> TO STOP  GENERATIONS AND RETURN TO THE   MENU FROM THE GRAPHICS SCREEN.":З@480,"PRESS <ENTER> TO BEGIN...";:ЙA$:┐1,1:╗(240,0)м(240,191),╜6кD╟1е3:╟2е46┤NБж6306└XZ│ Г(0)6╠bCY│CYл16шlЕ Ж(&H153)│191з400:Д5907vD│ Б(CYо1000):Y│0:H│D7АБж7007+КE│ Б(CYо100)мDн10:Y│14:H│E75ФБж7007YЮF│ Б(CYо10)мDн100мEн10:Y│28:H│F7cиБж7007З▓G│CYмDн1000мEн100мFн10:Y│42:H│G7┐╝╞"BM250,"л И(Y)л";"лBL$:╞"C6BM250,"л И(Y)л";"лN$(H)7┼╞Р7ч╨╜(120,96,6):╜(122,96,6):Бе5708┌╜(118,96,6):╜(120,96,6):╜(122,96,6):Бе5708Oф╜(120,96,6):╜(122,96,6):╜(120,98,6):╜(122,98,6):Бе5708Йю╜(118,96,6):╜(120,96,6):╜(122,96,6):╜(120,98,6):Бе5708╧°╜(120,94,6):╜(122,94,6):╜(118,96,6):╜(120,96,6):╜(120,98,6):Бе5709╜(120,94,6):╜(122,96,6):╜(118,98,6):╜(120,98,6):╜(122,98,6):Бе5709еЖ 142,255,255,48,1,172,141,3,5,38,248,111,141,2,242,111,141,2,239,111,141,2,236,134,32,230,141,2,230,61,211,186,227,141,2,221,237,141,2,220:5Ж 111,141,2,218,174,141,2,212,166,141,2,207,39,45,166,141,2,200,39,13,166,136,223,132,3,129,1,38,4,108,141,2,189,166,136,224,132,192,129,64:┴ Ж 38,4,108,141,2,176,166,136,224,132,48,129,16,38,4,108,141,2,163,166,141,2,155,39,12,166,31,132,3,129,1,38,4,108,141,2,145,166,132,132;L*Ж 48,129,16,38,4,108,141,2,133,166,141,2,126,129,95,39,45,166,141,2,117,39,13,166,136,31,132,3,129,1,38,4,108,141,2,106,166,136,32,132;╥4Ж 192,129,64,38,4,108,141,2,93,166,136,32,132,48,129,16,38,4,108,141,2,80,166,141,2,76,129,2,37,20,129,3,34,16,39,2,32,20,166,137<\>Ж 12,0,138,64,167,137,12,0,32,8,166,137,12,0,132,63,32,242,111,141,2,40,174,141,2,34,166,141,2,29,39,39,166,136,224,132,192,129,64,38<шHЖ 4,108,141,2,17,166,136,224,132,48,129,16,38,4,108,141,2,4,166,136,224,132,12,129,4,38,4,108,141,1,247,166,132,132,192,129,64,38,4,108=wRЖ 141,1,235,166,132,132,12,129,4,38,4,108,141,1,223,166,141,1,216,129,95,39,39,166,136,32,132,192,129,64,38,4,108,141,1,202,166,136,32,132=■\Ж 48,129,16,38,4,108,141,1,189,166,136,32,132,12,129,4,38,4,108,141,1,176,166,141,1,172,129,2,37,20,129,3,34,16,39,2,32,20,166,137>ЛfЖ 12,0,138,16,167,137,12,0,32,8,166,137,12,0,132,207,32,242,111,141,1,136,174,141,1,130,166,141,1,125,39,39,166,136,224,132,48,129,16,38?pЖ 4,108,141,1,113,166,136,224,132,12,129,4,38,4,108,141,1,100,166,136,224,132,3,129,1,38,4,108,141,1,87,166,132,132,48,129,16,38,4,108?ЯzЖ 141,1,75,166,132,132,3,129,1,38,4,108,141,1,63,166,141,1,56,129,95,39,39,166,136,32,132,48,129,16,38,4,108,141,1,42,166,136,32,132@"ДЖ 12,129,4,38,4,108,141,1,29,166,136,32,132,3,129,1,38,4,108,141,1,16,166,141,1,12,129,2,37,20,129,3,34,16,39,2,32,20,166,137 @нОЖ 12,0,138,4,167,137,12,0,32,8,166,137,12,0,132,243,32,242,111,141,0,232,174,141,0,226,166,141,0,221,39,47,166,136,224,132,12,129,4,38A;ШЖ 4,108,141,0,209,166,136,224,132,3,129,1,38,4,108,141,0,196,166,141,0,188,12 ш<Х 500FЮ1PЙ"INSTRUCTIONS (Y OR N)";A$HZЕ A$│"Y" з Бж 1850rdМ E(6),ZZ(5),Z(5),X(5),Y(5),A(5),B(5){nML│3ДxSC│0Н}PK│0ЦВCT│0ЮЗE│0жМЮ 0╝ЦЗ @ 0,"MEN LEFT";╩аЗ @ 9,ML;▀кЗ @ 14,"POINTS";ю┤З @ 21,SC;°╡TM│ Я╢Е TM┤1001 з 185╖TM│TMм1000&╕Бе 1826╣А QL│1 е TMC║QM│ Д(6)L╗Л QL]╛Ж 2,12,20,30s╚А I│64 е 448 й 64В╥А J│2 е 30Ъ▄З @ IлJ, Л(143л96);вцЛ JкЁЛ I╕·А I│1 е 4└
Н K╓
А J│96 е 416 й 64ю
З @ KлJ, Л(143л96);Ў
"Л J■
,Л I м
6Ж 103,112,121,163,164,170,171,173,174,178,179,181,182,188,189,230,232,239,241,248,250,294,296,303,305,312,314,355,356,362,363,365,366,370,371,373,374,380,381,423,432,441 ╗
@А I│1 е 42 ├
JН J ┘
TЗ @ J, Л(143л96); с
^Л I °
hЖ 3,11,13,19,21,29!
rА I│1 е 6!
|Н E(I)!
ЖЛ I!/
РЖ 128,192,320,384!=
ЪА J│1 е 4!E
дН K!S
оА I│1 е 6!k
╕З @ KлE(I), Л(128);!s
┬Л I!{
╠Л J!С
╓З @ 263, Л(128); !ж
рЗ @ 272, Л(128);!╗
ъЗ @ 281, Л(128);!╫
ьЖ 66,94,268,276,450,478!х
юА I│1 е 6!Ё
ЁН E(I)"	
ёЗ @ E(I), Л(143л32);"
ЄЛ I"!
ЇXP│ Д(30)н2"1
■YP│ Д(14)н2"JЕ  С(XP,YP)┤▓7 з 500"VCT│CTл1"bSC│SCл1"q&З @ 21,SC;"УDЗ @ 32н Б(YPо2)л Б(XPо2),"X";"бXА I│1 е 5"мbA(I)│0"╖lB(I)│0"╔vX(I)│ Д(30)н2"█АY(I)│ Д(14)н2"°КЕ  С(X(I),Y(I))┤▓7 з 630#%иЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);#1╝Z(I)│96#9╞Л I#N╨А I│1 е 1000:Л I#y┌Е  Ж(65280)│126 ▒  Ж(65280)│254 з 2500#С▀LQ│0:FJ│0:А I│1 е 6#╣фЕ E(I)│0 з 760 :Д З @ E(I), Л(128);#╥юЗ @ E(I), Л(143л32);#┌°Л I#ыЕ E│1 з 1220$J0│ Н(0):J1│ Н(1):PX│0:PY│0$1Е J0▓3 з 800 :Д PX│м2:PY│0:Бе 830$W Е J0┤60 з 810 :Д PX│2:PY│0:Бе 830$}*Е J1▓3 з 820 :Д PX│0:PY│м2:Бе 830$Э4Е J1┤60 з 1260 :Д PX│0:PY│2$╝>Е  С(XPлPX,YPлPY)│7 з 1130$█HЕ  С(XPлPX,YPлPY)│5 з 1170$·RЕ  С(XPлPX,YPлPY)│0 з 1260%WЕ  С(XPлPX,YPлPY)│6 з 1260%8\Е  С(XPлPX,YPлPY)│3 з 1070%C]Бе 870%s^З @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));%Ж`X(I)│X(I)лA(I)%ЩbY(I)│Y(I)лB(I)%вcFK│1%нdБе 890%╓fЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л64);%ьpXP│XPлPX:YP│YPлPY%¤zЕ E│1 з 1620&FK│0&ДА I│1 е 3&6ОЗ @ 32н Б(YPо2)л Б(XPо2),"X";&@Ша 1,5&iвЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л48);&sма 1,5&{╢Л I&Й╖А I│1 е 5&з╕Е XP│X(I) ░ YP│Y(I) з 954&п╣Л I&▐║Е Z(I)│96 ░ FJ│0 з CT│CTл1:SC│SCл1:Z(I)│64&ъ└ML│MLм1&°╩З @ 9,ML;'	╘Е ML▓0 з 990'╒З @ 21,SC;'0╓Е  Т│" " з П:Бе 110';╪Бе 982'A▐В'QуXP│ Д(30)н2'aшYP│ Д(14)н2'zЄЕ  С(XP,YP)│5 з 1020'УЇЕ  С(XP,YP)┤▓7 з 995'ЬЎLQ│1'в№В'─З @ 32н Б(YPо2)л Б(XPо2),"X";'╪А J│1 е 500:Л J'ё$Е LQ│0 з 730 :Д 1130'∙.E│1(8PE│32н Б((YPлPY)о2)л Б((XPлPX)о2)(-BА I│1 е 6(KLЕ E(I)│PE з E(I)│0 :Д Л I(TV Я│0(m`З @ 27, Б(30м Яо60);(yjCT│CTл1(ЕtSC│SCл1(Ф~З @ 21,SC;(═ТЕ LQ│1 з 730 :Д З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);(┌ЬXP│XPлPX(чжYP│YPлPY)	░З @ 32н Б(YPо2)л Б(XPо2),"X";)1║Е CT┤242 з 1260 :Д ML│MLл1:П:Бе 130)l─Е  Я▓1800 з 1230 :Д а 100,1:З @ 27, Б(30м Яо60):Бе 780)t╬E│0)Е╙А IT│27 е 31)Щ╪З @ IT, Л(128);)в▌Л IT)нтБе 780)╗ьА I│1 е 5)─ёFJ│1)═ЎNO│0)█C│XPмX(I))щ
D│YPмY(I)*Е  В(C)▓ В(D) з 1355*$Е NO▓1 з 1410 :Д Е D▓0 з 1330*NЕ  С(X(I),Y(I)м2)│0 з NO│NOл1:Бе 1355*mЕ B(I)│2 з NO│NOл1:Бе 1355*x#A(I)│0*Д(B(I)│м2*Р-Бе 1490*║2Е  С(X(I),Y(I)л2)│0 з NO│NOл1:Бе 1355*┌7Е B(I)│м2 з NO│NOл1:Бе 1355*х<A(I)│0*ЁAB(I)│2*№FБе 1490+KЕ NO▓1 з 1410 :Д Е C▓0 з 1385+HPЕ  С(X(I)м2,Y(I))│0 з NO│NOл1:Бе 1300+gUЕ A(I)│2 з NO│NOл1:Бе 1300+sZA(I)│м2+~_B(I)│0+КdБе 1490+┤iЕ  С(X(I)л2,Y(I))│0 з NO│NOл1:Бе 1300+╘nЕ A(I)│м2 з NO│NOл1:Бе 1300+▀sA(I)│2+ъxB(I)│0+Ў}Бе 1490,ВR│ Д(4),!ЗИ R Бе 1420,1430,1440,1450,@МЕ  С(X(I),Y(I)м2)│0 з 1430,\СЕ B(I)│2 з 1430 :Д 1315,{ЦЕ  С(X(I),Y(I)л2)│0 з 1440,ШЫЕ B(I)│м2 з 1440 :Д 1340,╖аЕ  С(X(I)м2,Y(I))│0 з 1450,╙еЕ A(I)│2 з 1450 :Д 1370,ЄкЕ  С(X(I)л2,Y(I))│0 з 1420-пЕ A(I)│м2 з 1420 :Д 1395-╥ZZ(I)│Z(I)-Y╫Е  С(X(I)лA(I),Y(I)лB(I))┤▓7 з 1500 :Д Z(I)│96:Бе 1520-Ф▄Е  С(X(I)лA(I),Y(I)лB(I))┤▓5 з 1510 :Д Z(I)│64:Бе 1520-╗цЕ  С(X(I)лA(I),Y(I)лB(I))│м1 з 862-хыЕ  С(X(I)лA(I),Y(I)лB(I))│4 з Бж 2200.ЁЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));.7·X(I)│X(I)лA(I):Y(I)│Y(I)лB(I).I№Е XI│0 з 1540.p■X(I)│XI:Y(I)│YI:A(I)│0:B(I)│0:XI│0.ЭЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);.еЛ I.░Бе 730.╣"NO│1.╞,RN│ Д(4).╪6Е RN│1 з 1320.ъ@Е RN│2 з 1350.№JЕ RN│3 з 1390/OБе 1420/TВ/0rЗ @ 32н Б(YPо2)л Б(XPо2),"X";/>wА I│1 е 3/I|а 30,1/QЖЛ I/^РSC│SCл20/mЪЗ @ 21,SC;/{дА I│1 е 5/ЪоЕ Y(I)│YP ░ X(I)│XP з 1730/в╕Л I/▒┬ZZ(I)│Z(I)/├╠X(I)│ Д(30)н2/╒╓Y(I)│ Д(14)н2/¤рЕ  С(X(I),Y(I))│7 з Z(I)│96:Бе 18000 ╫
Ю'Й"INSTRUCTIONS (Y OR N)";A$:Е A$│"Y" з 540D(╚ 4,1J2╝T<┐ 1,1fFP│3.141592654sPP1│Pо180}ZJ0│31ЗdJ1│31═nЖ -50,-50,50,1.25,50,-50,50,1.75,50,-50,-50,1.75,-50,-50,-50,1.25xЖ -50,50,50,.75,50,50,50,.25,50,50,-50,.25,-50,50,-50,.75ВА I│1 е 80МН X(I),Y(I),Z(I),M=ЦL(I)│MнPEаЛ IPкБе 400]┤J0│ Н(0)j╛J1│ Н(1){╚A│(J0м31)нP1М╥B│(J1м31)нP1Ъ▄А I│1 е 8╕цR│ Ы(Y(I)нY(I)лX(I)нX(I))╬ЁX(I)│Rн Х(AлL(I))ф·Y(I)│Rн Е(AлL(I)) 

Е Y(I)│0 ░ Z(I)┤0 з N│мPо2:Бе 300 &
Е Y(I)│0 з N│Pо2:Бе 300 :
N│ Ф(Z(I)оY(I)) O
"Е Y(I)┤0 з N│NлP Z
,M(I)│N x
6R│ Ы(Y(I)нY(I)лZ(I)нZ(I)) О
@Y(I)│Rн Х(BлM(I)) д
JZ(I)│Rн Е(BлM(I)) ╩
TЕ X(I)│0 ░ Y(I)┤0 з N│мPо2:Бе 380 ц
^Е X(I)│0 з N│Pо2:Бе 380 ·
hN│ Ф(Y(I)оX(I))!
rЕ X(I)┤0 з N│NлP!
|L(I)│N!"
ЖЛ I!(
Р╝!U
Ъ╗(X(1)л128,96мZ(1))м(X(2)л128,96мZ(2)),╜!p
д╗м(X(3)л128,96мZ(3)),╜!Л
о╗м(X(4)л128,96мZ(4)),╜!ж
╕╗м(X(1)л128,96мZ(1)),╜!┴
┬╗м(X(5)л128,96мZ(5)),╜!▄
╠╗м(X(6)л128,96мZ(6)),╜!ў
╓╗м(X(7)л128,96мZ(7)),╜"
р╗м(X(8)л128,96мZ(8)),╜"-
ъ╗м(X(5)л128,96мZ(5)),╜"Z
Ї╗(X(2)л128,96мZ(2))м(X(6)л128,96мZ(6)),╜"З
■╗(X(3)л128,96мZ(3))м(X(7)л128,96мZ(7)),╜"┤╗(X(4)л128,96мZ(4))м(X(8)л128,96мZ(8)),╜"┐Бе 180"┼Ю"ы&З"PLUG IN THE RIGHT JOYSTICK AND"#0З"PLACE THE STICK AT THE CENTER."#:З#:DЗ"BY MOVING THE STICK YOU CAN"#]NЗ"CONTROL THE MOVEMENT OF THE"#XЗ"3-DIMENSIONAL BOX AND THUS"#ЯbЗ"ROTATE THE BOX IN SPACE."#еlЗ#лvЗ#╠АЙ"HIT enter TO CONTINUE.";A$#╓КБе 40                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       q<Х 500FЮ1PЙ"INSTRUCTIONS (Y OR N)";A$HZЕ A$│"Y" з Бж 1850rdМ E(6),ZZ(5),Z(5),X(5),Y(5),A(5),B(5){nML│3ДxSC│0Н}PK│0ЦВCT│0ЮЗE│0жМЮ 0╝ЦЗ @ 0,"MEN LEFT";╩аЗ @ 9,ML;▀кЗ @ 14,"POINTS";ю┤З @ 21,SC;°╡TM│ Я╢Е TM┤1001 з 185╖TM│TMм1000&╕Бе 1826╣А QL│1 е TMC║QM│ Д(6)L╗Л QL]╛Ж 2,12,20,30s╚А I│64 е 448 й 64В╥А J│2 е 30Ъ▄З @ IлJ, Л(143л96);вцЛ JкЁЛ I╕·А I│1 е 4└
Н K╓
А J│96 е 416 й 64ю
З @ KлJ, Л(143л96);Ў
"Л J■
,Л I м
6Ж 103,112,121,163,164,170,171,173,174,178,179,181,182,188,189,230,232,239,241,248,250,294,296,303,305,312,314,355,356,362,363,365,366,370,371,373,374,380,381,423,432,441 ╗
@А I│1 е 42 ├
JН J ┘
TЗ @ J, Л(143л96); с
^Л I °
hЖ 3,11,13,19,21,29!
rА I│1 е 6!
|Н E(I)!
ЖЛ I!/
РЖ 128,192,320,384!=
ЪА J│1 е 4!E
дН K!S
оА I│1 е 6!k
╕З @ KлE(I), Л(128);!s
┬Л I!{
╠Л J!С
╓З @ 263, Л(128); !ж
рЗ @ 272, Л(128);!╗
ъЗ @ 281, Л(128);!╫
ьЖ 66,94,268,276,450,478!х
юА I│1 е 6!Ё
ЁН E(I)"	
ёЗ @ E(I), Л(143л32);"
ЄЛ I"!
ЇXP│ Д(30)н2"1
■YP│ Д(14)н2"JЕ  С(XP,YP)┤▓7 з 500"VCT│CTл1"bSC│SCл1"q&З @ 21,SC;"УDЗ @ 32н Б(YPо2)л Б(XPо2),"X";"бXА I│1 е 5"мbA(I)│0"╖lB(I)│0"╔vX(I)│ Д(30)н2"█АY(I)│ Д(14)н2"°КЕ  С(X(I),Y(I))┤▓7 з 630#%иЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);#1╝Z(I)│96#9╞Л I#N╨А I│1 е 1000:Л I#y┌Е  Ж(65280)│126 ▒  Ж(65280)│254 з 2500#С▀LQ│0:FJ│0:А I│1 е 6#╣фЕ E(I)│0 з 760 :Д З @ E(I), Л(128);#╥юЗ @ E(I), Л(143л32);#┌°Л I#ыЕ E│1 з 1220$J0│ Н(0):J1│ Н(1):PX│0:PY│0$2Е J0▓10 з 800 :Д PX│м2:PY│0:Бе 830$X Е J0┤53 з 810 :Д PX│2:PY│0:Бе 830$*Е J1▓10 з 820 :Д PX│0:PY│м2:Бе 830$Я4Е J1┤53 з 1260 :Д PX│0:PY│2$╛>Е  С(XPлPX,YPлPY)│7 з 1130$▌HЕ  С(XPлPX,YPлPY)│5 з 1170$№RЕ  С(XPлPX,YPлPY)│0 з 1260%WЕ  С(XPлPX,YPлPY)│6 з 1260%:\Е  С(XPлPX,YPлPY)│3 з 1070%E]Бе 870%u^З @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));%И`X(I)│X(I)лA(I)%ЫbY(I)│Y(I)лB(I)%дcFK│1%пdБе 890%╪fЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л64);%юpXP│XPлPX:YP│YPлPY% zЕ E│1 з 1620&FK│0&ДА I│1 е 3&8ОЗ @ 32н Б(YPо2)л Б(XPо2),"X";&BШа 1,5&kвЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л48);&uма 1,5&}╢Л I&Л╖А I│1 е 5&й╕Е XP│X(I) ░ YP│Y(I) з 954&▒╣Л I&р║Е Z(I)│96 ░ FJ│0 з CT│CTл1:SC│SCл1:Z(I)│64&ь└ML│MLм1&·╩З @ 9,ML;'╘ ┤
ЮМ A(12),D(12),N(25)9А I│1 е 12:Н A(I):Л IS(А I│1 е 12:Н D(I):Л IД2Ж 0,31,59,90,120,151,181,212,243,273,304,334о<Ж 31,28,31,30,31,30,31,31,30,31,30,31╝FP│6.28318▐PЗ"ENTER GRAPH START DATE AS:"ЎZЙ"MM,DD,YYYY";M,D,Y	dM2│M:D2│D:Y3│YnY5│YxБж 240%ВZ│TDМЗ:З:З"ENTER BIRTHDATE AS:"\ЦЙ"MM,DD,YYYY";M,D,YdаЗ:ЗwкM1│M:D1│D:Y2│YВ┤Бж 240М╛V│TмZШ╚V│ В(V)н╥Й"ENTER NAME";W$╡▄З:З└цБе 460╬ЁY1│Yм1800▐·Q1│ Б(Y1о4)я
Q2│ Б(Q1о25) 
Q3│ Б((Y1л200)о400) 
K│0 #
"Е Q1н4│Y1 з 310 .
,Бе 360 D
6Е Q2н100│Y1 з 330 O
@Бе 360 i
JЕ Q3н400м200│Y1 з 350 t
TБе 360 |
^K│1 Ф
hT│365нY1лQ1мQ2лQ3мK е
rT│TлA(M)лDм1 ╡
|Е M┤3 з 400 ┐
ЖT│TлK ┘
РЕ  Б(Y1о4)│Y1о4 з 420 ф
ЪБе 440 Ї
дЕ M▓2 з 440 ■
оT│Tм1!
╕J│Tм7н Б(Tо7)!
┬Р!!
╠N(X)│0!'
╓Ю!1
рD9│13!7
ъЮ!Z
ЇЗ"THE MEDIAN LINE (0) IS YOUR"!Б
■З"CRITICAL POINT AND IS WHEN MOST"!гЗ"ACCIDENTS OCCUR.  THE HIGH"!╚З"PERIODS (+) ARE WHEN YOU HAVE"!ыЗ"THE MOST ENERGY AND THE LOW""&З"PERIODS (-) ARE REGARDED AS""+0З"RECUPERATIVE PERIODS.""R:З"*******************************""lDЗ"GRAPHIC SYMBOLS:":З"ТNЗ"*:MEDIAN LINE         (0 LINE)""╕XЗ"P:PHYSICAL CYCLE      (23-DAY)""▐bЗ"E:EMOTIONAL CYCLE     (28-DAY)"#lЗ"I:INTELLECTUAL CYCLE  (33-DAY)"#*vЗ:Й"HIT <ENTER> TO CONTINUE...";W#0АЮ#IКЗ"YOUR BIRTHDAY IS "#cФA9│M1:Бж 1380:З D1;Y2#ДЮЗ"IT WAS A ";:B9│Jл1:Бж 1500#ЩиЗ" AND OCCURRED"#╠▓З V;"DAYS OR"; Б((Vо365)н100)о100;"YEARS AGO."#╥╝З#ў╞З"HERE IS THE PERSONALIZED BIO-"$
╨З"RHYTHM FOR ";W$$8┌З"STARTING AT ";:A9│M2:Бж 1380:З D2;Y3$OфЗ"AND ENDING AT ";$jюM9│M2:D8│D2лD9м1:Y9│Y3$|°Е M9▓12 з 780$ЗБе 790$ШM9│1:Y9│Y9л1$йЕ M9│2 з 810$┤ Бе 840$╬*Е  Б(Y9о4)│Y9о4 з 830$┘4Бе 840$с>K│1$°HЕ D8▓D(M9)лK з 860%RБе 880%#\D8│D8м(D(M9)лK):M9│M9л1:K│0%.fБе 760%HpA9│M9:Бж 1380:З D8;Y9%szЗ:З:Й"HIT <ENTER> TO START GRAPH...";W%yДЮ%ЩОЗ"  DATE   (-)";д19);"(0)";%кШЗ д29);"(+)"%рвJ1│VлJ:J1│J1м7н Б(J1о7):D2│D2м1:J1│J1м1:V│Vм1:K│0&мА I│1 е D9:V│Vл1:D2│D2л1:J1│J1л1:Е M2│2 з 960&╢Бе 990&7└Е  Б(Y3о4)│Y3о4 з 980&B╩Бе 990&J╘K│1&b▐Е D2▓D(M2)лK з 1010&nшБе 1020&ЄM2│M2л1:D2│1&С№Е J1┤7 з 1040&ЪJ1│0&нЕ M2▓12 з 1060&╣Бе 1070&╩$M2│1:Y3│Y3л1&▐.Е J1л1│3 з 1090&ъ8Бе 1120&ЁBВ&№LБе 1120'VВ'`Е M2│M1 з 1140'!jБе 1170'4tЕ D2│D1 з 1160'@~Бе 1170'FИВ'RТE9│J1л1'jЬA9│M2:Бж 1380:З D2;'джX│23:Бж 1570:P5│X:X│28:Бж 1570:S5│X:X│33:Бж 1570:C5│X'┐░N│0:А L│10 е 30:З дL);'╤║Е P5│L з 1230'▌─Бе 1240'я╬З"P";:Бе 1330(
╪Е S5│L з 1260(
тБе 1270(ьЗ"E";:Бе 1330(1ЎЕ C5│L з 1290(=Бе 1300(O
З"I";:Бе 1330(aЕ 20│L з 1320(mБе 1360(w(З"*";(О2N│Nл1:Е N│4 з 1350(Ъ<Бе 1360(дFL│100(▓PЛ L:З:Л I(╛ZБе 1370(╒dЕ A9│1 з З"JAN";:Р(ьnЕ A9│2 з З"FEB";:Р)xЕ A9│3 з З"MAR";:Р)ВЕ A9│4 з З"APR";:Р)1МЕ A9│5 з З"MAY";:Р)HЦЕ A9│6 з З"JUN";:Р)_аЕ A9│7 з З"JUL";:Р)vкЕ A9│8 з З"AUG";:Р)Н┤Е A9│9 з З"SEP";:Р)е╛Е A9│10 з З"OCT";:Р)╜╚Е A9│11 з З"NOV";:Р)╦╥З"DEC";:Р)ш▄Е B9│1 з З"WEDNESDAY";:Р*цЕ B9│2 з З"THURSDAY";:Р*ЁЕ B9│3 з З"FRIDAY";:Р*:·Е B9│4 з З"SATURDAY";:Р*TЕ B9│5 з З"SUNDAY";:Р*nЕ B9│6 з З"MONDAY";:Р*АЗ"TUESDAY";:Р*з"X│ Б( Е((VоXм Б(VоX))нP)н10л.5)л20*н,Р*│6К                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           ─.┼,┼(&╞$!─#├%╟┼├+╔/╚                    BIORHY  BAS ╖BOGGLE  BAS"┴BOX     BAS┌BTPACMANBAStFSPACMANBASыLIFE    BAS'╣PACMAN6 BAS)ЯPACMAN7 BAS*ЯPACWOMANBAS·SHIPWREKBAS-KTMBOGGLEBASж                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╛#
М T(10),S(4),C(6),Z(2,4),K(4))ЮPЗ"THIS IS THE GAME OF BOGGLE.":З:Зp(Й"INSTRUCTIONS (Y OR N)";A$Л2З:Е A$│"Y" з 60 :Д 490С<Ю╕FЗ"I AM GOING TO PICK A FOUR DIGIT"╪PЗ"NUMBER USING DIGITS 1-6."▐ZЗdЗ"YOU ARE TO TRY TO DEDUCE THAT"&nЗ"NUMBER IN AS FEW GUESSES AS"7xЗ"POSSIBLE."_ВЗ:З"EVERY TIME YOU MAKE A GUESS, I"ДМЗ"WILL GIVE YOU CLUES AS TO HOW"йЦЗ"CLOSE YOU ARE TO THE NUMBER I"╕аЗ"PICKED."▌кЗ:З"THE CLUES WILL BE THE WORDS"Ї┤З"BLACK OR WHITE." ╛З:Й"HIT <ENTER> TO CONTINUE...";W  ╚Ю E╥З"WHEN I SAY BLACK IT MEANS ONE" i▄З"OF THE DIGITS IS CORRECT BUT" ~цЗ"OUT OF ORDER." еЁЗ:З"WHEN I SAY WHITE IT MEANS ONE" ╔·З"OF THE DIGITS IS CORRECT AND" ц
З"IN THE CORRECT ORDER."!
З:Й"HIT <ENTER> TO CONTINUE...";W!
Ю!&
"З"FOR EXAMPLE:"!B
,З"THE NUMBER IS 5216":З!\
6З"YOU GUESS:  2413":З!Б
@З"YOU WOULD GET A BLACK BECAUSE"!з
JЗ"THE DIGIT 2 IS CORRECT BUT OUT"!╠
TЗ"OF ORDER, AND A WHITE BECAUSE"!ё
^З"THE DIGIT 1 IS CORRECT AND IN""
hЗ"THE CORRECT ORDER.""1
rЗ:Й"HIT <ENTER> TO CONTINUE...";W"7
|Ю"[
ЖЗ"THERE ARE TWO GAME VERSIONS.""Д
РЗ:З"THE BEGINNER'S VERSION WILL NOT""й
ЪЗ"HAVE THE SAME DIGIT USED MORE""╟
дЗ"THAN ONCE IN A NUMBER.""ю
оЗ:З"THE EXPERT'S VERSION CAN HAVE"#
╕З"ANY OR ALL THE DIGITS THE SAME."#:
┬З:З"ONE TO TEN PEOPLE CAN PLAY."#\
╠З:З"SEE WHO CAN DO THE BEST."#Е
╓З:З"********** GOOD LUCK **********"#л
рЗ:Й"HIT <ENTER> TO CONTINUE...";W#╤
ъЮ:Й"E = EXPERT : B = BEGINNER";A$#┘
ЇЗ:З#°
■Й"HOW MANY WISH TO PLAY";Q$,Е Q▓10 з 510 :Д Е Q┤1 з 510 :Д Е Q┤▓ Б(Q) з 510$:А P│1 е Q$@Ю$T&З"PERSON";P;":"$Z0З$s:А I│1 е 6:C(I)│0:Л I$ЕDN│0:А I│1 е 4$бNN1│ Д(6):Е A$│"E" з 610$└XЕ C(N1)│1 з 590 :Д C(N1)│1$▄bN│Nл(N1н(10п(Iм1))):Л I$ъlN1│N:T5│0%vT1│ Б(Nо1000):N│NмT1н1000%$АH1│ Б(Nо100):N│NмH1н100%>КE1│ Б(Nо10):N│NмE1н10%TФN│ Б(N):N1│ Б(N1)%ЮZ(1,1)│T1:Z(1,2)│H1:Z(1,3)│E1:Z(1,4)│N%ШиЗ:Е T5│25 з З :Д 710%п▓З"TOO MANY TRIES."%╬╝З"THE ANSWER IS";N1:Бе 930%ъ╞Й"WHAT IS YOUR GUESS";G%√╨T5│T5л1:G1│G& ┌А I│1 е 4:S(I)│0:K(I)│0:Л I:X1│0&<фT│ Б(Gо1000):G│GмTн1000&VюH│ Б(Gо100):G│GмHн100&n°E│ Б(Gо10):G│GмEн10&ЦZ(2,1)│T:Z(2,2)│H:Z(2,3)│E:Z(2,4)│G&иЕ G1│N1 з 910&╢А L│1 е 4&╫ Е Z(2,L)│Z(1,L) з 810 :Д 830&щ*S(L)│1:K(L)│1&∙4З" WHITE ";'
>Л L'(HА X│1 е 4:Е S(X)│1 з 890 :Д S(X)│1'SRА L│1 е 4:Е Z(2,X)│Z(1,L) з 860 :Д 880'p\Е K(L)│1 з 880 :Д K(L)│1'ЗfЗ" BLACK ";:Бе 900'ПpЛ L'ЧzЛ X'╖ДX1│X1л1:Е X1│4 з 680 :Д 840'тОЗ:З"YOU GOT THE NUMBER IN";T5;"TRIES."(ШЙ"HIT <ENTER> TO CONTINUE...";W:Ю(#вT(P)│T(P)лT5:Л P:R│Rл1(BмЗ"AT THE END OF ROUND";R:З(j╢З"PERSON  TOTAL  AVERAGE  CATEGORY"(x└А I│1 е Q(Ф╩T9│ Б((T(I)оR)н100)о100(╖╘З д2);I;д8);T(I);д16);T9;д25);(├▐Бж 1040(╦шЛ I(╤ЄЗ(Є№Й"ANOTHER ROUND (Y OR N)";M$)
Е M$│"Y" з 530 :Д К)В))Е T9┤5 з З"EXPERT":Р)?$Е T9┤9 з З"PRO":Р)W.Е T9┤13 з З"GOOD":Р)o8Е T9┤16 з З"FAIR":Р)ЗBЕ T9┤21 з З"POOR":Р)ЮLЕ T9┤25 з З"BAD":Р)╖VЗ"KEEP PRACTICING":Р)╜`К                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               Е ML▓0 з 990'╒З @ 21,SC;'2╓Е  Т│" " з П:Бе 110'=╪Бе 982'C▐В'SуXP│ Д(30)н2'cшYP│ Д(14)н2'|ЄЕ  С(XP,YP)│5 з 1020'ХЇЕ  С(XP,YP)┤▓7 з 995'ЮЎLQ│1'д№В'╞З @ 32н Б(YPо2)л Б(XPо2),"X";'┌А J│1 е 500:Л J'є$Е LQ│0 з 730 :Д 1130'√.E│1(!8PE│32н Б((YPлPY)о2)л Б((XPлPX)о2)(/BА I│1 е 6(MLЕ E(I)│PE з E(I)│0 :Д Л I(VV Я│0(o`З @ 27, Б(30м Яо60);({jCT│CTл1(ЗtSC│SCл1(Ц~З @ 21,SC;(╧ТЕ LQ│1 з 730 :Д З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);(▄ЬXP│XPлPX(щжYP│YPлPY)░З @ 32н Б(YPо2)л Б(XPо2),"X";)3║Е CT┤242 з 1260 :Д ML│MLл1:П:Бе 130)n─Е  Я▓1800 з 1230 :Д а 100,1:З @ 27, Б(30м Яо60):Бе 780)v╬E│0)З╙А IT│27 е 31)Ы╪З @ IT, Л(128);)д▌Л IT)птБе 780)╜ьА I│1 е 5)╞ёFJ│1)╧ЎNO│0)▌C│XPмX(I))ы
D│YPмY(I)*Е  В(C)▓ В(D) з 1355*&Е NO▓1 з 1410 :Д Е D▓0 з 1330*PЕ  С(X(I),Y(I)м2)│0 з NO│NOл1:Бе 1355*oЕ B(I)│2 з NO│NOл1:Бе 1355*z#A(I)│0*Ж(B(I)│м2*Т-Бе 1490*╝2Е  С(X(I),Y(I)л2)│0 з NO│NOл1:Бе 1355*▄7Е B(I)│м2 з NO│NOл1:Бе 1355*ч<A(I)│0*ЄAB(I)│2*■FБе 1490+ KЕ NO▓1 з 1410 :Д Е C▓0 з 1385+JPЕ  С(X(I)м2,Y(I))│0 з NO│NOл1:Бе 1300+iUЕ A(I)│2 з NO│NOл1:Бе 1300+uZA(I)│м2+А_B(I)│0+МdБе 1490+╢iЕ  С(X(I)л2,Y(I))│0 з NO│NOл1:Бе 1300+╓nЕ A(I)│м2 з NO│NOл1:Бе 1300+сsA(I)│2+ьxB(I)│0+°}Бе 1490,ВR│ Д(4),#ЗИ R Бе 1420,1430,1440,1450,BМЕ  С(X(I),Y(I)м2)│0 з 1430,^СЕ B(I)│2 з 1430 :Д 1315,}ЦЕ  С(X(I),Y(I)л2)│0 з 1440,ЪЫЕ B(I)│м2 з 1440 :Д 1340,╣аЕ  С(X(I)м2,Y(I))│0 з 1450,╒еЕ A(I)│2 з 1450 :Д 1370,ЇкЕ  С(X(I)л2,Y(I))│0 з 1420-пЕ A(I)│м2 з 1420 :Д 1395- ╥ZZ(I)│Z(I)-[╫Е  С(X(I)лA(I),Y(I)лB(I))┤▓7 з 1500 :Д Z(I)│96:Бе 1520-Ц▄Е  С(X(I)лA(I),Y(I)лB(I))┤▓5 з 1510 :Д Z(I)│64:Бе 1520-╜цЕ  С(X(I)лA(I),Y(I)лB(I))│м1 з 862-чыЕ  С(X(I)лA(I),Y(I)лB(I))│4 з Бж 2200.ЁЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));.9·X(I)│X(I)лA(I):Y(I)│Y(I)лB(I).K№Е XI│0 з 1540.r■X(I)│XI:Y(I)│YI:A(I)│0:B(I)│0:XI│0.ЯЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);.зЛ I.▓Бе 730.╗"NO│1.╚,RN│ Д(4).┌6Е RN│1 з 1320.ь@Е RN│2 з 1350.■JЕ RN│3 з 1390/
OБе 1420/TВ/2rЗ @ 32н Б(YPо2)л Б(XPо2),"X";/@wА I│1 е 3/K|а 30,1/SЖЛ I/`РSC│SCл20/oЪЗ @ 21,SC;/}дА I│1 е 5/ЬоЕ Y(I)│YP ░ X(I)│XP з 1730/д╕Л I/│┬ZZ(I)│Z(I)/┼╠X(I)│ Д(30)н2/╫╓Y(I)│ Д(14)н2/ рЕ  С(X(I),Y(I))│7 з Z(I)│96:Бе 18000'ъЕ  С(X(I),Y(I))│5 з Z(I)│64:Бе 180003ЇБе 17400I■Е ZZ(I)┤▓96 з 7300RLQ│10^Бе 11300dВ0СЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);0г+Е FK│0 з 17900м-FK│00╖.Бе 7300╜:Ю0╥DЗ д13)"PACMAN":З0°NЗ:З"   IN THIS GAME YOU WILL TRY"1XЗ"TO GATHER AS MANY POINTS AS"1AbЗ"POSSIBLE BEFORE THE COMPUTER'S"1YlЗ"MEN CAPTURE YOU."1vЗ"   YOU ARE GIVEN THREE CHANCES"1ЭАЗ"OR MEN, ONE AT A TIME."1┬КЗ"   YOU EARN AN ADDITIONAL MAN"1тФЗ"EACH TIME YOU COMPLETELY"2ЮЗ"TRAVERSE ALL OF THE PATHS."2*иЗ"   EACH POINT ALONG THE WAY IS"2L▓З"WORTH ONE POINT FOR SCORE."2s╝З:Й"HIT <ENTER> TO CONTINUE...";A$2y╞Ю2Э╨З"   EACH TIME YOU PASS OVER A"2┴┌З"FLASHING ENERGIZER SPOT, YOU"2чфЗ"CAN CAPTURE THE COMPUTER'S MEN"3юЗ"AND EARN 20 BONUS POINTS."3-°З"   BUT THIS EXTRA ENERGY ONLY"3SЗ"LASTS FOR 30 SECONDS, AND THAT"3{З"ENERGIZER CAN ONLY BE USED ONCE."3ЪЗ:З д7)"GOOD LUCK ! ! !":З3┴ З:Й"HIT <ENTER> TO CONTINUE...";A$3╟!Ю3ю"З"   HOLDING IN THE RED BUTTON ON"4#З"THE JOYSTICK WILL TRY TO PLACE"4:$З"YOUR MAN SOMEWHERE ELSE ON THE"4\%З"PATHS.   USE THIS TO AVOID"4}&З"GETTING HIT BY ONE OF THE"4д'З"COMPUTER'S MEN.   BUT EACH TIME"4╔(З"YOU USE THIS BUTTON, THE ODDS"4я)З"OF IT WORKING NEXT TIME BECOME"5*З"SMALLER AND SMALLER."5/З584З"PLUG IN RIGHT JOYSTICK AND HOLD"5^6З"WITH RED BUTTON AWAY FROM YOU."5Х:З"   HIT SPACE BAR AT END OF GAME":З"TO REPLAY.":З5┤>Й"HIT <ENTER> TO BEGIN";A$5║HР5╩ШXI│ Д(30)н25┌вYI│ Д(14)н25°мЕ  С(XI,YI)│7 з Z(I)│96:Р6╢Е  С(XI,YI)│5 з Z(I)│64:Р6"└Бе 22006p	─Е  Д(PK)┤PK з 735 :Д PK│PKл1:З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);:Бе 990                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             %ъЕ  С(X(I),Y(I))│5 з Z(I)│64:Бе 180001ЇБе 17400G■Е ZZ(I)┤▓96 з 7300PLQ│10\Бе 11300bВ0ПЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);0б+Е FK│0 з 17900к-FK│00╡.Бе 7300╗:Ю0╨DЗ д13)"PACMAN":З0ЎNЗ:З"   IN THIS GAME YOU WILL TRY"1XЗ"TO GATHER AS MANY POINTS AS"1?bЗ"POSSIBLE BEFORE THE COMPUTER'S"1WlЗ"MEN CAPTURE YOU."1}vЗ"   YOU ARE GIVEN THREE CHANCES"1ЫАЗ"OR MEN, ONE AT A TIME."1└КЗ"   YOU EARN AN ADDITIONAL MAN"1рФЗ"EACH TIME YOU COMPLETELY"2ЮЗ"TRAVERSE ALL OF THE PATHS."2(иЗ"   EACH POINT ALONG THE WAY IS"2J▓З"WORTH ONE POINT FOR SCORE."2q╝З:Й"HIT <ENTER> TO CONTINUE...";A$2w╞Ю2Ы╨З"   EACH TIME YOU PASS OVER A"2┐┌З"FLASHING ENERGIZER SPOT, YOU"2хфЗ"CAN CAPTURE THE COMPUTER'S MEN"3юЗ"AND EARN 20 BONUS POINTS."3+°З"   BUT THIS EXTRA ENERGY ONLY"3QЗ"LASTS FOR 30 SECONDS, AND THAT"3yЗ"ENERGIZER CAN ONLY BE USED ONCE."3ШЗ:З д7)"GOOD LUCK ! ! !":З3┐ З:Й"HIT <ENTER> TO CONTINUE...";A$3┼!Ю3╦/З3Є4З"PLUG IN RIGHT JOYSTICK AND HOLD"46З"WITH RED BUTTON AWAY FROM YOU."4O:З"   HIT SPACE BAR AT END OF GAME":З"TO REPLAY.":З4n>Й"HIT <ENTER> TO BEGIN";A$4tHР4ДШXI│ Д(30)н24ФвYI│ Д(14)н24▓мЕ  С(XI,YI)│7 з Z(I)│96:Р4╨╢Е  С(XI,YI)│5 з Z(I)│64:Р4▄└Бе 22004ч	─Бе 735                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ╢&
:ГTHE GAME OF LIFE&9:ГADAPTED FROM OMNI MAGAZINE&B:ГBY&Y(:ГSTEVEN M. OSTROM&u2:Г12612 CEDAR LAKE ROAD&С<:ГMINNETONKA, MN  55343&ШF:Г&╣P:ГCOPYRIGHT FEBRUARY 10,1985&└Z:Г&ъdХ200,&H6CEF:└4:М XC(100),YC(100):┴6,5&·n╣ Г0│&H6CF0'xЮ:З"PLEASE WAIT WHILE THE MACHINE   LANGUAGE ROUTINE IS BEING POKED INTO MEMORY AND DATA STATEMENTS ARE CHECKED FOR ACCURACY..."'СВX│&H6CF0:TT│0'оМНML:TT│TTлML:ЕML│999з160'╙ЦТX,ML:З@268,&H6FFFмX:X│Xл1:Бе140(аЕTT│71473з170:ДЮ:З"RECHECK DATA STATEMENTS FOR     TYPING ERRORS!!!":К(]кЮ:Й"DO YOU WANT TO USE THE SPEED-UP POKE (N=NO, Y=YES)";A$(Б┤Е A$│"Y"зТ65495,0:ДЕA$┤▓"N"з170)F╛Ю:З"THIS IS THE GAME OF LIFE.  THE  GAME FOLLOWS THREE SIMPLE RULES WHICH ARE EXPLAINED BELOW.  IT  WILL BE EASIER TO UNDERSTAND IF YOU THINK OF EACH DOT AS A      BACTERIAL CELL OR A PERSON.")═╚З"YOU WILL CONTROL THE INITIAL    ARRANGEMENT OF CELLS AND WATCH  WHAT HAPPENS TO THE ARRANGEMENT AFTER EACH GENERATION OR CYCLE.")√╥З@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$*С▄Ю:З"THIS GAME WAS INVENTED MANY     YEARS AGO, AND THIS VERSION IS  ADAPTED FROM THE OCTOBER, 1984  ISSUE OF OMNI MAGAZINE, STARTINGON PAGE 188."+цЗ:З"AS YOU READ THE FOLLOWING RULES,KEEP IN MIND THAT THEY REPRESENTNEAR LIFE-LIKE CONDITIONS FOR   SOME TYPES OF BACTERIAL CELLS."+GЁЗ@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$,·Ю:З"rule #1:IF A LIVE CELL HAS              EXACTLY 2 LIVE NEIGHBORS        (CELLS WHICH TOUCH IT           HORIZONTALLY, VERTICALLY        OR DIAGONALLY) IT STAYS         ALIVE IN THE NEXT CYCLE.",М
З"        IF A DEAD CELL HAS              EXACTLY 2 LIVE NEIGHBORS        IT STAYS DEAD IN THE            NEXT CYCLE.",║
З@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$-9
Ю:З"rule #2:IF A LIVE CELL HAS              EXACTLY 3 LIVE NEIGHBORS        IT STAYS ALIVE IN THE           NEXT CYCLE.":З-┴
"З"        IF A DEAD CELL HAS              EXACTLY 3 LIVE NEIGHBORS        IT BECOMES ALIVE, OR IS         BORN, IN THE NEXT CYCLE."-я
,З@480,"PRESS <ENTER> TO CONTINUE...";:ЙA$.p
6Ю:З"rule #3:IF A LIVE CELL HAS ANY          OTHER NUMBER OF LIVE            NEIGHBORS, IT DIES IN           THE NEXT CYCLE.".Ї
@З"        IF A DEAD CELL HAS ANY          OTHER NUMBER OF LIVE            NEIGHBORS, IT STAYS DEAD        IN THE NEXT CYCLE.":З/│
JЗ"    9,29,39,13,166,136,225,132,192,129,64,38,4,108,141,0,175,166A╟вЖ 132,132,12,129,4,38,4,108,141,0,163,166,141,0,155,129,29,39,12,166,1,132,192,129,64,38,4,108,141,0,143,166,141,0,136,129,95,39,47,166BSмЖ 136,32,132,12,129,4,38,4,108,141,0,122,166,136,32,132,3,129,1,38,4,108,141,0,109,166,141,0,101,129,29,39,13,166,136,33,132,192,129,64B╓╢Ж 38,4,108,141,0,88,166,141,0,84,129,2,37,20,129,3,34,16,39,2,32,20,166,137,12,0,138,1,167,137,12,0,32,8,166,137,12,0,132,252 Cb└Ж 32,242,108,141,0,44,166,141,0,40,129,30,16,37,253,55,111,141,0,30,108,141,0,27,166,141,0,23,129,96,16,37,253,37,158,186,16,174,137,12C╡╩Ж 0,16,175,129,156,183,37,244,57,0,0,96,25,253,0,255,0,255,0,255,0,255,0,0,999                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        Ь<Х 500FЮ1PЙ"INSTRUCTIONS (Y OR N)";A$HZЕ A$│"Y" з Бж 1850rdМ E(6),ZZ(6),Z(6),X(6),Y(6),A(6),B(6){nML│3ДxSC│0Н}PK│0ЦВCT│0ЮЗE│0жМЮ 0╝ЦЗ @ 0,"MEN LEFT";╩аЗ @ 9,ML;▀кЗ @ 14,"POINTS";ю┤З @ 21,SC;°╡TM│ Я╢Е TM┤1001 з 185╖TM│TMм1000&╕Бе 1826╣А QL│1 е TMC║QM│ Д(6)L╗Л QL]╛Ж 2,12,20,30s╚А I│64 е 448 й 64В╥А J│2 е 30Ъ▄З @ IлJ, Л(143л96);вцЛ JкЁЛ I╕·А I│1 е 4└
Н K╓
А J│96 е 416 й 64ю
З @ KлJ, Л(143л96);Ў
"Л J■
,Л I м
6Ж 103,112,121,163,164,170,171,173,174,178,179,181,182,188,189,230,232,239,241,248,250,294,296,303,305,312,314,355,356,362,363,365,366,370,371,373,374,380,381,423,432,441 ╗
@А I│1 е 42 ├
JН J ┘
TЗ @ J, Л(143л96); с
^Л I °
hЖ 3,11,13,19,21,29!
rА I│1 е 6!
|Н E(I)!
ЖЛ I!/
РЖ 128,192,320,384!=
ЪА J│1 е 4!E
дН K!S
оА I│1 е 6!k
╕З @ KлE(I), Л(128);!s
┬Л I!{
╠Л J!С
╓З @ 263, Л(128); !ж
рЗ @ 272, Л(128);!╗
ъЗ @ 281, Л(128);!╫
ьЖ 66,94,268,276,450,478!х
юА I│1 е 6!Ё
ЁН E(I)"	
ёЗ @ E(I), Л(143л32);"
ЄЛ I"!
ЇXP│ Д(30)н2"1
■YP│ Д(14)н2"JЕ  С(XP,YP)┤▓7 з 500"VCT│CTл1"bSC│SCл1"q&З @ 21,SC;"УDЗ @ 32н Б(YPо2)л Б(XPо2),"X";"бXА I│1 е 6"мbA(I)│0"╖lB(I)│0"╔vX(I)│ Д(30)н2"█АY(I)│ Д(14)н2"°КЕ  С(X(I),Y(I))┤▓7 з 630#%иЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);#1╝Z(I)│96#9╞Л I#N╨А I│1 е 1000:Л I#\┌LQ│0:FJ│0#j▀А I│1 е 6#}фЕ E(I)│0 з 760#ЦюЗ @ E(I), Л(143л32);#Ю°Л I#пЕ E│1 з 1220#╧J0│ Н(0):J1│ Н(1):PX│0:PY│0#їЕ J0▓3 з 800 :Д PX│м2:PY│0:Бе 830$ Е J0┤60 з 810 :Д PX│2:PY│0:Бе 830$A*Е J1▓3 з 820 :Д PX│0:PY│м2:Бе 830$a4Е J1┤60 з 1260 :Д PX│0:PY│2$А>Е  С(XPлPX,YPлPY)│7 з 1130$ЯHЕ  С(XPлPX,YPлPY)│5 з 1170$╛RЕ  С(XPлPX,YPлPY)│0 з 1260$▌WЕ  С(XPлPX,YPлPY)│6 з 1260$№\Е  С(XPлPX,YPлPY)│3 з 1070%]Бе 870%7^З @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));%J`X(I)│X(I)лA(I)%]bY(I)│Y(I)лB(I)%fcFK│1%qdБе 890%ЪfЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л64);%░pXP│XPлPX:YP│YPлPY%┴zЕ E│1 з 1620%╩FK│0%╪ДА I│1 е 3%·ОЗ @ 32н Б(YPо2)л Б(XPо2),"X";&Ша 1,5&-вЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л48);&7ма 1,5&?╢Л I&M╖А I│1 е 6&k╕Е XP│X(I) ░ YP│Y(I) з 954&s╣Л I&в║Е Z(I)│96 ░ FJ│0 з CT│CTл1:SC│SCл1:Z(I)│64&о└ML│MLм1&╝╩З @ 9,ML;&═╘Е ML▓0 з 995&▄╒З @ 21,SC;&Ї╓Е  Т│" " з П:Бе 110& ╪Бе 982 Ь<Х 500FЮ1PЙ"INSTRUCTIONS (Y OR N)";A$HZЕ A$│"Y" з Бж 1850rdМ E(6),ZZ(7),Z(7),X(7),Y(7),A(7),B(7){nML│3ДxSC│0Н}PK│0ЦВCT│0ЮЗE│0жМЮ 0╝ЦЗ @ 0,"MEN LEFT";╩аЗ @ 9,ML;▀кЗ @ 14,"POINTS";ю┤З @ 21,SC;°╡TM│ Я╢Е TM┤1001 з 185╖TM│TMм1000&╕Бе 1826╣А QL│1 е TMC║QM│ Д(6)L╗Л QL]╛Ж 2,12,20,30s╚А I│64 е 448 й 64В╥А J│2 е 30Ъ▄З @ IлJ, Л(143л96);вцЛ JкЁЛ I╕·А I│1 е 4└
Н K╓
А J│96 е 416 й 64ю
З @ KлJ, Л(143л96);Ў
"Л J■
,Л I м
6Ж 103,112,121,163,164,170,171,173,174,178,179,181,182,188,189,230,232,239,241,248,250,294,296,303,305,312,314,355,356,362,363,365,366,370,371,373,374,380,381,423,432,441 ╗
@А I│1 е 42 ├
JН J ┘
TЗ @ J, Л(143л96); с
^Л I °
hЖ 3,11,13,19,21,29!
rА I│1 е 6!
|Н E(I)!
ЖЛ I!/
РЖ 128,192,320,384!=
ЪА J│1 е 4!E
дН K!S
оА I│1 е 6!k
╕З @ KлE(I), Л(128);!s
┬Л I!{
╠Л J!С
╓З @ 263, Л(128); !ж
рЗ @ 272, Л(128);!╗
ъЗ @ 281, Л(128);!╫
ьЖ 66,94,268,276,450,478!х
юА I│1 е 6!Ё
ЁН E(I)"	
ёЗ @ E(I), Л(143л32);"
ЄЛ I"!
ЇXP│ Д(30)н2"1
■YP│ Д(14)н2"JЕ  С(XP,YP)┤▓7 з 500"VCT│CTл1"bSC│SCл1"q&З @ 21,SC;"УDЗ @ 32н Б(YPо2)л Б(XPо2),"X";"бXА I│1 е 7"мbA(I)│0"╖lB(I)│0"╔vX(I)│ Д(30)н2"█АY(I)│ Д(14)н2"°КЕ  С(X(I),Y(I))┤▓7 з 630#%иЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);#1╝Z(I)│96#9╞Л I#N╨А I│1 е 1000:Л I#\┌LQ│0:FJ│0#j▀А I│1 е 6#}фЕ E(I)│0 з 760#ЦюЗ @ E(I), Л(143л32);#Ю°Л I#пЕ E│1 з 1220#╧J0│ Н(0):J1│ Н(1):PX│0:PY│0#їЕ J0▓3 з 800 :Д PX│м2:PY│0:Бе 830$ Е J0┤60 з 810 :Д PX│2:PY│0:Бе 830$A*Е J1▓3 з 820 :Д PX│0:PY│м2:Бе 830$a4Е J1┤60 з 1260 :Д PX│0:PY│2$А>Е  С(XPлPX,YPлPY)│7 з 1130$ЯHЕ  С(XPлPX,YPлPY)│5 з 1170$╛RЕ  С(XPлPX,YPлPY)│0 з 1260$▌WЕ  С(XPлPX,YPлPY)│6 з 1260$№\Е  С(XPлPX,YPлPY)│3 з 1070%]Бе 870%7^З @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));%J`X(I)│X(I)лA(I)%]bY(I)│Y(I)лB(I)%fcFK│1%qdБе 890%ЪfЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л64);%░pXP│XPлPX:YP│YPлPY%┴zЕ E│1 з 1620%╩FK│0%╪ДА I│1 е 3%·ОЗ @ 32н Б(YPо2)л Б(XPо2),"X";&Ша 1,5&-вЗ @ 32н Б(YPо2)л Б(XPо2), Л(143л48);&7ма 1,5&?╢Л I&M╖А I│1 е 7&k╕Е XP│X(I) ░ YP│Y(I) з 954&s╣Л I&в║Е Z(I)│96 ░ FJ│0 з CT│CTл1:SC│SCл1:Z(I)│64&о└ML│MLм1&╝╩З @ 9,ML;&═╘Е ML▓0 з 995&▄╒З @ 21,SC;&Ї╓Е  Т│" " з П:Бе 110& ╪Бе 982'уXP│ Д(30)н2'шYP│ Д(14)н2'8ЄЕ  С(XP,YP)│5 з 1040'QЇЕ  С(XP,YP)┤▓7 з 995'ZЎLQ│1'|З @ 32н Б(YPо2)л Б(XPо2),"X";'РА J│1 е 500:Л J'й$Е LQ│0 з 730 :Д 1130'▒.E│1'╫8PE│32н Б((YPлPY)о2)л Б((XPлPX)о2)'хBА I│1 е 6(LЕ E(I)│PE з E(I)│0 :Д Л I(V Я│0(%`З @ 27,30м Б( Яо60);(1jCT│CTл1(=tSC│SCл1(L~З @ 21,SC;(ЕТЕ LQ│1 з 730 :Д З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);(ТЬXP│XPлPX(ЯжYP│YPлPY(┴░З @ 32н Б(YPо2)л Б(XPо2),"X";(щ║Е CT┤242 з 1260 :Д ML│MLл1:П:Бе 130)$─Е  Я▓1800 з 1230 :Д а 100,1:З @ 27,30м Б( Яо60):Бе 780),╬E│0)=╙А IT│27 е 31)Q╪З @ IT, Л(128);)Z▌Л IT)eтБе 780)sьА I│1 е 7)|ёFJ│1)ЕЎNO│0)УC│XPмX(I))б
D│YPмY(I))║Е  В(C)▓ В(D) з 1355)▄Е NO▓1 з 1410 :Д Е D▓0 з 1330*Е  С(X(I),Y(I)м2)│0 з NO│NOл1:Бе 1355*%Е B(I)│2 з NO│NOл1:Бе 1355*0#A(I)│0*<(B(I)│м2*H-Бе 1490*r2Е  С(X(I),Y(I)л2)│0 з NO│NOл1:Бе 1355*Т7Е B(I)│м2 з NO│NOл1:Бе 1355*Э<A(I)│0*иAB(I)│2*┤FБе 1490*╓KЕ NO▓1 з 1410 :Д Е C▓0 з 1385+PЕ  С(X(I)м2,Y(I))│0 з NO│NOл1:Бе 1300+UЕ A(I)│2 з NO│NOл1:Бе 1300++ZA(I)│м2+6_B(I)│0+BdБе 1490+liЕ  С(X(I)л2,Y(I))│0 з NO│NOл1:Бе 1300+МnЕ A(I)│м2 з NO│NOл1:Бе 1300+ЧsA(I)│2+вxB(I)│0+о}Бе 1490+║ВR│ Д(4)+┘ЗИ R Бе 1420,1430,1440,1450+°МЕ  С(X(I),Y(I)м2)│0 з 1430,СЕ B(I)│2 з 1430 :Д 1315,3ЦЕ  С(X(I),Y(I)л2)│0 з 1440,PЫЕ B(I)│м2 з 1440 :Д 1340,oаЕ  С(X(I)м2,Y(I))│0 з 1450,ЛеЕ A(I)│2 з 1450 :Д 1370,ккЕ  С(X(I)л2,Y(I))│0 з 1420,╟пЕ A(I)│м2 з 1420 :Д 1395,╓╥ZZ(I)│Z(I)-╫Е  С(X(I)лA(I),Y(I)лB(I))┤▓7 з 1500 :Д Z(I)│96:Бе 1520-L▄Е  С(X(I)лA(I),Y(I)лB(I))┤▓5 з 1510 :Д Z(I)│64:Бе 1520-sцЕ  С(X(I)лA(I),Y(I)лB(I))│м1 з 862-ЭыЕ  С(X(I)лA(I),Y(I)лB(I))│4 з Бж 2200-═ЁЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));-я·X(I)│X(I)лA(I):Y(I)│Y(I)лB(I).
№Е XI│0 з 1540.(■X(I)│XI:Y(I)│YI:A(I)│0:B(I)│0:XI│0.UЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);.]Л I.hБе 730.q"NO│1.~,RN│ Д(4).Р6Е RN│1 з 1320.в@Е RN│2 з 1350.┤JЕ RN│3 з 1390.└OБе 1420.╞TВ.шrЗ @ 32н Б(YPо2)л Б(XPо2),"X";.ЎwА I│1 е 3/
|а 30,1/	ЖЛ I/РSC│SCл20/%ЪЗ @ 21,SC;/3дА I│1 е 7/RоЕ Y(I)│YP ░ X(I)│XP з 1730/Z╕Л I/i┬ZZ(I)│Z(I)/{╠X(I)│ Д(30)н2/Н╓Y(I)│ Д(14)н2/╡рЕ  С(X(I),Y(I))│7 з Z(I)│96:Бе 1800/▌ъЕ  С(X(I),Y(I))│5 з Z(I)│64:Бе 1800/щЇБе 1740/ ■Е ZZ(I)┤▓96 з 730 21,SC;'?ТЕ LQ│1 з 730 :Д З @ 32н Б(YPо2)л Б(XPо2), Л(143л64);'LЬXP│XPлPX'YжYP│YPлPY'{░З @ 32н Б(YPо2)л Б(XPо2),"X";'г║Е CT┤242 з 1260 :Д ML│MLл1:П:Бе 130'▒ьА I│1 е 5'║ёFJ│1'├ЎNO│0'╤C│XPмX(I)'▀
D│YPмY(I)'°Е  В(C)▓ В(D) з 1355(Е NO▓1 з 1410 :Д Е D▓0 з 1330(DЕ  С(X(I),Y(I)м2)│0 з NO│NOл1:Бе 1355(cЕ B(I)│2 з NO│NOл1:Бе 1355(n#A(I)│0(z(B(I)│м2(Ж-Бе 1490(░2Е  С(X(I),Y(I)л2)│0 з NO│NOл1:Бе 1355(╨7Е B(I)│м2 з NO│NOл1:Бе 1355(█<A(I)│0(цAB(I)│2(ЄFБе 1490)KЕ NO▓1 з 1410 :Д Е C▓0 з 1385)>PЕ  С(X(I)м2,Y(I))│0 з NO│NOл1:Бе 1300)]UЕ A(I)│2 з NO│NOл1:Бе 1300)iZA(I)│м2)t_B(I)│0)АdБе 1490)кiЕ  С(X(I)л2,Y(I))│0 з NO│NOл1:Бе 1300)╩nЕ A(I)│м2 з NO│NOл1:Бе 1300)╒sA(I)│2)рxB(I)│0)ь}Бе 1490)°ВR│ Д(4)*ЗИ R Бе 1420,1430,1440,1450*6МЕ  С(X(I),Y(I)м2)│0 з 1430*RСЕ B(I)│2 з 1430 :Д 1315*qЦЕ  С(X(I),Y(I)л2)│0 з 1440*ОЫЕ B(I)│м2 з 1440 :Д 1340*наЕ  С(X(I)м2,Y(I))│0 з 1450*╔еЕ A(I)│2 з 1450 :Д 1370*шкЕ  С(X(I)л2,Y(I))│0 з 1420+пЕ A(I)│м2 з 1420 :Д 1395+╥ZZ(I)│Z(I)+O╫Е  С(X(I)лA(I),Y(I)лB(I))┤▓7 з 1500 :Д Z(I)│96:Бе 1520+К▄Е  С(X(I)лA(I),Y(I)лB(I))┤▓5 з 1510 :Д Z(I)│64:Бе 1520+▒цЕ  С(X(I)лA(I),Y(I)лB(I))│м1 з 862+█ыЕ  С(X(I)лA(I),Y(I)лB(I))│4 з Бж 2200,ЁЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143лZZ(I));,-·X(I)│X(I)лA(I):Y(I)│Y(I)лB(I),?№Е XI│0 з 1540,f■X(I)│XI:Y(I)│YI:A(I)│0:B(I)│0:XI│0,УЗ @ 32н Б(Y(I)о2)л Б(X(I)о2), Л(143л48);,ЫЛ I,жБе 730,п"NO│1,╝,RN│ Д(4),╬6Е RN│1 з 1320,р@Е RN│2 з 1350,ЄJЕ RN│3 з 1390,■OБе 1420-:Ю-DЗ д13)"PACMAN":З-?NЗ:З"   IN THIS GAME YOU WILL TRY"-bXЗ"TO GATHER AS MANY POINTS AS"-ИbЗ"POSSIBLE BEFORE THE COMPUTER'S"-аlЗ"MEN CAPTURE YOU."-╞vЗ"   YOU ARE GIVEN THREE CHANCES"-фАЗ"OR MEN, ONE AT A TIME.".	КЗ"   YOU EARN AN ADDITIONAL MAN".)ФЗ"EACH TIME YOU COMPLETELY".KЮЗ"TRAVERSE ALL OF THE PATHS.".qиЗ"   EACH POINT ALONG THE WAY IS".У▓З"WORTH ONE POINT FOR SCORE.".║╝З:Й"HIT <ENTER> TO CONTINUE...";A$.└╞Ю.▀З:З д7)"GOOD LUCK ! ! !":З.х/З/4З"PLUG IN RIGHT JOYSTICK AND HOLD"/26З"WITH RED BUTTON AWAY FROM YOU."/i:З"   HIT SPACE BAR AT END OF GAME":З"TO REPLAY.":З/И>Й"HIT <ENTER> TO BEGIN";A$/ОHР/ЮШXI│ Д(30)н2/овYI│ Д(14)н2/╠мЕ  С(XI,YI)│7 з Z(I)│96:Р/ъ╢Е  С(XI,YI)│5 з Z(I)│64:Р/Ў└Бе 2200       +H&
:ГSHIPWREK&:Г&+:ГSTEVEN OSTROM&G:Г12612 CEDAR LAKE ROAD&c:ГMINNETONKA, MN  55343&j:Г&~:ГAPRIL 21,1982&Е:Г&М	:Г&Ц
Бе294&зЕA$┤▓"CL"з20&╠ЕB$┤▓"CO"з79:ДЕL┤▓50з35:ДЕP│0з84&№
P│0:OB│0:CT│0:АI│1е25:ЕO(I)│59зCT│CTл1:OB│I'IЛI:Е(Z│0░CT┤2)▒(Z│1░CT│0░IN│0)зO(OB)│ Д(13):ЕZ│0з150:ДL│ Д(13):F│0:Бе150'sP│1:З"OOPS!":АI│1е25:ЕO(I)│59зO(I)│50'ВЛI:ЕZ│0з60'кZ│0:АI│1е25:ЕO(I)│0зO(I)│50:IN│INм1'╢ЛI:Бе60'▄ЕO(I)▓0з37:ДO(I)│59:IN│INм1:Бе150'эЕA$┤▓"PU"з79(*Й"WHERE";C$:C$│ О(C$,2):ЕC$┤▓"CO"з77:ДЕL┤▓50з35:ДЕP│0з84(?I│0:ЕB$│"CA"зI│4(PЕB$│"PE"зI│9(bЕB$│"QU"зI│12(tЕB$│"DI"зI│17(ЖЕB$│"GO"зI│19(ШЕB$│"HA"зI│22(дЕI▓0з19(└ЕB$┤▓"SE"з83:ДZ│1:Бе150)	ЕO(13)▓0з73:ДЕL┤▓7з34:ДЗ"FELL THROUGH! TOO DARK TO MOVE!":L│53:Бе150)6З"I AM CARRYING:":ЕIN│0зЗ"NOTHING":Бе150)Q АI│1е25:ЕO(I)│0зЗP$(I))^!ЛI:Бе150){"З"NOTHING UNUSUAL":Бе150)Х#З"DON'T SEE IT":Бе150)л$Бж43:ЗP$(3):Бе150)╚%З"NOT CARRYING IT":Бе150)ъ&З"DON'T GET TOO CLOSE!":Бе150*'З"EUREKA!!  I FOUND":Р*(Бж43:ЗP$(5):Бе150*<)З"A LIVE OYSTER SHELL":Бе150*R*Бж39:ЗP$(9):Бе150*a+З"I SEE":Р*Б,З"COULD BE VALUABLE!":Бе150*Ю-З"LOOKS VERY OLD!":Бе150*ї.З"THEY LOOK VERY ANGRY! THEIR     CHIEF NEEDS A FEATHER FOR HIS   HEADRESS!":Бе150+/З"THEY ARE SMILING AT YOU!":Бе150+Ю0З"TREASURES ALL ON ISLAND SMALL   FLASHLIGHT GETTING WEAK         BUT YOU CAN FIND PIECE OF MIND  IF UNDER CAN YOU PEEK":Бе150+╚1З"SHOWS X AT CENTER OF ISLAND!":Бе150+с2З"VERY HEAVY!":Бе150,3З"FUVCJERX NQIRAGHER":З"OL FGRIR BFGEBZ":Бе150,+4З"ABCD=NOPQ":Бе150,F5З"NAILED BOARDS":Бе150,o6З"I SEE AN INSCRIPTION!":ЕP│0з84:Д82,Г7З"LOCKED":Бе150,Щ8З"UNLOCKED":Бе150,╒9З"SORRY! YOU NEED ALL 3 TREASURES TO WIN. TRY AGAIN.":К,ы:Бж43:ЗP$(6):Бе150-
;З"BEWARE CROSSING PITS":Бе150-(<З"BAR NG N GVZR":Бе150-m=З"IT IS FALLING APART":ЕO(22)│0з67:ДЗ"YOU MUST REPAIR IT.":Бе150-Д>Бж43:ЗP$(15):Бе150-Ы?Бж43:ЗP$(14):Бе150-▓@З"I HAVE IT":Бе150-╤AЗ"BIRD WON'T LET ME":Бе150-▀BA│2:Бе193.CЗ"YOU REPAIRED IT WITH A HAMMER.":Бе150.*DЗ"BAITED AND READY.":Бе150.LEЗ"YOU ARE BITTEN AND DIE!!":К.ZFB│1:Бе193.pGБж43:ЗP$(8):Бе150.ЖHБж43:ЗP$(2):Бе150.лIЗ"I NEED SOMETHING FIRST.":Бе150.├JЗ"TOO HEAVY.":Бе150.хKЗ"DON'T BE RIDICULOUS!":Бе150.№LБж43:ЗP$(10):Бе150/ЕL│41▒L│44з87:Д35A/╛ЕB$│"CR"зЕL│50зБж128:Бе150A8┐Бе79A@└G│0A_┴IN│INл1:O(I)│0:Бж121:Бе150AМ┬ЕA$┤▓"GE"з223:ДЕIN│5зЗ"OVERLOADED":Бе150A║├ЕB$│"ST"зI│1:ЕO(1)│L з193:ДЕO(1)│0з64:Д35AЇ─ЕB$│"BI"зI│2:ЕL│8░A│0з65:ДЕL│O(2)з193:ДЕO(2)│0з64:Д35B1┼ЕB$│"FE"зI│3:ЕO(2)│0░A│1з66:ДЕL│O(3)з193:ДЕO(3)│0з64:Д35BK╞ЕB$│"SN"зЕL│10з69:Д35BФ╟ЕB$│"CA"зI│4:ЕO(4)│0з64:ДЕL┤▓O(4)з35:ДЕO(16)┤▓60з193:ДO(16)│10:Бе193B╤╚ЕB$│"HO"зI│5:ЕO(4)│0░B│0з70:ДЕL│O(5)з193:ДЕO(5)│0з64:Д35C╔ЕB$│"VI"зI│6:ЕO(6)│0з64:ДЕL│6з193:ДЕL│O(6)з193:Д35C5╩ЕB$│"SH"зI│7:ЕL│O(7)з193:ДЕO(7)│0з64:Д35Cz╦ЕB$│"OY"зI│8:ЕL│O(8)з193:ДЕO(8)│0з64:ДЕO(7)▓0▒C┤▓1з35:ДC│2:Бе193C┐╠ЕB$│"PE"зI│9:ЕL│O(9)з193:ДЕO(9)│0з64:ДЕO(7)▓0▒C┤▓2з35:ДC│3:Бе193D═ЕB$│"FI"зI│10:ЕO(10)│0з64:ДЕL│O(10)з193:ДЕL┤▓4з35:ДЕO(25)│0░G│1з192:Д73D%╬ЕB$│"BE"зЕL│13з69:Д35DН╧ЕB$│"BO"зI│11:ЕL┤▓O(11)з35:ДЕK│0з38:ДЕO(11)│0з64:ДT(13,0)│13:T(13,3)│14:T(17,0)│16:T(17,3)│17:Бе193D═╨ЕB$│"QU"зI│12:ЕL│O(12)з193:ДЕO(12)│0з64:ДЕR┤2з35:ДR│1:Бе193D¤╤ЕB$│"SP"зI│13:ЕO(13)│0з64:ДЕL│O(13)з193:Д35ED╥ЕB$│"PA"зI│14:ЕO(14)│0з64:ДЕL│O(14)з193:ДЕL┤▓21▒Q┤▓1з35:ДQ│2:Бе193EК╙ЕB$│"FL"зI│15:ЕO(15)│0з64:ДЕL│O(15)з193:ДЕL┤▓21▒Q▓0з35:ДQ│1:Бе193E║╘ЕB$│"MA"зI│16:ЕO(16)│0з64:ДЕL│O(16)з193:Д35E■╒ЕB$│"DI"зI│17:ЕO(17)│0з64:ДЕL│44░O(17)│60з193:ДЕL│O(17)з193:Д35FI╓ЕB$│"DU"зI│18:ЕO(18)│0з64:ДЕL┤▓O(18)з35:ДЕO(19)┤60з193:ДO(19)│39:Бе193Fy╫ЕB$│"GO"зI│19:ЕO(19)│0з64:ДЕL│O(19)з193:Д35F─╪ЕB$│"SI"зI│20:ЕO(20)│0з64:ДЕL┤▓O(20)з35:ДЕO(21)┤60з193:ДO(21)│45:Бе193FЇ┘ЕB$│"KE"зI│21:ЕO(21)│0з64:ДЕL│O(21)з193:Д35G$┌ЕB$│"HA"зI│22:ЕO(22)│0з64:ДЕL│O(22)з193:Д35Go█ЕB$│"PL"зI│23:ЕO(23)│0з64:ДЕL┤▓O(23)з35:ДЕO(22)┤60з193:ДO(22)│56:Бе193GЯ▄ЕB$│"LI"зI│25:ЕO(25)│0з64:ДЕL│O(25)з193:Д35Gп▌ЕB$│"BA"з35G╕▐Бе79G╩▀ЕA$┤▓"GO"з238HрЕB$│"NO"зW│0:ДЕB$│"EA"зW│1:ДЕB$│"WE"зW│2:ДЕB$│"SO"зW│3:ДЕB$│"UP"▒B$│"DO"з77:Д79H4сV│T(L,W):ЕV│L з77HJтЕO(11)▓0з232:ДL│VHYуЕL┤▓15з102H╞фЗ"BOAT IS LEAKING! BAIL WATER!":ЙJ$:A$│ О(J$,2):Е З(J$)┤5з228:ДАI│3е З(J$):Е Р(J$,I,1)│" "з229:ДЛI:Бе228I/хB$│ Р(J$,Iл1,2):ЕA$┤▓"BA"▒B$┤▓"WA"з228:ДЕO(4)▓0зЗ"YOU HAVE NOTHING TO BAIL WATER. BOAT SINKS!":Бе235ICцЕW│0зL│14:ДL│16IMчБе102IeшЕV│14▒V│15▒V│16з235IsщL│V:Бе102IМъЗ"SHARKS EAT YOU!":КIЫыЕO(I)▓0з37I┴ьIN│INм1:O(I)│L:ЕL▓13░L┤17зO(I)│60I╦эБе150I▌юЕA$┤▓"DR"з266IъяЕIN│0з37I ЁI│0:ЕB$│"ST"зI│1JёЕB$│"BI"зI│2J"ЄЕB$│"SI"зI│20J3єЕB$│"CA"зI│4JDЇЕB$│"HO"зI│5JUїЕB$│"VI"зI│6JfЎЕB$│"SH"зI│7JwўЕB$│"OY"зI│8JИ°ЕB$│"PE"зI│9JЪ∙ЕB$│"FI"зI│10Jм·ЕB$│"SP"зI│13J╛√ЕB$│"PA"зI│14J╨№ЕB$│"FL"зI│15Jт¤ЕB$│"MA"зI│16JЇ■ЕB$│"DI"зI│17K ЕB$│"DU"зI│18K
ЕB$│"GO"зI│19K*

ЕB$│"KE"зI│21KR
ЕB$│"HA"зI│22:T(24,3)│24:T(27,0)│27Kd
ЕB$│"PL"зI│23Kv
ЕB$│"SA"зI│24KИ
ЕB$│"QU"зI│12KЪ
ЕB$│"LI"зI│25Kз
ЕI▓0з235L

ЕB$│"FE"зI│3:ЕL┤▓18▒U│1▒O(3)▓0з235:ДT(18,1)│19:T(18,2)│23:T(18,3)│22:U│1:IN│INм1:O(3)│60:Бе150L[
	ЕB$│"BO"зI│11:ЕO(11)▓0з37:ДT(13,0)│11:T(13,3)│13:T(17,0)│17:T(17,3)│18:Бе236Lm

ЕA$┤▓"OP"з277LЩ
ЕB$│"SH"зЕO(7)▓0з37:ДЕC▓0з82:ДC│1:Бе150L╜
ЕB$│"SL"зЕL┤▓40з35:ДЕM│1з82:Д74M

ЕB$│"WA"зЕL┤▓51з35:ДЕN│1з82:ДЕO(22)▓0з73:ДN│1:T(51,2)│50:Бе150MJ
ЕB$│"EN"зЕL┤▓55з35:ДЕO│2з82:ДЕO│0з55:ДO│2:T(55,1)│56:T(56,2)│55:Бе150MГ
ЕB$│"CO"зЕL┤▓50з35:ДЕP│1з82:ДP│1:З"FRESH AIR!":Бе150MЮ
ЕB$│"DE"зЕL┤▓21з35:Д82M╘
ЕB$│"SE"зЕL┤▓40з83:ДЕM│1з82:ДM│1:T(40,0)│39:Бе150N
ЕB$│"GA"зЕL┤▓20з35:ДЕS│1з82:ДS│1:T(20,1)│21:T(21,2)│20:Бе150NP
ЕB$│"TU"зЕL┤▓37з35:ДЕT│1з82:ДЕO(12)▓0з55:ДIN│INм1:Бе81NY
Бе79Nk
ЕA$┤▓"UN"з282Nм
ЕB$│"EN"зЕL┤▓55з35:ДЕO│2з82:ДЕO│1з56:ДЕO(21)▓0з77:ДO│1:Бе150N╜
ЕB$│"TU"з275O	
ЕB$│"FL"зЕO(15)▓0з37:ДF│0:ЕL┤39▒L│50з152:ДЗ"TOO DARK. CAN'T SEE!":Бе152O
Бе79O$
ЕA$┤▓"HI"з288O5
ЕB$│"BE"з206OF
ЕB$│"SN"з198OИ
ЕB$│"NA"зЕL┤▓18з35:ДU│0:T(18,1)│18:T(18,2)│18:T(18,3)│18:Бе46Oў
ЕB$│"BI"зЕL┤▓8░L┤▓O(2)░O(2)▓0з35:ДЕL│O(2)▒O(2)│0з75:ДЕA▓0з35:ДЕO(1)▓0з65:ДA│1:IN│INм1:O(1)│60:O(2)│8:Бе150P
Бе79P
 ЕA$┤▓"FE"з292P|
!ЕB$│"SN"зЕL┤▓10з35:ДЕH│1з77:ДЕO(2)▓0з73:ДH│1:I│0:O(2)│60:З"SNAKE EATS BIRD AND SLEEPS.":O(4)│10:Бе236P▀
"ЕB$│"BE"зЕL┤▓13з35:ДЕK│1з77:ДЕO(10)▓0з73:ДK│1:I│0:O(10)│60:З"BEAR EATS FISH AND SLEEPS.":Бе236Pш
#Бе79P∙
$ЕA$┤▓"LI"з11Q7
%ЕB$┤▓"FL"з79:ДЕO(15)▓0з37:ДF│1:З"FLASHLIGHT IS ON.":Бе150QG
&Х48:└1:Бе89