B(15), К( О(A$(A(JR)),1)) : ТAB(15)л1,  К( П(A$(A(JR)),1)) : ТAB(JR)м3,191 : ТAB(JR)м2,191'ЩВТAB(JR),  К( О(A$(A(Y)),1)) : ТAB(JR)л1,  К( П(A$(A(Y)),1))'╨МT$│A$(A(JR)) : A$(A(JR))│ A$(A(Y)) : A$(A(Y)) │ T$'▄ЦАX│8е13'¤аЕA$(A(Xл1)) ▓ A$(A(X)) з1580(кЛX( ┤Е G │ 2 зNC│239:ДNC│223(+╛АY│1е5(K╚АX│1е З(RP$): Т1043лX,NC:ЛX(Б╥АX│1е4:Т1049лX,239 : Т1049лX,  К( Р(W$,X,1)) : ЛX(У▄АTD│1е150:ЛTD(мцАX│1е4:Т1049лX,NC:ЛX(чЁАX│1е З(RP$):Т1043лX,191: Т1043лX,  К( Р(RP$,X,1)): ЛX(∙·АTD│1е150:ЛTD)ЛY)pа89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,4:а125,4:а89,4:а125,4:а108,8)ча125,2:а125,2:а108,2:а89,4:а89,2:а125,4:а147,2:а147,2:а147,2:а133,8:а125,2:а133,2:а147,4:а125,4:а89,4:а108,4:а89,8)Ў"Ю(7):Бе120*,Е G │ 2 зNC│239:ДNC│223*56АX│1е З(RP$) : Т1043лX,NC : ЛX*r@АX│1е З(LP$):Т1024лX,239 : Т1024лX,  К( Р(LP$,X,1)) : ЛX*МJCH$│ Т : ЕCH$│""з1610*пTЕCH$ ┤▓ "D" ░ CH$ ┤▓ "P" з1580*є^ЕCH$│"P"зY│Yл1 : Е G │ 2 ░ Y ▓ 27 з Y │ 15 :Д Е Y ▓ 27 з Y │ 15+UhЕCH$│"D"з Е G │ 2 зТAB(15)м1,128 : ТAB(15),128 : ТAB(15)л1,128 :Д ТAB(15),128 : ТAB(15)л1,128+_rБе770WА$XГ@F╔╒L                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        /
|ЕCH$ ┤▓ "1" ░ CH$ ┤▓ "2" ░ CH$ ┤▓ "3" з370=
ЖG│ Й(CH$)S
РЕ G │ 3 зЮ(2) : К┌
ЪЮ(2) : З@128,"TYPE IN YOUR FIRST NAME AND     PRESS ENTER. PLAYER 1 PLAYS THE LEFT JOYSTICK; PLAYER 2 PLAYS   THE RIGHT JOYSTICK."■
дЗ"PLAYER 1: "; : LP$│"" : H │ 0
оH$ │  Т : Е H$│""з430;
╕ЗH$; : LP$ │ LP$ л H$ : H│Hл1 r
┬ЕH$│ Л(8) ▒ H$ │ Л(21)зLP$│ О(LP$, З(LP$)м2):H│Hм2Т
╠ЕH ▓ 9 ▒ H$│ Л(13)з470:Д430┐
╓Е П(LP$,1)│ Л(13)з LP$│ О(LP$, З(LP$)м1)х
рЗ:З"PLAYER 2: "; : RP$│"" : H │ 0■
ъH$│ Т : Е H$│"" з490$
ЇЗH$; : RP$ │ RP$ л H$ : H│ H л 1 Z
■ЕH$│ Л(8) ▒ H$│ Л(21)зRP$│ О(RP$, З(RP$)м2):H│Hм2zЕH ▓ 9 ▒ H$│ Л(13)з530:Д490жЕ П(RP$,1)│ Л(13)зRP$│ О(RP$, З(RP$)м1)╖ЕG ┤▓ 2 з600└&L│27┌0АX│1е27:N(X) │ X : ЛXц:АX│1е27DR│ Д(L) : F(X) │ N(R) : N(R) │ N(L) : L│ Lм1 : ЛX&NБе640/XL│30GbАX│1е30:N(X)│X : ЛXSlАX│1е30ИvR│ Д(L): A(X) │ N(R) : N(R) │ N(L) : L│ Lм1 : ЛX╬АЮ(5) : З@224,"PRESS THE SPACEBAR OR ANY KEY   TO BEGIN THE GAME."хКCH$│ Т:ЕCH$│""з650■ФЕ G │ 2 зЮ(7) :ДЮ(6)
ЮАX│1е16HиЕ G │ 2 зТAB(X)м1,128 : ТAB(X),128 : ТAB(X)л1,128 : Бе700d▓ТAB(X),128:ТAB(X)л1,128l╝Л Xx╞АX│1е14╒╨Е G │ 2 зТAB(X)м1,  К( О(F$(F(X)),1)) : ТAB(X),47 : ТAB(X)л1,  К( П(F$(F(X)),1)) : Бе740┌ТAB(X),  К( О(A$(A(X)),1)) : ТAB(X)л1,  К( П(A$(A(X)),1))фЛX<юТAB(15)л33,68 : ТAB(16)л33,80{°АX│1е З(LP$) : Т1024лX,239 : Т1024лX,  К( Р(LP$,X,1)) : ЛX┌Е G │ 2 зТAB(7)л3,  К( О(F$(F(Y)),1)) : ТAB(7)л4,47 : ТAB(7)л5,  К( П(F$(F(Y)),1)) : Бе790ТAB(7)л3, К( О(A$(A(Y)),1)) : ТAB(7)л4, К( П(A$(A(Y)),1))$J│ Н(0)1 JL│ Н(3)D*JL│ Б(JLо10)л1O4АX│1е7б>Е G │ 2 зЕ JL │ X з 850 :Д ТAB(X)л3,159 : ТAB(X)л4,159 : ТAB(X)л5,159 : Бе850╤HЕJL │ X з850 :Д ТAB(X)л3,239 : ТAB(X)л4,239╪RЛX:\Е G │ 2 зТAB(JL)л3,  К( О(F$(F(Y)),1)) : ТAB(JL)л4,47 : ТAB(JL)л5,  К( П(F$(F(Y)),1)) : Бе880zfТAB(JL)л3, К( О(A$(A(Y)),1)): ТAB(JL)л4,  К( П(A$(A(Y)),1))зpЕ Ж(65280)│125 ▒  Ж(65280)│253 з890:Д790lzЕ G ┤▓ 2 з960:Да128,5:ТAB(JL)м1,128 : ТAB(JL),128 : ТAB(JL)л1,128 : ТAB(15)м1,  К( О(F$(F(JL)),1)) : ТAB(15),47 : ТAB(15)л1,  К( П(F$(F(JL)),1)) : ТAB(JL)л3,159 : ТAB(JL)л4,159 : ТAB(JL)л5,159╗ДТAB(JL)м1,  К( О(F$(F(Y)),1)) : ТAB(JL),47 : ТAB(JL)л1,  К( П(F$(F(Y)),1))'ОT$│F$(F(JL)) : F$(F(JL)) │ F$(F(Y)) : F$(F(Y)) │ T$ : T│PE(F(JL)) : PE(F(JL)) │ PE(F(Y)) : PE(F(Y)) │ T2ШАX│1е6SвЕPE(F(Xл1)) ▓ PE(F(X)) з1140ZмЛXe╢Бе1020ы└а128,5:ТAB(JL),128 : ТAB(JL)л1,128 : ТAB(15), К( О(A$(A(JL)),1)) : ТAB(15)л1,  К( П(A$(A(JL)),1)) : ТAB(JL)л3,239 : ТAB(JL)л4,239+╩ТAB(JL),  К( О(A$(A(Y)),1)) : ТAB(JL)л1,  К( П(A$(A(Y)),1))a╘T$│A$(A(JL)) : A$(A(JL))│ A$(A(Y)) : A$(A(Y))│ T$l▐АX│1е6МшЕA$(A(Xл1)) ▓ A$(A(X))з1140УЄЛXп№Е G │ 2 зNC│239:ДNC│223║АY│1е5▌АX│1е З(LP$) : Т1024лX,NC : ЛX АX│1е4:Т1030лX,  К( Р(W$,X,1)) : ЛX $АTD│1е150:ЛTD 2.АX│1е4:Т1030лX,NC : ЛX n8АX│1е З(LP$):Т1024лX,239 : Т1024лX, К( Р(LP$,X,1)) : ЛX АBАTD│1е150:ЛTD ЗLЛY ўVа89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,4:а125,4:а89,4:а125,4:а108,8!g`а125,2:а125,2:а108,2:а89,4:а89,2:а125,4:а147,2:а147,2:а133,8:а125,2:а133,2:а147,4:а125,4:а89,4:а108,4:а89,8!vjЮ(7):Бе120!ТtЕ G │ 2 зNC│239:ДNC│223!╡~АX│1е З(LP$):Т1024 л X,NC : ЛX!ЇИАX│1е З(RP$) : Т1043лX,191 : Т1043лX,  К( Р(RP$,X,1)) : ЛX"
ТCH$│ Т: ЕCH$│""з1170".ЬЕCH$ ┤▓ "D" ░CH$ ┤▓ "P"з1170"pжЕCH$│"P"зY│Yл1: ЕG │ 2 ░ Y ▓ 27 з Y │ 15 :Д Е Y ▓ 30 з Y │ 15"╙░Е G │ 2 зТAB(14)м5,  К( О(F$(F(Y)),1)) : ТAB(14)м4,47 : ТAB(14)м3,  К( П(F$(F(Y)),1)) : Бе1220#║ТAB(14)м3,  К( О(A$(A(Y)),1)) : ТAB(14)м2,  К( П(A$(A(Y)),1))#w─ЕCH$│"D"з Е G │ 2 з ТAB(15)м1,128 : ТAB(15),128 : ТAB(15)л1,128 :ДТAB(15),128 : ТAB(15)л1,128#Г╬J│ Н(0)#Р╪JR│ Н(1)#гтJR│ Б(JRо10)л8#пьАX│8е14$ЎЕ G │ 2 з Е JR │ X з 1290 :Д ТAB(X)м5,255 : ТAB(X)м4,255 : ТAB(X)м3,255 : Бе1290$7Е JR │ X з 1290 :ДТAB(X)м3, 191 : ТAB(X)м2,191$>
ЛX$вЕ G │ 2 з ТAB(JR)м5,  К( О(F$(F(Y)),1)) : ТAB(JR)м4,47 : ТAB(JR)м3,  К( П(F$(F(Y)),1)) : Бе1320$фТAB(JR)м3,  К( О(A$(A(Y)),1)) : ТAB(JR)м2,  К( П(A$(A(Y)),1))%(Е Ж(65280)│126 ▒  Ж(65280)│254 з1330:Д1230%┌2Е G ┤▓ 2 з1400:Да128,5: ТAB(JR)м1,128 : ТAB(JR),128 : ТAB(JR)л1,128 : ТAB(15)м1,  К( О(F$(F(JR)),1)) : ТAB(15),47 : ТAB(15)л1,  К( П(F$(F(JR)),1)) : ТAB(JR)м5,255 : ТAB(JR)м4,255 : ТAB(JR)м3,255&)<ТAB(JR)м1,  К( О(F$(F(Y)),1)) : ТAB(JR),47 : ТAB(JR)л1,  К( П(F$(F(Y)),1))&ХFT$│F$(F(JR)) : F$(F(JR)) │ F$(F(Y)) : F$(F(Y)) │ T$ : T│PE(F(JR)) : PE(F(JR)) │ PE(F(Y)) : PE(F(Y)) │ T&бPАX│8е13&┬ZЕPE(F(Xл1)) ▓ PE(F(X)) з1580&╔dЛX&╘nБе1460'Yxа128,5:ТAB(JR),128: ТAB(JR)л1,128 : ТA ┴HЮ7:А H│0е63:А V│0е4:Ь(H,V,3):ЛV:ЛH:АH│0е63:АV│28е31:Ь(H,V,3):ЛV:ЛH|З@128,"     HOT COCO MAGAZINE":З:Зд7)"PRESENTS"╕
З:З д5) Л(130)л Л(131)л"              "л Л(129)л Л(135)√З д5) Л(136)л Л(140)л" N S T A N T  "л Л(132)л Л(140)л" O C O"З:Зд5)"JUNE 1984"$(А X│1е5000:Л Xl-Ю7:А H│0е63:АV│0е4:Ь(H,V,3):ЛV:ЛH:А H│0е63:АV│28 е31:Ь(H,V,3):ЛV:ЛH╡2З@128,"     SPECIFIC INSTRUCTIONS FOR  PROGRAMS APPEAR IN HOT COCO "█FЗд5)"* CLOAD  FOR BASIC PROGRAMS" PЗ д5)"* CLOADM  FOR MACHINE LANG-UAGE PROGRAMS" #ZА X│1 е5000:Л X j_Ю7: А H│0е63:АV│0е4:Ь(H,V,3):ЛV:ЛH:АH│0е63:АV│28е31:Ь(H,V,3):ЛV:ЛH └dЗ@128,"     ALL PROGRAMS COPYRIGHT 1984  HOT COCO MAGAZINE":З" WAYNE GREEN, INC."╘
hА A│1 е 89 й 4∙
r╗(S(A),S(Aл1))м(S(Aл2),S(Aл3)),╜

|Л                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 v
Ю(0) : W$│"WINS"PМA$(30),AB(30),A(30),F$(27),F(27),ZA(56),N(30),PE(27)fАX│1е56:НZA(X):ЛX
(Ж 1216,1225,1250,1252,1255,1267,1272,1276,1281,1283,1290,1229,1296,1238,1241,1308,1244,1302,1305,1184,1192,1203,1206,1209,1210,1211,1220,1235,1240,1299,1306,1307,1189
К2Ж 1193,1198,1199,1200,1217,1294,1295,1237,1256,1257,1269,1232,1293,1221,1224,1249,1251,1258,1261,1282,1284,1287,1268	<Y│15 : A$(1)│" 1" : A$(2)│" 2" : A$(3)│" 3" : A$(4)│" 4" : A$(5)│" 5" : A$(6)│" 6" : A$(7)│" 7" : A$(8)│" 8" : A$(9)│" 9" 5FАX│10е30:B$│ И(X) : A$(X)│ П(B$,2) : ЛXKPАX│1е16:НAB(X):ЛXбZЖ 1090,1154,1218,1282,1346,1410,1474,1115,1179,1243,1307,1371,1435,1499,1036,1040чdАX│1е27 : НF$(X) : PE(X) │  Й( О(F$(X),1)) о  Й( П(F$(X),1)) : ЛX>nЖ 19,18,17,16,15,29,14,27,13,38,25,37,49,12,59,47,35,58,23,57,34,79,45,56,67,78,89GxZB│6PВЮ(0)vМАX│1е11 : ТZA(X),133л(ZBн16) : ЛXЭЦАX│12е13 : ТZA(X),134л(ZBн16) : ЛX─аАX│14е16 : ТZA(X),136л(ZBн16) : ЛXыкАX│17е19 : ТZA(X),137л(ZBн16) : ЛX┤АX│20е32 : ТZA(X),129л(ZBн16) : ЛX9╛АX│33е40 : ТZA(X),130л(ZBн16) : ЛX`╚АX│41е44 : ТZA(X),131л(ZBн16) : ЛXЗ╥АX│45е46 : ТZA(X),132л(ZBн16) : ЛXо▄АX│47е55 : ТZA(X),138л(ZBн16) : ЛX╞цТZA(56),140л(ZBн16)╤ЁАX│1е3\·а96,1:а192,1:а99,1:а191,1:а235,1:а81,1:а66,1:а177,1:а88,1:а77,1:а166,1:а99,1:а222,1:а244,1:а33,1:а11,1:а122,1:а28,1:а218,1:а18,1:а38,1c
ЛXT
Ю(3) : З@96,"'WACKO!!' IS A GAME FOR 2       PLAYERS. EACH PLAYER TRIES TO   PUT THE NUMBERS IN HIS/HER      COLUMN IN ORDER FROM GREATEST   TO LEAST, GREATEST ON TOP.      WHOLE NUMBERS USED ARE 1-30.    THE FRACTIONS GAME NUMBERS ARE"┌
З"FROM 1/9 TO 8/9 , INCLUDING     DENOMINATORS OF 2,3,4,5,6,7,8,9;ALL FRACTIONS USED ARE ALREADY  REDUCED TO THEIR LOWEST TERMS."
"З"   PRESS SPACEBAR OR ANY KEY TO GO ON."!
,CH$│ Т: Е CH$│""з300g
6Ю(4) : З@160,"PRESS THE NUMBER IN FRONT OF    THE GAME YOU WANT."Ь
@З"1 - WHOLE NUMBERS               2 - FRACTIONS"┤
JЗ"3 - QUIT PLAYING"╜
TY│15Y
^а89,2:а133,2:АTD│1е60:ЛTD:а89,2:а133,2:АTD│1е60:ЛTD:а89,2:а133,2:АTD│1е60:ЛTD:а89,2:а133,2:а147,2:а133,2:а125,2:АTD│1е60:ЛTD:а133,2:а147,2:АTD│1е60:ЛTDш
hа89,2:а125,2:АTD│1е60:ЛTD:а89,2:а125,2:АTD│1е60:ЛTD:а89,2:а125,2:АTD│1е60:ЛTD:а89,2:а125,2:а133,2:а125,2:а108,2:АTD│1е60:ЛTD:а125,2:а133,2
rCH$│ Т:ЕCH$│""з370 
Х 10008М CC$(20),MM$(20),NF$(20),NR(20),NW(20)sН CC$:Е CC$┤▓"*" з TI│TIл1:CC$(TI)│CC$:Н MM$(TI):Бе 30y#ЮИ(А X│3 е 11Ы2▀ 0,17,X,A$,B$░<C$│A$л О(B$,127)╛FА N│0 е 7╫PNAM$│ Р(C$,Nн32л1,8)ЁZEXT$│ Р(C$,9лNн32,3)
EdЕ EXT$│"DAT" ░  О(NAM$,1)┤▓ Л(0) з NF$(NNл1)│NAM$:З@NNн16,NNл1;NF$(NNл1):NN│NNл1
OnЛ N,X
axЗ  б(32,"-");
И}SL$│"":А A│0 е NN:З@Aн16, Л(32);:Л
■ВL│ Б((NNл4)о2)н32:З@L, б(64,32);:╔"T4L16C":З@L,"SELECT NUMBER THEN PRESS enter  PRESS enter WHEN FINISHED";:Й NM$МV│ Й(NM$):Е V│0 з 300)СЕ V▓NN з 130CЦЗ@((Vм1)н16), Л(191);jаNM$│"/"лNM$:Е  Ю(SL$,NM$)┤▓0 з 130БкSL$│SL$лNM$:Бе 130╫
,З@L, б(64,32);:З@L,"HAVE YOU ENTERED CORRECTLY      PRESS y FOR YES - n FOR NO ";
6X$│ Т:Е X$│"N" ▒ X$│"n" з 125 :Д Е X$┤▓"Y" ░ X$┤▓"y" з 310c
8З@L, б(64,32);:З@L,"PRESS p FOR PRINTER                   s FOR SCREEN";Ц
:P$│ Т:Е P$│"" з 314 :Д Е  Ю("PpSs",P$)│0 з 314Ю
@K│1╛
JK│ Ю(K,SL$,"/"):Е K│0 з 400с
TVL│ Й( П(SL$, З(SL$)мK)):K│Kл1ї
^Щ"I",#1,NF$(VL)
hЕ  М(1) з Ъ#1:Бе 330
rЙ#1,SM$%
|Бж 6000
ЖБе 360W
РИ  Ю("pPSs",P$) Бе 410,410,500,500k
ЪА A│1 е  З(SM$)╗
дЗ#м2:З#м2,"ITEM # ";A;"    TOTAL RIGHT = ";NR(A);"    TOTAL WRONG = ";NW(A)╧
оЗ#м2, б(10,".")ы
┬З#м2,CC$(A):З#м2,MM$(A)є
╠Л A∙
ЇЮ
∙З"#";д8);"RIGHT";д16);"WRONG"/
■А A│1 е  З(SM$)KЗA;д8);NR(A);д16);NW(A)hЕ Aо10│ Б(Aо10) з Бж 580pЛ A}&Бж 580:КЬDЗ:З"PRESS KEY TO CONTINUE"╡NX$│ Т:Е X$│"" з 590 █PЮ:З"#";д8);"RIGHT";д16);"WRONG":РЇXCT$│"":WR$│"":NT$│""YА A│1 е  З(SM$)<ZЕ  Р(SM$,A,1)│"+" з CT$│CT$л И(A):NR(A)│NR(A)л1p[Е  Р(SM$,A,1)│"1" з WR$│WR$л И(A):NW(A)│NW(A)л1Ц]Е  Р(SM$,A,1)│"*" з NT$│NT$л И(A)ЮbЛ A┼lИ  Ю("PpSs",P$) Бе 630,630,650,650█vЗ#м2:З#м2,NF$(VL)·xЗ#м2,"ITEM CORRECT = ";CT$zЗ#м2,"ITEMS WRONG = ";WR$:|З#м2,"ITEMS NOT TRIED = ";NT$@~РOКЮ:ЗNF$(VL)lМЗ:З"ITEMS WRONG = ":ЗWR$ЗОЗ"ITEMS RIGHT = ":ЗCT$жРЗ"ITEMS NOT TRIED = ":ЗNT$┼ЮЗ:З"press key to continue"▌иX$│ Т:Е X$│"" з 680укРQ╝Ж "A noun IS A WORD USED TO TAME A PRESON, PLACE, THING, OR IDEA.  WHICH PHRASE SHOWS THE NOUN IN BLACK?"б╞Ж "THE man WAS SMALL/the MAN WAS SMALL/THE MAN was SMALL/THE MAN WAS small"╨Ж "A pronoun IS A WORD USED IN PLACE OF ONE OR MORE NOUNS.  WHICH PHRASE SHOWS THE PRONOUN IN BLACK?"t┌Ж "he IS GOING TO THE SHOW/HE is GOING TO THE SHOW/HE IS GOING to THEN SHOW/HE IS GOING TO THE show"рфЖ "AN adjective IS A WORD USED TO MODIFY A NOUN OR PRONOUN.  WHICH PHRASE SHOWS AN ADJECTIVE IN BLACK?"4юЖ "SHE IS A tall GIRL/she IS A TALL GIRL/SHE is A TALL GIRL/SHE IS a TALL GIRL"в°Ж "A verb IS A WORD THAT SHOWS ACTION OR HELPS TO MAKE A STATEMENT.  WHICH PHRASE SHOWS A VERB IN BLACK?"ъЖ "HE hit THE BALL/he HIT THE BALL/HE HIT the BALL/HE HIT THE ball"Ж "WHICH PHRASE SHOWS A noun IN BLACK?"eЖ "I LIVE IN THE city/the WOMAN WAS HAPPY/FIND the BUILDING/IT is MY BOOK"Х Ж "WHICH PHRASE SHOWS A pronounb IN BLACK?"▌*Ж "he IS THE ONE I SAW/CAN SHE do IT/WE ARE together/YOU CAN do IT"4Ж "WHICH PHRASE SHOWS THE verb IN BLACK?"e>Ж "WILL YOU play WITH ME/you CAN HIT THE BALL/HE CAN RUN very FAST/HE IS A happy MAN"ШHЖ "WHICH PHRASE SHOWS THE adjective IN BLACK?"ўRЖ "THEY HAVE blue EYES/SHE is SMALL/THE MAN IS very LARGE/you CAN FIND THE CORRECT ANSWER"#\Ж "WHICH PHRASE SHOWS A noun IN BLACK?"БfЖ "THE MAN HAD courage/BEAUTY is ONLY SKIN DEEP/join THE CROWD/HE IS A courageous PERSON"▒pЖ "WHICH PHRASE SHOWS AN pronoun IN BLACK?"zЖ "THIS IS his PEN/THAT IS NOT very FUNNY/CAN YOU see HIM/try TO WORK HARDER"6ДЖ "WHICH PHRASE SHOWS THE adjective IN BLACK?"МОЖ "some PEOPLE HAVE HOBIES/ALL cats EAT FOOD/CAN YOU do IT/use YOUR IMMAGINATION"║ШЖ "WHICH PHRASE SHOWS THE verb IN BLACK?"вЖ "I am VERY HAPPY/you WILL FIND IT/where IS THE GOLD/THAT IS correct"мЖ "*"Y BOOK"HДЖ "WHICH PHRASE SHOWS A pronoun IN BLACK?"РОЖ "he IS THE ONE I SAW/CAN SHE do IT/WE ARE together/YOU CAN do IT"╛ШЖ "WHICH PHRASE SHOWS THE verb IN BLACK?"вЖ "WILL YOU play WITH ME/you CAN HIT THE BALL/HE CAN RUN ver                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 w
:Г:Г SVPEDT :Г BY0(:Г BOB JACK<2:Г 1983C<:ГOFБе 2350]PМ W$(100)sZЩ "D",#1,"LWORDS"ЙdЩ "D",#2,"SWORDS"ПnЪлxЮ:З@32н2л7,"SVP EDITOR"╨ВЗ@32н4,"1)     SHORT WORD PRINT"їМЗ@32н5,"2)     SHORT WORD ENTER"
ЦЗ@32н6,"3)     SHORT WORD DELETE"
?аЗ@32н7,"4)     LONG WORD PRINT"
cкЗ@32н8,"5)     LONG WORD ENTER"
И┤З@32н9,"6)     LONG WORD DELETE"
й╛З@32н10,"7)     END PROGRAM"
╚╚З@32н12л7,"DO WHICH ONE ?"
╘╥а 200,3
ю▄AW$│ Т:Е AW$│"" з 220
¤цAW│ Й(AW$)ЁЕ AW┤1 ▒ AW▓7 з 220B·И AW Бе 870,460,1050,1350,1930,1540,2340P
SL│1:SW│0m
А X│1 е 100:W$(X)│"":Л Xy
а 200,3Ы
"Т 282,0:Й "     ";W1$:Т 282,1м
,Е W1$│"" з Р╗
6WL│ З(W1$)щ
@Е WL┤LI ▒ WL▓HI з З д5);"WHAT ???":Бе 280	
JK│1:H│SL:L│1:S│ Б(Hо2):SW│1
TЕ S┤1 з 410/
^Е W1$│W$(S) з 280L
hЕ W1$┤W$(S) з H│S :Д L│S`
rS│ Б((HмL)о2)лLr
|Е HмL▓1 з 350Ф
ЖЕ W1$│W$(H) ▒ W1$│W$(L) з 280▒
РЕ W$(L)┤W1$ з K│H :Д K│L┬
ЪЕ SL│K з 430ш
дА J│SL е K й м1:W$(J)│W$(Jм1):Л J■
оW$(K)│W1$:SL│SLл1
╕Е SL▓99 з Р
┬Бе 2808
╠Ю:З д5);"SHORT WORD ENTER"[
╓З д5);"NO MORE THEN 4 LETTERS"z
рЗ д5);"AT LEAST 2 LETTERS"А
ъЗО
ЇLI│2:HI│4Щ
■Бж 260кЕ SW│0 з 120║CT│0:OL$│""└Ю╓&Щ "I",#1,"SWORDS"ь0Щ "O",#2,"SWBKUP"Ї:X│1DА I│1 е 1000NЕ  М(1) з 770#XЙ #1,A$8bЕ W$(X)│"" з 710MlЕ W$(X)│A$ з 760bvЕ W$(X)▓A$ з 710xАЕ W$(X)│OL$ з 690ЗКЗ #2,W$(X)УФCT│CTл1гЮЗ д5);W$(X)▒иOL$│W$(X)╗▓X│Xл1╞╝Бе 610┘╞Е A$│OL$ з 760х╨З #2,A$ё┌CT│CTл1■фЗ д5);A$	юOL$│A$°Л I&Е W$(X)│"" з 850<Е W$(X)│OL$ з 830KЗ #2,W$(X)W CT│CTл1g*З д5);W$(X)u4OL$│W$(X)>X│Xл1КHБе 770РRЪЬ\Бе 1280╛fЮ:З@32н7л7,"SHORT WORD PRINT"╬pТ &H009B,80╫zCT│0ёДЩ "I",#1,"SWORDS/DAT"ОА X│1 е 2000ШЕ  М(1) з 970 вЙ #1,A$,мCT│CTл1:╢З#м2,A$,;B└Л XH╩ЪY╘Т &H009B,132e▐З#м2,""ЖшЮ:З@32н7л5,CT;" SHORT WORDS"ТЄа 200,3╜№З@32н15л3,"PRESS ANY KEY TO CONTINUE";╪AW$│ Т:Е AW$│"" з 1030уБе 120Ю:З д5);"SHORT WORD DELETE"&$З д5);"NO MORE THEN 4 LETTERS"E.З д5);"AT LEAST 2 LETTERS"K8ЗYBLI│2:HI│4dLБж 260uVЕ SW│0 з 120С`CT│0:OL$│"":S│1:SL│SLм1ЧjЮ▒tЩ "I",#1,"SWORDS/DAT"╦~Щ "O",#2,"SWBKUP/DAT"▄ИА X│1 е 2000яТЕ  М(1) з 1270√ЬЙ #1,A$жЕ A$│W$(S) з 12607░Е A$▓W$(S) ░ S┤SL з S│Sл1:Бе 1190K║Е A$│OL$ з 1260W─З #2,A$c╬CT│CTл1n╪OL$│A${тЗ д5);A$ГьЛ XЙЎЪкЮ:З@32н7л5,CT;" SHORT WORDS"╢
а 200,3сЗ@32н15л3,"PRESS ANY KEY TO CONTINUE";№AW$│ Т:Е AW$│"" з 1310(╥ "SWORDS/DAT"12╓ "SWBKUP/DAT" е "SWORDS/DAT"<<Бе 120]FЮ:З@32н7л7,"LONG WORD PRINT"mPТ &H009B,80vZCT│0УdЩ "D",#1,"LWORDS/DAT",15еn╨ #1,15  з A$║xЕ  е(1)│0 з 1460╠ВА X│1 е  е(1)╫М─ #1,XхЦЗ#м2,A$,;ёаCT│CTл1∙кЛ X ┤Ъ╛Т &H009B,132╚З#м2,"">╥Ю:З@32н7л5,CTм1;" LONG WORDS"J▄а 200,3uцЗ@32н15л3,"PRESS ANY KEY TO CONTINUE";РЁAW$│ Т:Е AW$│"" з 1520Ы·Бе 120║Ю:З д5);"LONG WORD DELETE"▐З д5);"NO MORE THEN 15 LETTERS"¤З д5);"AT LEAST 5 LETTERS""З,LI│5:HI│156Бж 260.@Е SW│0 з 120=JА X│1 е SLNTWL│ З(W$(X))[^WL│15мWLvhW$(X)│W$(X)л б(WL," ")~rЛ XЛ|Ю:OL$│""иЖЩ "D",#1,"LWORDS/DAT",15┼РЩ "D",#2,"LWBKUP/DAT",15╫Ъ╨ #1,15  з A$щд╨ #2,15  з B$¤оY│1:S│1:SL│SLм1╕А X│1 е  е(1)┬─ #1,X0╠Е A$│W$(S) з 1820V╓Е A$▓W$(S) ░ S┤SL з S│Sл1:Бе 1740jрЕ A$│OL$ з 1820vъ╘ B$│A$БЇ┼ #2,YЛ■Y│Yл1ЦOL$│A$гЗ д5);A$лЛ X║&╘ B$│ И(Y)┼0┼ #2,1╦:ЪьDЮ:З@32н7л5,Yм2;" LONG WORDS"NЗ@32н15л3,"PRESS ANY KEY TO CONTINUE";#Xа 200,3>bAW$│ Т:Е AW$│"" з 1890Ql╥ "LWORDS/DAT"sv╓ "LWBKUP/DAT" е "LWORDS/DAT"~АБе 120ЬКЮ:З д5);"LONG WORD ENTER"└ФЗ д5);"NO MORE THEN 15 LETTERS"▀ЮЗ д5);"AT LEAST 5 LETTERS"хиЗЇ▓LI│5:HI│15 ╝Бж 260╞Е SW│0 з 120╨Ю:OL$│""6┌Щ "D",#1,"LWORDS",15OфЩ "D",#2,"LWBKUP",15aю╨ #1,15  з A$s°╨ #2,15  з B$X│1:Y│1ЫЕ  е(1)│0 з Y│2:Бе 2260нА I│1 е  е(1)╕ ─ #1,I╬*Е W$(X)│"" з 2190ф4Е W$(X)│A$ з 2250·>Е W$(X)▓A$ з 2190HЕ W$(X)│OL$ з X│Xл1:Бе 2090)R╘ B$│W$(X)4\┼ #2,YAfЗ д5);B$LpOL$│B$\zX│Xл1:Y│Yл1hДБе 2090|ОЕ A$│OL$ з 2250ИШ╘ B$│A$Ув┼ #2,YамЗ д5);B$л╢OL$│B$╡└Y│Yл1╜╩Л I╙╘Е W$(X)│"" з 1830є▐Е W$(X)│OL$ з X│Xл1:Бе 2260ш╘ B$│W$(X)
Є┼ #2,Y№З д5);B$%	OL$│B$5	X│Xл1:Y│Yл1A	Бе 2260K	$Ъ:Ю:КS	.└ 1`	8╤ 3,3000l	BХ 12000v	LБе 80│1е150:ЛTD ЗLЛY wVа89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,8:а89,2:а125,2:а133,2:а147,4:а125,4:а89,4:а12їїї√                                                                                                                                                                                                                                                                                           ┼ ├╟!╔#$┴╞'╔)*+,┼                       SVPEDT  BAS zQUIZ    BAS"╞RETRIEVEBASKNOSSOS BAS%║TITLE   BAS─WACKO   BASyCROAKER1BAS&wHORSE   BAS(№                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                <DRIVE  16>                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     ├
Х 1000!Е  Ж(188)│6 з 70hЮ:Й"STUDENT FILE";NF$:NF│0:Е  З(NF$)┤8 з NF$│NF$л б(8м З(NF$)," ")ЖА X│3 е 11:▀ 0,17,X,A$,B$╗(Е  Ю(A$,NF$)┤▓0 з NF│1 :Д Е  Ю(B$,NF$)┤▓0 з NF│1├2Л X
<Е NF│0 з Щ"O",#1,NF$:Ъ#1:Ю:З@326, Л(191);"new"; Л(175);"file"; Л(191):╔"T4L4CEGEC"
0FМ CC$(20),MM$(20)
OPЮ:F│1:L│4:I│2:R│1:NI│0:Q│5
ЬZН CC$:Е CC$┤▓"*" з TI│TIл1:CC$(TI)│CC$:Н MM$(TI):Бе 90 :Д SM$│ б(TI,"*")
▓_Е  Ж(188)│6 з 170
ЎdЮ:З@326,"PRESS enter TO BEGIN";:Й  D$:Е D$┤▓"T" ░ D$┤▓"t" з 170nЙ "STUDENT FILE";NF$;xЕ  З(NF$)┤8 з NF$│NF$л б(8м З(NF$)," ")KВЩ"I",#1,NF$]МЕ  М(1) з 160pЦЙ#1,SM$:Бе 140yаЪ #1ЛкБж 180:Бе 190╤┤Ю:А A│1 е 4:З @Aн96л32, б(32,131):Т 1056лAн96, К( П( И(A),1)):Л:Рц╛NS│0:PL$│"":SL│0O╚NS│NSл1:Е  Р(SM$,NS,1)│"+" з PL$│PL$л П( И(NS),2) :Д SL│SLл1:C$(SL)│CC$(NS):M$(SL)│MM$(NS):CC(SL)│NS`╥Е SL│Q з 270r▄Е NS┤TI з 200ГцА A│SLл1 е QЧЁL│ Б( З(PL$)о2)с·LL│ Д(L)н2м1:VL│ Й( Р(PL$,LL,2)):M$(A)│MM$(VL):C$(A)│CC$(VL):CC(A)│VL
 Р(PL$,VL,2)│ П(PL$,2):PL$│ О(PL$, З(PL$)м2):Л A*
Q│5:M│0:T│0:S│Q_
MN│ Ю(SM$,"1"):Е MN┤▓0 з  Р(SM$,MN,1)│"*":Бе 280n
"А N│ 1 е Qz
,P│ Д(S)и
6З@0, б(128," ");:З@0,"";:PR$│C$(P):Бж 740│
@Бж 470с
JC$(P)│C$(S):M$(P)│M$(S):CC(P)│CC(S):S│Sм1щ
TЛ N№
^PC│ Б(MоTн100)
h╔ "O3T6L6FGAGFCEFP4O4FGAGFCEG"d
rЮ:З@256,PC;"% CORRECT ON THE FIRST TRY":З:З"  TRY AGAIN (Y/N)?";У
|X$│ Т:Е X$│"N" з Бе 415 :Д Е X$┤▓"Y" з 380╕
ЖЕ  Ю(SM$,"*")┤▓0 з Бж 180:Бе 190▌
РЕ  Ю(SM$,"1")┤▓0 з Бж 180:Бе 190g
Ъ Ю4:З@128,"YOU HAVE FINSIHED ALL THE       QUESTIONS IN THIS PROGRAM       VERY GOOD JOB                  ";:╔ "T4L4O3CEGO2L2CO3CO2C"{
ЯЕ  Ж(188)│6 з КР
дЩ"I",#1,NF$:NN│0й
оЕ  М(1) з Ъ#1:Бе 450╔
╕NN│NNл1:Й #1,SM$(NN):Бе 430
┬Щ"O",#1,NF$:Е SM$(1)┤▓"" з А A│1 е NN:З#1,SM$(A):Л A
╠З#1,SM$:Ъ#1:К"
╓LS$│M$(P)+
рNA│1Z
ъLS│ Ю(LS$,"/"):Е LS│0 з  A$(NA)│LS$:Бе 510Ш
ЇA$(NA)│ О(LS$,LSм1):LS$│ П(LS$, З(LS$)мLS):NA│NAл1:Бе 490б
■SL│0╡А C│NA е 1 й м1ъZ│ Д(C):Е Z│1 ░ SL│0 з CA$│ П( И(C),1):SL│1:CA│CT$│A$(C):A$(C)│A$(Z):A$(Z)│T$&Л C#0А C│1 е NAF:PR$│A$(C):З@Cн96л64,"";:Бж 740NDЛ CWNFT│1]XВ¤bX$│ Т:Е X$│"" з 610 :Д Е X$┤"1" ▒ X$▓"4" з З@132,"PRESS number TO ANSWER";:╔"O1T4L2GC":З@132,"press NUMBER to answer";:╔"O1T4L2GC":З@132, б(24,131);:Бе 610ДlЕ X$┤▓CA$ з FT│0:З@140,"try again";:╔"T4L4O1GCP1":З@140, б(20,131);:Е  Й( Р(SM$,CC(P),1))┤1 з  Р(SM$,CC(P),1)│"1":Бе 600 :Д Бе 600├vT│Tл1:M│MлFT:Е  Й( Р(SM$,CC(P),1))┤1 з  Р(SM$,CC(P),1)│"+"╤АА C│1 е 4ЇКЕ C┤▓CA з З@Cн96л64, б(63,32);№ФЛ C
ЮА B│1 е 2QиЗ@CAн96л32,"";:Е B│1 з З  б(32,128);:Т CAн96л1056, К( П( И(CA),1))Х▓А E│1 е 64:LL│1087л96нCAлE:Т LL, Ж(LL)л64н(( Ж(LL)▓64)н2л1):Л Eм╝╔ "O2L4T50CEDFGAB"├╞Л B:╔"P1O3T4L8CEG"╬╨Бж 180╘┌Р▐фPP│30юЕ  О(PR$,1)│" " з PR$│ П(PR$, З(PR$)м1):Бе 7500°Е  З(PR$)┤30 з Зд1);PR$;:РYЕ  Р(PR$,PP,1)┤▓" " з PP│PPм1:Бе 770СЗд1); О(PR$,PP):PR$│ П(PR$, З(PR$)мPP):PP│30:Бе 750ЧР Ж "A noun IS A WORD USED TO NAME A PRESON, PLACE, THING, OR IDEA.  WHICH PHRASE SHOWS THE NOUN IN BLACK?"U*Ж "THE man WAS SMALL/the MAN WAS SMALL/THE MAN was SMALL/THE MAN WAS small"┐4Ж "A pronoun IS A WORD USED IN PLACE OF ONE OR MORE NOUNS.  WHICH PHRASE SHOWS THE PRONOUN IN BLACK?"(>Ж "he IS GOING TO THE SHOW/HE is GOING TO THE SHOW/HE IS GOING to THEN SHOW/HE IS GOING TO THE show"ФHЖ "AN adjective IS A WORD USED TO MODIFY A NOUN OR PRONOUN.  WHICH PHRASE SHOWS AN ADJECTIVE IN BLACK?"шRЖ "SHE IS A tall GIRL/she IS A TALL GIRL/SHE is A TALL GIRL/SHE IS a TALL GIRL"V\Ж "A verb IS A WORD THAT SHOWS ACTION OR HELPS TO MAKE A STATEMENT.  WHICH PHRASE SHOWS A VERB IN BLACK?"ЮfЖ "HE hit THE BALL/he HIT THE BALL/HE HIT the BALL/HE HIT THE ball"╩pЖ "WHICH PHRASE SHOWS A noun IN BLACK?"zЖ "I LIVE IN THE city/the WOMAN WAS HAPPY/FIND the BUILDING/IT is MY BOOK"HДЖ "WHICH PHRASE SHOWS A pronoun IN BLACK?"РОЖ "he IS THE ONE I SAW/CAN SHE do IT/WE ARE together/YOU CAN do IT"╛ШЖ "WHICH PHRASE SHOWS THE verb IN BLACK?"вЖ "WILL YOU play WITH ME/you CAN HIT THE BALL/HE CAN RUN very FAST/HE IS A happy MAN"KмЖ "WHICH PHRASE SHOWS THE adjective IN BLACK?"к╢Ж "THEY HAVE blue EYES/SHE is SMALL/THE MAN IS very LARGE/you CAN FIND THE CORRECT ANSWER"╓└Ж "WHICH PHRASE SHOWS A noun IN BLACK?"4╩Ж "THE MAN HAD courage/BEAUTY is ONLY SKIN DEEP/join THE CROWD/HE IS A courageous PERSON"d╘Ж "WHICH PHRASE SHOWS AN pronoun IN BLACK?"╢▐Ж "THIS IS his PEN/THAT IS NOT very FUNNY/CAN YOU see HIM/try TO WORK HARDER"щшЖ "WHICH PHRASE SHOWS THE adjective IN BLACK?"?ЄЖ "some PEOPLE HAVE HOBIES/ALL cats EAT FOOD/CAN YOU do IT/use YOUR IMMAGINATION"m№Ж "WHICH PHRASE SHOWS THE verb IN BLACK?"╕Ж "I am VERY HAPPY/you WILL FIND IT/where IS THE GOLD/THAT IS correct"┬Ж "*"                                                       ўNN                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╖;dВ * KNOSSOS LABYRINTH * TRS-80 EXTENDED COLOR BASIC *qnВ * ELMER'S ARCADE * JUNE '84 * RICHARD RAMELLA *еxЖ 15,4,10,27,13,17,30,4,21,13,26,27,15,29,10,52┘ВЖ 15,29,18,52,18,52,23,30,15,54,8,62,8,62,15,79

МЖ 15,79,22,63,22,63,15,54,22,79,8,89,8,89,20,94
FЦЖ 20,94,8,104,22,104,8,114,8,114,20,119,20,119,8,129
tаЖ 15,129,8,137,8,137,15,154,15,154,22,138
пкЖ 22,138,15,129,22,154,8,164,8,164,20,170,20,170,6,179
╜┤U$│ Л(94)
╦╛D$│ Л(10)
╪╚L$│ Л(8)
х╥R$│ Л(9)
ё▄М S(92)
ўцЮЁЗ @ 236,"KNOSSOS";·З @ 290,"";@
Й "<J>OYSTICK OR <M>ANUAL";A$^
Е A$┤▓"J" ░ A$┤▓"M" з 230m
А A│1 е 92x
"Н S(A)~
,ЛИ
6╚ 4,1О
@╝Ш
J┐ 1,0з
T╜(70,25,3)┴
^╗(50,0)м(256,192),╜,B╘
hА A│1 е 89 й 4∙
r╗(S(A),S(Aл1))м(S(Aл2),S(Aл3)),╜

|Л A
ЖА X│4 е 92 й 4$
Р┬(160,96),X*
ЪЛ=
дА X│4 е 92 й 2I
оG│ Д(0)c
╕Е G┤Sм1 ▒ G▓Sл1 з 430k
┬S│Gw
╠HJ│HJл1▄
╓Е X▓5 ░ HJо2│ Б(HJо2) з А E│Xм1 е Xл1: ┬(160,96),E,1,1,G,Gл.02: Л E :Д ┬(160,96),X,0,1,G,Gл.0199ф
рЛ Xэ
ъA│70Ў
ЇB│25
■╜(A,B,3):ЕA│160░B│96з650&Е A$│"J" з 5700B$│ ТvЕ LL┤2 ░ B$│"P" з А VV│1 е 5: ┬(A,B),VV,8: а 100,1: Л VV: LL│LLл1М&Е B$┤▓"" з Бж 670Ч0Бе 580л:M│ Н(0):N│ Н(1)╖DP│A:Q│B╒NЕM┤31.5░ а(Aм1,B)│0зA│Aм1єXЕM▓31.5░ а(Aл1,B)│0зA│Aл1bЕN▓31.5░ а(A,Bл1)│0зB│Bл1/lЕN┤31.5░ а(A,Bм1)│0зB│Bм1:v╛(P,Q)EАБе 510VКа  Д(8)н13,1aФБе 650кЮЕ B$│U$ з N│30 :Д Е B$│D$ з N│32 :Д Е B$│L$ з M│30 :Д Е B$│R$ з M│32░иР╢▓КPЮ:З"#";д8);"RIGHT";д16);"WRONG":РЇXCT$│"":WR$│"":NT$│""YА A│1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  t#
:Г***************************E:Г***********CROAKER*********g:Г******BY: MIKE MEEHAN******Й(:Г*******COPYRIGHT 1983******л2:Г**COLOR HORIZONS SOFTWARE**═<:Г***************************яF:Г**********PART ONE*********
P:Г***************************
╞ZЕ  Ж(49152)┤▓126▒ Ж(49153)┤▓126зЮ:З"THE DISK DRIVE CONTROLLER IS    PLUGGED IN. TURN OFF THE        COMPUTER, REMOVE THE CONTROLLER,AND RELOAD THIS PROGRAM FROM    CASSETTE.":К
┘d╚3:╝:┐1,1:OF│5Вn┴ 3,3:╗(0,111)м(256,84),╜:╗(0,180)м(256,153),╜:╗(22,140)м(54,136),╜:╗(86,132)м(118,128),╜:╗(150,124)м(182,120),╜:╗(214,116)м(246,112),╜:├(256,85),4,3:├(256,154),2,3╠x┴3,3:╗(18,10)м(20,21),╜,BF:╗(20,9)м(28,11),╜,BF:╗(20,20)м(28,22),╜,BFyВ╗(32,9)м(34,22),╜,BF:╗(36,9)м(40,10),╜,BF:╗(40,9)м(40,14),╜:╗(32,14)м(40,14),╜:╗(32,15)м(38,15),╜:╗(32,16)м(36,16),╜:╗(32,17)м(38,17),╜:╗(38,19)м(40,22),╜,BF:╜(38,18,3)╘М╗(44,10)м(46,21),╜,BF:╗(52,10)м(54,21),╜,BF:╗(46,9)м(52,12),╜,BF:╗(46,19)м(52,22),╜,BFBЦ╗(58,12)м(60,22),╜,BF:╗(66,12)м(68,22),╜,BF:╗(60,11)м(66,11),╜:╗(62,9)м(64,10),╜,BF:╗(60,17)м(64,18),╜,BFеа╗(72,9)м(74,22),╜,BF:╗(76,13)м(80,9),╜:╗(76,14)м(82,9),╜:╗(76,16)м(82,22),╜:╗(76,17)м(80,22),╜ к╗(86,9)м(88,22),╜,BF:╗(86,9)м(94,11),╜,BF:╗(88,14)м(92,17),╜,BF:╗(88,20)м(94,22),╜,BF╕┤╗(98,9)м(100,22),╜,BF:╗(102,9)м(106,10),╜,BF:╗(106,9)м(106,14),╜:╗(98,14)м(106,14),╜:╗(98,15)м(104,15),╜:╗(98,16)м(102,16),╜:╗(98,17)м(104,17),╜:╗(104,19)м(106,22),╜,BF:╜(104,18,3)m╛╗(18,29)м(18,40),╜:╗(18,40)м(22,40),╜:╗(22,40)м(22,35),╜:╗(22,35)м(18,35),╜:╗(26,35)м(26,40),╜:╗(30,35)м(30,46),╜:╗(26,40)м(30,40),╜:╜(34,36,3):╜(34,37,3):╜(34,39,3):╜(34,40,3)/╚╗(38,29)м(38,40),╜:╗(46,29)м(46,40),╜:╗(40,31)м(40,32),╜:╗(44,31)м(44,32),╜:╗(42,33)м(42,34),╜:╗(50,34)м(50,40),╜:╗(50,31)м(50,32),╜:╗(54,29)м(54,40),╜:╗(56,37)м(56,38),╜:╗(58,35)м(58,36),╜╣╥╗(58,39)м(58,40),╜:╗(62,36)м(62,40),╜:╗(62,40)м(66,40),╜:╜(66,39,3):╗(62,37)м(66,37),╜:╜(66,36,3):╜(64,35,3):╗(70лOF,29)м(70лOF,40),╜z▄╗(78лOF,29)м(78лOF,40),╜:╗(72лOF,31)м(72лOF,32),╜:╗(76лOF,31)м(76лOF,32),╜:╗(74лOF,33)м(74лOF,34),╜:╗(82лOF,36)м(82лOF,40),╜:╗(82лOF,40)м(86лOF,40),╜:╗(82лOF,37)м(86лOF,37),╜:╜(86лOF,39,3)ц╜(86лOF,36,3):╜(84лOF,35,3):╗(90лOF,36)м(90лOF,40),╜:╗(90лOF,40)м(94лOF,40),╜:╗(90лOF,37)м(94лOF,37),╜:╜(94лOF,39,3):╜(94лOF,36,3):╜(92лOF,35,3)aЁ╗(98лOF,29)м(98лOF,40),╜:╗(98лOF,35)м(102лOF,35),╜:╗(102лOF,35)м(102лOF,40),╜·╗(106лOF,40)м(110лOF,40),╜:╗(106лOF,38)м(110лOF,38),╜:╗(106лOF,38)м(106лOF,40),╜:╗(110лOF,36)м(110лOF,40),╜:╗(108лOF,36)м(110лOF,36),╜:╗(106лOF,35)м(108лOF,35),╜\
╗(114лOF,35)м(114лOF,40),╜:╗(118лOF,36)м(118лOF,40),╜:╗(114лOF,36)м(118лOF,36),╜█
╜(20,51,3):╜(20,58,3):╗(18,52)м(18,57),╜:╗(22,53)м(22,56),╜:╜(24,53,3):╜(24,56,3):╜(28,51,3):╜(28,58,3):╗(30,52)м(30,57),╜u
╗(36,50)м(36,58),╜:╗(44,50)м(44,58),╜:╗(40,50)м(40,54),╜:╜(42,50,3):╜(42,54,3):╗(48,50)м(48,58),╜:╗(52,50)м(52,58),╜:╜(50,50,3):╜(50,54,3):╜(50,58,3)╜
"╗(60,50)м(60,58),╜:╗(56,50)м(60,50),╜:╗(56,58)м(60,58),╜:╜(58,54,3)ў
,┬(28,108),8,2,.5:├(28,108),2,2:╗(26,94)м(30,108),╜,BF
6╗(16,68)м(42,94),╜,BУ
@╞"BM30,75;C2;D1L2D2L4D1L2D5R2D4R6U1L4U2R2U2R2U1R2D1R6U1L4U3R2U2L2U1L2":├(30,77),2,2:┴4,4:╗(18,69)м(40,93),╜:╗(18,93)м(40,69),╜·
J╞"C2":Бж410:├(166,127),2,2:├(172,121),2,2:├(128,108),2,2:╞"C3":Бж410:╞"C2":╗(144,65)м(146,67),╜,BF"
T╞"BM134,137;C3;L8U1L2U1L2U1L2U1L12">
^╞"BM152,77;L4D2L10U1L2"¤
h╞"C2":╗(224,46)м(224,100),╜:╗(236,52)м(236,106),╜:╗(224,46)м(236,52),╜:╗(224,100)м(236,106),╜:╗(224,46)м(256,46),╜:╗(236,106)м(256,106),╜:├(226,50),3,2:├(238,47),3,2:╗(236,52)м(256,52),╜А
r╞"BM238,107;C2;D3R2D2R2D2R8U2R2U2R2U3;C1":├(244,107),2,2:╗(244,107)м(248,109),╜,BF:╞"BM226,101;C2;D3R2D3R2D1R6":├(237,107),2,2Ф
|А X│1 е 1000:ЛX
ЖЮ:З"POSITION TAPE AND":З"PRESS <RECORD> BUTTONS TO":З"SAVE SCREEN ON CASSETTE.":З:З:Й"THEN PRESS <ENTER>";A$Y
РШM"PART1",1536,7679,1536:а200,2:Ю:Й"SAVE ANOTHER COPY";A$:Е О(A$,1)│"Y"з390:Д КЇ
Ъ╞"BM144,60;L6D1L2D1L4D1L4D1L4D1L2D1L2D2L2D1L2D1L2D1L2D1L2D2L2D2L2D1L2D1L2D1L2D2L2D1L2D1L2D2L2D2L2D1L2D1L2D5L2D4L2D3L2D2L2D5L2D2L2D4L2D2L2D2L2D3L2D4R2"М
д╞"D1R6D2R4D1R12D2L2D1L2D1L2D4R2D1R4D1R4D1R4D1R26U1R2U1R2U3R6U1R4U4L1U1L14U1L4U1L2U7R4U2R2U1R2U1R2U1R2U1R2U2R2D1R2D2R2D1R4D1R4D1R4D2R8D3R2D2R4D2R10"
о╞"U2L8U1R12U1L12U1R14U2L2U1L18U1L2U1L2U1L2U1L4U2L4U2L2U3L2U2L2U1R4D2R2D1R4D2R2D1R14D2R4D2R8U2R2U2L6U1R8U3L2U1L10U1L8U1L2U1L4U1L4U3L2U2L2U5"s
╕╞"R2U4R2U2R2U9R2U4R2U3R2U8L2U1L2U1L12U2L2":╞"BM148,64;L10D1L2D2R2D2R6U1R2U1R2U3":РL)м1,  К( О(F$(F(Y)),1)) : ТAB(JL),47 : ТAB(JL)л1,  К( П(F$(F(Y)),1))'ОT$│F$(F(JL)) : F$(F(JL)) │ F$(F(Y)) : F$(F(Y)) │ T$ : T│PE(F(JL (∙
В ***'В * a year at the races@В * by Glen TapanilaJ(В ***g2В * initialize variables╬<МH$(40):МH(40,15):МJ$(10):МJ(10,4):МR$(4):МR(4,4):МRN(20,4):МJS(5):МR1(4):МR2(4):МSC(5,4):МBE(4,3)
OFЖAAA,BBBB,CCCC,DDDD,ONYX,LILY,OPAL,PARK,PASA,SLOT,SLOU,CORP,CLAR,AUBE,AURA,BRAN,BULL,INKY,LEAR,MEAN,XERO,YUGA,DUNK,TRUM,DOLL
ЯPЖTRAN,WEBB,RAJA,DECI,STIR,NIMM,MILL,YULE,NUTT,TELE,ORLY,CHAT,TIFF,BEAN,MIST
юZЖYAMADA,SMYTHE,RODRIGES,TAPANILA,MERCKLE,JACKSON,CHAN,SKIPSON,RITHIE,KLEGG(dЖ300,1400,500,400,1900,750,500,3000,900,900,5000,1500knЖ"$800 CLAIMING","1600 CLAIMING","ALLOWANCE","HANDICAP STAKES"АxАI│1е40:НH$(I):ЛаВАI│1е10:НJ$(I):J(I,4)│300:Л├МАI│1е4:НR(I,1),R(I,2),R(I,3):Л╫ЦАI│1е4:НR$(I):ЛёаАI│1е40:H(I,9)│м200:ЛiкЮ:З@32,"WELCOME TO A YEAR AT THE RACES":З@64,"YOU HAVE 4 HORSES AND $10,000":З@96,"FIRST YOU MUST NAME YOUR HORSES"t┤АI│1е4Щ╛З"HORSE # "I" IS CALLED ":ЙH$(I)▓╚Е З(H$(I))│4 з Бе220╓╥З"USE 4 LETTER NAME ONLY":Бе190▄▄ЛшцM│10000ЁВ * start the races
В * print main menu"
Ю:K│1я
З@33,"A YEAR AT THE RACES":З@99,"ENTER THE NUMBER OF":З@131,"THE PROCESS YOU WANT":З@161,"1. SET UP THE DAYS RACES":З@193,"2. HORSE HISTORY":З@225,"3. START THE DAYS RACES":З@257,"4. JOCKEY STANDINGS"
"З@289,"5. HOW MUCH MONEY DO I HAVE"9
,З@321,"6. PRINTOUT OF HORSES"S
6З @385,"ENTER # OF ";d
@Й"PROCESS";PЭ
JЕP│1░SO│1 з Ю:З@481,"RACES ARE ALREADY SET UP":Бе280▌
TЕP│3░SO│0 зЮ:З@480,"MUST SET UP RACES BEFORE RUNNING":Бе280
^И P Бе390,1070,1180,2650,2730,28502
hЮ:З@481,"INVALID CHOICE, TRY AGAIN":Бе280O
rЕBE(A,1)│0 з BP│0:Бе2270l
|В * setup the days racesx
ЖM│Mм250Ъ
РАI│1е20:RN(I,1)│0:RN(I,2)│0:Л╞
ЪWE│ Д(5):ЕWE│1 з W$│"RAIN" :Д W$│"FAIR"╫
дDY│DYл1:HC│0ь
йЕDY▓10 з Бе 2770ў
оАA│1е4/
╕L│ Д(2):ЕL│1 з L$│"6 FURLONGS" :Д L$│"1 1/16 MILES"<
┬R(A,4)│Ln
╠Ю:З@8,"BRINGMEE DOWNS":З@40,"DAY "DY" RACE "A}
╓З@69,R$(A)Ц
рЗ@101,"LENGTH IS "L$╣
ъЗ@133,"WEATHER FORECAST IS "W$ф
ЇЗ@165,"WINNER GETS $";:З═"####";R(A,2)
■З@197,"PLACE  GETS $";:З═"####";R(A,3)4З@259,"COST OF ENTRY IS $"R(A,1)iЗ@323,"'Y'= ENTER A HORSE":З@355,"'N'= CONTINUE"xЙ"===>";E$М&ЕE$│"Y" з Бе570й0ЕE$│"N" з Бе580 :Д Бе460╣:Бж620:Бе590╙DJK│0:Y2│1:Бж910:Бе590┌NЛAфXБе270
bВ * player enters a racelЮ!vЗ@7,"DAY "DY" RACE "AВАЗ@67,"TYPE IN NUMBER OF":З@99,"HORSE YOU WANT ENTERED":З@133,"OR":З@163,"'H'= HORSE HISTORY"ТКЙ"===>";HS$┤ФЕHS$│"H" з K│2:Бж1070:Ю:Бе630├ЮHS│ Й(HS$)уиЕHS┤1▒HS▓4 з Бе690 :Д Бе700#▓Ю:З@417,"INVALID ENTRY":З@449,"ENTER 1, 2, 3, 4 OR H":Бе630m╝Е(HS│RN(1,1))▒(HS│RN(6,1))▒(HS│RN(11,1))▒(HS│RN(16,1)) з Бе710:ДБе720ї╞Ю:З@352,"I AM SORRY, BUT YOU HAVE":З@384,"ALREADY ENTERED THAT HORSE":З@416,"IN A RACE.  PASS OR":З@448,"ENTER ANOTHER HORSE":Бе630╨HC│HCл1:RN(HC,1)│HS:Ю`┌З@128,"ENTER THE NUMBER OF THE":З@160,"JOCKEY YOU WANT TO RIDE":З@192,H$(HS)ПфЗ@227,"OR":З@256,"TYPE 'J' TO SEE JOCKEYS"ЯюЙ"===>";JC$┴°ЕJC$│"J" з K│2:Бж2650:Ю:Бе730╨JC│ Й(JC$)єЕ(JC┤1▒JC▓10) з Бе790 :Д Бе800%Ю:З@448,"ENTER A NUMBER BETWEEN 1 & 10":Бе730I Ю:З@64,"YOU HAVE CHOSEN "J$(JC)б*З@192,"HIS FEE IS $"J(JC,4):З@256,"ENTER AN 'N' IF YOU":З@288,"WANT ANOTHER JOCKEY"▒4Й"===>";JC$╧>ЕJC$│"N" з Бе840 :Д Бе850█HЮ:Бе730RRN(HC,2)│JC:JS(1)│JC:M│MмJ(JC,4)мR(A,1)!\ЕM┤0 з Бе870 :Д Бе880pfАXX│1е1000:Ю:З@96,"LOSE THIS ONE AND YOU'RE":З@128,"IN HOCK BIG FELLA":ЛXXДpJK│1:Y2│2:Бж910КzРйДВ * fill out the race card▓ОY1│1═ШJK│JKл1:ЕJK▓5 з Бе1050┘вHC│HCл1їмHN│ Д(40):ЕHN┤5 з Бе940╢АY│1е(HCм1):ЕHN│RN(Y,1) з Бе940 └ЛY0╩RN(HC,1)│HN>╘JP│ Д(10)M▐АZ│1 е(Y1)cшЕJP│JS(Z) з Бе980jЄЛZД№JS(Y2)│JP:RN(HC,2)│JPШY1│Y1л1:Y2│Y2л1вБе920нSO│1:Р├$В * horse history .Ю:З@33,"ENTER THE NUMBER OF THE HORSE":З@65,"YOU WANT INFORMATION ABOUT":З@97,"===>":ЙHN:8ЕHN┤1▒HN▓40 з Бе 1070zBЮ:З@72,H$(HN)"  NUMBER "HN:З@164,"# 1STS ";:З═"###";H(HN,1)ъLЗ@196,"# 2NDS ";:З═"###";H(HN,2):З@228,"# RACES";:З═"###";H(HN,7):З@290,"SPEED AVERAGE ";:З═"###.#";H(HN,9)8VЗ@322,"LAST RACE     ";:З═"###";H(HN,12):З@386,"ENTER ANOTHER NUMBER  OR"W`З@418,"TYPE 'R' TO RETURN"_jЙZ$ИtЕZ$│"R" з Бе1150 :Д HN│ Й(Z$):Бе1080Ъ~ЕK│2 з Бе1170дИБе270оТK│1:Р╔ЬВ * run the days racesЁжWF│ Д(4):ЕWF│1 з Бе1200 :Д Бе 1210░ЕWE▓1 з WE│1 :Д WE│2:Бе 1220"║ЕWE▓1 з WE│2D─АX│1е4:АY│1е3:BE(X,Y)│0:ЛY:ЛX[╬АX│1е20:HR│RN(X,1)x╪ЕX┤6 з D│R(1,4)л9:Бе1270ЦтЕX┤11 з D│R(2,4)л9:Бе1270╗ьЕX┤16 з D│R(3,4)л9 :Д D│R(4,4)л9ыЎЕX┤6 з C│3:Бе1300;:З═"#######";RN((CTлV),1)ЕX┤11 з C│4:Бе1300
ЕX┤16 з C│5 :Д C│6;ЕH(HR,2)▓1 з S│2 :Д S│H(HR,2)QJN│J((RN(X,2)),2)_(C1│0:C2│02Е(H(HR,14)л2)▓C з C1│1:C2│0Я<Е(H(HR,14)л2)┤C з C1│0:C2│1┴FЕH(HR,1)▓1 з F│2 :Д F│H(HR,1)чPЕWE│1 ░ H(HR,13)│1 з MU│1 :Д MU│0ZT│0:Е DYо3┤H(HR,7) з T│1dЕDYо2┤H(HR,7) з T│2_nRM│0:АY│1е4:B1│ Д(84):B2│ Д(2):ЕB2│2 з RM│RMмB1 :Д RM│RMлB1:ЛYmxRM│RMо100█ВRN(X,3)│RMл.53нH(HR,8)м.08нH(HR,C)м.44нH(HR,D)л.24нJNм.01нH(HR,9)л.1нC1л.12нC2л.3нFл.04нSм.25нMUл.12нTл10тМЛX ЦАA│1е4:АX│1е2:BE(A,B)│0:ЛX:ЛA аCT│м5:SO│0 &кАA│1е4:CT│CTл5 8┤Ю:U│96:U1│114 Е╛З@7,"BRINGMEE DOWNS":З@40,"DAY"DY"RACE"A:З@96,"HORSE    NUMBER   JOCKEY" ╚╚АV│1е5:U│Uл32:З@U,H$(RN((CTлV),1));:З═"#########";RN((CTлV),1) ¤╥ЕR(A,4)│1 з L$│"6 FURLONGS" :Д L$│"1 1/16 MILES"!$▄U1│U1л32:З@U1,J$((RN((CTлV),2))):Л!bцЗ@289,L$:З@303,R$(A):З@322,R(A,2)"TO WIN"R(A,3)"TO PLACE"!СЁЗ@352,"TRACK IS ":ЕWE│1 з Бе1540 :Д Бе1530!й·З@361,"FAST":Бе1550!┬З@361,"MUDDY":Бе1550"З@384,"'R'= RUN RACE       'B'= BET":З@416,"'H'= HORSE HISTORY  'J'=JOCKEYS"""Й"===>";B$"7"ЕB$│"B" з Бе1610"L,ЕB$│"H" з Бе1780"l6ЕB$│"J" з K│2:Бж2650:Бе1460"Л@ЕB$│"R" з Бе1790 :Д Бе1460"СJЮ"╫TЗ@3,"ENTER NUMBER OF HORSE":З@35,"YOU WANT TO BET ON":U│68:АV│1е5#^U│Uл32:З@U,H$(RN((CTлV),1))" # IS";:З═"###";RN((CTлV),1):ЛV#&hЙ"===>";HB#RrАV│(CTл1) е (CTл5):ЕHB│RN(V,1) з Бе1680#Y|ЛV#xЖЮ:З@450,"TRY AGAIN":Бе1620#~РЮ#┤ЪЗ@3,"YOU CAN BET FROM $5 TO $500":Й"HOW MUCH?";AB#╪дЕAB┤5▒AB▓500 з Бе1710 :Д Бе1720$оЮ:З@450,"ENTER AMOUNT AGAIN":Бе1690$╕Ю$/┬З@1,"ENTER 1 FOR WIN OR 2 FOR PLACE"$>╠Й"===>";BT$a╓ЕBT┤1▒BT▓2 з Бе 1760 :Д Бе1770$ЖрЮ:З@450,"'1' OR '2' ONLY":Бе1730$▓ъBE(A,1)│AB:BE(A,2)│BT:BE(A,3)│HB:Бе1460$╚ЇK│2:Бж1070:Бе1460$╘■HN│CTл1%SC(1,1)│RN(HN,3):SC(1,2)│RN(HN,1):SC(1,4)│RN(HN,2)%Y1│1%,АX│ (HNл1) е (HNл4)%<&Y│0:Y1│Y1л1%N0АZ│ Y1 е2 йм1%`:ЕY│1 з Бе1900%DЕSC((Zм1),1)▓RN(X,3)Бе1880%╛NSC(Z,1)│RN(X,3):SC(Z,2)│RN(X,1):SC(Z,4)│RN(X,2):Y│1:Бе1900%■XSC(Z,1)│SC((Zм1),1):SC(Z,2)│SC((Zм1),2):SC(Z,4)│SC((Zм1),4)&EbЕZ│2 з SC((Zм1),1)│RN(X,3):SC((Zм1),2)│RN(X,1):SC((Zм1),4)│RN(X,2)&LlЛZ&SvЛX&iАЕA│1 з C│3:Бе1950&КЕA│2 з C│4:Бе1950&ХФЕA│3 з C│5 :Д C│6&дЮD│R(A,4)л9&хиSC(1,3)│102м Д(40):SC(5,3)│SC(1,3)м Д(40):SD│SC(1,3)мSC(5,3)'-▓SC(4,3)│SC(5,3)л.25нSD:SC(3,3)│SC(5,3)л.5нSD:SC(2,3)│SC(5,3)л.75нSD'h╝WN│SC(1,2):PL│SC(2,2):SH│SC(3,2):FO│SC(4,2):FI│SC(5,2)'Р╞H(WN,1)│H(WN,1)л1:H(PL,2)│H(PL,2)л1'╜╨H(WN,C)│H(WN,C)л1:ЕH(WN,C)▓1 з H(WN,C)│1'ъ┌H(PL,C)│H(PL,C)л1:ЕH(PL,C)▓1 з H(PL,C)│1(фH(WN,D)│H(WN,D)л1:ЕH(WN,D)▓1 з H(WN,D)│1(DюH(PL,D)│H(PL,D)л1:ЕH(PL,D)▓1 з H(PL,D)│1(в°H(WN,7)│H(WN,7)л1:H(PL,7)│H(PL,7)л1:H(SH,7)│H(SH,7)л1:H(FO,7)│H(FO,7)л1:H(FI,7)│H(FI,7)л1(╬H(WN,8)│((H(WN,7)м1)нH(WN,8)л1)оH(WN,7)(·H(PL,8)│((H(PL,7)м1)нH(PL,8)л2)оH(PL,7))&H(SH,8)│((H(SH,7)м1)нH(SH,8)л3)оH(SH,7))R H(FO,8)│((H(FO,7)м1)нH(FO,8)л4)оH(FO,7))~*H(FI,8)│((H(FI,7)м1)нH(FI,8)л5)оH(FI,7))▓4H(WN,9)│(((H(WN,7)м1)нH(WN,9))лSC(1,3))оH(WN,7))ц>H(PL,9)│(((H(PL,7)м1)нH(PL,9))лSC(2,3))оH(PL,7)*HH(SH,9)│(((H(SH,7)м1)нH(SH,9))лSC(3,3))оH(SH,7)*NRH(FO,9)│(((H(FO,7)м1)нH(FO,9))лSC(4,3))оH(FO,7)*В\H(FI,9)│(((H(FI,7)м1)нH(FI,9))лSC(5,3))оH(FI,7)*┬fH(WN,12)│DY:H(PL,12)│DY:H(SH,12)│DY:H(FO,12)│DY:H(FI,12)│DY*┘pЕWE│1 з H(WN,13)│1+zH(WN,14)│A:H(PL,14)│A:H(SH,14)│A:H(FO,14)│A:H(FI,14)│A+1ДH(WN,15)│H(WN,15)лR(A,2)+NОH(PL,15)│H(PL,15)лR(A,3)+eШЕWN┤5 з M│MлR(A,2)+|вЕPL┤5 з M│MлR(A,3)+ЮмЕBE(A,2)│0 з Бе2230 :Д Бе2240+о╢BP│0:Бе2270+ф└ЕBE(A,2)│1 ░ WN│BE(A,3) з M│MлBE(A,1):BP│1:Бе2270,.╩Е(BE(A,2)│2)░((WN│BE(A,3))▒(PL│BE(A,3))) з M│MлBE(A,1)н.5:BP│2:Бе2270,C╘M│MмBE(A,1):BP│3,~▐WN│SC(1,4):PL│SC(2,4):SH│SC(3,4):FO│SC(4,4):FI│SC(5,4),ФшJ(WN,3)│J(WN,3)л1,ЄЄJ(WN,1)│J(WN,1)л1:J(PL,1)│J(PL,1)л1:J(SH,1)│J(SH,1)л1:J(FO,1)│J(FO,1)л1:J(FI,1)│J(FI,1)л1- №J(WN,2)│(((J(WN,1)м1)нJ(WN,2))л1)оJ(WN,1)-N	J(PL,2)│(((J(PL,1)м1)нJ(PL,2))л2)оJ(PL,1)-|	J(SH,2)│(((J(SH,1)м1)нJ(SH,2))л3)оJ(SH,1)-к	J(FO,2)│(((J(FO,1)м1)нJ(FO,2))л4)оJ(FO,1)-╪	$J(FI,2)│(((J(FI,1)м1)нJ(FI,2))л5)оJ(FI,1)-▐	.Ю-ї	8З@5,"DAY"DY"RACE"A.	BЗ@70,"R E S U L T S".6	LЗ@160,"HORSE      #  SPEED  JOCKEY".N	VU│161:U1│180:АX│1е5.▒	`U│Uл32:U1│U1л32:З@U,H$(SC(X,2));:З═"#######";SC(X,2);:З═"#####.#";SC(X,3);:З@U1,J$(SC(X,4)):ЛX.─	jЕBP│0 з Бе2440.╫	tЕBP│1 з Бе2450.Ї	~ЕBP│2 з Бе2460 :Д Бе2470/	ИЗ@354,"NO BET":Бе2480/F	ТЗ@354,"YOUR BET PAYS  ";:З═"$####";BE(A,1)н2:Бе2480/А	ЬЗ@354,"YOUR BET PAYS  ";:З═"$####";BE(A,1)н1.5:Бе2480/░	жЗ@354,"YOUR BET LOSES  ";:З═"$####";BE(A,1)/╧	░З"PRESS ENTER TO CONTINUE"/Є	║З"'P' = PRINTOUT OF THIS RACE"/№	─Й XX$0	╬ЕXX$│"P" з Бж28900	╪ЛA0%	тАA│1е100I	ьЕJ(A,2)┤1.5 з J(A,4)│500:Бе26200k	ЎЕJ(A,2)┤2 з J(A,4)│450:Бе26200П
ЕJ(A,2)┤2.5 з J(A,4)│400:Бе26200▒

ЕJ(A,2)┤3 з J(A,4)│350:Бе26200╒
ЕJ(A,2)┤3.5 з J(A,4)│300:Бе26200ў
ЕJ(A,2)┤4 з J(A,4)│200:Бе26201
(ЕJ(A,2)┤4.5 з J(A,4)│150:Бе26201*
2J(A,4)│10011
<ЛA1;
FБе2701T
PВ * jockey standings1Z
ZЮ1п
dЗ@1,"JOCKEYS AND COST PER RACE":З@65,"#  PRICE  WINS   NAME":U│68:АX│1е10:U│Uл321ъ
nЗ═"##";X:З@U,J(X,4);:З═"#####";J(X,3):З@(Uл14),J$(X):Л1∙
xЙ"===>";XX2
ВЕK│2 з Бе27102
МБе2702
ЦK│1:Р2;
аFRM нн display of money2U
кЮ:З@130,"YOU HAVE $"M2d
┤Й"===>";XX2n
╛Бе2702Е
╚В * close the year2┤
╥TW│H(1,1)лH(2,1)лH(3,1)лH(4,1):RR│(DYм1)н42║
▄Ю2╫
цЗ@2,"THE RACING YEAR AT"2∙
ЁЗ@34,"BRINGMEE DOWNS IS OVER"3
·З@66,"YOU HAVE $"M34З@98,"YOUR HORSES WON"TW"RACES"3PЗ@130,"OUT OF"RR"RACES"3VК3b"АI│1е403─,З#м2,H$(I)I" WINS= "H(I,1)" 2NDS= "H(I,2)" RACES= "H(I,7)" WINNINGS= "H(I,15)" SPEED= "H(I,9)3╩6Л3╘@Бе2703∙JЗ#м2," ":З#м2," DAY "DY" RACE "A4TЕWE│1 з Бе2910 :Д Бе292047^З#м2,"TRACK IS MUDDY":Бе29304PhЗ#м2,"TRACK IS FAST"4\rЗ#м2,L$4w|З#м2,"  R E S U L T S"4ЬЖЗ#м2,"HORSE   #  SPEED   JOCKEY"4зРАX│1е54хЪЗ#м2,H$(SC(X,2))"   "SC(X,2)"   "SC(X,3)"  "J$(SC(X,4)):Л4ЄдЗ#м2," "4°оР