е1318ЙЮ:Бж275:Бж264:Бе198IКЮ:A│ Д(400)м Д(400):B│ Д(400)м Д(400): Я│08^ЛЕT│10з265:ДT│Tл18tМЗ@232,A;"+"B;"=";8ЙНЙD:E│ Яо60:F│EлF8аОЕD│AлBзБж257:Бе1388▓Па20,5:Ю:Бе1398сРЮ:A│ Д(400)м Д(400):B│ Д(400)м Д(400): Я│08ЎСЕT│10з265:ДT│Tл19ТЗ@232,A;"-"B;"=";9!УЙD:E│ Яо60:F│EлF98ФЕD│AмBзБж257:Бе1449JХа20,5:Ю:Бе1459uЦЮ:A│ Д(40)м Д(40):B│ Д(40)м Д(40): Я│09КЧЕT│10з265:ДT│Tл19аШЗ@232,A;"*"B;"=";9╡ЩЙD:E│ Яо60:F│EлF9╠ЪЕD│AнBзБж257:Бе1509▐Ыа20,5:Ю:Бе151:ЬЮ:B│ Д(50)м Д(50):G│ Д(50)м Д(50):A│BнG: Я│0:$ЭЕT│10з265:ДT│Tл1::ЮЗ@232,A;"/"B;"=";:OЯЙD:E│ Яо60:F│EлF:fаЕD│AоBзБж257:Бе156:xба20,5:Ю:Бе157:╔вЮ: Я│0:П:Ж4/16,1/4,3/6,1/2,9/12,3/4,2/10,1/5,10/100,1/10,15/25,3/5,18/45,2/5:▐гЕT│10з265:ДT│Tл1:ыдN│ Д(14);еЕ Б(Nо2)│Nо2зN│Nл1;
жАX│1еN;зНA$;иЛX;2йЗ@233,"REDUCE:"A$;:кНB$;[лЗ@269," ";:ЙL$:E│ Яо60:F│EлF;rмЕL$│B$зБж257:Бе162;Вна25,6:Бе162;соЮ: Я│0:П:Ж1/4,25,1/2,50,3/4,75,1/5,20,2/5,40,3/5,60,4/5,80,1/10,10,3/10,30,7/10,70,9/10,90;ЎпЕT│10з265:ДT│Tл1<░N│ Д(22)л14<"▒Е Б(Nо2)│Nо2░N┤36зN│Nл1<-▓АX│1еN<5│НC$<<┤ЛX<d╡З@199,"CONVERT TO PERCENT":З@238,C$<l╢НD$<Н╖З@267," ";:ЙL$:E│ Яо60:F│EлF<д╕ЕL$│D$зБж257:Бе174<┤╣а25,6:Бе174=║Ю: Я│0:П:Ж25,1/4,50,1/2,75,3/4,20,1/5,40,2/5,60,3/5,80,4/5,10,1/10,15,3/20,70,7/10,90,9/10,100,1=.╗ЕT│10з265:ДT│Tл1=>╝N│ Д(24)л36=Z╜Е Б(Nо2)│Nо2░N┤58зN│Nл1=e╛АX│1еN=m┐НE$=t└ЛX=╕┴З@167,"CONVERT TO FRACTION":З@201,"(LOWEST TERMS)":З@238,E$;"%"=└┬НF$=с├З@267," ";:ЙL$:E│ Яо60:F│EлF=°─ЕL$│F$зБж257:Бе186>┼а25,5:Бе186>8╞Ю:A│ Д(10)н10:B│ Д(10)н100: Я│0:ЕA│30зБе198>M╟ЕT│10з265:ДT│Tл1>s╚З@193,"WHAT IS";A;"PERCENT OF";B;>И╔ЙD:E│ Яо60:F│EлF>е╩ЕD│(Aо100)нBзБж257:Бе198>╖╦а25,6:Ю:Бе199>╧╠Ю:З@43,"advanced":З?м═З"     1) SQUARE ROOTS                 2) EXPONENTS                    3) PERIMETER OF A SQUARE        4) AREA OF A RECTANGLE          5) AREA OF A TRIANGLE           6) VOLUME OF A CUBE             7) CIRCUMFERENCE"?х╬З"     8) AREA OF A CIRCLE             9) NEW LEVEL"@╧Й"     WHICH ONE (1-8)";A:ЕA┤1▒A▓8з205@;╨ИAБе209,215,221,239,233,227,245,251,19@U╤Ю:H│ Д(20):A│HнH: Я│0@j╥ЕT│10з265:ДT│Tл1@Ч╙З@193,"WHAT IS THE SQUARE ROOT OF"; Б(A)@▓╘З" ";:ЙD:E│ Яо60:F│EлF@╟╒ЕD│HзБж257:Бе209@┘╓а25,6:Ю:Бе210@Ї╫Ю:A│ Д(6):Q│ Д(4): Я│0A	╪ЕT│10з265:ДT│Tл1A3┘З@225,"WHAT IS";A;"TO THE";Q;"POWER";AH┌ЙD:E│ Яо60:F│EлFAc█ЕD│ Б(AпQ)зБж257:Бе215Au▄а25,6:Ю:Бе216AЙ▌Ю:A│ Д(25): Я│0AЮ▐ЕT│10з265:ДT│Tл1Aу▀З@193,"WHAT IS THE PERIMETER OF A      SQUARE WITH ONE SIDE=";A;A°рЙD:E│ Яо60:F│EлFBсЕD│Aн4зБж257:Бе221B!та25,6:Ю:Бе222BGуЮ:H│ Д(10):W│ Д(10):D│ Д(10): Я│0B\фЕT│10з265:ДT│Tл1B╕хЗ@193,"WHAT IS THE VOLUME OF A CUBE     IF DEPTH=";D;"     WIDTH=";W;"      HEIGHT=";H;B═цЙE:V│ Яо60:F│VлFBцчЕE│HнWнDзБж257:Бе227B°ша25,6:Ю:Бе228CщЮ:B│ Д(10):H│ Д(10): Я│0C*ъЕT│10з265:ДT│Tл1C|ыЗ@193,"WHAT IS THE AREA OF A TRIANGLE  IF THE BASE=";B:З" AND THE HEIGHT=";H;CСьЙD:E│ Яо60:F│EлFCкэЕD│BнHо2зБж257:Бе233C╝юа25,6:Ю:Бе234C╫яЮ:L│ Д(9):W│ Д(9): Я│0CьЁЕT│10з265:ДT│Tл1D?ёЗ@193,"WHAT IS THE AREA OF A RECTANGLE IF THE LENGTH=";L:З" AND THE WIDTH=";W;DTЄЙD:E│ Яо60:F│EлFDkєЕD│LнWзБж257:Бе239D}Їа25,6:Ю:Бе240DШї Я│0:Ю:PI│3.14:R│ Д(5)DнЎЕT│10з265:ДT│Tл1DЇўЗ@193,"WHAT IS THE CIRCUMFERENCE OF A  CIRCLE WITH A RADIUS OF";R;E	°ЙD:E│ Яо60:F│EлFE#∙ЕD│PIнRн2зБж257:Бе245E5·а25,6:Ю:Бе246EP√Ю:PI│3.14:R│ Д(6): Я│0Ee№ЕT│10з265:ДT│Tл1Eа¤З@193,"WHAT IS THE AREA OF A CIRCLE    WITH RADIUS";R;E╡■ЙD:E│ Яо60:F│EлFE╤ ЕD│PIн(Rп2)зБж257:Бе251Eу
а25,6:Ю:Бе246FA

АZZZ│1е10:ЛZZZ:АCO│1е8:Ю Д(8):АTI│1е20:ЛTI:а Д(255),1:ЛCO:C│Cл1:╔"L255CDEFGABO4CDEFGAB":РFh
З" APPROXIMATE LEARNING LEVEL IS:"Fк
ЕS┤60зЗ" first":З:З" BETTER LUCK NEXT TIME!":╔"O1L16GFEDC"::РFЇ
ЕS┤85зЗ" second":З:З" VERY GOOD!":╔"L8O1CEGO2CEGO3CEGO4CEGO5CEGO4C":РG;
ЕS┤100зЗ" third":З:З" EXCELLENT!":╔"O3L4GFL8E-EL8.EP16L8E-EL8.E":РGа
З" fourth":З:З" FABULOUS!!!!":╔"O4L255CDEFGCDEFGCDEFGCDEFGABCDEFGABCDEFGABCDEFGABL4O3DGDGDL2G":РGж
РG═
З:╗Й" PRESS ENTER WHEN READY";V$:РH
	Ю:З@42,"evaluation":З:З" NUMBER CORRECT="C:З" NUMBER OF PROBLEMS="TH-

З" PERCENT="CоTн100HY
ЕFоT▓0зЗ" AVERAGE TIME IN SECONDS=";FоTHЬ
S│(CоT)н100л10:S│ Б(Sл(2м(FоT))нC):З" SELF-COMPARISON SCORE="SH▒

Бж258:Бж264:Бе19H╩
З" NUMBER CORRECT="CHч
З" NUMBER OF PROBLEMS="TH 
З" PERCENT="CоTн100I
S│CоTн100л10I
Бж258:Бе19I9
З" NUMBER CORRECT:";CIW
З" NUMBER OF PROBLEMS:";TIp
З" PERCENT:";CоTн100IБ
S│CоTн100л10Iв
З" SELF-COMPARISON SCORE=";SIо
Бж258:РH╩
З" NUMBER CORRECT="CHч
З" NUMBER OF PROBLEMS="TH 
З" PERCENT="CоTн100 #п&'
:ГCOPYRIGHT (C) T&D SOFTWARE 1983&F:ГCREATED BY ROSS GUBERMAN&LВ&n╚0:└1:Ю:З@232,"WELCOME TO..."&}АA│1е460:Л&ОI│1:АA│1е104&╝TAB│TABл1нI:ЕTAB▓21зI│Iнм1:ДЕTAB┤1зI│Iнм1&╙ЗдTAB)"MATH TUTOR"&┌	ЛA&щ
АB│1е920:Л&єБж257&∙Ю'р
З"THIS PROGRAM CONSISTS OF A      SERIES OF TESTS ON THREE        DIFFERENT LEVELS. THE DIFFICULTY LEVEL RANGES FROM THAT OF THE  PRIMARY GRADES, TO THAT OF HIGH SCHOOL MATHEMATICS. YOU WILL BE GIVEN THE OPPORTUNITY TO CHOOSE"(ДЗ"THE LEVEL AT WHICH YOU WOULD    LIKE TO BEGIN. IMMEDIATELY AFTER YOU CHOOSE A LEVEL, A LIST OF  CHOICES WILL BE PROVIDED. CHOOSE THE ONE THAT INTERESTS YOU."(▌З"YOU WILL THEN BE PRESENTED WITH TEN PROBLEMS. TYPE IN THE ANSWER AND PRESS 'ENTER')╗Й"---press enter when ready---";A$:Ю)√З"AFTER YOU HAVE ANSWERED TEN     PROBLEMS, AN EVALUATION CHART   WILL BE PRINTED. AMONG OTHER    ITEMS, THIS INCLUDES A 'SELF    COMPARISON SCORE' WHICH YOU MAY USE AS A RECORD OF YOUR PROG-   RESS. ALSO, YOU WILL BE GIVEN   A LEARNING ";*MЗ"LEVEL, WHICH RANGES  FROM ONE TO FOUR.":╗Й"---press enter when ready---";A$*╫F│0:T│0:Ю:З@128," LEVELS:                                1) ELEMENTARY                   2) INTERMEDIATE                 3) ADVANCED"*ЎЙ" WHICH ONE(1,2, OR 3)";A+ЕA┤1▒A▓3з19+(G│0:T│0:C│0:F│0:E│0:DA│0:DB│0+:ИAБе24,98,204+TЮ:З@42,"elementary":З,7З"     1) COUNTING OBJECTS             2) ADDITION FACTS               3) SUBTRACTION FACTS            4) MULTIPLICATION FACTS         5) DIVISION FACTS               6) LEVEL B ADDITION             7) LEVEL B SUBTRACTION",РЗ"     8) LEVEL B MULTIPLICATION       9) LEVEL B DIVISION            10) NEW LEVEL",▓Й"        WHICH ONE (1-10)";A,╕Ю,▐ИAБе39,30,49,58,66,74,80,86,92,19,ЎЮ:A│ Д(10):B│ Д(10)-
Ю: Я│0- ЕT│10зБж265:ДT│Tл1-,!З@233,A"+"B"=";-3"ЙD-?#E│ Яо60-I$F│EлF-f%ЕD│AлBзБж257:Да25,5:Бе31-o&Бе30-╝'Ю: Я│0:Q$│ Л(32л Д(6)):З:З"TYPE IN THE NUMBER OF ";Q$"'S THAT  YOU SEE."-╤(ЕT│10з265:ДT│Tл1-┘)З:З-ц*N│ Д(15)-ў+F│16м(Nн2)о2.,АF│1еN.-ЗQ$;" ";:ЛF.'.ЙJ:E│ Яо60:F│EлF.=/ЕJ│NзБж257::Да1,5.F0Бе39.f1Ю:A│ Д(10):B│ Д(10):ЕA┤Bз49.В2Ю: Я│0:ЕT│10з265:ДT│Tл1.Ц3З@233,A"-"B"=";.Э4ЙD.п5E│ Яо60:F│FлE.╠6ЕD│AмBзБж257::Да1,5:Бе50.╒7Бе49.ї8SC│(CоTн100)н(13м(Fо10))о10/
9Бж258:Бж264:Бе19/":Ю:A│ Д(10):B│ Д(10)/>;Ю: Я│0:ЕT│10з265:ДT│Tл1/R<З@233,A"*"B"=";/Y=ЙD/e>E│ Яо60/o?F│EлF/М@ЕD│AнBзБж257::Да1,5:Бе59/ХAБе58/│BЮ:G│ Д(10):B│ Д(10):A│GнB/╧CЮ: Я│0:ЕT│10з265:ДT│Tл1/уDЗ@233,A"/"B"=";/ъEЙD/ЎFE│ Яо600GF│EлF0HЕD│AоBзБж257::Да1,5:Бе670&IБе660]JЮ:DA│DAл1:DB│DBл1:A│100л Д(399):B│100л Д(399): Я│00vKЮ:ЕT│10зБе265:ДT│Tл10жLЗ@206,A:З@237,"+";B:З@270,"----":З@300," ";0╗MЙD:E│ Яо60:F│EлF0╤NЕD│AлBзБж257:Бе740▀Oа1,5:Бе751PDA│DAл1:DB│DBл1:Ю:A│500л Д(499):B│100л Д(300): Я│01/QЮ:ЕT│10зБе265:ДT│Tл11_RЗ@206,A:З@237,"-";B:З@270,"----":З@300," ";1tSЙD:E│ Яо60:F│EлF1КTЕD│AмBзБж257:Бе801ШUа1,5:Бе811╔VDA│DAл1:DB│DBл1:Ю:A│9л Д(10):B│9л Д(10): Я│01тWЮ:ЕT│10зБе265:ДT│Tл12XЗ@206,A:З@237,"*";B:З@269,"----":З@299," ";2'YЙD:E│ Яо60:F│EлF2=ZЕD│AнBзБж257:Бе862K[а1,5:Бе872Ь\Ю:DA│DAл1:DB│DBл1:G│ Д(100нDA):B│ Д(100нDB):B│ Д(20)л10:A│( Д(15)л10)нB: Я│02│]Ю:ЕT│10з265:ДT│Tл12є^З@141,"DIVISION":З@206,A:З@238," ";B:З@271,"---":З@301," ";3_ЙD:E│ Яо60:F│EлF3`ЕD│AоBзБж257:Бе923,aа1,5:Бе933HbЮ:З@41,"intermediate":З3лcЗ"     1) INTEGERS - ADD               2) INTEGERS - SUBTRACT          3) INTEGERS - MULTIPLY"4cdЗ"     4) INTEGERS - DIVIDE            5) REDUCE FRACTIONS             6) FRACTIONS TO PERCENT         7) PERCENT TO FRACTIONS         8) PERCENT OF A NUMBER          9) NEW LEVEL4ГeЙ"       WHICH ONE (1-9)";P4ФfЕP┤1▒P▓9з1014┐gИPБе138,144,150,156,162,174,186,198,194ЎhA$│"":B$│"":P│0:Ю:A│ Д(1000)л Д(0):B│ Д(100)л Д(0)5iA$│ И(A):B$│ И(B):T│Tл1:ЕT│10з11258jA$│ О(A$,6):B$│ О(B$,6)5HkЗA$"+"B$"="5OlЙD5cmP│ Й(A$)л Й(B$)5ynБж257:C│Cл1:Бе1045Йoа25,5:Бе1055аpЮ:Бж275:Бж264:Бе195╟qЮ:A│ Д(1000)л Д(0):B│ Д(100)л Д(0)5эrA$│ И(A):B$│ И(B):T│Tл1:ЕT│10з1216sЕA┤BзT│Tм1:Бе1136tA$│ О(A$,6):B$│ О(B$,6)6.uЗA$"-"B$"="65vЙD6\wЕD│ Й(A$)м Й(B$)зC│Cл1:Бж257:Бе1136lxа25,5:Бе1146БyБж275:Бж264:Бе196иzЮ:A│ Д(1000)л Д(0):B│ Д(100)л Д(0)6╬{A$│ И(A):B$│ И(B):T│Tл1:ЕT│10з1296ъ|A$│ О(A$,6):B$│ О(B$,6)6·}ЗA$"*"B$"="7
~ЙD7(ЕD│ Й(A$)н Й(B$)зC│Cл1:Бж257:Бе12278Аа25,5:Бе1237OБЮ:Бж275:Бж264:Бе197sВЮ:B│ Д(10)л Д(0):G│ Д(10):A│BоG7ЩГA$│ И(A):B$│ И(B):T│Tл1:ЕT│10з1377╡ДA$│ О(A$,5):B$│ О(B$,4)7┼ЕЗA$"/"B$"="7╠ЖЙD7єЗЕD│ Й(A$)о Й(B$)зC│Cл1:Бж257:Бе1308Иа25,5:БT MOST OF THEM RIGHT!"&1MЗ"YOU ARE NOW RATED AS"&ЎRLEV│ Б(SECоNQл.5):Е NW▓0░  Б(NWн10оNQ)▓1 з LEV│LEVл Б(NWн10оNQ):Д Е NW▓0 з LEV│LEVл1::Г***SET CRITERION REFERENCE AT 100% - TO REDUCE, CHANGE NW>0 TO NW>NQ*.XX WHERE XX IS DESIRED PASS PERCENT'WЕ SEC▓NQнK з LEV│LEVл1'%\Е LEV▓6 з LEV│6'CaЗLEV" - "R$(LEV):Т256,LEV'NfБж2000'ok:Г***LIST MISSED PROBLEMS***'~pЕ NW│0з915'█uЕ NW│1зЗ"HERE IS THE ONLY ONE YOU MISSED:" :Д Е NW▓1зЗ"HERE ARE THE ONES YOU GOT WRONG:"'ъzА X│1 е NW'ЎЗNW$(X)(/ДЕ Xо10│ Б(Xо10)з 905 :Д Е X┤NW з Л X :Д Бж2000:Бе915(:ЙБж2000(HОЛX:Бж2000(МУЮ:З@227,"PRESS <SPACE> TO GO AGAIN.":З@259,"PRESS <Q> TO QUIT."(╤ШA$│ Т:ЕA$│""з920:ДЕA$│"Q"з925:ДЮ:З@230,"JUST A MOMENT, "N$:Бе200(╫ЭК(▐в:Г(¤ч:Г*****DRAW COLOR BAR*****)'шА P│1408 е 1437:Бж1005:аPм1300,1:ЛP:Р);эЕ P▓1423зТP,175)[ЄЕ P┤1424 ░ P▓1412 з Т P,159){ўЕ P▓1408 ░ P┤1413 з Т P,191)Б№Р)Я╧:Г*****WAIT FOR USER*****)┼╨З:З"     PRESS <SPACE> TO GO ON.")▐╒A$│ Т:Е A$┤▓" "з2005)ф┌Р*╖:Г***MAKE A JOYFUL SOUND****2╕:Г PUT YOUR FAVORITE SONGS OR SOUNDS HERE*OЯ:Г*****INSTRUCTIONS******ЭаЮ:З:З:З:З"SPEED MATH WILL TEST YOUR SKILL AND SPEED AT BASIC MATH FACTS."*шеЗ"WHEN YOU HEAR THIS SOUND":З"THE QUESTIONS WILL START.":Бж2000:а200,7+ кЮ:З:З@96, б(32,42):З"   THAT'S THE STARTING SOUND."+8пЗ:З б(32,42):Бж2000+b┤Ю:З"LET'S TRY ONE:":З:З@234,"7 - 2 ="+м╣:ГPRINT@416,"TYPE THE ANSWER. IF NOTHING     HAPPENS, PRESS <SPACE>."+├╛A$│ Т:Е A$│""з4030+╨├З@244,A$,╚Е A$│"5" з а100,1:З@276,"right":Бе4045:Д З@276,"PRESS <5>":Бе4030,!═Бж2000,Ё╥Ю:З:З:З:З: З"     do not press <ENTER>":З"     AFTER YOUR ANSWER.":З:З"IF YOU MAKE A MISTAKE,DO NOT TRYTO FIX IT UP. JUST GO ON TO THE NEXT QUESTION.":З:З"IF NOTHING SEEMS TO BE HAPPENINGPRESS <SPACE>."-'╫З:З"AFTER A GAME OR TWO, YOU'LL GET FASTER AT IT."-5▄Бж 2000:Рdo not press <ENTER>":З"     AFTER YOUR ANSWER.":З:З"IF YOU MAKE A MISTAKE,DO NOT TRYTO FIX IT UP. JUST GO ON TO THE NEXT QUESTION.":З:З"IF NOTHING SEEMS TO BE HAPPENINGPRESS <SPACE>."-'╫З:З"AFTER                                                                                                                                                                                                                                                                  .J:ГCOLOR MATH QUIZ MAY BE FREELY COPIED AND MODIFIED FOR PERSONAL USEн
H1$│"COLOR MATH QUIZ 1.0": H2$│"COPYRIGHT (C) 1983 BRUCE BELL": H3$│"EXTENDED COLOR BASIC 16K"╛М O(5),O$(5)▀╣ ╠R(X)│ Б((Xл.005)н100)о100BH1$│"COLOR MATH QUIZ 1.0": H2$│"COPYRIGHT (C) 1983 BRUCE BELL": H3$│"EXTENDED COLOR BASIC 16K"|O$(1)│"+": O$(2)│"-": O$(3)│"X": O$(4)│"/": O$(5)│","лCH$│"T7;O3;L5;G;B;O4;C;D;P10;O3;B;O4;L2;D"├
Ю: З H1$,H2$,H3$: З 2З: З"ENTER THE UPPER INTEGER LIMITS  FOR THE OPERANDS." ,<З: Й"FIRST LIMIT";AR: Й"SECOND LIMIT";BR qdNC│0: Ю: З H1$,H2$,H3$,,,: K│0: M$│" OPERATION MENU ": Бж9000: З ЁnЗд7)"1. ADDITION (+)" д39)"2. SUBTRACTION (-)" д39)"3. MULTIPLICATION (X)" д39)"4. DIVISION (/)" д39)"5. FRACTIONS (,)": З ∙s┐0,1!xА X│1е5: Т1253лXн32,63!kВБж9050: Е Q$│"Y" з O(X)│1: Т1253лXн32,25 :Д Е Q$│"N" з O(X)│0: Т1253лXн32,14 :Д130!rМЛX!лЦM$│"": А X│1е5: Е O(X)│0 з ЛX :Д M$│M$лO$(X)л" ": ЛX!┌аS│(16м З(M$))о2: M$│ б(S," ")лM$л б(S," ")"кK│0: Ю: Зд7)"COLOR MATH QUIZ 1.0": Бж9010: З"╛А T│1е6"F╚A│ Д(AR): B│ Д(BR): O│ Д(4): Е O(O)│0 з200"[═A│╠R(A): B│╠R(B)"m╥Е O(5)│1 з400"Л▄И O Бе1000,2000,3000,4000"ЭЁЕ O(5)│1 з255"╡·З A;O$(O);B"=";: ЙR"╩ R│╠R(R): C│╠R(C)#'
Е R┤▓C з З "NO,"C"IS CORRECT" :Д З"RIGHT!";: АX│0е25: З  Л(143л16н(X ░ 7));: ЛX: NC│NCл1#.
ЛT#L
,З@7,"YOU GOT"NC"CORRECT!"#\
1┐0,1: ╔ CH$#w
6А X│1е5н490: ЛX: Бе100#ж
РAD│ Д(AR): BD│ Д(BR): AD│╠R(AD): BD│╠R(BD)#─
ЪЗ A"/"AD;O$(O);B"/"BD"=";#▌
дЙ RN,RD: Е RD│0 з420#∙
йR│RNоRD: A│AоAD: B│BоBD$
оИ O Бе1000,2010,3000,4010$(шC│AлB: Бе240$9╨Е AмB┤0 з200$J┌C│AмB: Бе240$[╕C│AнB: Бе240$sаЕ AоB┤▓ Б(AоB) з200$ДкC│AоB: Бе240$▒#(АX│1е32: C│(X ░7): З  Л(143л16нC);: Л: З$ч#2А X│1е8: C│(X ░7): З  Л(143л16нC);: Л: И K Бе9030$■#<З M$;: K│1: Бе9010%#FР%-#ZQ$│ Т: Q│ Й(Q$): Е Q$│"" з 9050 :Д РмB┤0 з200$J┌C│AмB: Бе240$[╕C│AнB: Бе240$sаЕ AоB┤▓ Б(AоB) з200$ДкC│AоB: Бе240$▒#(АX│1е32: C│(X ░7): З  Л(143л16нC);: Л: З$ч#2А X│1е8: C│(X ░7): З  Л(143л16нC);: Л: И K Бе9030$■#<З M$;: K│1: Бе9010                                                                                                                                                                                                                                                                 6 
:Г ***** SPEED MATH ******1:ГBY T. GRAYS:ГBOX 39, SUNNYBROOK, ALBERTAh:ГCANADA T0C 2M0o:ГА
╚0:└1:Бе 100├:Г***SUBROUTINE TO DECREMENT COLOR BAR AND/OR TIMER DISPLAY***╥T│ Б( ЯоD)цЕ  Ж(255)│T з Р№Е T┤256 з Т 255,T#Е  Я▓30000з╔"T1;L1;12":К:(Е SW│1зЗ@11,Dо2 м  Б( Яо60);[-ЕCB│1░P▓│1408 з Т P,96:P│Pм1k2ЕP┤1408 з РБ7Е SD│1 з╔"T50;10"З<РОA:Гиd:Г***COVER DISPLAY***┴iЮ:З@169,"SPEED MATH"щnА X│1024 е 1055:ТX,166:ТXл480,166:ЛsА X│1024 е 1504 й32:ТX,166:Т Xл31,166:Л-xТ256,0:CB│1: Бж1000C}АP│1438 е 1409йм1АВТP,96:АW│1е50:ЛW:╔ "T50;V20;10":З@233, Д(9);" + "; Д(9);ИЗЛ PаМЗ@233,"BY T. GRAY";┐САW│1е150:ЛW:АT│1е5:а10,2:Л*ЦЗ@233,"          ";:З@292,"PLEASE TYPE YOUR NAME";:З@324,"AND PRESS <ENTER>";:З@356,"";:Й N$:N$│N$л","wЫЕ  З(N$)▓10 з З@356, б(15," "):З"TOO LONG. GIVE ME A SHORTER NAME":Бе150#аЮ:GR$│"HELLO, "лN$:З@144м( З(GR$)о2),GR$:З:З:З"     WELCOME TO SPEED MATH.":З:З"  DO YOU WANT INSTRUCTIONS?":З"  TYPE <Y> OR <N> AND <ENTER>":Й A$:Е О(A$,1)│"Y"зБж4000ЙеЮ:З"ONE MOMENT, PLEASE....":M│1000:А X│1е  З(N$):Т M, К( Р(N$,X,1)):M│Mл1:ЛX:АX│M е 1009:ТX,32:ЛXбк╔"T5;L2;C;E;G;L2;C"и┤:Г╚╚:Г***GENERATE FACT PAIRS***╥═Х1000х╥МP$(100),S$(4)√╫N│1:АX│0е9:АY│0е9▄P$(N)│ И(X)л И(Y)сN│Nл1$цЛY,X0ыБж 2000VЁАX│1000 е 1009:N$│N$л Л( Ж(X)):ЛX]·:ГИ
,:Г***SELECT # AND KIND OF QUESTIONS***а
1Ю:З@42,"SPEED MATH"┼
6З@100,"WHAT KIND OF PROBLEMS?":З.
;Зд10)"1. ADDITION":Зд10)"2. SUBTRACTION":Зд10)"3. MULTIPLICATION":Зд10)"4. DIVISION":Зд10)"5. MIXED"l
@З@353,"TYPE THE NUMBER OF YOUR CHOICE  AND PRESS <ENTER>"t
EЙ S╜
JЕ S┤1 ▒ S▓5 ▒ S┤▓ Б(S)зЗ@321,"ENTER A NUMBER FROM 1 TO 5 ONLY":Бе325
OЮ:З@100,"HOW MANY QUESTIONS?":З@162,"TYPE A NUMBER FROM 10 TO 100    AND PRESS <ENTER>.";$
TЙ NQТ
YЕ NQ┤10 ▒ NQ▓100 ▒ NQ┤▓ Б(NQ) з З@100, б(32," "):З@164,"PLEASE ENTER A NUMBER":З" FROM 10 TO 100.";:Бе340N
^Е S│4 ░ NQ▓88 ▒ S│5 ░ NQ▓88зЗ@96, б(5," "):З@160,"SORRY, THERE ARE ONLY 88        DIFFERENT DIVISION FACTS, SO    THE MOST YOU CAN DO IS 88!!     PLEASE ENTER A SMALLER NUMBER!":Бе340U
h:Гj
Р:Г***SET TIME***м
ХЖ SUPER WHIZ,QUIZ WHIZ,PLAIN WHIZ,GEE WHIZ,SLOW WHIZ,BEGINNER┬
ЪА X│1е6:Н R$(X):Л!
ЯЮ:Е  Ж(256)│0з З:З"CHOOSE YOUR DIFFICULTY LEVEL:":З:АX│1е6:Зд5)X" ";R$(X):Л X:Бе 420 :Д440~
дЗ:З"caution: AT THE HIGHEST LEVEL   YOU WILL HAVE ONLY 1 SECOND TO  DO EACH PROBLEM!!!!"Ж
йЙ K▄
оЕ K┤1 ▒ K▓6 ▒ K┤▓ Б(K)зЗ@224, б(96," "):З"ENTER A NUMBER FROM 1 TO 6 ONLY":Бе 425ч
│Бе 505*
╕З@128,N$:З:З"YOU ARE NOW RATED AS":З д5) Ж(256)д10)R$( Ж(256))?
╜K│ Ж(256):Бж2000F
┬:Гa
Ї:Г***SELECT DISPLAY***╗
∙Ю:З@64,"CHOOSE THE TIME DISPLAY YOU WANT":З"(TYPE Y FOR YES, N FOR NO AND   <ENTER>)"№
■З@229,"1. COLOR BAR ":З@293,"2. STOPWATCH ":З@357,"3. SOUND"FЗ@244,"";:Й"Y/N";CB$:З@244, О(CB$,1);"  ":Е О(CB$,1)│"Y"зCB│1 :Д CB│0МЗ@308,"";:Й"Y/N";SW$:З@308, О(SW$,1):Е  О(SW$,1)│"Y"зSW│1 :Д SW│0╘
З@372,"";:Й"Y/N";SD$:З@372, О(SD$,1):Е  О(SD$,1)│"Y" з SD│1 :Д SD│0▀Бж2000 Ю:З@128,"ONE MOMENT, PLEASE...." :Г 4X:Г***DEFINE SIGNS, MAKE QUESTIONS*** R]Ж " + "," - "," X "," / " gbАX│1е4:НS$(X):ЛX Иg:Г***SELECT NQ FACT PAIRS*** ЪlЕ S┤▓5 з M│S  ╢qМ NW$(NQ),CA(NQ),Q$(NQ) ┬vАQ│1еNQ ▐{N│ Д(100):ЕP$(N)│""з635!АL$│ О(P$(N),2):R$│ П(P$(N),1):L│ Й(L$):R│ Й(R$)!<ЕЕ S│5 з M│ Д(4):ИR Бе 650,655,660,665!jКЕ M│1 з Q$(Q)│L$лS$(M)лR$:CA(Q)│LлR:Бе670!еПЕ M│2 з Q$(Q)│ И( Й(L$)л Й(R$))лS$(M)лR$:CA(Q)│L:Бе670!╙ФЕ M│3 з Q$(Q)│L$лS$(M)лR$:CA(Q)│LнR:Бе670",ЩЕ M│4 ░  Й(R$)┤▓0 з Q$(Q)│ И( Й(R$)н Й(L$))лS$(M)лR$:CA(Q)│L:Бе670 :Д P$(N)│"":Бе635"VЮЕ Q│ Б(NQо3)зЗ:З:З"   JUST RELAX....""КгЕ Q│ Б(2нNQо3)зЗ:З:З"      ALMOST DONE NOW....""лиR│0:P$(N)│"":а  Д(255),1:Л Q"▓н:Г"є╝:Г******DISPLAY QUESTION,CHECK ANSWER, TIME RESPONSE********"∙┴Ю#╞NW│0:Т255,0:P│1471:D│2нNQнK#R╦Е SW│1з З@0,"TIME LEFT: ";:З@11,NQнK;:З@15,"SECONDS"#e╨Е CB│1з Бж1000#u╒а100,7: Я│0#Б┌АQ│1еNQ#Ч▀З@234,Q$(Q)л" = "#╡фA$│ Т:Е A$│""з Бж15:Бе740#┬щЗ@244,A$#▄ъA│ Й(A$):ЕA│CA(Q)з760#·юB$│ Т:ЕB$│""з Бж 15:Бе750$єЗ@244,A$лB$:A│ Й(A$лB$)$G°Е A│CA(Q) з а 100,1 :Д NW│NWл1:NW$(NW)│Q$(Q)$_¤З@234, б(10," "):ЛQ$f:Г$В :Г***DISPLAY RESULTS***$ф%Ю:З:ЗN$:З"YOU DID "NQ"QUESTIONS.":З"YOU GOT "NQмNW"RIGHT ":З"OR " Б((NQмNW)н100оNQ)" PERCENT"$√*MIN│( Б( Яо60о60))%
/SEC│ Б( Яо60)%4З" IN "MIN;%59LEFTOVER│SECмMINн60%[>З"MINUTES AND "LEFTOVER"SECONDS."%гCЕ SEC┤NQнK зЗ:З"YOU BEAT YOUR TARGET!" :ДЗ"YOU WERE A LITTLE SLOW!"&HЕ NW▓0 ░ SEC┤NQнK зЗ"BUT MISTAKES WILL COST YOU!" :Д Е NW┤NQо2 ░ SEC▓NQнK зЗ"BUT YOU GOж:ГA░М X$(38),Y$(38)A'║А N│1 е 38A9─Н X$(N),Y$(N)AA╬Л NAH╪:ГAQт╞ B$AdьА J│1 е  З(A$)AsЎА L│1 е 38AФЕ  Р(A$,J,1)│X$(L) з ╞ Y$(L)AЬ
Л LAдЛ JAкРA╜(Ж " ","BM+7,0"A▐2Ж "A","U4E2F2D2NL4D2;BM+3,0"B<Ж "B","U6R3F1D1G1NL3F1D1G1L3;BM+7,0"B:FЖ "C","BM+1,-0;H1U4E1R2F1;BM+0,+4;G1L2;BM+6,0"BZPЖ "D","U6R3F1D4G1L3;BM+7,0"B{ZЖ "E","NR4U3NR2U3R4;BM+3,+6"BЩdЖ "F","U3NR2U3R4;BM+3,+6"B╤nЖ "G","BM+1,-0;H1U4E1R2F1;BM+0,+2;NL1D2G1L2;BM+6,0"BёxЖ "H","U3NU3R4NU3D3;BM+3,0"CВЖ "I","BM+1,0;R1NR1U6NL1R1;BM+4,+6"CBМЖ "J","BM+0,-1;F1R1E1U5NL1R1;BM+3,6"CbЦЖ "K","U3NU3R1NE3F3;BM+3,0"C~аЖ "L","NU6R4U1;BM+3,+1"CЭкЖ "M","U6F2ND1E2D6;BM+3,0"C└┤Ж "N","U6F1D1F2D1F1NU6;BM+3,0"Cы╛Ж "O","BM+1,0;H1U4E1R2F1D4G1L2;BM+6,0"D╚Ж "P","U6R3F1D1G1L3;BM+7,3"D>╥Ж "Q","BM+1,0;H1U4E1R2F1D3G1NH1NF1G1L1;BM+6,0"Dc▄Ж "R","U6R3F1D1G1L2NL1F3;BM+3,0"DЦцЖ "S","BM+0,-1;F1R2E1U1H1L2H1U1E1R2F1;BM+3,+5"D║ЁЖ "T","BM+2,+0;U6NL2R2;BM+3,+6"Dс·Ж "U","BM+0,-1;NU5F1R2E1U5;BM+3,6"EЖ "V","BM+0,-6;D2F1D1F1ND1E1U1E1U2;BM+3,+6"E1Ж "W","NU6E2NU1F2U6;BM+3,6"EYЖ "X","U1E4U1;BM-4,0;D1F4D1;BM+3,0"EА"Ж "Y","BM+0,-6;D2F2ND2E2U2;BM+3,6"EЯ,Ж "Z","NR4U1E4U1L4;BM+7,6"E─6Ж "1","BM+1,0;R1NR1U6G1;BM+6,+5"Eь@Ж "2","NR4U1E1R1E2U1H1L2G1;BM+7,+5"FJЖ "3","BM+0,-1;F1R2E1H2E2H1L3;BM+7,6"F>TЖ "4","BM+3,0;U2NR1L3U1E3D3;BM+4,3"Fk^Ж "5","BM+0,-1;F1R2E1U2H1L3U2R4;BM+3,+6"FЬhЖ "6","BM+4,-5;H1L2G1D4F1R2E1U1H1L3;BM+7,+3"F╣rЖ "7","U1E4U1L4;BM+7,+6"FЇ|Ж "8","BM+1,-0;H1U1E1H1U1E1R2F1D1G1NL2F1D1G1L2;BM+6,0"G%ЖЖ "9","BM+0,-1;F1R2E1U4H1L2G1D1F1R2;BM+4,+3"GPРЖ "0","BM+1,0;H1U4E1R2F1D4G1L2;BM+6,0"GoЪЖ "-","BM+2,-3;R2;BM+3,+3"я                                                               └                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        g&
:Г"GONE FISHING"&.:Г by NORMAN MATICE&@:ГAPRIL, 1983&p
МA(50),B(50),C(50),G(100),M(10),N(50),S(50)&xT│0&БK│40&З(╝&С2╚ 3,1&Ы<┐ 1,0&еF┴ 2,3&лP╝&╦Z╞"BM40,60;U8R8BD4L4BR4D4L8"&уd╞"BM55,60;U8R8D8L8"&№n╞"BM70,60;U8F8U8BG8"'x╞"BM85,60;U8R8BD4L8BR8BD4L8"'=В╞"BM115,60;U8R8BD4BL4L4BD4"']М╞"BM130,60;BU8R8BL4D8BR4L8"'БЦ╞"BM145,60;BU4U4R8BD4L8BR8D4L8"'ба╞"BM160,60;U8BR8D8BU4L8BD4"'┴к╞"BM175,60;BU8R8BL4D8BR4L8"'█┤╞"BM190,60;U8F8U8BG8"'№╛╞"BM205,60;U8R8BD4L4BR4D4L8"(╚┬(128,96),8((╥┬(130,130),5,,1.75,O,.5(E▄─(125,129)м(135,135),M,G(aц╜(126,94,2):╜(130,94,2)(zЁ╗(126,97)м(130,97),╜(Ц·╗(124,86)м(132,88),╜,BF(п
╗(120,89)м(136,89),╜(╔
╞"BM128,104;NG5ND5F5"(х
┬(128,109),35,,.35,0,.5( 
"╗(93,109)м(163,109),╜)
,├(128,111),4,2)*
6╞"BM125,109;H25D35")E
@─(93,86)м(163,120),G,G)\
J─(0,0)м(34,10),C,G)r
T┬(163,130),10,,.5)Н
^╞"BM169,135;E10D10H10")Ю
h╜(160,130,2))╗
r─(154,125)м(188,135),A,G)╨
|┬(93,130),10,,.5)ъ
Ж╞"BM88,135;H10D10E10")·
Р╜(97,130,2)*
Ъ─(72,125)м(106,135),B,G*'
д┬(128,150),8*A
о╞"BM128,156;NG6F6L12"*R
╕╜(128,148,2)*o
┬─(120,142)м(136,168),N,G*Э
╠╔"O3L8GAL4GL2EGO4L4CL2EL4DCCL2DCO3L4AL2G"*г
╓╝*║
р╗(0,40)м(255,40),╜*╘
ъ┼(140,5)м(210,40),G,╜*ш
ЇO│ Д(10):IN│Oл5*ў
■А V│1 е IN+D│ Д(120):E│ Д(120)+!Y│Dл60:W│Eл60+5А I│5 е 255 й 5+I&H│ Н(0):J│ Н(1)+m0Е J┤26 з K│Kл1 :Е K▓188 з K│188+О:Е J▓38 з K│Kм1 :ЕK┤40 з K│40+ЮDP│ а(140,K)+▓NЕ P│2 з Бж 1000+┴X╜(149,K,2)+▐b┼(140,Kл1)м(150,Kл6),M,╜+эl╛(146,Kл7)+їvX│I,
АZ│255мX,HКЕ X┤220 з ┼(X,Y)м(Xл34,Yл10),B,╜ :Д X│220 : ┼(X,Y)м(Xл34,Yл10),C,╜,НФЕ Z▓35 з ┼(Zм34,Wм10)м(Z,W),A,╜ :Д Z│35 : ┼(Zм34,Wм10)м(Z,W),C,╜,ХЮЛ I,ЭиЛ V,з▓┐ 0,1,н╝Ю,┼╞З@172,"TIME IS UP!",ш╨З@231,"YOU CAUGHT ";T;" FISH!"-┌З@323,"WOULD YOU LIKE TO TRY AGAIN?"-фA$│ Т-,юЕ A$│"Y" з О->°Е A$│"" з 740-FЮ:К-aш┼(X,Y)м(Xл34,Yл10),C,╜-|Є┼(Zм34,Wм10)м(Z,W),C,╜-Ш№┼(141,K)м(157,Kл24),N,╜-м╔"O5T150L4ADP4"-└H│ Н(0):J│ Н(1)-фЕ J┤26 з K│Kл1: Е K▓188 з K│188.$Е J▓38 з K│Kм1: Е K┤40 з K│40..Е K│42 з 1090.$8Бе 1020.;B─(0,0)м(16,26),S,G.VL┼(141,41)м(157,67),S,╜.`VT│Tл1.f`Рм34,Wм10)м(Z,W),C,╜-Ш№┼(141,K)м(157,Kл24),N,╜-м╔"O5T150L4ADP4"-└H│ Н(0):J│ Н(1)-фЕ J┤26 з K│Kл1: Е K▓188 з K│188.$Е J▓38 з K│Kм1: Е K┤40SWER."/,ЁЗ @485,"<PRESS ANY KEY TO START>";/D·K$│ Т:Е K$│"" з 250/U
╚4,1:╝0:┐1,S/\
╚3/d
┴ 8/}
":Г UNITED STATES MAP/Ч
,┬(90,15),72,,.08,0,.5/▓
6┬(18,52),12,,3,.25,.75/╔
@╗(18,88)м(30,88),╜/┘
J╗м(48,98),╜/щ
T╗м(64,98),╜/∙
^╗м(64,94),╜0	
h╗м(76,94),╜0
r╗м(84,99),╜0*
|╗м(84,108),╜0;
Ж╗м(96,117),╜0L
Р╗м(98,117),╜0^
Ъ╗м(104,108),╜0p
д╗м(112,108),╜0В
о╗м(132,132),╜0Ф
╕╗м(140,134),╜0ж
┬╗м(138,123),╜0╕
╠╗м(144,114),╜0╩
╓╗м(156,114),╜0▄
р╗м(160,111),╜0ю
ъ╗м(172,109),╜1
Ї╗м(188,111),╜1
■╗м(200,120),╜1$╗м(208,141),╜16╗м(212,143),╜1H╗м(216,138),╜1Z&╗м(212,108),╜1k0╗м(230,76),╜1|:╗м(224,74),╜1НD╗м(228,48),╜1ЮN╗м(244,44),╜1пX╗м(240,30),╜1└b╗м(252,15),╜1╤l╗м(248,12),╜1сv╗м(244,3),╜1ёА╗м(242,3),╜2К╗м(232,18),╜2Ф╗м(216,20),╜2$Ю╗м(206,43),╜25и╗м(196,45),╜2F▓╗м(195,45),╜2W╝╗м(196,24),╜2h╞╗м(192,12),╜2y╨╗м(184,14),╜2К┌╗м(180,21),╜2Ыф╗м(184,45),╜2┤ю╗(172,45)м(168,24),╜2┼°╗м(164,15),╜2▐╗(172,45)м(184,45),╜2Ё├(128,96),6,83:Г ********************3 :Г STATES31*╗(30,88)м(34,84),╜3A4╗м(20,60),╜3Q>╗м(20,48),╜3`H╗м(8,48),╜3wR╗(58,98)м(58,74),╜3З\╗м(38,74),╜3Чf╗м(38,78),╜3зp╗м(35,78),╜3╖z╗м(33,80),╜3╬Д╗(38,74)м(38,48),╜3▐О╗м(20,48),╜3їШ╗(58,74)м(58,54),╜4в╗м(52,54),╜4м╗м(52,48),╜4%╢╗м(38,48),╜4>└╗(52,54)м(78,37),╜,B4N╩╗м(78,20),╜4e╘╗(10,32)м(32,32),╜4u▐╗м(32,48),╜4Мш╗(32,18)м(32,48),╜4гЄ╗(40,18)м(52,39),╜4╝№╗(58,54)м(92,75),╜,B4╙╗(86,75)м(86,92),╜4у╗м(74,92),╜4є╗м(76,93),╜5$╗(88,75)м(140,75),╜5.╗м(140,88),╜5-8╗м(105,86),╜5>B╗м(105,80),╜5NL╗м(88,80),╜5gV╗(140,88)м(146,90),╜5x`╗м(146,96),╜5Кj╗м(150,102),╜5Ьt╗м(148,114),╜5╢~╗(92,58)м(138,75),╜,B5╨И╗(78,20)м(114,33),╜,B5ъТ╗(78,45)м(114,33),╜,B6Ь╗(150,42)м(115,42),╜6ж╗м(126,45),╜6%░╗м(132,51),╜66║╗м(138,57),╜6O─╗(150,30)м(152,17),╜6`╬╗м(148,36),╜6q╪╗м(152,42),╜6Вт╗м(152,45),╜6аь╗м(156,48),╜:╗м(156,51),╜6▒Ў╗м(152,54),╜6┬╗м(136,54),╜6█
╗(140,76)м(160,76),╜6ь╗м(156,93),╜6¤╗м(148,93),╜7(╗(160,86)м(176,86),╜7(2╗м(176,108),╜7A<╗(156,93)м(160,96),╜7SF╗м(160,105),╜7eP╗м(168,105),╜7wZ╗м(168,110),╜7Рd╗(176,86)м(192,86),╜7вn╗м(196,102),╜7┤x╗м(196,106),╜7╞В╗м(180,106),╜7╪М╗м(180,110),╜7єЦ╗(196,106)м(212,106),╜8а╗(192,86)м(208,86),╜8к╗м(216,102),╜87┤╗(208,86)м(216,84),╜8H╛╗м(224,87),╜8a╚╗(160,76)м(228,76),╜8z╥╗(192,86)м(196,77),╜8У▄╗(152,54)м(160,75),╜8дц╗м(180,63),╜8╡Ё╗м(184,66),╜8╞·╗м(190,66),╜8╫╗м(198,68),╜8ш╗м(192,75),╜9
╗(190,65)м(190,45),╜9"╗м(176,45),╜9#,╗м(176,51),╜946╗м(171,67),╜9M@╗(152,45)м(176,45),╜9fJ╗(192,45)м(204,45),╜9wT╗м(204,57),╜9И^╗м(198,68),╜9Щh╗м(208,66),╜9кr╗м(216,63),╜9╗|╗м(224,69),╜9╘Ж╗(204,57)м(216,63),╜9эР╗(204,45)м(220,45),╜9■Ъ╗м(222,51),╜:д╗м(220,54),╜: о╗м(222,57),╜:1╕╗м(204,57),╜:J┬╗(220,57)м(220,66),╜:c╠╗(226,60)м(220,57),╜:|╓╗(222,45)м(228,51),╜:Нр╗м(228,20),╜:жъ╗(228,42)м(238,40),╜:╖Ї╗м(240,45),╜:╨■╗(238,40)м(242,38),╜:щ╗(228,36)м(240,34),╜;╗(232,18)м(234,34),╜;╗(236,15)м(240,30),╜;6&╗(2,130)м(124,176),╜,B;H0├(92,156),6,8;a:╗(48,134)м(52,165),╜;rD╗м(44,162),╜;ГN╗м(36,168),╜;ФX╗м(12,174),╜;еb╗м(28,165),╜;╢l╗м(20,162),╜;╟v╗м(16,153),╜;╪А╗м(20,144),╜;щК╗м(16,138),╜;·Ф╗м(24,132),╜<Ю╗м(48,134),╜<$и╗(64,130)м(64,176),╜<8▓┬(72,138),5,,.5<L╝┬(88,144),4,,.8<a╞┬(100,150),4,,.4<v╨┬(104,156),4,,.5<М┌┬(108,168),6,,1.3<кф╗(128,150)м(250,170),╜,BF<╥юA$│"SCORE":╞"S8C6BM130,168":Бж 5080<°°NU│NUл1:Е NU│1 з R│ Д(50) :Д NU│0=C$│"":╞"BM50,190"=#├(X(R),Y(R)),7,8=?Е R│50 з ├(108,168),7,8=Q Е NU│1 з 2110=i*┬(X(R),Y(R)),1,8,.9=Б4┬(X(R),Y(R)),1,7,.9=Ъ>Z$│ Т:Е Z$│"" з 2060=сHA$│Z$:╞"S8C7BM+0,0":Бж 5080:Е A$│▓" " ░ A$│┤"Z" з C$│C$лA$:а 5нR,2>	RЕ Z$│ Л(13) з A$│C$:Бж 2230:Бе 2040>(fЕ Z$│ Л(10) з 2160 :Д 2060>:pS│и S ░ 1 ▒ 0>Lz╚4,1:┐ 1,S:╚3>XДБе 2110>wм:Г************************>╜╢Е NU│1 з Е C$│S$(R) з SC│SCл10:а 130,3:а 190,3 :Д SC│SCм10:а 10,5?└Е NU┤▓1 з Е C$│P$(R) з SC│SCл20:а 130,3:а 190,3 :Д SC│SCм20:а 5,5?┼Е SC│▓1000 з SC│SCм1000?b╩A$│ И(SC):┴ 8:╗(197,170)м(250,150),╜,BF:╞"C7BM194,168":Бж 5080?╝╘Е NU│1 з Е C$┤▓S$(R) з ├(10,188),5,8:╞"S8C7BM50,190":A$│S$(R):Бж 5080:А T│1 е 400:Л T@▐Е NU┤▓1 з Е C$┤▓P$(R) з ├(10,188),5,8:╞"S8C7BM50,190":A$│P$(R):Бж 5080:А T│1 е 400:Л T@)ш├(10,188),5,8@`ЄЕ NU┤▓1 з ├(X(R),Y(R)),6,8:Е R│50 з ├(108,168),6,8@f№Р@ЯИ:Г ***CHRACTER GEN.<2>***          ***SUB-ROUTINE***@жТ:Г@¤Ь:ГSUBROUTINE MAIN PROGRAM BY J.S.PARAVATI  DATA FROM TRS-80 NEWS 4/82--R. VAN DYKEA00,024,200,015,200,024,200,015,228,015,228,015,228,009,200,030,200,042 A═0Ж 200,042,228,042,228,042,228,048,176,009,176,048,176,048,168,048,168,048,168,021,168,021,148,045,148,045,128,021,128,021,128,048 BT:Ж 128,048,120,048,068,009,068,015,068,015,084,015,092,015,108,015,108,015,108,009,108,048,068,048,108,048,108,042,108,042,092,042 B█DЖ 084,042,068,042,068,042,068,048,084,042,084,015,092,015,092,042,056,009,056,015,012,009,012,015,012,015,029,015,056,015,040,015 CbNЖ 029,015,029,048,029,048,040,048,040,048,040,015,120,120,120,132,080,072,084,084,084,084,120,120,080,186,084,168,084,168,120,132 CшXЖ 084,084,172,084,084,171,172,171,120,120,124,123,136,120,132,123,120,132,124,129,136,132,132,129,132,129,132,123,124,123,124,129CёlN│64Dv╚4:╝ :┐1,1:╚ 3:┴7D2АА X│1 е N:Н C,D,E,F:╗(C,D)м(E,F),╜:Л XDlК├(32,42),7,7:├(88,42),7,7:├(148,39),7,7:├(192,30),7,7DЗФ╗(124,123)м(132,123),╜DЩЮ├(124,87),6,7D┤иА T│1 е 25:а Tн7,1:Л TD╓▓├(128,126),6,7:├(124,120),5,7Dщ╝А T│1 е 1000:ЛDя╞Р                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        !p&8
:Г ***GEOGRAPHY LESSON*** 3/83     BY J.S.PARAVATI&KR│ Д(м Я):NU│0&КЮ0:З@234,"GEOGRAPHY GAME";:З @480,"BY J.S.PARAVATI  3/83";&к(М X(50),Y(50),S$(50),P$(50)&╣2А N│1 е 50&═<Н X(N),Y(N):Л N'wFЖ 16,63,16,39,20,27,38,39,28,60,48,57,44,87,68,81,76,60,72,51,60,24,96,27,96,40,124,51,124,66,116,81,124,100,140,36,140,48,148,66,148,84,156,108,160,36,164,57,188,69(-PЖ 212,69,208,81,172,81,168,99,184,99,200,93,192,108,216,90,184,54,196,54,206,62,216,60,222,62,224,54,216,51,188,33,224,33,232,45,242,42,236,38,232,30,238,30,240,18,44,156,88,144(NZА N│1 е 50:Н S$(N),P$(N):Л N)dЖ CALIFORNIA,SACRAMENTO,OREGON,SALEM,WASHINGTON,OLYMPIA,IDAHO,BOISE,NEVADA,CARSON CITY,UTAH,SALT LAKE CITY,ARIZONA,PHOENIX,NEW MEXICO,SANTA FE,COLORADO,DENVER,WYOMING,CHEYENNE)ьnЖ MONTANA,HELENA,NORTH DAKOTA,BISMARCK,SOUTH DAKOTA,PIERRE,NEBRASKA,LINCOLN,KANSAS,TOPEKA,OKLAHOMA,OKLAHOMA CITY,TEXAS,AUSTIN,MINNESOTA,SAINT PAUL,IOWA,DES MOINES,MISSOURI,JEFFERSON CITY,ARKANSAS,LITTLE ROCK,LOUISIANA,BATON ROUGE*╠xЖ WISCONSIN,MADISON,ILLINOIS,SPRINGFIELD,KENTUCKY,FRANKFORT,VIRGINIA,RICHMOND,NORTH CAROLINA,RALEIGH,TENNESSEE,NASHVILLE,MISSISSIPPI,JACKSON,ALABAMA,MONTGOMERY,GEORGIA,ATLANTA,FLORIDA,TALLAHASSEE,SOUTH CAROLINA,COLUMBIA+СВЖ INDIANA,INDIANAPOLIS,OHIO,COLUMBUS,WEST VIRGINIA,CHARLESTON,MARYLAND,ANNAPOLIS,DELAWARE,DOVER,NEW JERSEY,TRENTON,PENNSYLVANIA,HARRISBURG,MICHIGAN,LANSING,NEW YORK,ALBANY,CONNECTICUT,HARTFORD,МЖ RHODE ISLAND,PROVIDENCE,MASSACHUSETTS,BOSTON,VERMONT,MONTPELIER,NEW HAMPSHIRE,CONCORD,MAINE,AUGUSTA,ALASKA,JUNEAU,HAWAII,HONOLULU,%ЦБж 5000,YаЮ:З @4,"***STATES AND CAPITALS***":З  б(32,"*")-JкЗ "TYPE IN AND <ENTER> CORRECT     STATE WHICH IS SHOWN ON MAP.    10 POINTS FOR CORRECT ANSWER -10FOR WRONG ANSWER. THEN TYPE AND <ENTER> CORRECT CAPITAL FOR SAMESTATE. CAPITAL FLASHES ON AND   OFF WHEN IT IS TIME TO TYPE IN  CAPITAL."-Е┤З "20 POINTS FOR CORRECT ANSWER,   -20 FOR WRONG ONE."-п╛З @482,"<PRESS ANY KEY TO CONTINUE>";-╟╚K$│ Т:Е K$│"" з 200-╧╥S│1.L▄Ю:З "MAP SHOULD BE BLUE. IF NOT THEN USE <RESET BUTTON> AND RE-RUN.  DO THIS AS MANY TIMES AS NEEDED UNTIL MAP IS BLUE."/цЗ:З "DURING GAME YOU MAY PRESS <DOWN ARROW> KEY TO GET A BLACK ON    GREEN COLOR SET.":З:З "IF YOU TYPE IN WRONG ANSWER OR  SPELLING IS WRONG THE COMPUTER  WILL GIVE RIGHT AN":Бж 5090/,0A$│"TIME":B$│"BM200,20":Бж 5090/O:A$│"IS":B$│"BM14,140":Бж  5090/zDA$│"IT ?":B$│"BM200,140":Бж 5090:A$│""/вNЕ CL│5 з ┴5:╗(0,156)м(255,191),╜,BF/└X:Г START OF HANDS ROUTINE/уbL│ Д(360):Е Lо6┤▓ Б(Lо6) з 6100lS│ Д(360):Е Sо15┤▓ Б(Sо15) з 6200.vЕ L│360 ░ Sо30┤▓ Б(Sо30) з S│Sм150QАЕ L┤▓360 ░ S│L з S│Sм12:Бе 6800│КЕ L┤▓360 ░ L▓300 ░ Sо30┤▓ Б(Sо30) з S│Sл39 :Д Е L┤▓360 ░ L▓300 ░ Sо30│ Б(Sо30) з S│Sм6:Бе 6800сФЕ L┤▓360 ░ L▓174 ░ Sо30│ Б(Sо30) з S│Sм151ЮЕ Sо30┤▓ Б(Sо30) ░ L┤▓360 ░ L▓0 ░ L┤96 з S│Sм151(иа 30,2:а 150,31B▓X│128:Y│80:R│50:R1│301T╝┬(X,Y),2,5,.91Д╞A│(270лL)о57.29577951:B│(270лS)о57.295779511Ь╨Q│ Б(Rн Х(A)л128.5)1╢┌Q1│ Б(R1н Х(B)л128.5)1═фW│ Б(Rн Е(A)л80.5)1цюW1│ Б(R1н Е(B)л80.5)2
°╚4:┐1,1:╗(X,Y)м(Q,W),╜2╗(X,Y)м(Q1,W1),╜2╚32<S1│ Б(Sо30):Е S1│0 з S1│122P S$│ Р( И(S1),2)2j*L1│Lо6:Е L1│60 з L1│02~4L$│ Р( И(L1),2)2Ц>Е L1┤10 з L$│"0"лL$2╣H┴5:╗(90,190)м(166,174),╜,BF:┴82▌RU$│S$л":"лL$:B$│"BM96,188":╞ B$3\Е V$│"" з а90,1:А T│1 е 460:Л:а 70,1:А T│1 е 460:Л3,fK$│ Т:Е K$│"" з 8603CpЕ K$│ Л(92) з 11603БzЕ K$│ Л(8) з V$│"":┴ 5:╗(90,190)м(166,174),╜,BF:┴8:Бе 8503┐ДЕ K$┤▓ Л(13) з A$│K$:V$│V$лK$:B$│"BM+0,+0":а200,2:Бж 50903▄ОЕ K$│ Л(13) з 920 :Д 8703¤ШЕ V$│U$ з RT│RTл1 :Д WG│WGл14пвЕ V$│U$ з A$│"GOOD WORK "лNA$л"!":а150,5:B$│"BM8,170":Бж 5090 :Д A$│"SORRY! THE TIME IS":а1,4:B$│"BM6,170":Бж 5090:┴ 5:╗(90,190)м(166,174),╜,BF:┴8:A$│U$:B$│"BM96,188":Бж50904╥мЕ U$┤▓V$ з K$│ Т:Е K$│"" з 9404щ╢Е K$│ Л(92) з 11605└Е U$│V$ з АT│1 е 500:ЛT5&╩┴ CL:╗(4,156)м(254,190),╜,BF5-╘╚45C▐┴0:╗(X,Y)м(Q,W),╜5Xш╗(X,Y)м(Q1,W1),╜5_Є┴55i№V$│""5uZZ│ZZл15ЪЕ ZZ│10 з Бж 1060:ZZ│0:RT│0:WG│05еБе 6105╣$:ГSCORE ROUTINE5┴.╚ 35ю8A$│"YOUR SCORE IS:":B$│"BM8,170":Бж 50906+BA$│ И(RT)л" RIGHT "л И(WG)л" WRONG":B$│"BM0,190":Бж 50906DLK$│ Т:Е K$│"" з 11006xVЕ CL│5 з CL│6 :Д Е CL│6 з CL│7 :Д Е CL│7 з CL│56П`Е K$│ Л(92) з 11606░j┴ CL:╗(0,156)м(255,191),╜,BF6╢tР6┴~:Г END6щИЮ:З @230,"GOOD BYE "NA$" !":З:З:З:К7 И:Г ***CHRACTER GEN.<2>***          **SUBROUTINE***7'Т:Г7yЬ:Г SUBROUTINE MAIN PROGRAM  BY J.S.PARAVATI       DATA FROM TRS-80 NEWS  4/827Аж:Г7Ф░М X$(48),Y$(48)7г║А N│1 е 487╡─Н X$(N),Y$(N)7╜╬Л N7├╪Р7╤т╞ "S8"лB$7фьА J│1 е  З(A$)7єЎА Z│1 е 488Е  Р(A$,J,1)│X$(Z) з ╞ Y$(Z):Бе 51408$
Л Z8,Л J82Р8E(Ж " ","BM+7,0"8f2Ж "A","U4E2F2D2NL4D2;BM+3,0"8П<Ж "B","U6R3F1D1G1NL3F1D1G1L3;BM+7,0"8┬FЖ "C","BM+1,-0;H1U4E1R2F1;BM+0,+4;G1L2;BM+6,0"8тPЖ "D","U6R3F1D4G1L3;BM+7,0"9ZЖ "E","NR4U3NR2U3R4;BM+3,+6"9!dЖ "F","U3NR2U3R4;BM+3,+6"9YnЖ "G","BM+1,-0;H1U4E1R2F1;BM+0,+2;NL1D2G1L2;BM+6,0"9yxЖ "H","U3NU3R4NU3D3;BM+3,0"9бВЖ "I","BM+1,0;R1NR1U6NL1R1;BM+4,+6"9╩МЖ "J","BM+0,-1;F1R1E1U5NL1R1;BM+3,6"9ъЦЖ "K","U3NU3R1NE3F3;BM+3,0":аЖ "L","NU6R4U1;BM+3,+1":%кЖ "M","U6F2ND1E2D6;BM+3,0":H┤Ж "N","U6F1D1F2D1F1NU6;BM+3,0":s╛Ж "O","BM+1,0;H1U4E1R2F1D4G1L2;BM+6,0":У╚Ж "P","U6R3F1D1G1L3;BM+7,3":╞╥Ж "Q","BM+1,0;H1U4E1R2F1D3G1NH1NF1G1L1;BM+6,0":ы▄Ж "R","U6R3F1D1G1L2NL1F3;BM+3,0";цЖ "S","BM+0,-1;F1R2E1U1H1L2H1U1E1R2F1;BM+3,+5";BЁЖ "T","BM+2,+0;U6NL2R2;BM+3,+6";i·Ж "U","BM+0,-1;NU5F1R2E1U5;BM+3,6";ЩЖ "V","BM+0,-6;D2F1D1F1ND1E1U1E1U2;BM+3,+6";╣Ж "W","NU6E2NU1F2U6;BM+3,6";сЖ "X","U1E4U1;BM-4,0;D1F4D1;BM+3,0"<"Ж "Y","BM+0,-6;D2F2ND2E2U2;BM+3,6"<',Ж "Z","NR4U1E4U1L4;BM+7,6"<L6Ж "1","BM+1,0;R1NR1U6G1;BM+6,+5"<t@Ж "2","NR4U1E1R1E2U1H1L2G1;BM+7,+5"<ЮJЖ "3","BM+0,-1;F1R2E1H2E2H1L3;BM+7,6"<╞TЖ "4","BM+3,0;U2NR1L3U1E3D3;BM+4,3"<є^Ж "5","BM+0,-1;F1R2E1U2H1L3U2R4;BM+3,+6"=$hЖ "6","BM+4,-5;H1L2G1D4F1R2E1U1H1L3;BM+7,+3"=ArЖ "7","U1E4U1L4;BM+7,+6"=||Ж "8","BM+1,-0;H1U1E1H1U1E1R2F1D1G1NL2F1D1G1L2;BM+6,0"=нЖЖ "9","BM+0,-1;F1R2E1U4H1L2G1D1F1R2;BM+4,+3"=╪РЖ "0","BM+1,0;H1U4E1R2F1D4G1L2;BM+6,0"=ЄЪЖ "/","U1E4U1;BM+3,6">$дЖ "?","BM+0,-5;E1R2F1D1G2;BM+0,+1;D1;BM+5,+0">MоЖ "!","BM+2,+1;U1;BM+0,-2;U5;BM+5,7">k╕Ж ".","BM+2,0;U1;BM+5,+1">Х┬Ж ":","BM+2,-1;U1;BM+0,-2;U1;BM+5,+5">└╠Ж ";","BM+1,0;E1U1;BM+0,-1;U1;BM+5,+4">с╓Ж ",","BM+2,0;NU1G1;BM+6,-1"?рЖ "'","BM+1,-5;E2;BM+4,+7"?ъЖ "-","BM+0,-3;R4;BM+3,+3"?FЇЖ "+","BM+2,-1;U2NU2NL2R2;BM+3,+3"?p■Ж "=","BM+1,-2;R3;BM-3,-2;R3;BM+4,+4"?▒:Г TITLE PAGE-DATA FROM       DRAWING HELPER BY J.S.PARAVATI@8Ж 080,072,176,072,080,186,176,186,176,072,172,087,172,087,136,120,136,120,136,132,176,186,172,168,172,168,136,132,012,009,056,009 @┐Ж 068,009,108,009,120,009,128,009,120,009,120,048,128,009,148,036,148,036,168,009,168,009,176,009,188,009,228,009,188,009,188,048 AF&Ж 188,048,228,048,216,030,200,030,216,030,216,024,216,024,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,2,T,28eЖ U,7,U,7,U,7,U,7,U,78wЖ V,8,V,8,V,88ЙЖ W,8,W,8,W,88У"Ж X,98н,Ж Y,7,Y,7,Y,7,Y,7,Y,78╕6Ж Z,108┐@:Г8╞J:Г8┘T:ГINSTRUCTIONS8▀^Ю8їhЗ@11,"***WORD***"8√rЗ9O|З" LETTER DISTRIBUTION AND POINT   VALUE IS BASED ON FREQUENCY OF  LETTER USE."9UЖЗ9ЪРЗ" TYPE YOUR WORD USING ONLY THE   TEN RANDOM LETTERS SUPPLIED."9▐ЪЗ" YOU MAY BACKSPACE ONE LETTER    AT A TIME IN THE USUAL WAY.":дЗ" USE THE <SPACE BAR> TO SIGNAL   THAT YOU ARE FINISHED.":AоЗ@448," PRESS ANY KEY TO START":Y╕Е  Т│"" з 1720 :Д Р TYPE YOUR WORD USING ONLY THE   TEN RANDOM LETTERS SUPPLIED."9▐ЪЗ" YOU MAY BACKSPACE ONE LETTER    AT A TIME IN THE USUAL WAY.":дЗ" USE THE <SPACE BAR> TO SI                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Ё&V
:Г *TIME/OLD FASHIONED CLOCK* BY JOSEPH S. PARAVATI JR.& SR.                8/83&y:ГGOSUB TO CHAR.GEN.SUBROUTINE&ЦБж 5000:Бж5640:R│ Д(м Я)&м(:Г INITIAL SET UP&ц2Ю:З "*TIME ON AN OLD FASHIONED CLOCK*";:З  б(32,"*");'{<З "THIS PROGRAM WILL HELP YOU TO   LEARN TO TELL TIME ON A REGULAR,ROUND TYPE CLOCK. WHEN YOU HEAR THE CLOCK'S 'TIC TOC' YOU TYPE  IN THE TIME."(_FЗ"TYPE IN AND <ENTER> YOUR ANSWERSAS ON A NEW TYPE CLOCK. IF THE  TIME IS 12 O'CLOCK YOU WOULD    TYPE 12:00. 5 AFTER 5 WOULD BE  5:05. YOU CAN CHANGE YOUR ANSWERBEFORE PRESSING <ENTER>, JUST   PRESS THE '<-' (BACK-ARROW)."(}PЗ @489,"<PRESS ANY KEY>";(ОZЕ  Т│"" з 90)kdЮ:З"AS YOU TYPE EACH NUMBER (DON'T  FORGET THE ':') WAIT FOR A TONE TELLING YOU THE COMPUTER HAS    RECEIVED YOUR NUMBER. IF YOU GETTHE TIME RIGHT THE COMPUTER WILLAUTOMATICALLY GIVE YOU ANOTHER  TIME TO FIGURE OUT."*BnЗ"IF YOU GIVE A WRONG ANSWER YOU  WILL HAVE TIME TO STUDY THE     CLOCK TO SEE WHERE YOU WENT     WRONG. PRESS <ANY KEY> TO GET   ANOTHER TIME. AFTER EVERY TEN   TRIES A SCORE FOR THE TEN TRIES WILL BE SHOWN.";*vxЗ" TO END PROGRAM   PRESS <SHIFT> AND <CLEAR>."*ФВЗ @489,"<PRESS ANY KEY>";*жМЕ  Т│"" з 140*эЦЮ:З @232,"WHAT'S YOUR NAME?":З"    (NO MORE THEN 7 LETTERS)":Й NA$+аЕ  З(NA$)▓7 з 150+ кЕ  З(NA$)│0 з NA$│"????"+5┤╚ 3:╝5:┐ 1,1:┴ 6+I╛:Г MINUTE MARKS+]╚X│128:Y│80:R│80+q╥А D│0 е 360 й 6+Л▄A│(270лD)о57.29577951+гцQ│ Б(Rн Х(A)л128.5)+║ЁW│ Б(Rн Е(A)л80.5)+█·Е Dо30│ Б(Dо30) з ┴ 8 :Д ┴ 6+ю
╗(X,Y)м(Q,W),╜+Ў
Л D,
:Г CLOCK OUTLINE & BACKROUND,9
"C$│"R80F40D60G40L80H40U60E40",N
,╞ "C7BM88,10"лC$,h
6CL│ Д(7):Е CL┤6 з 310,v
@R│ Д(100),о
J├(128,188),CL,7:Е R▓50 з ├(128,188),5,7:CL│5 :Д 340,─
T┬(128,80),76,7,.9,╓
^├(128,80),5,7,ь
h┬(128,80),76,5,.9-

r:Г NUMBER SET UP-	
|┴ 7-+
ЖA$│"12":B$│"BM118,26":Бж 5090-L
РA$│"1":B$│"BM154,32":Бж 5090-m
ЪA$│"2":B$│"BM180,52":Бж 5090-О
дA$│"3":B$│"BM194,86":Бж 5090-░
оA$│"4":B$│"BM182,120":Бж 5090-╥
╕A$│"5":B$│"BM154,138":Бж 5090-Ї
┬A$│"6":B$│"BM124,146":Бж 5090.
╠A$│"7":B$│"BM96,136":Бж 5090.6
╓A$│"8":B$│"BM68,118":Бж 5090.V
рA$│"9":B$│"BM54,86":Бж 5090.w
ъA$│"10":B$│"BM66,52":Бж 5090.Ш
ЇA$│"11":B$│"BM86,32":Бж 5090.╕
■:Г CHANGE TO SPECIAL COLORS.─╚4:┐1,1.╦╚3.у:Г GRAPHIC PRINTING/&A$│"WHAT":B$│"C8BM10,20 Z&/:ГFROM THE RAINBOW SEPT 1982      PAGE 95&:
:ГWORD&L:ГGEOFF WELLS&c:ГHAMILTON ONTARIO&p(:ГCANADA&П2:ГCOMPLETED APRIL 26, 1981&┤<Х 500:М AZ$(200),TL$(10),PL$(10)&╨FМ AZ(200),CH(10),PL(10)&ЁPG│128л16н(8м1)л15:BL$│"   "&∙ZЮ(0)'dЗ@107,"**********";')nЗ@139,"   WORD   ";'AxЗ@171,"**********";'mВЗ@384," HOW MANY PLAYERS<1 TO 10>";:Й P'ШМЕ P│▓1 ░ P│┤10 з М NP$(P),PT(P)::Д 130'─ЦЗ@448," DO YOU NEED INSTRUCTIONS";:Й I$'саЕ  О(I$,1)│"Y" з Бж 1620'ъкЮ(0)'°┤А N│1 е P(╛З@224()╚З@224," NAME OF PLAYER"N;:Й NP$(N)(1╥Л N(8▄:Г(WцЗ@224," ONE MOMENT PLEASE"(^Ё:Г(n·А R│1 е 200({
Н AZ$(R)(З
Н AZ(R)(П
Л R(Ц
":Г(Я
,Ю(0)(л
6ROUND│1(╛
@:ГBODY OF GAME(┼
J:Г(▀
TА RD│1 е P    :ГROUND(э
^B│ Д(100))
hЕ B▓90 з B│2 :Д B│1       :ГBONUS)!
rTT│PT(RD))5
|LS│0:W$│"":RT│0)<
Ж:Г)C
Р:Г)a
ЪА LU│1 е 10 :ГPICK LETTER)r
дPICK│ Д(200))Ю
оЕ AZ$(PICK)│ Л(G) з 420   :ГUSED LETTER)е
╕:Г)м
┬:Г)╝
╠А CK│1 е 10)╘
╓Е CH(CK)│PICK з 420)▌
рЛ CK)ф
ъ:Г)ы
Ї:Г)√
■CH(LU)│PICK*PL$(LU)│AZ$(PICK)*%PL(LU)│AZ(PICK)*.Л LU*6&:Г *=0:Г*S:З@0,"ROUND"ROUND;*qDЕ B│2 з З@20,"B*O*N*U*S";*ШNЗ@32л(32м( З(NP$(RD))))о2,NP$(RD);*бXPP│0*╗bА GB│1 е 15  :ГBLOCKS*╠lЗ@98лPP,BL$;*▐vЗ@226лPP,BL$;*ъАPP│PPл6*■КЕ PP│30 з PP│32+ФЕ PP│62 з PP│64+ЮЛ GB+"и:Г++▓PP│0+:╝А LT│1 е 5+P╞З@131лPP,PL$(LT);+h╨З@259лPP,PL$(LTл5);+t┌PP│PPл6+}фЛ LT+Дю:Г+Л°:Г+гЗ@363,"**********";+▒З@363,W$;+▄З@448,"LETTER SCORE"LSнB;д20)"TOTAL"RT+у :Г+ъ*:Г+Ї4L$│ Т,Т>Е L$│PL$(1) ▒ L$│PL$(2) ▒ L$│PL$(3) ▒ L$│PL$(4) ▒ L$│PL$(5) ▒ L$│PL$(6) ▒ L$│PL$(7) ▒ L$│PL$(8) ▒ L$│PL$(9) ▒ L$│PL$(10) ▒ L$│ Л(8) ▒ L$│" " з 840 :Д 820,еHЕ L$│" " з 970,╗RЕ L$│ Л(8) з 1180,°\Е L$│PL$(1) з TL$(1)│PL$(1):PL$(1)│ Л(G):LS│PL(1):Бе 960-4fЕ L$│PL$(2) з TL$(2)│PL$(2):PL$(2)│ Л(G):LS│PL(2):Бе960-qpЕ L$│PL$(3) з TL$(3)│PL$(3):PL$(3)│ Л(G):LS│PL(3):Бе 960-оzЕ L$│PL$(4) з TL$(4)│PL$(4):PL$(4)│ Л(G):LS│PL(4):Бе 960-ыДЕ L$│PL$(5) з TL$(5)│PL$(5):PL$(5)│ Л(G):LS│PL(5):Бе 960.(ОЕ L$│PL$(6) з TL$(6)│PL$(6):PL$(6)│ Л(G):LS│PL(6):Бе 960.eШЕ L$│PL$(7) з TL$(7)│PL$(7):PL$(7)│ Л(G):LS│PL(7):Бе 960.гвЕ L$│PL$(8) з TL$(8)│PL$(8):PL$(8)│ Л(G):LS│PL(8):Бе 960 .рмЕ L$│PL$(9) з TL$(9)│PL$(9):PL$(9)│ Л(G):LS│PL(9):Бе 960/╢Е L$│PL$(10) з TL$(10)│PL$(10):PL$(10)│ Л(G):LS│PL(10)/E└W$│W$лL$:TT│TTлLSнB:RT│RTлLSнB:Бе 690/p╩З@448,"                              "/Ш╘З@448," IS THIS WORD CORRECT";:Й I$/╘▐Е  О(I$,1)│"N" з З@389," MAKE YOUR CORRECTIONS";:Бе 690/тшPT(RD)│TT/ёЄА R│1 е 100№AZ$(CH(R))│PL$(R)0(Е PL$(R)│ Л(G) з USED│USEDл10>TL$(R)│"":CH(R)│00FЛ R0O$Ю(0)0X.Л RD0k8:ГEND OF ROUND0qBЮ0ЛLЗ@45,"ROUND"ROUND:З:З0ЩVА S│1 е P0╜`З "  "NP$(S)" HAS"PT(S)"POINTS"0┼jЛ S1)tЗ:Е(190мUSED)┤5нP з З" AS THERE ARE ONLY"200мUSED "LETTERS    LEFT, THIS WAS THE FINAL ROUND":К1O~З" PRESS ANY KEY FOR NEXT ROUND";1aИЕ  Т│""з 11601ТЮ(0):ROUND│ROUNDл1:Бе 3401СЬЕ W$│"" з 8201чжЕ  П(W$,1)│TL$(10) з PL$(10)│TL$(10):TL$(10)│"":TT│TTмPL(10)нB:LS│мPL(10):Бе 129027░Е  П(W$,1)│TL$(9) з PL$(9)│TL$(9):TL$(9)│"":TT│TTмPL(9)нB:LS│мPL(9):Бе 12902З║Е  П(W$,1)│TL$(8) з PL$(8)│TL$(8):TL$(8)│"":TT│TTмPL(8)нB:LS│мPL(8):Бе 12902╫─Е  П(W$,1)│TL$(7) з PL$(7)│TL$(7):TL$(7)│"":TT│TTмPL(7)нB:LS│мPL(7):Бе 12903'╬Е  П(W$,1)│TL$(6) з PL$(6)│TL$(6):TL$(6)│"":TT│TTмPL(6)нB:LS│мPL(6):Бе 12903w╪Е  П(W$,1)│TL$(5) з PL$(5)│TL$(5):TL$(5)│"":TT│TTмPL(5)нB:LS│мPL(5):Бе 12903╟тЕ  П(W$,1)│TL$(4) з PL$(4)│TL$(4):TL$(4)│"":TT│TTмPL(4)нB:LS│мPL(4):Бе 12904ьЕ  П(W$,1)│TL$(3) з PL$(3)│TL$(3):TL$(3)│"":TT│TTмPL(3)нB:LS│мPL(3):Бе 12904gЎЕ  П(W$,1)│TL$(2) з PL$(2)│TL$(2):TL$(2)│"":TT│TTмPL(2)нB:LS│мPL(2):Бе 12904╖Е  П(W$,1)│TL$(1) з PL$(1)│TL$(1):TL$(1)│"":TT│TTмPL(1)нB:LS│мPL(1):Бе 12904╨
W$│ О(W$,( З(W$)м1))4цRT│RTлLSнB:Бе 6904э:Г4Ї(:Г4√2:Г5=<Ж A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,3,A,35OFЖ B,8,B,8,B,85iPЖ C,6,C,6,C,6,C,6,C,65ЛZЖ D,5,D,5,D,5,D,5,D,5,D,5,D,55їdЖ E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,1,E,16nЖ F,6,F,6,F,6,F,6,F,66)xЖ G,7,G,7,G,7,G,7,G,76KВЖ H,5,H,5,H,5,H,5,H,5,H,5,H,56НМЖ I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,3,I,36ЧЦЖ J,96баЖ K,96├кЖ L,5,L,5,L,5,L,5,L,5,L,5,L,56▌┤Ж M,7,M,7,M,7,M,7,M,77╛Ж N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,3,N,37a╚Ж O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,3,O,37{╥Ж P,7,P,7,P,7,P,7,P,77Е▄Ж Q,97╟цЖ R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,3,R,37їЁЖ S,4,S,4,S,4,S,4,S,4,S,4,S,4,S,4,S,4,S,48K·Ж T,2ERE,TU PREFERES,IL PREFERE,NOUS PREFERONS,VOUS PREFEREZ,ILS PREFERENT8С¤ЖPRETER,JE PRETE,TU PRETES,IL PRETE,NOUS PRETONS,VOUS PRETEZ,ILS PRETENT8э■Ж PROMENER,JE PROMENE,TU PROMENES,IL PROMENE,NOUS PROMENONS,VOUS PROMENEZ,ILS PROMENENT9J ЖPROMETTRE,JE PROMETS,TU PROMETS,IL PROMET,NOUS PROMETTONS,VOUS PROMETTEZ,ILS PROMETTENT9мЖPRONONCER,JE PRONONCE,TU PRONONCES,IL PRONONCE,NOUS PRONONCONS,VOUS PRONONCEZ,ILS PRONONCENT:
ЖQUITTER,JE QUITTE,TU QUITTES,IL QUITTE,NOUS QUITTONS,VOUS QUITTEZ,ILS QUITTENTMETS,TU PROMETS,IL PROMET,NOUS PROMETTONS,VOUS PROMETTEZ,ILS PROMETTENT9мЖPRONONCER,JE PRONONCE,TU PRONONCES,IL PRONONCE,NOUS PRONONCONS,VOUS PRONONCEZ,ILS PRONONCENT:
ЖQUITTER,JE QUITTE,TU QUITTES,IL QUITTE,NOUS QUITTONS,VOUS QUITTEZ,ILS QUITTEN                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 =&W
Ю:SN│45:МAA(SN):АA│1е9:BL$│BL$л Л(128):ЛA:АA│0е480й32:З@A,BL$л Л(128)л Л(128);:ЛA&зFL$│ Л(175)л Л(175)л Л(175)л Л(207)л Л(207)л Л(207)л Л(191)л Л(191)л Л(191)&┐АA│0е31:Ь(1,A,2):ЛA&▌(АA│417е481й32:З@A,FL$;:ЛA'2З@11,"RAISE THE FRENCH FLAG";:З@76,"GIVE SYNONYME OF";'@<З@430,"CORRECT";:З@462,"INCORRECT";'KFPO│417'XPАJW│1е13'tZЗ@440,NC;:З@472,JWмNCм1'zdП'ЗnR│ Д(SN)'бxЕAA(R)│1з110:ДAA(R)│1'╢ВАC│1еR:НA$,B$:ЛC'╩МИ Д(2)Бе150,170(?ЦЗ@107,A$;:З@139,"";:ЙSY$:ЕSY$│B$зNC│NCл1:PO│POм32:З@PO,FL$;:З@POл96,BL$;:ДЗ@171,"WRONG, IT IS-";:З@204,B$;:Бе190(Pаа150,2:Бе200(┼кЗ@107,B$;:З@139,"";:ЙSY$:ЕSY$│A$зNC│NCл1:PO│POм32:З@PO,FL$;:З@POл96,BL$;:ДЗ@171,"WRONG, IT IS-";:З@204,A$;:Бе190(╓┤а150,2:Бе200(э╛а5,1:АTI│1е800:ЛTI))╚WO$│"                    ":АA│107е235й32:З@A,WO$;:ЛA,JW)a╥ЕJW│13зЮ0:ДЗ@366, Л(34);"MAYBE NEXT TIME"; Л(34);:К)╚▄АZ│1е10:F1$│F1$л Л(175):F2$│F2$л Л(207):F3$│F3$л Л(191):ЛZ:FF$│F1$лF2$лF3$:АA│1е481й32:З@A,FF$;:ЛA)ЇцАA│1е1000:ЛA:Ю:З@70,"CONGRADULATIONS":К*
ЁЖ ALLER,SE PORTER*"·Ж ARRIVER,SE PASSER*=
Ж AUSSITOT QUE,DES QUE*Y
Ж LE BATIMENT,L'EDIFICE*m
Ж CAR,PARCE QUE*В
"Ж CELEBRE,FAMEUX*Ф
,Ж CERTAIN,SUR*н
6Ж LE CHEMIN,LA ROUTE*╦
@Ж COMMENCER A,SE METTRE A*ч
JЖ EMPLOYER,SE SERVIR DE* 
TЖ L'ENDROIT,LE LIEU+
^Ж L'ESPECE,LA SORTE+/
hЖ LA FAUTE,L'ERREUR+D
rЖ FAVORI,PREFERE+^
|Ж LA FIGURE,LE VISAGE+s
ЖЖ LA FIN,LE BOUT+И
РЖ FINIR,TERMINER+Ь
ЪЖ GRAVE,SERIEUX+│
дЖ HABITER,DEMEURER+╔
оЖ HEUREUX,CONTENT+т
╕Ж L'IMAGE,LE TABLEAU,
┬Ж IMMEDIATEMENT,TOUT DE SUITE,&
╠Ж LE PROFESSEUR,L'INSTITUTEUR,@
╓Ж LA MANIERE,LA FACON,V
рЖ MECHANT,MAUVAIS,r
ъЖ LE MEDECIN,LE DOCTEUR,З
ЇЖ MENER,CONDUIRE,б
■Ж LE MILIEU,LE CENTRE,╣Ж LA NATION,LE PAYS,╘Ж LE PALAIS,LE CHATEAU,ыЖ LA PENSEE,L'IDEE-&Ж PREFERER,AIMER MIEUX-0Ж PUIS,ENSUITE--:Ж QUAND,LORSQUE-GDЖ QUELQUEFOIS,PARFOIS-^NЖ REFLECHIR,PENSER-rXЖ ROMPRE,CASSER-УbЖ SE RAPPELER,SE SOUVENIR DE-мlЖ SEULEMENT,NE...QUE-─vЖ SONGER A,PENSER A-┘АЖ LE SUD,LE MIDI-ёКЖ TRISTE,MALHEUREUX.ФЖ LES VETEMENTS,LES HABITS.&ЮЖ VITE,RAPIDEMENT.<иЖ VOULOIR,DESIRER,PARFOIS-^NЖ REFLECHIR,PENSER-rXЖ ROMPRE,CASSER-УbЖ SE RAPPELER,SE SOUVENIR DE-мlЖ SEULEMENT,NE...QUE-─vЖ SONGER A,PENSER A-┘АЖ LE SUD,LE MIDI-ёКЖ TRISTE,MALHEUREUX.ФЖ LES VET 
&G
Ю2:а89,2:а89,2:а133,4:а133,4:а147,4:а147,4:а176,6:а159,2:а133,4:Ю&mЗ"COMMENT VOUS APPELEZ-VOUS":ЙNA$&НЕNA$│""зЗ"NEED A NAME":Бе20&пA$(1)│"FIRST PERSON SINGULAR"&╥(A$(2)│"SECOND PERSON SINGULAR"&Ї2A$(3)│"THIRD PERSON SINGULAR"'<A$(4)│"FIRST PERSON PLURAL"'5FA$(5)│"SECOND PERSON PLURAL"'UPA$(6)│"THIRD PERSON PLURAL"'ХdЮ:З"      LES VERBES FRANCAIS":З"      OMETTEZ LES ACCENTS"'зnАTI│1е500:ЛTI'▒xNV│50'╜}АX│1е15'╘ВП:A│ Д(NV):C│ Д(6)(МАB│1еA:АD│1е7:НV$(D):ЛD,B:Ю:ЗX:З:Зд8)V$(1):З(ЦЗA$(C)(жЫЙF$:З:ЕF$│V$(Cл1)зЗ"C'EST CORRECT, ";NA$;" !":K│Kл1 :Д а10,5:З"JE REGRETTE; VOUS AVEZ TORT!":З:ЗV$(2);д15)V$(5):ЗV$(3);д15)V$(6):ЗV$(4);д15)V$(7)(╧ЮЗ:З:З"    PRESS ANY KEY TO CONTINUE"(ъЯJW$│ Т:ЕJW$│""з159:ДЮ8(ёаЛX)бЕ K┤14 з Бе170).вАQQ│1е2:а89,4:а108,4:а125,4:а89,4:ЛQQ)SгАQQ│1е2:а125,4:а133,4:а147,8:ЛQQ)МдАQQ│1е2:а147,2:а159,2:а147,2:а133,2:а125,4:а89,4:ЛQQ)оеАQQ│1е2:а89,4:а32,4:а89,8:ЛQQ)скЗ"C'EST TOUT! ":ЗK;" D'ENTRE 15 SONT CORRECTS")ч╥К*:╤ЖACHETER,J'ACHETE,TU ACHETES,IL ACHETE,NOUS ACHETONS,VOUS ACHETEZ,ILS ACHETENT*╥ЖAIDER,J'AIDE,TU AIDES,IL AIDE,NOUS AIDONS,VOUS AIDEZ,ILS AIDENT*┘╙ЖANNONCER,J'ANNONCE,TU ANNONCES,IL ANNONCE,NOUS ANNONCONS,VOUS ANNONCEZ,ILS ANNONCENT+0╘ЖAPPELER,J'APPELLE,TU APPELLES,IL APPELLE,NOUS APPELONS,VOUS APPELEZ,ILS APPELLENT+С╒ЖAPPROCHER,J'APPROCHE,TU APPROCHES,IL APPROCHE,NOUS APPROCHONS,VOUS APPROCHEZ,ILS APPROCHENT+ф╓ЖARRETER,J'ARRETE,TU ARRETES,IL ARRETE,NOUS ARRETONS,VOUS ARRETEZ,ILS ARRETENT,8╫ЖBROSSER,JE BROSSE,TU BROSSES,IL BROSSE,NOUS BROSSONS,VOUS BROSSEZ,ILS BROSSENT,Е╪ЖCACHER,JE CACHE,TU CACHES,IL CACHE,NOUS CACHONS,VOUS CACHEZ,ILS CACHENT,╥┘ЖCASSER,JE CASSE,TU CASSES,IL CASSE,NOUS CASSONS,VOUS CASSEZ,ILS CASSENT-&┌ЖCHANTER,JE CHANTE,TU CHANTES,IL CHANTE,NOUS CHANTONS,VOUS CHANTEZ,ILS CHANTENT-Б█ЖCHERCHER,JE CHERCHE,TU CHERCHES,IL CHERCHE,NOUS CHERCHONS,VOUS CHERCHEZ,ILS CHERCHENT-у▄ЖCOMMANDER,JE COMMANDE,TU COMMANDES,IL COMMANDE,NOUS COMMANDONS,VOUS COMMANDEZ,ILS COMMANDENT.E▌ЖCOMMENCER,JE COMMENCE,TU COMMENCES,IL COMMENCE,NOUS COMMENCONS,VOUS COMMENCEZ,ILS COMMENCENT.ж▐ЖCONNAITRE,JE CONNAIS,TU CONNAIS,IL CONNAIT,NOUS CONNAISSONS,VOUS CONNAISSEZ,ILS CONNAISSENT.·▀ЖCOUCHER,JE COUCHE,TU COUCHES,IL COUCHE,NOUS COUCHONS,VOUS COUCHEZ,ILS COUCHENT/FрЖCROIRE,JE CROIS,TU CROIS,IL CROIT,NOUS CROYONS,VOUS CROYEZ,ILS CROIENT/УсЖDANSER,JE DANSE,TU DANSES,IL DANSE,NOUS DANSONS,VOUS DANSEZ,ILS DANSENT/єтЖDESCENDRE,JE DESCENDS,TU DESCENDS,IL DESCEND,NOUS DESCENDONS,VOUS DESCENDEZ,ILS DESCENDENT0KуЖDEVENIR,JE DEVIENS,TU DEVIENS,IL DEVIENT,NOUS DEVENONS,VOUS DEVENEZ,ILS DEVIENNENT0МфЖDIRE,JE DIS,TU DIS,IL DIT,NOUS DISONS,VOUS DITES,ILS DISENT0эхЖEMPRUNTER,J'EMPRUNTE,TU EMPRUNTES,IL EMPRUNTE,NOUS EMPRUNTONS,VOUS EMPRUNTEZ,ILS EMPRUNTENT1CцЖENDORMIR,J'ENDORS,TU ENDORS,IL ENDORT,NOUS ENDORMONS,VOUS ENDORMEZ,ILS ENDORMENT1ЦчЖESPERER,J'ESPERE,TU ESPERES,IL ESPERE,NOUS ESPERONS,VOUS ESPEREZ,ILS ESPERENT1щшЖESSAYER,J'ESSAIE,TU ESSAIES,IL ESSAIE,NOUS ESSAYONS,VOUS ESSAYEZ,ILS ESSAIENT2<щЖESSUYER,J'ESSUIE,TU ESSUIES,IL ESSUIE,NOUS ESSUYONS,VOUS ESSUYEZ,ILS ESSUIENT2ЧъЖHABILLER,J'HABILLE,TU HABILLES,IL HABILLE, NOUS HABILLONS,VOUS HABILLEZ,ILS HABILLENT2ъыЖINVITER,J'INVITE,TU INVITES,IL INVITE,NOUS INVITONS,VOUS INVITEZ,ILS INVITENT36ьЖJETER,JE JETTE,TU JETTES,IL JETTE,NOUS JETTONS,VOUS JETTEZ,ILS JETTENT3КэЖLAISSER,JE LAISSE,TU LAISSES,IL LAISSE,NOUS LAISSONS,VOUS LAISSEZ,ILS LAISSENT3╨юЖLAVER,JE LAVE,TU LAVES,IL LAVE,NOUS LAVONS,VOUS LAVEZ,ILS LAVENT4яЖLIRE,JE LIS,TU LIS IL LIT,NOUS LISONS,VOUS LISEZ,ILS LISENT4_ЁЖMANGER,JE MANGE,TU MANGES,IL MANGE,NOUS MANGEONS,VOUS MANGEZ,ILS MANGENT4мёЖMONTER,JE MONTE,TU MONTES,IL MONTE,NOUS MONTONS,VOUS MONTEZ,ILS MONTENT4·ЄЖ MOURIR,JE MEURS,TU MEURS,IL MEURT,NOUS MOURONS,VOUS MOUREZ,ILS MEURENT 5AєЖNAGER,JE NAGE,TU NAGES,IL NAGE,NOUS NAGEONS,VOUS NAGEZ,ILS NAGENT5НЇЖNAITRE,JE NAIS,TU NAIS,IL NAIT,NOUS NAISSONS,VOUS NAISSEZ,ILS NAISSENT5шїЖNETTOYER,JE NETTOIE,TU NETTOIES,IL NETTOIE,NOUS NETTOYONS,VOUS NETTOYEZ,ILS NETTOIENT66ЎЖ OFFRIR,JE OFFRE,TU OFFRES,IL OFFRE,NOUS OFFRONS,VOUS OFFREZ,ILS OFFRENT6ШўЖORGANISER,JE ORGANISE,TU ORGANISES,IL ORGANISE,NOUS ORGANISONS,VOUS ORGANISEZ,ILS ORGANISENT6ы°ЖOUBLIER,J'OUBLIE,TU OUBLIES,IL OUBLIE,NOUS OUBLIONS,VOUS OUBLIEZ,ILS OUBLIENT78∙ЖPASSER,JE PASSE,TU PASSES,IL PASSE,NOUS PASSONS,VOUS PASSEZ,ILS PASSENT7М·ЖPEIGNER,JE PEIGNE,TU PEIGNES,IL PEIGNE,NOUS PEIGNONS,VOUS PEIGNEZ,ILS PEIGNENT7щ√ЖPERMETTRE,JE PERMETS,TU PERMETS,IL PERMET,NOUS PERMETTONS,VOUS PERMETTEZ,ILS PERMETTENT8D№ЖPREFERER,JE PREF &'
В COPYRIGHT (C) T&D SOFTWARE 1983&DВ ELECTRONIC FLASH CARDS&K└4&U(Х1000&\2╚3&r<╝3:┬(128,96),50,2&ИF┬(106,80),10,2,.8&ЮP┬(150,80),10,2,.8&║Z┬(128,100),35,2,.8,0,.5&╓d┬(128,100),35,2,.5,0,.5&шn├(128,96),2,2'Цx╞"C1BM40,10 NR14D30R14 BR10 NR14U30R14D30 BR10 U30R14D16NL14L8F8D6 BR10 U30R14D16NL14L8F8D6 BR10 U30NR14D14NR10D16R14 BR10 U30NR14D30R14 BR10 BU30R15L8D30 BR20 U2BU8U20"'╗ВЮ0:З@5,"electronic flash cards";'╚МЗ@64,"";(lЦЗ"   THIS PROGRAM IS DESIGNED TO  EXERCISE CHILDREN (AGES 6 - 10) WITH THE FOUR FUNDAMENTAL OPER- ATIONS : ADDITION,SUBTRACTION,  MULTIPLICATION AND DIVISION.")аЗ"   THE OPTIONS AVAILABLE ARE 1, 2, OR 3 DIGIT OPERATIONS FOR    ADDITION AND SUBTRACTION AND 1  OR 2 DIGIT OPERATIONS FOR MULTI-PLICATION AND DIVISION.")кБж900)G┤Ю0:Й"HOW MANY PROBLEMS ARE TO BE     DONE";NP)c╛ЕNP┤1 ▒ NP┤▓ Б(NP) з180)к╚Ю0:Й"WHICH OPERATION (+,-,*,/)";OP$:Е Ю("+-*/",OP$)│0 ▒ OP$│""з200)└╥OP│ Ю("+-*/",OP$))▄▄И OP Бе 230,230,250,250*"цЮ0:Й"1, 2, OR 3 DIGIT OPERATIONS";ND:Е ND┤▓1 ░ ND┤▓2 ░ ND┤▓3 з230*,ЁБе260*e·Ю0:Й"1 OR 2 DIGIT OPERATIONS";ND:ЕND┤▓1 ░ ND┤▓2 з250*г
Ю0:З"be sure to press [enter] after  typing each answer."*н
Бж900*╢
NC│0*╞
"А PC│1 е NP*═
,Ю0+
6N1│ Д(10пND)м1:N1$│ Р( И(N1),2):Е З(N1$)┤▓ND з310+9
@N2│ Д(10пND)м1:N2$│ Р( И(N2),2):Е З(N2$)┤▓ND з320+Q
EЕ OP│4 ░ N2│0 з 320+l
JИ OP Бе340,350,360,370+
TAN│N1лN2:Бе380+Ы
^AN│N1мN2:ЕAN┤0з310:Д380+о
hAN│N1нN2:Бе380+╪
rAN│ Б(N1оN2):R│ Б(((N1оN2)мAN)нN2л.5),
|ЕOP│4 ░ R┤▓0зAN$│ Р( И(AN),2)л"R"л Р( И(R),2) :ДAN$│ Р( И(AN),2),F
ЖЕ OP│4 зЗ@5,"use 'r' for remainder";,b
РPP│79л((NDо3)н4)л(NDо3),q
ЪAP│PPл9н32,Д
дK│( Д(8)м1)н16,Ы
оАI│ З(N1$) е 1 йм1,┤
╕D$│ Р(N1$,I,1):Бж930,┬
┬PP│PPм6:Л,ю
╠PP│207л((NDо3)н4)л(NDо3):K│( Д(8)м1)н16-
╓АI│ З(N2$) е 1 йм1-
рD$│ Р(N2$,I,1):Бж930-,
ъPP│PPм6:Л-e
ЇЗ@322л((3мND)н2), б(22м((3мND)н2),140л( Д(8)м1)н16);-К
■PP│194л((3мND)н2):K│( Д(8)м1)н16-жИ OP Бе 530,540,550,560.З@PP, Л(128); Л(130лK); Л(128);:З@PPл32, Л(131лK); Л(139лK); Л(130лK);:З@PPл64, Л(128); Л(138лK); Л(128);:Бе570.fЗ@PP, б(3,128);:З@PPл32, б(2,131лK); Л(130лK);:З@PPл64, б(3,128);:Бе570.▐&З@PP, Л(130лK); Л(128); Л(130лK);:З@PPл32, Л(132лK); Л(134лK); Л(128);:З@PPл64, Л(134лK); Л(132лK); Л(130лK);:Бе570/L0З@PP, Л(128); Л(130лK); Л(128);:З@PPл32, Л(131лK); Л(131лK); Л(130лK);:З@PPл64, Л(128); Л(130лK); Л(128);/[:AL│ З(AN$)/nDPP│APм(ALм1)н6/ЗNT$│"":L│( Д(8)м1)н16/ТXАK│1е7/█bЗ@PP, б(3,143лKн16);:З@PPл32, б(3,143лKн16);:З@PPл64, б(3,143лKн16);/ЁlK$│ Т:ЕK$│""з7600vЕ  Ю("0123456789R"л Л(13)л Л(8),K$)│0з7600MwЕ  З(T$)│AL ░ (K$┤▓ Л(13) ░ K$┤▓ Л(8))з6200^АЕK$┤▓"R"з6700╘КЗ@PP, Л(142лL); Л(140лL); Л(138лL);:З@PPл32, Л(142лL); Л(142лL); Л(136лL);:З@PPл64, Л(138лL); Л(132лL); Л(130лL);0чФT$│T$лK$:Бе7500√ЮЕK$┤▓ Л(13)з7001иБж690:Бе7701G▓З@PP, б(3,128);:З@PPл32, б(3,128);:З@PPл64, б(3,128);:Р1Z╝ЕK$┤▓ Л(8)з7401l╞Е З(T$)│0з7601Г╨T$│ О(T$, З(T$)м1)1Ы┌Бж690:PP│PPм6:Бе7601└фT$│T$лK$:D$│K$:T│K:K│L:Бж930:K│T1╠юPP│PPл61┘°ЛK:Бе6001эЕ T$┤▓AN$ з 8202┐1,0:╔"V31O3T100L100ABCB FGEF":АTD│1е1000:Л2WАI│0е20:┐1,0:╔"O4T200L200ABC":┐1,1:╔"O2T200L200ABC":Л2c NC│NCл12m*Бе8702Е4З@459,"S O R R Y,";2┐>P$│"THE CORRECT ANSWER WAS ":ЕOP┤▓4 з P$│P$лAN$:Бе8502їHP│ Ю(AN$,"R"):P$│P$л О(AN$,Pм1)л" R "л Р(AN$,Pл1)3RЗ@480л((31м З(P$))о2),P$;3$\АTD│1е2000:Л3,fЛPC3tpЮ:З"YOU ANSWERED";NC;" CORRECT OUT":З"OF ";NP;"FOR ";NCоNPн100;" %"3ТzЗ:З:З"TRY AGAIN ?  (Y/N)"3и{K$│ Т:ЕK$│"Y"з1803╣|ЕK$┤▓"N"з8913┐}К3цДЗ@484,"press [enter] to continue";3·ОЕ Т┤▓ Л(13)з9104ШР4вП:V│ Й(D$)4мЕV│0з96044╢АJ│1 е Vн3:НA,B,C:Л4F└АJ│0е2:НA,B,C4m╩З@PPлJн32, Л(KлA); Л(KлB); Л(KлC);4s╘Л4y▐Р4гшЖ 142,140,141,138,128,133,139,131,1354═ЄЖ 128,135,128,128,133,128,128,135,1304ў№Ж 140,140,141,142,140,140,139,131,1315!Ж 140,140,141,128,132,141,131,131,1355KЖ 129,128,138,133,131,139,128,128,1385uЖ 142,140,140,140,140,141,131,131,1355Я$Ж 142,140,140,142,140,141,139,131,1355╔.Ж 140,140,141,128,128,134,128,133,1285є8Ж 142,140,141,142,140,141,139,131,1356BЖ 142,140,141,140,140,141,131,131,13555KЖ 129,128,138,133,131,139,128,128,1385uЖ 142,140,140,140,140,141,131,131,1355Я$Ж 142,140,140,142,140,141,139,131,1355╔.Ж 140,140,141,128,128,134,128,133,1285є8Ж 142,140,141,142,140,141,139,131,1356BЖ 142,1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        	╔╚╚╟╔─├├╔!╚#╞%┬'(╞╔+,-├/0╟23╚5┬7╔            TUTRBAS
                                                                                                                                                                FLASHCRDBAS !TYPETUT BAS"╖VERBS   BASANTONYMSBAS$ўSYNONYMSBAS@HANGMAN BAS&╒WORD    BAS]DOGHOUSEBAS)+CLOCK   BASєABC GAMEBAS*·GEO GAMEBASsMATHDRILBAS.MATHGAMEBAS1/FISHING BASjSPEEDMTHBAS9BIRD    BAS4рMATHQUIZBAS
1STATES  BAS6ИMATHTUTRBAS
▓                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ┤&'
В COPYRIGHT (C) T&D SOFTWARE 1983&CВ TOUCH TYPING TUTORIAL&MБе 62&gЮ:Х1000:E$│"ASDFJKL;"&єЗд5)"TOUCH TYPING TUTORIAL":Зд5);:АI│1е21:З Л( Д(10)л32);:╔"O4T255L255A":АTD│1е Д(50)л20:Л:Л:╔"V31O4T5L4 F V25F V20F V15F V10F V5F V1F"'╦З:З:З:З"   THIS TUTORIAL WILL ATTEMPT    TO TEACH THE USER TOUCH TYPING  AS  IT APPLIES  TO  THE  COLOR  COMPUTER  KEYBOARD, WHICH, AL-  THOUGH  IS  A  CALCULATOR-TYPE  KEYBOARD, PROVIDES GOOD TACTILE FEEDBACK."'╘Бж59'┌Ю(е	З"   THE FOUR FINGERS AND THUMB OFEACH HAND ARE USED IN THE FOL-  LOWING WAYS.":З"THE LITTLE FINGER ON THE LEFT   HAND RESTS ON THE 'A' KEY.":З"THE NEXT FINGER ON THE LEFT HANDRESTS ON THE 'S' KEY.")h
З"THE MIDDLE FINGER ON THE LEFT   HAND RESTS ON THE 'D' KEY.":З"THE INDEX FINGER ON THE LEFT    HAND RESTS ON THE 'F' KEY.":З"THE INDEX FINGER ON THE RIGHT   HAND RESTS ON THE 'J' KEY.":Бж59*LЮ:З"THE MIDDLE FINGER ON THE RIGHT  HAND RESTS ON THE 'K' KEY.":З"THE NEXT FINGER ON THE IGHT HANDRESTS ON THE 'L' KEY.":З"THE LITTLE FINGER ON THE RIGHT  HAND RESTS ON THE ';' KEY.":З"THE THUMBS ARE USED ON THE SPACE-BAR."*╩З"NOTE: THESE ARE THE RESTING POS-ITIONS FOR THE FINGERS AND THE  FINGERS SHOULD ONLY LIGHTLY     TOUCH THESE KEYS.":Бж59+]
Ю:З"NOW LET'S TRY SOME EXERCISES    USING ONLY THE 'A S D F J K L ;'KEYS. I WILL DISPLAY A LETTER OR; AND YOU WILL PRESS THE CORRECTKEY.":Бж56+ЯЮ:З"PLEASE KEEP YOUR EYES ON THE    SCREEN AT ALL TIMES !!!!"+лАI│1еEX+┴C$│ Р(E$, Д(8),1)+╧ЕC$│O$з16+▌З@272,C$;+ц Я│0+·K$│ Т:ЕK$│""з24,З@390, б(32,32);,0ЕK$│C$з З@397,"CORRECT":Бе26,XЗ@392,"SORRY, TRY AGAIN.":а1,1:Бе20,kЕ  Я┤60нTM з20,ЬЗ@392,"SORRY, OUT OF TIME.":а1,3:а100,1:а1,3,иO$│C$:Л-NЮ:З"   THE NEXT THING TO BE DISCUS- SED IS THE EXTENDED POSITIONS OFTHE FINGERS.":З"THE LITTLE FINGER ON THE LEFT   HAND IS ALSO RESPONSIBLE FOR THE'1QAZ' KEYS.".'З"THE NEXT FINGER IS RESPONSIBLE  FOR THE '2WSX' KEYS.":З"THE MIDDLE FINGER IS RESPONSIBLE FOR THE '3EDC' KEYS.":З"THE INDEX FINGER IS RESPONSIBLE FOR THE '4RFV' AND '5TGB' KEYS.":З"THE RIGHT INDEX FINGER IS RE-".`З"SPONSIBLE FOR THE '6YHN' AND    '7UJM' KEYS.":Бж59/Ю:З"THE RIGHT MIDDLE FINGER IS RE-  SPONSIBLE FOR THE '8IK,' KEYS.":З"THE NEXT FINGER IS RESPONSIBLE  FOR THE '9OL.' KEYS.":З"THE LITTLE FINGER IS RESPONSIBLEFOR THE '0P;/' KEYS."/░Бж59:Ю:З"NOW LET'S TRY SOME EXERCISES    USING ALL OF THE KEYS WE HAVE   LEARNED SO FAR. THE KEYBOARD    WILL APPEAR ON THE SCREEN TO    HELP YOU."0a Бж56:Ю:З"KEEP YOUR EYES ON THE SCREEN !!":З"1  2  3  4  5  6  7  8  9  0     Q  W  E  R  T  Y  U  I  O  P     A  S  D  F  G  H  J  K  L  ;     Z  X  C  V  B  N  M  ,  .  /"0j!Бж441"Ю:З"NOW LET'S TRY SOME OF THE SAME  EXERCISES WITHOUT THE THE KEY-  BOARD APPEARING ON THE SCREEN.":Бж56:Ю:З"PLEASE KEEP YOUR EYES ON THE    SCREEN !!!!"1#Бж 441r$Ю:З"   THE REMAINING KEYS ON THE    KEYBOARD ARE THE RESPONSIBILITY OF THE LITTLE FINGERS."1╖%З"(KEYS LIKE [SHIFT],[ENTER],[:], [=],[@],[BREAK],[CLEAR], ETC."1└&Бж592E'Ю:З"   YOU HAVE NOW BEEN GIVEN THE  MECHANICS TO TYPING CORRECTLY,  HOWEVER, IT WILL TAKE TIME AND  MUCH PRACTICE TO TYPE WELL."2Б(З:З"WOULD YOU LIKE TO SEE THIS PRO- GRAM AGAIN ? (Y/N)"2Х)K$│ Т:ЕK$│"Y"з42е*ЕK$┤▓"N"з412л+К2╖,АI│1еEX3-C$│ Р("1234567890QWERTYUIOPASDFGHJKL;ZXCVBNM,./", Д(40),1):ЕC$│O$з453.З@272,C$;3/ Я│03+0K$│ Т:ЕK$│""з523@1З@390, б(32,32);3`2ЕK$│C$зЗ@397,"CORRECT":Бе543И3З@392,"SORRY, TRY AGAIN.":а1,1:Бе483Щ4Е Я┤TMн60з483╩5З@392,"SORRY, OUT OF TIME.":а1,3:а100,1:а1,33╓6O$│C$:Л3▄7Р48Й"HOW MANY EXERCISES";EX:ЕEX┤│0з564_9Й"HOW MUCH TIME WOULD YOU LIKE TO HAVE TO ENTER THE ANSWER";TM:ЕTM┤│0 ▒ TM┤▓ Б(TM) з 574e:Р4М;З@484,"PRESS [ENTER] TO CONTINUE";4Я<Е Т┤▓ Л(13)з604е=Р4│>╚0:└1:Бе4E.":а1,3:а100,1:а1,33╓6O$│C$:Л3▄7Р48Й"HOW MANY EXERCISES";EX:ЕEX┤│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
Ї&b
Ю:AN│79:МAA(AN):АA│1е11:BL$│BL$л Л(128):ЛA:АA│0е480й32:З@A,BL$;:ЛA:АA│1е6:GB$│GB$л Л(128):ЛA&╩АA│1е481й32:З@A, Л(255);:З@Aл7, Л(255);:ЛA:АA│1е6:O$│O$л Л(255):ЛA:З@2,O$;:АA│386е482й32:З@A,O$;:ЛA&№З@388, Л(254)л Л(253);:З@420, Л(242)л Л(241);'|(Y1$│ Л(156)л Л(157)л Л(159)л Л(159)л Л(159)л Л(159):Y2$│ Л(128)л Л(128)л Л(128)л Л(156)л Л(157)л Л(159):З@34,Y1$;:З@66,Y2$;'┤2З@11,"BEAT THE GUILLOTINE";:З@76,"GIVE ANTONYM OF";'╒<З@395," 20 QUESTIONS TOTAL";'¤FЗ@430,"CORRECT";:З@462,"INCORRECT";(PPO│34(ZАJW│1е20(dП('nR│ Д(AN)(AxЕAA(R)│1з110:ДAA(R)│1(VВАC│1еR:НA$,B$:ЛC(jМИ Д(2)Бе150,170(┐ЦЗ@107,A$;:З@139,"";:ЙAN$:ЕAN$│B$зNC│NCл1:ДЗ@171,"WRONG, IT IS-";:З@204,B$;:Бе190(╨аа150,2:Бе200)%кЗ@107,B$;:З@139,"";:ЙAN$:ЕAN$│A$зNC│NCл1:ДЗ@171,"WRONG, IT IS-";:З@204,A$;:Бе190)6┤а150,2:Бе200)┤╛а5,1:АA│34е290й32:З@A,GB$;:З@Aл32,Y1$;:З@Aл64,Y2$;:АTI│1е5:ЛTI:ЛA:З@322,GB$;:З@354,GB$;:АTI│1е800:ЛTI:З@34,Y1$;:З@66,Y2$;*╚WO$│"                    ":АA│107е235й32:З@A,WO$;:ЛA:З@440,NC;:З@472,JWмNC;:ЛJW*E╥ЕJW│20зЗ@386,GB$;:З@366, Л(34);"NO CASUALTIES"; Л(34);:К*d▄З@386,"MAYBE NEXT TIME";:К*yцЖ ABSENT,PRESENT*РЁЖ ACCEPTER,REFUSER*е·Ж ACHETER,VENDRE*╖
Ж ALLER,VENIR*╠
Ж L'AMI,L'ENNEMI*с
Ж ANCIEN,MODERNE*Ў
"Ж ARRIVER,PARTIR+
,Ж L'AUTOMNE,LE PRINTEMPS+%
6Ж AVANT,APRES+5
@Ж AVEC,SANS+D
JЖ BAS,HAUT+T
TЖ BEAU,LAID+g
^Ж BEAUCOUP,PEU+v
hЖ BIEN,MAL+Р
rЖ LE BRUIT,LE SILENCE+в
|Ж CHAUD,FROID+╕
ЖЖ CHER,BON MARCHE+╒
РЖ LE COMMENCEMENT,LA FIN+ы
ЪЖ COMMENCER,FINIR+№
дЖ COURT,LONG,
оЖ DEBOUT,ASSIS,'
╕Ж DEMANDER,REPONDRE,=
┬Ж DEVANT,DERRIERE,P
╠Ж DROIT,GAUCHE,g
╓Ж EMPRUNTER,PRETER,{
рЖ ENTRER,SORTIR,П
ъЖ L'EST,L'OUEST,г
ЇЖ L'ETE,L'HIVER,║
■Ж FACILE,DIFFICILE,╬Ж FERMER,OUVRIR,рЖ FORT,FAIBLE, Ж LE GARCON,LA JEUNE FILLE-&Ж GRAND,PETIT-)0Ж LA GUERRE,LA PAIX->:Ж HEUREUX,TRISTE-PDЖ HEIR,DEMAIN-gNЖ L'HOMME,LA FEMME-tXЖ ICI,LA-ФbЖ LA JEUNESSE,LA VIEILLESSE-лlЖ JOUER,TRAVAILLER-┴vЖ LE JOUR,LA NUIT-╘АЖ LARGE,ETROIT-цКЖ LEGER,LOURD.ФЖ LE LENDEMAIN,LA VEILLE.ЮЖ LE MARI,LA FEMME.,иЖ MIDI,MINUIT.C▓Ж MONTER,DESCENDRE.Q╝Ж NE,MORT.f╞Ж LE NORD,LE SUD.{╨Ж OBEIR,DESOBEIR.Н┌Ж OTER,METTRE.ифЖ PARAITRE,DISPARAITRE.─юЖ PARESSEUX,TRAVAILLEUR.╫°Ж PAUVRE,RICHE.ЇЖ LE PLANCHER,LE PLAFOND/Ж PLEIN,VIDE/Ж PLEURER,RIRE/) Ж PLUS,MOINS/;*Ж POLI,IMPOLI/U4Ж POSSIBLE,IMPOSSIBLE/k>Ж PREMIER,DERNIER/БHЖ PRES DE,LOIN DE/УRЖ PROPRE,SALE/м\Ж QUELQUE CHOSE,RIEN/┼fЖ QUELQU'UM,PERSONNE/тpЖ LA QUESTION,LA REPONSE/°zЖ REUSSIR,ECHOUER0ДЖ LE ROI,LA REINE0'ОЖ S'AMUSER,S'ENNUYER0?ШЖ LE SOLEIL,LA LUNE0VвЖ SOUVENT,RAREMENT0eмЖ SUR,SOUS0y╢Ж UTILE,INUTILE0О└Ж LA VIE,LA MORT0й╩Ж LA VILLE,LA CAMPAGNE0╛╘Ж VITE,LENTEMENT0╤▐Ж VIVRE,MOURIR0ушЖ VOICI,VOILA0єЄЖ VRAI,FAUXER0ДЖ                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ╥&/:ГFROM THE RAINBOW FEB 1983       PAGE 40&Q
:Г                          '&s:Г       HANGMAN            '&Х:Г                          '&╖(:Г DOUG L'HOMMEDIEU    5/82 '&┘2:Г                          '&·<М WRD$(10),GWRD$(10),BAD$(9)'FWRITE│0'PЮ'$ZЗ @ 11,"HANGMAN": З'[dЗ "1 - ONE PLAYER(COMPUTER PICKS       THE WORDS)"'nЗ "2 - TWO PLAYERS(TAKE TURNS)"'ЪxЗ @ 160, "TYPE 1 OR 2"'├ВP$│ Т: CPICK│ Д(122): Е P$│"" Бе 130'╙МPLRS│ Й(P$)'їЦЕ PLRS ┤▓1 ░ PLRS ┤▓ 2 Бе 120(аЕ PLRS │ 2 Бе 230(1кЗ "COMPUTER WILL RANDOMLY PICK A"(X┤З "WORD HAVING FROM 2 TO 10 LTRS."(y╛З "YOU MUST GUESS THE WORD."(б╚З "YOU CAN HAVE NINE WRONG GUESSES"(└╥З "BEFORE YOU ARE HUNG!!!"(╦▄Бе 320(фцЮ: З @11,"HANGMAN":З)ЁЗ "PLAYER #1 INPUTS A WORD - A")/·З "LETTER AT A TIME(2 TO 10 LTRS)")T
З "AFTER THE LAST LETTER SIMPLY")m
З "PRESS <ENTER>.":З)С
З"PLAYER #2 TAKES OVER AT THAT")╖
"З"TIME TO GUESS THE WORD. PLAYER")▌
,З"#2 CAN HAVE NINE WRONG GUESSES")·
6З"BEFORE HE IS HUNG !!!"*!
@З"-------------------------------"*I
JЗ "1 - EASIER(DUP. LETTERS APPEAR)"*r
TЗ "2 - HARDER(MUST GUESS EVERY LTR)"*Н
^З @ 448, "TYPE 1 OR 2"*ж
hE$│ Т: Е E$│"" Бе360*╢
rEASY│ Й(E$)*╫
|Е EASY ┤▓1 ░ EASY ┤▓ 2 з 350+
ЖЗ @ 352, "*******************************"+5
РЗ @ 384, "1 - HELP REMEMBERING WRONG LTRS"+\
ЪЗ @ 416, "2 - NO HELP REMEMBERING"+w
дЗ @ 448, "TYPE 1 OR 2"+Р
оH$│ Т: Е H$│"" Бе430+а
╕HELP│ Й(H$)+├
┬Е HELP ┤▓ 1 ░ HELP ┤▓ 2 Бе 420+╔
╠Ю+№
╓А I│1 е 10: WRD$(I)│" ": GWRD$(I)│ Л(128): Л I,
рЕ PLRS│2 Бе 640,0
ъВ ***COMPUTER PICKS WORD***,H
ЇЗ @ 172, "COMPUTER",b
■З @ 203, "IS PICKING",zЗ @ 236, "THE WORD",ОCPICK │  Д(122),аА I│1 е CPICK,н&Н CWORD$,╡0Л I,╗:П,╬DKNT│ З(CWORD$),рNА I │ 1 е KNT,¤XWRD$(I) │  Р(CWORD$,I,1)-bЛ I-lБе 850-1vВ ***PLAYER #1 PICKS WORD***-pАЗ @ 6, "INPUT THE WORD, ONE              LETTER AT A TIME"-ЦКЗ "    TYPE <ENTER> WHEN DONE": З-дФА I│1е 10-╜ЮЗ "LETTER #";I;"- ";-тиWRD$(I)│ Т:Е WRD$(I)│"" з Бе 680.▓Е I│1 ░ WRD$(I)│ Л(13) Бе740.$╝Е I│2 ░ WRD$(I)│ Л(13) Бе740.4╞А K│65 е 90.`╨Е WRD$(I)│ Л(K) ▒ WRD$(I)│ Л(13) Бе 750.h┌Л K.ЕфЗ "LETTERS ONLY": Бе 670.УюЗ WRD$(I).п°Е WRD$(I)│ Л(13) Бе 780.╖Л I.├KNT│Iм1.▌З:З"THE WORD IS  - ";.№ А I│1 е KNT:З WRD$(I);:Л I/#*З: З"             - RIGHT ? (Y/N)"/>4YN$│ Т: Е YN$│"" Бе820/S>Е YN$│"N" Бе 460/iHЕ YN$┤▓"Y" Бе 800/oRЮ/У\А I│1 е 9: BAD$(I)│ Л(128): Л I/зfЗ @ 7,"HANGMAN"/╜pА I│35 е 387 й 32/╫zЗ @ I,  б(16, Л(128))/▀ДЛ I/°ОЗ@ 449, Л(128);"  ";0ША I│2 е KNT:З  Л(128);"  ";:Л I0)вЗ:MISS│00?мВ ***MAIN LOOP***0l╢Е HELP│2 Бе1040   :ГNO HELP REMEMBERING'0w└INDX│00К╩BAD$(MISS)│GS$0б╘З @ 214, "-WRONG-"0┤▐А I│0е128 й 640╚шА K│278е284 й 30╪ЄINDX│INDXл10Є№З @ (KлI), BAD$(INDX)0 Л K: Л I1З @ 480,"GUESS LETTER-";18GS$│ Т:Е GS$│"" Бе 10501H$А N│1 е KNT1c.Е WRD$(N)┤▓GS$ Бе 11801p8А IS│1е31УBА IK│227е245 й 9: а IK,1: Л IK1ЬLЛ IS1╝VЕ GWRD$(N)┤▓ Л(128) Бе 11801╤`GWRD$(N)│WRD$(N)1сjА K│1 е KNT2tЗ @(449л((Kм1)н3)),═"%%";GWRD$(K)2~Л K2ИWRITE│12EТЕ EASY│2 Бе 1200  :ГNOT THE EASY WAY'2MЬЛ N2hжВ ***END MAIN LOOP ***2░Е WRITE│0 з Бе13202Л║WRITE│02Ы─А I│1 е KNT2║╬Е GWRD$(I)│ Л(128) Бе 10402┬╪Л I2рт╔"O4L8CEGL4O5CO4L8GL4O5C"3
ьЗ @416,"YOU WIN. PLAY AGAIN? (Y/N/C)"3&ЎYN$│ Т: Е YN$│"" Бе12703;Е YN$│"Y" Бе 4603N
Е YN$│"C" Бе803eЕ YN$┤▓"N" Бе 12703kК3{(MISS│MISSл13Ш2А I│50е2 й м8: а I,1:Л I3╙<И MISS Бе 1360,1390,1520,1570,1610,1670,1710,1750,18103уFЗ "ERROR":К3ЄPВ **BASE**4*ZЗ @ 388, Л(223); б(5, Л(220)); Л(223); б(8, Л(128))45dБе 9404GnВ **UPRIGHT**4kxЗ @ 359, Л(175);  б(11, Л(128))4ОВЗ @ 327, Л(175); б(11, Л(128))4▓МЗ @ 295, Л(175);  б(11, Л(128))4╓ЦЗ @ 263, Л(175);  б(11, Л(128))4·аЗ @ 231, Л(175);  б(11, Л(128))5кЗ @ 199, Л(175);  б(11, Л(128))5B┤З @ 167, Л(175);  б(11, Л(128))5e╛З @ 135, Л(175); б(11, Л(128))5Й╚З @ 103, Л(175);  б(11, Л(128))5л╥З @ 71, Л(175); б(11, Л(128))5═▄З @ 39, Л(175); б(11, Л(128))5╪цБе 9405ьЁВ **TOP/NOOSE**6·З @ 40, б(6, Л(172))6&З @ 46, Л(175); б(4, Л(128))6GЗ @ 78, Л(175); б(4, Л(128))6RБе 9406c"В ** HEAD **6Ф,З@ 109, Л(150); Л(156); Л(153); б(3, Л(128))6╞6З @ 141, Л(153); Л(147); Л(150); б(3, Л(128))6╤@Бе 9406рJВ **BODY**7TЗ @ 174, Л(191); б(4, Л(128))7$^З @ 206, Л(191); б(4, Л(128))7FhЗ @ 238, Л(191); б(4, Л(128))7hrЗ @ 270, Л(175); б(4, Л(128))7s|Бе 9407ЖЖВ **LEFT LEG**7иРЗ @ 301, Л(166); б(5, Л(128))7╩ЪЗ @ 332, Л(150); б(6, Л(128))7╒дБе 9407щоВ **RIGHT LEG**8╕З @ 303, Л(169); б(3, Л(128))8-┬З @ 336, Л(153); б(2, Л(128))88╠Бе 9408K╓В **LEFT ARM**8_рЗ @ 204, Л(150)8sъЗ @ 205, Л(188)8ЗЇЗ @ 206, Л(191)8б■З @ 207, б(4, Л(128))8мБе 9408╚В **RIGHT ARM - HUNG!**8ъЗ @ 207, Л(188); б(3, Л(128))9&З @ 208, Л(153); б(2, Л(128))9!0Е HELP│2 Бе 18709<:З @ 212, "-ALL WRONG-"9MDЗ @ 412, GS$9iNЗ @ 416,"YOU'RE HUNG!";9yXА K│1 е KNT9вbЗ @ (449л((Kм1)н3)), ═ "%%"; WRD$(K)9кlЛ K9╗v╔"O1L2GFEDC"9▀АЗ @ 428, " PLAY AGAIN? (Y/N/C)"9№КYN$│ Т: Е YN$│"" Бе 1930:ФЕ YN$│"Y" Бе 460:'ЮЕ YN$ │ "C" Бе 80:@иЕ YN$ ┤▓ "N" Бе 1930:F▓К:b╝В *** 100 WORD LIST ***:╣╞Ж NOTEBOOK,NEWSPAPER,HORSE,POOL,SWIMMING,COMPUTER,CRAFTSMAN,BOOK,FLOWER,PIANO,SONG;╨Ж PICTURE,GLASS,STOVE,MICROWAVE,OVEN,TYPEWRITER,CASSETTE,ELEPHANT,POTS,KITCHEN,VASE;О┌Ж CHURCH,SUIT,TENNIS,FOOTBALL,BASEBALL,TELEVISION,TELEPHONE,BIBLE,CHRISTIAN,TENT,GIRAFFE,TOWEL,PAINT,WATCH,SOAP,REINDEER<фЖ ELECTRICITY,CHECK,HOLIDAY,SHUTTLE,CHAIR,COOKIE,PANCAKE,WAFFLE,SODA,LIGHT,LION,DOLLAR,GAME,PILLOW,NUMBER,NAME,SCHOOL<}юЖ CANDLE,TABLE,SHAMPOO,DOG,CAT,COW,FARMER,COOK,BARN,DOUGHNUT,BICYCLE,UNIVERSITY,JUNIOR,DOCTOR,DENTIST,SPACE,RAIN<·°Ж SUNSHINE,DANCE,RAINBOW,FLOUR,DRESSES,CLASSROOM,LOCKER,ROCKER,CLOCK,CAMERA,ZEBRA,ZOO,BEAR,TIGER,MOUSE,FISH,AQUARIUM,MAN=pЖ FISHERMAN,BEACH,PARK,SHELL,LOCK,ROCK,OVERHEAD,HEAD,MACHINE,BUSH,RESTAURANT,MONKEY,TRUCK,STREET,CLOUD,STORE,SHIP=╤Ж SAILBOAT,COUCH,BUILDING,COACH,TERMINAL,BOY,GIRL,FRIEND,ENEMY,HAND,FOOT,LEG,ARM,FINGER,SHOEZOO,BEAR,TIGER,MOUSE,FISH,AQUARIUM,MAN=p                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 (&>
Ю3:З@137," doghouse game ";:Х 200,16062:З@448:З:ML│16063&Y╣ Г│ML:Г EXTENDED ONLY&╞А I│ML е MLл320:Н J:Т I,J:Л I:A│ Г(1):R$│" GOOD, YOU WERE RIGHT! ":C$│ Л(175):А I│1 е 5:C$│C$лC$:ЛI:S│25&їЗ@100,C$;:З@104," PRESS '4' TO GO ";:A$│ Т'АA$│ Т:Е A$│"S" з З@100,C$;:З@106," speed ="; Б(100мSо1.27);:АI│1е900:ЛI:Бе4 :ДЕ A$│"4" з З@100,C$;:З@107,"GET READY";: :Д A│ Д(6):Бе 5(+А I│1034 е 1449 й 32:J│ Д(8)н16л127:Т I,J:Т Iл10,J:а(255м(Iм1035)о2),1:ЛI:Т MLл232,S:Т MLл234,S:А I│1034 е 1449 й 32:Т I,175:Т Iл10,175:ЛI:З@100,C$;:А I│1 е 15л Д(15)(МNP│ Д(3)н10л1307:Е NP│OP з 7 :Д A│ Г(NP):OP│NP:Л I:A│ Г(2):З@103," WHERE IS THE DOG?";:A$│ Т(ъA$│ Т:G│ Й(A$):Е G┤1 ▒ G▓3 з 8 :Д A│ Г(3):S│ Ж(MLл232):G│Gн10л1307:З@100,C$;:Е G┤▓NP з 10)a	З@101,;:АI│1 е  З(R$):З  Р(R$,I,1);:Е  Р(R$,I,1)│" " з А J│1 е 50:ЛJ,I:АJ│1е500:ЛJ:S│Sо1.3:Бе 4 :Д а(10л10нI),1:ЛI)╟
З@101," SORRY, YOU WERE WRONG ";:А I│1 е 11:а 50,1:а 75,1:Л I:S│Sн1.3л1:Е S┤127 з 4 :Д S│127:Бе 4*ОЖ 189,179,237,193,1,16,39,0,30,193,2,39,79,193,3,39,67,237,141,0,233,236,141,0,227,16,163,141,0,224,39,119,16,44,0,116,22,0,147,95,231,141,0,212,142,5,47,175,141,0,201,175,141,0,199,134,49,183,4+TЖ 197,134,50,183,4,207,134,51,183,4,217,142,4,227,49,141,0,206,141,46,142,5,1,141,41,230,141,0,168,39,105,32,70,51,141,0,203,32,4,51,141,0,208,142,5,33,141,16,142,5,65,141,11,142,5,97,141,6,142,
Ж 5,129,141,1,57,31,50,166,160,39,22,167,132,167,137,0,10,167,137,0,20,48,1,32,238,166,160,39,4,167,128,32,248,57,198,1,231,141,0,98,106,141,0,91,141,190,174,141,0,84,48,30,49,141,0,83,141,68,48,┌Ж 136,30,141,218,48,136,27,32,29,95,231,141,0,65,108,141,0,58,141,157,174,141,0,51,49,141,0,65,141,37,48,136,27,141,187,48,136,28,16,142,202,202,16,175,132,48,3,16,142,197,197,16,175,132-лЖ 134,25,198,25,90,44,253,74,44,248,22,255,33,141,153,48,136,29,141,148,57,5,57,5,57,0,204,198,198,0,195,194,193,0,128,128,128,193,0,201,201,204,0,194,193,195,0,194,128,128,128,0,172,168,179,164,172,0,168.'Ж 179,183,191,191,191,187,179,164,0,191,255,255,255,255,255,255,255,191,175,0,191,207,207,207,207,207,207,207,191,175,0,.9,.4,.2.O
Ъ─(16,18)м(64,62),D,G:╝1.╡
д┬(80,40),16,0,.9:├(80,40),0,0:╚3,1:├(80,40),L,8:╚4,1:┐0,1:┬(80,40),16,0,.9:┬(81,40),16,0,.9,.6,.3. 
о╗(60,26)м(100,54),╜,B:┬(80,40),14,0,.9,.15,.4:┬(80,40),14,0,.9,.65,.9 ў&%
:Г*****************************&I:Г*     A B C   G A M E       *&m:Г*       (C)   1983          *&С:Г*          BY               *&╡:Г*     JAMES F. TAYLOR       *&┘:Г*      P. O. BOX 208        *&¤:Г*    MERIDEN, KS  66512     *'!:Г*    PH:(913) 484-2778      *'E	:Г*****************************'L
:Г'VZХ 500'mdQ1$│"70":Q2$│"125"'ЕnA1$│"166":A2$│"125"'ЫxP1$│"60":P2$│"40"'кВRN│ Д(м Я)'╣ММ D$(26,4)'└С:Г'тЦ:Г***************************(а:Г* Load controlling array  *(&к:Г* from data statements    *(H┤:Г***************************(O╣:Г(V╛Ю3(e╚А I│1 е 26(s╥А J│1 е 4(Б▄Н D$(I,J)(ЪцЗ@ Д(500),"ABCGAME";(вЁЛ J(к·Л I(╔
Бж 690:Г Draw title screen(ф
Бж 850:Г Play ABC Song(ы
:Г)

:Г***************************)/
":Г* Draw Playing Screen     *)Q
,:Г***************************)X
1:Г)m
6╚4,1:┴5,0:╝:┐1,1)В
@А I│30 е 40 й 10)Т
J┬(80,140),I)г
T┬(176,140),I)л
^Л I)╛
h├(115,140),5,5)╤
r├(211,140),5,5)ш
|╞"BM120,140E5R7F5") 
Ж╞"BM120,145E5R7F5"*
Р├(128,138),5,5**
ЪБж 920:Г Get letter*L
Ы:Г****************************n
Ь:Г* Determine draw position **Р
Э:Г* of current word in play **▓
Ю:Г* and draw on screen      **╘
Я:Г***************************+
дWL│ З(D$(RN,3))о2:PW│WLн14:PS$│ И(154мPW)+
о╞"C5S6BM"лPS$л",70"+/
╕А I│1 е WLн2 й 2+T
┬L│ Й( Р(D$(RN,3),I,2)):╞ D$(L,1)+\
╠Л I+~
═:Г***************************+а
╬:Г* Draw picture & first    *+┬
╧:Г* Letter of word          *+ф
╨:Г***************************,
╓╞"S8BM"лQ1$л","лQ2$лD$(RN,1),$
р╞"BM"лP1$л","лP2$лD$(RN,2),F
с:Г***************************,h
т:Г* Get response and verify *,К
у:Г***************************,У
ъIN│0,и
ЇA$│ Т:ЕA$│""з500,╒
■IN│ Ю(1,"ABCDEFGHIJKLMNOPQRSTUVWXYZ",A$)-Е IN з ╞ "C5S8BM"лA1$л","лA2$лD$(IN,1):Бе 560-4IN│ Ю(1,"abcdefghijklmnopqrstuvwxyz",A$)-fЕ IN з ╞ "C5S8BM"лA1$л","лA2$лD$(IN,1):Бе 560-q&Бе 500-Г0Е IN│RN з 600-е1:Г***************************-╟2:Г* Process incorrect re-   *-щ3:Г* with 'Raspberrys & erase*.4:Г***************************.5:Г.::╔ "O2L100FFFFFFFO1AAAAAAAO2FFFFFFF".\D╞ "C0BM"лA1$л","лA2$лD$(IN,1).gNБе 490.nO:Г.РP:Г***************************.▓Q:Г* Process correct response*.╘R:Г* & erase all             *.ЎS:Г***************************.¤T:Г/X╔ "O3L4CCGGAAL2G"/6b╞"S8C0BM"лQ1$л","лQ2$лD$(RN,1)/Wl╞"C0BM"лP1$л","лP2$лD$(RN,2)/zv╞"C0S8BM"лA1$л","лA2$лD$(IN,1)/ТА╞"S6C0BM"лPS$л",70"/зКА I│1 е WLн2 й 2/╠ФL│ Й( Р(D$(RN,3),I,2)):╞ D$(L,1)/╘ЮЛ I/▀иБе 410/цй:Г0к:Г***************************0*л:Г* Draw title screen       *0Lм:Г***************************0Sн:Г0h▓╚3,1:┴2,3:╝:┐1,00Э╝╞"BM10,10;ND172R234D172L234BG10U191R255D191L255"0о╞├(115,5),4,20┌╨╞"C1S10BM44,30"лD$(1,1)лD$(2,1)лD$(3,1)1
┌╞"BM78,75"лD$(7,1)лD$(1,1)лD$(13,1)лD$(5,1)1J▄╞"BM82,115"л"S4"л"BR4G4D6F4BR5BU14"лD$(3,1)л"F4D6G4BR9BU14"1░▌╞"S4BR5NG3D14NL2R2BR3BU4;F4R2E4U6H4L2G4F4R2E4;BR5F3NR2G3F4R2E4H3E3H4L2G4BR15BD10BU7NU7R8NR2NU7D7"1─ф╞"C2S4BM37,145"1╤юА I│1е261▀°╞ D$(I,1)1°Е I│13 з ╞"BM37,165"2Л I2А I│43е208 й 152: ┬ (I,135),15,1,.3:├(Iл10,135),2,12B*Л I2d4┬ (190,40),15,2:├(190,40),2,22Ц>╞ "BM190,40;NU21NE25NR21NF25ND21NG25NL21NH25"2ЬHР2гI:Г2┼J:Г***************************2чK:Г* Play opening ABC song   *3	L:Г***************************3M:Г3)R╔"L4CCGGO3AAL2GP255"3F\╔"L4O3FFEEL8DDDDL2CP255"3_f╔"L4O3GGFFEEL2DP255"3Вp╔"L8O3GGL3GP255L2FL4EEL2DP255"3бz╔"P255L4O3CCGGO3AAL2GP255"3║Д╔"P255L4O3FFEEL2DDC"3└ОР3тП:Г***************************4Р:Г* Generate next letter &  *4&С:Г* prevent repeats         *4HТ:Г***************************4OУ:Г4]ШRN│ Д(26)4vвЕ D$(RN,4)│"U" з 9504БмБе 9904Р╢А I│1 е 264м└ЕD$(I,4)│"F"зRN│I:Бе9904┤╩Л I4╤╘А I│1 е 26:D$(I,4)│"F":Л4т▐D$(RN,4)│"U"4шшР4ящ:Г5ъ:Г**************************51ы:Г*     D  A  T  A         *5Rь:Г* Elements are:          *5sэ:Г*  LETTER DRAW STRING    *5Фю:Г*  PICTURE DRAW STRING   *5╒я:Г*  LETTERS IN WORD(1-26) *      *  INITIAL 'FREE' FLAG   *5ЎЁ:Г**************************5¤ё:Г6\ЄЖ "BD14U8NR10U2E4R2F4ND10BU4BR4","S5R20E10R70D10E12H12D10L70H10L20F12G12","0118181523","F"6┐№Ж "ND14R8F2D2G2NL8F2D4G2NL8BU14BR6","S3BR55BD20R50U50L50ND50E20R50NG20D50G20","0212150311","F"7PЖ "BR10BD4U2H2L6G2D10F2R6E2U2BU10BR4","S4R50E15R40D15R20F5D15L10H5L10G5F7R5E7BL20L68H5L10G5F7R5E7BL20L3H5U10H5BR55E12R32D12L42","030118","F"7╕Ж "D14R6E4U6H4L6BR14","S3BR35R50E5R30F5R15D2L15G5L30H5L50U2BR5U20R20F20BD2G20L20U20","04011820","F"8/Ж "NR10D7NR6D7R10BU14BR4","S4BR60BU30ND50R30D50NR10L40BR6U54R38D54BL14BU35U10L10D10R10BD10E2F2G2H2","05240920","F"8п$Ж "NR10D7NR6D7BU14BR14","S4BR50BU25U2R3U7L7D7R3D50R2U50R20D15L20BD15R50U5NL50U5NL50U5NL30U5NL30U5NL30U5NL50","06120107","F"9S.Ж "BR10BD2H2L6G2D10F2R6E2U2NL4BU10BR4","S6BR10BD10E20U3E3H5E3F5NG3R5E3R20F3R20E5F5NL10D5L30D4G4D4G5L10H5U4NR20BR3D3F4R6E4U3L20BR10D4R2U4L12D16L27","072114","F"9г8Ж "D8ND6R10ND6U8BR4","S4BR55BU30ND50R30D50R10D4L50U4R40BU5L30","080120","F":(BЖ "BR2R6L3D14L3R6BU14BR6","S2BR120BU50D10F5D15F5D30F5ND5E5U15E5U10E5U30R30D90L80U90R70BU10R20D110L105U110R85","090309031205","F":╫LЖ "BD10D2F2R6E2U12BR4","S3BR70BU20R30H30R20F30R20F7NR15BL70U2L15D4R15U2BR40D4R20U8L20D4BR30G7L20G30L20E30L30G15L13E15NL20U3NL30U3NL35U3NL30U3NL20U3H15R13F15","100520","F";YVЖ "D14U8R4E6G6F6D2BU14BR4","S3BR50BU10E40ND80F40NL80G40H40L10E5L10F10L10E5L20E5L10F10L10E5L20E5L10F10L10E5L20","11092005","F";є`Ж "D14R10BU14BR4","S4BR59BU25D50R5U10R10BU3L10U10R10BU3L10U10R10BU3L10U10R10BU3L10U10L5ND20BR15D10BD3D10BD3D10BD3D10BD3D10R5U62L5","120104040518","F"<KjЖ "ND14F5E5ND14BR4","S3BR80BU30NR40D60R40U60BD10R20D40L20BU7R13U26L10","132107","F"<вtЖ "ND14D2F10D2U14BR4","S3BR70BU40D10F50D7G5L20H5L10G5NR20L5H5U10E5","14151905","F"=A~Ж "BD2D10F2R6E2U10H2L6G2BU2BR14","S4BR60BU30D5L5D40R40U40L5NL30U5L30BD10D20R29U20L29BR5BD5D10R19U10L19BU15D3BR5U3BR5D3BR5U3BR5D3BD10BL5L10","15220514","F"=╝ИЖ "ND14R8F2D4G2L8BU8BR14","S3BD30BR100L41H10U30E10H5G5H3E5R55G8F8D30G10BE10R17U30L17BD4R11D22L11","16092003080518","F">uТЖ "BR2NR6G2D10F2R6E1NF1NH2E1U10H2BR6","S4BR30BD20R20E20NU5E3NU7E3NU9E3NU10E3NU10E3NU10E3NU8E3NU6E3NU3E3F2G3NR3G3NR6G3NR8G3NR10G3NR10G3NR10G3NR9G3NR7G3NR5G10D5L7G3","1721091212","F">ЁЬЖ "D14BR10U6H2NL8E2U2H2NL8BR6","S2BR20NR150U5R150BE30ND15G7ND15G10ND15G7ND15G10ND15G7ND15G10ND15G7ND15","18011105","F"?╚жЖ "BD12F2R6E2U3H2L6H2U3E2R6F2BU2BR4","S2BR120BU55R40F30D30G30L40H30U30E30BF5R35F26D27G27L35H27U27E26BD35BD12BL15S3F2R6E2U3H2L6H2U3E2R6F2BU2BR4R5ND12R5BR4BD2D10F2R6E2U10H2L6G2BU2BR12ND12R8F2D4G2L8","19090714","F"@V░Ж "R5ND14R5BR4","S3BR50BD20R60U20H10L5U5L5D5L25U5L5D5L5G10D20BU20BL5NL20U12R17BR7R22BR7R18D12R20U10H10L93G10D10","200512051608151405","F"@э║Ж "D12F2R6E2U12BR4","S4BR80BU20D40L40U10NH10R10NH10U10NH10R10NH10U10NH10R10NH10U10NH10R10H10L10D10L10D10L10D10L10D10F10BH25E20NL10ND10","2116","F"AТ─Ж "D9F5E5U9BR4","S4BR110BU20NF15D5F10R5D20L10H5L10G5L40H5L10G5L10U30E5R80BG5F10L25U10R15BL25D10L20U10R20BL25D10L20U10R20BD30BL20F5R10E5BR40F5R10E5","220114","F"B╬Ж "D14E5F5U14BR4","S5BR40BD15U15NR10BU3NR10U15R10ND15BR4ND15R10D15NL10BD3NL10D15L10NU15BL4NU15L10BG5U40R33D40L33","230914041523","F"BТ╪Ж "D2F10D2BL10U2E10U2BR4","S4BR60BU30ND50R30D50NR10L40BR6U54R38D54BL14BU35U10L10D10R10BD10E2F2G2H2","05240920","F"CтЖ "F5ND9E5BR4","S4BR110D20L70H20R90BL20H10L30G10BR8BU3NE5R30U5L25BU2E5NE5R15F5BD12BL40S3F5NE3NG3F10E5H3BF3G8H3","2501030820","F"CЎьЖ "BD14NR10U2E10U2NL10BR4","S3BR65BU40F5NG5F5NG5F5NG5F5NG5F5NG5F5;L5D15R10U15L5BD12BL3U5R6D5L6BR3BD3;NL5NR5D5NL5NR5D5NL5NR5D5NR5NL5D5NL5NR5D5NL5NR5D5NL5NR5D5NL5NR5;BU45E5NF5E5NF5E5NF5E5NF5E5NF5E5NF5","260916160518","F"D2;NL4                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 & 
В*************************&?В*  MULTI MATH DRILLER   *&^В*   BY FRED B.SCERBO    *&}(В*  COPYRIGHT (C) 1983   *&Ь2В*    BY IMB AND THE     *&╗<В*  PROGRAMMERS' GUILD   *&┌FВ*************************&сPЮ0&ъZХ500'dА ZZ│1е96:BB$│BB$л Л(128):ЛZZ'nBR│30:YS│20'9xВ IF MC-10 THEN MC=15360'BВMC│0'XММ A(45,9),B(4,12)'yЦАI│2е11:АY│1е9:Н A(I,Y):ЛY,I'НаАI│19е44:АY│1е9'ЪкН A(I,Y)'г┤ЛY,I'─╛АI│1е4:АY│1е12:Н B(I,Y):ЛY,I("╚А ZZ│0е31:З@ZZ, Л(188);:Л ZZ:А ZZ│320е351:З@ZZ, Л(179);:Л ZZ:АI│0е21:Ь(0,I,4):Ь(63,I,4):Л(}╥W$│"MULTI":C│32:L│38:Бж1080:W$│"MATH":C│16:L│136:Бж1080:W$│"DRILLER":C│64:L│227:Бж1080(Ь▄В <SHIFT><0> FOR LOWERCASE(▀цR$│ Л(128):З@417,"by"лR$л"fred"лR$л"scerbo"лR$лR$л"copyright";)ЁТ1467лMC,49:Т1468лMC,57:Т1469лMC,56:Т1470лMC,51)C·З@452,"the"лR$л"programmers"лR$лR$л"guild";)u
Т1491лMC,39:Бж1360:АI│417е480:З@I, Л(128);:ЛI)╢
З@353,"select"R$"speed"R$"from"R$"fast"R$"to"R$"slow";:Бж290)└
Бе300)х
"W$│"1 TO 9":C│112:L│422:Бж1080:Р)·
,X$│ Т:ЕX$│""з300*
6X│ К(X$):ЕX┤49з300*
@ЕX▓57з300*3
JK│ Й(X$):DL│Kн8*t
TЮ0:W$│"SELECT":C│32:L│4:Бж1080:W$│"DESIRED":C│48:L│98:Бж1080*╕
^W$│"TABLES":C│16:L│196:Бж1080:W$│"FROM":C│64:L│296:Бж1080:Бж290*═
hX$│ Т:ЕX$│""з360*ф
rX│ К(X$):ЕX┤49з360*Є
|ЕX▓57з360* 
ЖK│ Й(X$)+`
РЮ0:W$│"DO YOU":C│80:L│5:Бж1080:W$│"WANT THE":C│112:L│96:Бж1080:W$│"TABLES":L│196:C│64:Бж1080+╞
ЪW$│"ASSORTED":C│32:L│288:Бж1080:W$│"Y ":C│16:L│386:Бж1080:W$│"OR ":C│0:Бж1080:W$│"N ":C│16:Бж1080,
дЗ@Lл1, Л(190); Л(188) Л(191);:З@Lл33, Л(128) Л(188) Л(188);:Ь(54,28,4),'
оX$│ Т:ЕX$│"Y"з460,7
╕ЕX$│"N"з470,A
┬Бе430,P
╠AJ│1:Бе470,]
╓Ю0:Бж490,g
рБе500,К
ъW$│"WHAT IS":C│16:L│3:Бж1080:Р,╬
ЇА ZZ│416е447:З@ZZ, Л(188);:Л ZZ:А ZZ│480е510:З@ZZ, Л(179);:Л ZZ,▀
■Т1535лMC,179,°E│29:F│34:АG│10е24й2-АI│E е F:Ь(I,G,5):ЛI-/Ь(Eм1,Gл1,6):Ь(Fл1,Gл1,6)-B&E│Eм1:F│Fл1:ЛG-f0АI│12е26:Ь(31,I,3):Ь(32,I,3):ЛI-Ч:З@109,"times";:А TP│1е YS:NP│0:Е TR│▓BR з970-пDF│ Д(9):Е F│LN з580-└NЕ AJ│0 з E│K-╒XЕ AJ│1 з E│ Д(K).
bLN│F:I│Eл2:L│135:C│112:Бж1260:I│Fл2:L│151:Бж1260.lAN│EнF:F$│ И(AN).XvАI│1е6:G│ Д(9):H│ Д(9):H$│ И(GнH):F$│F$л"    "лH$:ЛI.iАJ$│ О(F$,32).wКЗ@448,J$;.ЭФL$│ П(J$,31):M$│ О(J$,1):J$│L$лM$.║ЮАP│1е DL:ЛP:ЕTR│▓BR з970.═иЕ Т│ Л(32)з750.ы▓В IF MC-10 DELETE LINE700/╝Е Ж(339)│254з750/╞NP│NPл1:ЕNP│150з730/"╨Бе650/Y┌З@0,BB$;:W$│"THINK":C│64:L│6:Бж1080:а1,2:а1,2:а1,2/cфБе650/ЫюTR│TRл1:З@431, Л(186) Л(181);:З@463, Л(138) Л(133);/╕°Е AN│ Й( Р(J$,15,4))з780/┬Бе840/╧З@0,BB$;0АC│16е112й32:W$│"CORRECT":L│3:Бж1080:аCл1,1:ЛC0G З@0,BB$;:I│Eл2:L│0:C│48:Бж1260:I│4:C│32:Бж1310:I│Fл2:C│48:Бж12600v*W$│" IS":C│16:Бж1080:W$│ И(AN):C│32:Бж10800Э4Бж1360:З@0,BB$;:Бж490:CR│CRл1:Л TP0з>Бе8800хHЗ@0,BB$;:W$│"WRONG":C│64:L│6:Бж1080:а20,1:а2,1:а20,1:а2,113RWR│WRл1:З@0,BB$;:W$│"TRY":C│32:L│10:Бж1080:АI│1е300:Л:З@0,BB$;:W$│"AGAIN"1p\C│96:L│6:Бж1080:АI│1е300:Л:З@0,BB$;:Бж490:Е NP▓100з NP│01zfБе6501ЛpЕTR┤▓YS з9701╖zЗ@0,BB$;:А JJ│448е479:З@JJ, Л(159);:ЛJJ1¤ДАI│28е10йм1:Ь(31,I,2):Ь(32,I,2):а230,1:ЛI:АI│1е7:Ь(30мIн2,10мI,2)2>ОЬ(33лIн2,10мI,2):а230,1:ЛI:Ь(30мIн2,11мI,2):Ь(33лIн2,11мI,2)2ЙШАI│1е12:Ь(13мI,2лIн2,2):Ь(50лI,2лIн2,2):а230,1:ЛI:АI│1е20:а Д(230),1:Л2╠вЮ0:W$│"YOU  HIT":C│32:L│2:Бж1080:W$│"PAYDIRT":C│64:L│98:Бж10803
мW$│"WITH A":C│48:L│196:Бж1080:W$│"PERFECT":C│16:L│290:Бж10803/╢W$│"SCORE":C│112:L│390:Бж10803:└Бж13603О╩Ю0:W$│"OUT OF":C│16:L│6:Бж1080:W$│ И(TR)л" TRIES":C│48:L│96:Бж1080:W$│"YOU HAD"3╦╘C│32:L│196:Бж1080:W$│ И(WR):C│64:L│307м( З(W$)н3):Бж10803Ё▐W$│"MISSES":Е WR│1 з W$│"  MISS"4шC│112:L│388:Бж10804ЄЕ Т│ Л(13)з10304&№Бе10104[З@483,"press"R$"enter"R$"for"R$"another"R$"try";4kАI│1е1000:Л4Е Т│ Л(13)з10704К$Бе10504Р.О4╕8P│ З(W$):АZ│1еP:I│ К( Р(W$,Z,1))м464╟BЕI│31з11604╓LЕI│32з11804хVЕI│41з12004Ї`ЕI│42з12205jЕI│м14з12405tБж12605~Бе12505)ИI│1:Бж131054ТБе12505CЬI│2:Бж13105NжБе12505]░I│3:Бж13105h║Бе12505w─I│4:Бж13105В╬Бе12505М╪L│Lл25ФтЛ:Р5─ьЗ@0лL, Л(A(I,1)лC) Л(A(I,2)лC) Л(A(I,3)лC);5їЎЗ@32лL, Л(A(I,4)лC) Л(A(I,5)лC) Л(A(I,6)лC);6&З@64лL, Л(A(I,7)лC) Л(A(I,8)лC) Л(A(I,9)лC);62
L│Lл4:Р6=Бе13006yЗ@0лL, Л(B(I,1)лC) Л(B(I,2)лC) Л(B(I,3)лC) Л(B(I,4)лC);6╢(З@32лL, Л(B(I,5)лC) Л(B(I,6)лC) Л(B(I,7)лC) Л(B(I,8)лC);6■2З@64лL, Л(B(I,9)лC) Л(B(I,10)лC) Л(B(I,11)лC) Л(B(I,12)лC);:L│Lл5:Р74<З@Q, Л(154);:З@Qл30, Л(145) Л(128) Л(154) Л(145);7hFЗ@Qл63, Л(153) Л(155) Л(152);:З@Qл96, Л(152);:Р7ВPАI│1е1500:TU│ Д(9999)7ЮZВ MC-10 DELETE LINE13807┤dЕ Ж(339)│254з14007┴nЕ Т│""зЛ7╟xР7ё╨Ж 135,140,139,143,128,143,132,140,1368┌Ж 129,143,128,128,143,128,132,140,1368EфЖ 142,140,139,131,140,129,140,140,1408oюЖ 140,140,139,140,140,143,140,140,1368Щ°Ж 143,133,138,140,141,142,128,132,1368├Ж 143,140,140,140,140,143,140,140,1408эЖ 143,140,140,143,140,143,140,140,1409Ж 142,140,143,128,135,136,132,136,1289A Ж 143,140,143,143,140,143,140,140,1409k*Ж 143,140,143,140,140,143,140,140,1409Х4Ж 135,140,139,143,140,143,140,128,1409┐>Ж 143,140,139,143,140,139,140,140,1369щHЖ 143,140,140,143,128,128,140,140,140:RЖ 143,140,139,143,128,143,140,140,136:=\Ж 143,140,140,143,140,140,140,140,140:gfЖ 143,140,140,143,140,140,140,128,128:СpЖ 143,140,140,143,132,143,140,140,140:╗zЖ 143,128,143,143,140,143,140,128,140:хДЖ 132,143,136,128,143,128,132,140,136;ОЖ 140,141,142,128,133,138,140,140,136;9ШЖ 143,129,142,143,141,130,140,128,140;cвЖ 143,128,128,143,128,128,140,140,140;zмЖ,,,,,,,,,,,,,,,,,;д╢Ж 143,140,143,143,128,143,140,140,140;╬└Ж 143,140,143,143,140,140,140,128,128;°╩Ж 143,140,143,143,129,143,140,140,142<"╘Ж 143,140,143,143,141,130,140,128,140<L▐Ж 143,140,140,140,140,143,140,140,140<vшЖ 140,143,140,128,143,128,128,140,128<аЄЖ 143,128,143,143,128,143,140,140,140<╩№Ж 139,128,135,141,131,142,128,140,128<с	Ж,,,,,,,,,,,,,,,,,=	Ж 139,128,135,132,143,136,128,140,128=5	Ж 140,140,143,131,140,128,140,140,140=k	$Ж 143,130,129,143,143,132,136,143,140,128,128,140=б	.Ж 143,139,128,143,143,132,139,143,140,128,132,140=╫	8Ж 143,128,128,143,143,134,137,143,132,136,132,136>
	BЖ 141,130,129,142,129,134,137,130,140,128,128,140Z$│ Л(10) з 2160 :Д 2060>:pS│и S ░ 1 ▒ 0>Lz╚4,1:┐ 1,S:╚3>XДБе 2110>wм:Г************************>╜╢Е NU│1 з Е C$│S$(R) з SC│SCл10:а 130,3:а 190,3 :Д SC│SCм10:а 10,5?└Е NU┤▓1 з Е C$│P$(R) з SC│SCл20:а 130,3:а 190,3 :Д SC│SCм20:а                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ,&
Ю0&Бе 2000&qЕ  Ж(&H3EB9)┤▓ &H32 з Х 700,&H3EB0:А I│&H82B9 е &H831E:Т Iм&H4400, Ж(I):Л :Д Х 700:Бе 70&Ш(А I│0 е 2:Т &H3EBDлI,18:Л:I│&H3F1E&┘2Т I,&H26:Т Iл1,3:Т Iл2,&H7E:Т Iл3,&H83:Т Iл4,&H22:Т Iл5,&H7E&є<Т Iл6,&HA4:Т Iл7,&H4C'FТ &H19B,&H3E'PR│ Д(м Я)'ZМ EA(14)'+dБе 1170'AnA│ннннннннннннннн'ZxA│ Б(Aн1000л.5)о1000'fВБе 1120'йМЮ3:А X│33 е 449 й 32:З@X, б(30," ");:Л X:З@66,"THE NUMBER IS";'┐ЦЗ@418, б(26,191);'╒аЗ@290, б(26,191);(
кА X│322 е 386 й 32:З@X, Л(191);:З@Xл25, Л(191);:Л X(&┤ST│ Ж(25)н256л Ж(26)(=╛Е  Ж(ST)│173 з 220(I╚ST│STл1(T╥Бе 190(c▄А X│1 е 14(oцEA(X)│0(wЁЛ X(Б·E$│""(П
А X│1 е N(п
R│ Д(9):E$│E$л Р( И(R),2,1)(┴
EA(R)│EA(R)л1(╤
"Е X│N з 330)
,Е EA(12)│0 ░ (L5│4 ▒ L5│6) ░  Д(3)│1 з E$│E$л"*":EA(12)│EA(12)л1:Бе 330)i
6Е EA(13)│0 ░ (L5│5 ▒ L5│6) ░  Д(3)│1 з E$│E$л"/":EA(13)│EA(13)л1:Бе 330)░
@Е  Д(2)│1 з E$│E$л"+":EA(10)│EA(10)л1 :Д E$│E$л"-":EA(11)│EA(11)л1)╕
JЛ X)╪
TЕ EA(10)│0 ▒ EA(11)│0 з 220)Ї
^Е L5│4 ░ EA(12)│0 з 220*
hЕ L5│5 ░ EA(13)│0 з 220*9
rЕ L5│6 ░ (EA(12)│0 ▒ EA(13)│0) з 220*S
|CE$│E$:A$│E$:L│ З(E$)*^
ЖБж 970*l
РE│A:A$│""*Е
ЪЗ@80,"            ";*С
дЗ@80,E;*е
оА X│27 е 4 й м1*╜
╕Ь(58,X,5):Ь(59,X,5)*┼
┬Л X*═
╠T│4*╓
╓ Я│0+
рA$│"":З@200, б( З(E$),".");"      ";:P│200+K
ъЗ@323,"";:А X│1 е 9:Е EA(X)│0 з Л X :Д А Y│1 е EA(X):З X;:Л Y:Л X+И
ЇЗ@355,"";:Е EA(10)│0 з 510 :Д А X│1 е EA(10):З" + ";:Л X+╗
■Е EA(11)│0 з 520 :Д А X│1 е EA(11):З" - ";:Л X+юЕ EA(12)│0 з 530 :Д А X│1 е EA(12):З" * ";:Л X,!Е EA(13)│0 з 540 :Д А X│1 е EA(13):З" / ";:Л X,@З@390,"USE THESE SYMBOLS";,J&I$│ Т,}0Е  Я▓Nн25 з Э(58,T):Э(59,T): Я│0:T│Tл1:а 200,1,О:Е T│28 з 800,аDЕ I$│"" з 550,│NЕ I$│"Q" з Ю:К,╟XЕ I$│"H" з 1380,▌bЕ I$│ Л(13) з 690,єlЕ I$│ Л(12) з 480-vЕ I$│" " з 550-NАА W│1348 е 1369 й 3:Е  Ж(W)│ К(I$)л64 з Т W,96:З@P,I$;:P│Pл1:Бе 550-VКЛ W-ЮФА W│1380 е 1398 й 3:Е  Ж(W)│ К(I$)л64 з Т W,96:З@P,I$;:P│Pл1:Бе 550-жЮЛ W-▒иБе 550.1▓А X│200 е 200л З(E$)м1:Е  Ж(1024лX)│110 з З@451,"YOU MUST USE ALL SYMBOLS";:а 1,20:З@451,"                        ";:Бе 480.M╝A$│A$л Л( Ж(1024лX)м64).U╞Л X.b╨L│ З(A$).m┌Бж 970.uфS│A.ЕюЗ@P," =";S;.┬°Е E┤▓S з NW│0:З@164,"INCORRECT EQUATION!";:а 1,15:Бе 810.чNW│NWл1:Е NW│3 з N│Nл1:NW│0:WF│1.ўЕ N▓8 з N│8/4З@164,"YOU GOT IT RIGHT!";:╔"T2O2L4ABGO1L4GO2L2D":Бе 810/] З@164,"YOU RAN OUT OF TIME!";:а 1,15/t*А X│323 е 387 й 32/И4З@X, б(24," ");/Р>Л X/┤HЗ@324,"COMPUTER'S EQUATION IS";/├RЗ@362,CE$;/╪\А X│1 е 2500:Л X/·fЗ@164,"                    ";0$pАX│323 е 387 й 32:З@X, б(24," ");:Л X0;zЕ WF│0 ▒ N│8 з 9600\ДЗ@324,"LET'S MAKE THE GAME";0~ОЗ@356,"A LITTLE HARDER, OK?";0ЯШ╔"T4O1L8FFFL1DP2L8EEEL1C#P1"0─вЗ@324,"                       ";0цмЗ@356,"                    ";0я╢WF│00·└Бе 1801╩А X│1 е L1╘A│ К( Р(A$,X,1))18▐Е A┤58 ░ A▓47 з Т ST,A1NшЕ A│43 з Т ST,1711dЄЕ A│45 з Т ST,1721z№Е A│42 з Т ST,1731РЕ A│47 з Т ST,1741ЬST│STл11дЛ X1╢$Е L│15 з 11101╟.А X│1 е 15мL1╙8Т ST,321▀BST│STл11чLЛ X1ЄVБе 1101 `ST│STм152jА X│0 е 142tТ STлX,1732%~Л X2+ИР2?ТА X│1 е 19:Н D$2RЬА Y│1 е 19 й 22lжA│ Й("&H"л Р(D$,Y,2))2Б░A1$│A1$л Л(Aм16)2Л║Л Y,X2Я─А X│1 е 19:Н D$2▓╬А Y│1 е 19 й 22╠╪A│ Й("&H"л Р(D$,Y,2))2стB1$│B1$л Л(Aм16)2ыьЛ Y,X2ЄЎЮ73╔"O3T2L8CDEFGDEFECP4"3Y
З@33,A1$;:╔"T255CDEFGABBBT4P4P4":З@257,B1$;:╔"T255CDEFGABBBT4P4P4":L│4863wR$│" BY RICH DERSHEIMER "3ЫА X│1 е  З(R$):N│ К( Р(R$,X,1))3╢(Е N▓64 ░ N┤91 з N│Nм643╥2Т 1509лX,N:╔"T255O1CCC"3┌<Л X4+FА X│1 е 2000:Л X:Ю:З:З" DO YOU WANT INSTRUCTIONS?":З:З"   PRESS Y OR N": Я│04FPQ$│ Т:Е  Я▓1200 з 12704АZЕ Q$│"" з 1360 :Д Е Q$│"N" з 1530 :Д Е Q$┤▓"Y" з 13605$dЮ:З:Зд12);"M A T H":Зд12);"G A M E":З:З"    IN 'MATHGAME' THE COMPUTER   WILL PICK A NUMBER, AND IT IS   YOUR JOB TO BUILD AN EQUATION   TO MATCH THAT NUMBER."5иnЗ:З" IF THE  COMPUTER  PICKED 4 AS   IT'S NUMBER, THEN 1+1+2 WOULD   BE A LEGAL EQUATION.":З@452,"(PRESS 'C' TO CONTINUE)": Я│05├xQ$│ Т:Е  Я▓2400 з 12705╪ВЕ Q$┤▓"C" з 14006┬МЮ:З:З" BUT  YOU WON'T BE ABLE TO USE   JUST  ANY NUMBERS OR SYMBOLS.   THE COMPUTER  WILL PICK WHICH   NUMBERS AND SYMBOLS  YOU WILL   BE ABLE  TO USE.  EACH NUMBER   AND OPERATOR  (+ - * /)  THAT   YOU MAY  USE WILL BE INSIDE A"7gЦЗ" RED BOX. EACH ONE CAN BE USED   ONLY ONCE. TO USE A NUMBER OR   SYMBOL, PRESS IT'S KEY ON THE   KEYBOARD, AND IT WILL GO FROM   THE RED BOX TO THE EQUATION."7РаЗ@452,"(PRESS 'C' TO CONTINUE)": Я│07лкQ$│ Т:Е  Я▓2400 з 12707└┤Е Q$┤▓"C" з 14508к╛Ю:З:З" IF YOU WANT TO START  OVER ON   THE EQUATION, PRESS THE clear   KEY. IF YOU ARE DONE WITH THE   EQUATION, PRESS THE enter KEY   TO SEE IF YOU GOT IT CORRECT.   YOU WILL BE PLAYING  MATHGAME   AGAINST THE CLOCK,  AND  WITH"9'╚З" PROBLEMS  THAT  GET HARDER AS   THE  GAME  GOES  ON.  YOU MAY   PRESS THE 'H' KEY FOR HELP OR   THE 'Q' KEY TO QUIT."9P╥З@452,"(PRESS 'C' TO CONTINUE)": Я│09k▄Q$│ Т:Е  Я▓2400 з 12709АцЕ Q$┤▓"C" з 15009ЙЁNW│09 ·Ю:З:З"  PICK YOUR STARTING LEVEL":З:З"    ADDITION/SUBTRACTION":З" 1) EASY":З" 2) MEDIUM":З" 3) GETTING HARDER":З:]З"    MULTIPLICATION/DIVISION":З" 4) NOT SO BAD":З" 5) THESE ARE TOUGH":З" 6) FORGET IT!":ДЗ@452,"(PRESS 1-6 FOR LEVEL)": Я│0:ЯQ$│ Т:Е  Я▓2900 з 1270:▓"Е Q$│"" з 1560:╧,Е Q$┤"1" ▒ Q$▓"6" з 1560:с6N│ Й(Q$):L5│N;@Е N┤4 з N│Nн2л1 :Д Е N┤6 з N│4 :Д N│5;JЮ3:Бе 140;4TЖ AFF5FFFFFFAFF5FFFFFF;O^Ж AFAFF5FFFFFFACACACAF;jhЖ ACACF5FFAFF5FFFFAFF5;ЕrЖ FFFFAFAFF5FFAFAFF5FF;а|Ж FFAFF1F3AFF5FFFFFFFF;╗ЖЖ FFAFF5FFFFFFAFF5FFFF;╓РЖ AFF5FFFFAFF1AFAFF1AF;ёЪЖ F5FFAFF1F7FFF3AFF5FF<дЖ FFFFFFAFF5FFFFFFAFF5<'оЖ FFFFAFF5FFFFAFF5F3F3<B╕Ж F7AFF5FFAFACACACACAF<]┬Ж F5FFFFFFFFAFF5FFFFFF<x╠Ж AFACACACAFF5FFFFAFF5<У╓Ж FFFFFFAFF5FFAFF5FFFF<орЖ FFAFF5FFFFFFFFAFF5FF<╔ъЖ FFFFAFF5FFFFAFF5FFFF<фЇЖ ACF5FFFFFFACF5FFACF5< ■Ж FFFFFFACF5FFFFFFFFAC=Ж F5FFFFFFACF5FFFFACF5=5Ж AFACACACACACF5FFFFFF=PЖ AFAFF5FFFFFFAFF5FFFF=k&Ж FFAFF5FFAFACACACACF5=Ж0Ж FFFFAFF5FFFFFFFFFFFF=б:Ж FFAFF1F3AFF5FFFFAFAF=╝DЖ F5FFAFAFF5FFAFF5FFFF=╫NЖ FFFFFFFFAFF5FFFFFFFF=ЄXЖ FFFFAFF1F7FFF3AFF5FF>
bЖ AFF1AFAFF1AFF5FFAFAC>(lЖ ACACF5FFFFFFAFF5FFAC>CvЖ ACAFF5FFAFACACACACAF>^АЖ F5FFAFF5F3F3F7AFF5FF>yКЖ AFF5FFFFFFFFFFFFAFF5>ФФЖ FFFFFFAFF5FFAFF5FFFF>пЮЖ FFAFF5FFAFF5FFFFFFAF>╩иЖ F5FFAFF5FFFFFFFFFFFF>х▓Ж ACACACACACACF5FFACF5?╝Ж FFFFFFACF5FFACF5FFFF?╞Ж FFACF5FFACACACACACF5?+╨╚0:└1:Бе 30 ACAFF5FFAFACACACACAF>^АЖ F5FFAFF5F3F3F7AFF5FF>yКЖ AFF5FFFFFFFFFFFFAFF5>ФФЖ FFFFFFAFF5FFAFF5FFFF>пЮЖ FFAFF5FFAFF5FFFFFFAF>╩иЖ F5FFAFF5FFFFFFFFFFFF>х▓Ж ACACACACACACF5FFACF5?╝Ж FFFFFFACF5FFACF5FFF                                                                                                                                                                                                                                                                 
▌&

В"BIRD"&=В  <C> STEVE BLYN,COMPUTER ISLAND,N.Y. 1983&GХ1000&~(TM│ Д(м Я):В"THIS GETS A TRUE RANDOM FOR THE COCO"&К2A│ Д(5)&┌<В"RANDOMLY CHOOSE THE BIRD'S POSITION EACH TIME AND LOCATE THE COORDINATES"&ёFЕ A│2 з X│м8:Y│135'PЕ A│1 з X│30:Y│100'"ZЕ A│3 з X│Xл15:Y│Yм10'<dЕ A│4 з X│Xл60:Y│Yл30'XnЕ A│5 з X│Xл205:Y│Yл115'ГxБе 660:В"READ THE NUMBERS AND LETTERS"'ХВ╚ 3,1:╝5:┐1,1'ЬМ┴2'▒Ц┬(55,60),45,2,.6'╞а┬(55,60),46,2,.6'█к┬(55,60),47,2,.6'ь┤├(60,60),2,2(╛┬(7,120),40,2,2,.93,.10(%╚┬(99,120),40,2,2,.41,.59(>╥╗(36,163)м(68,163),╜(P▄├(55,160),2,2(hцВ"DRAWING THE BIRD"(Ё┴3:┬(10лX,160мY),5(У·┬(18лX,165мY),8(й
├(18лX,165мY),3,3(╩
╗(24лX,160мY)м(36лX,157мY),╜(▀
╗м(20лX,169мY),╜(Ї
"╗м(20лX,176мY),╜)
,┬(20лX,176мY),2)3
6АT│1 е5:╔"O5L200BCB;L250;G-;L100;C":ЛT)L
@╗(5,1)м(250,20),╜,BF)q
J╞ "C1A0S4BM20,16"лW$лH$лE$лR$лE$)Б
T╞ SP$лI$лS$)Ф
^╞ SP$лT$лH$лE$)▓
h╞ SP$лB$лI$лR$лD$лSP$лQQ$)я
rВ"PRINT THE WORDS**IN,OVER,UNDER,NEAR,FAR FROM THE TREE"*
|╞"C4BM130,40"лA1$лSP$лI$лN$*3
Ж╞"BM130,60"лA2$лSP$лO$лV$лE$лR$*Z
Р╞"BM130,80"лA3$лSP$лU$лN$лD$лE$лR$*
Ъ╞"BM130,100"лA4$лSP$лN$лE$лA$лR$*▒
д╞"BM120,120"лA5$лSP$лF$лA$лR$лSP$лF$лR$лO$лM$*╠
о╗(135,130)м(240,130),╜*ю
╕┴ 3:╗(106,163)м(125,147),╜,BF+
┬╞"BM145,140"лT$лH$лE$лSP$лT$лR$лE$лE$+#
╠JJ$│ Т+9
╓А T│ 1 е 200: Л T+Z
р┴2:╗(106,163)м(125,147),╜,BF+m
ъЕ JJ$│"" з 460+Е
ЇЕ JJ$│"1" з KK$│A1$+Э
■Е JJ$│"2" з KK$│A2$+╡Е JJ$│"3" з KK$│A3$+═Е JJ$│"4" з KK$│A4$+хЕ JJ$│"5" з KK$│A5$,&В"DRAW CHILD'S RESPONSE #",0╞ "C0BM112,159"лKK$,+:JJ│ Й(JJ$),CDЕ JJ┤1 ▒ JJ▓5 з 460,╚NЕ JJ$│"1" ░ A│1 з 600 :Д Е JJ$│"2" ░ A│2 з 600 :Д Е JJ$│"3" ░ A│3 з 600 :Д Е JJ$│"4" ░ A│4 з 600 :Д Е JJ$│"5" ░ A│5 з 600 :Д 620,ыXА T│1 е 5:╔"O4;L250;GEFBAG":ЛT,ёbО-lВ"WRONG RESPONSE ROUTINE"-$vА T│1е3:а10,4:ЛT-bА╞"C3A0S4BM140,170"лL$лO$лO$лK$лSP$:╞ A$лG$лA$лI$лN$:Бе460-ЫКВ"THE DIRECTIONS TO DRAW LETTERS AND NUMBERS NEEDED"-╡ФA$│"U8R8D4L8BR8D4BR4"-╓ЮB$│"U8R6F2D2L8BR8D2G2L6BR12"-ЁиD$│"U8R6F2D4G2L6BR12".▓E$│"U8R8BD4L8BD4R8BR4".%╝F$│"U8R8BD4L8BD4BR12".C╞G$│"U8R8BD4L4BR4D4L8BR12".`╨H$│"U8BR8D8BU4L8BD4BR12".|┌I$│"BU8R8BL4D8BL4R8BR4".ЧфK$│"U8BR8G4L4BR4F4BR4".люL$│"U8BD8R8BR4".└°M$│"U8F4E4D8BR4".╓N$│"U8F8U8BD8BR4".ьO$│"U8R8D8L8BR12"/P$│"U8R8D4L8BD4BR12"/ R$│"U8R8D4L8BR4F4BR4"/@*S$│"BU4U4R8BD4L8BR8D4L8BR12"/W4T$│"BU8R8BL4D8BR8"/n>U$│"U8BR8D8L8BR12"/ЙHV$│"BU8D4F4E4U4BD8BR4"/вRW$│"U8BR8D8H4G4BR12"/о\E0$│EO$/╦fQQ$│"BR1H1U1E1R3E2U1H2L5/шpA1$│"BR2R4L2U8G2BD6BR10"0zA2$│"BR1H1U1E1R5E2U1H2L4G2BD6BR1R7BR4"0?ДA3$│"BR1HBU6E1R6F1D2G1L4R4F1D2G1L6BR11"0bОA4$│"BU4U4BR4BD1D3R4L8R4D4BR8"0ЫШA5$│"BR1H1BU2U4E1R6F1BD2BL1L6G1BD4BR1R6E1U3H1BD5BR5"0╡вSP$│"BR12":В "SPACER"0╤мAQ$│"BENR3HER2U2":В "?"0▄╢Бе 1302BD6BR10"0zA2$│"BR1H1U1E1R5E2                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Е&':ГCOPYRIGHT (C) T&D SOFTWARE 1983&
Ж ALABAMA,AL,MONTGOMERY,ALASKA,AK,JUNEAU,ARIZONA,AZ,PHOENIX,ARKANSAS,AR,LITTLE ROCK&ЄЖ CALIFORNIA,CA,SACRAMENTO,COLORADO,CO,DENVER,CONNECTICUT,CT,HARTFORD,DELAWARE,DE,DOVER,FLORIDA,FL,TALLAHASSEE'pЖ GEORGIA,GA,ATLANTA,HAWAII,HI,HONOLULU,IDAHO,ID,BOISE,ILLINOIS,IL,SPRINGFIELD,INDIANA,IN,INDIANAPOLIS,IOWA,IA,DES MOINES'▌(Ж KANSAS,KS,TOPEKA,KENTUCKY,KY,FRANKFORT,LOUISIANA,LA,BATON ROUGE,MAINE,ME,AUGUSTA,MARYLAND,MD,ANNAPOLIS(W2Ж MASSACHUSETTS,MA,BOSTON,MICHIGAN,MI,LANSING,MINNESOTA,MN,ST. PAUL,MISSISSIPPI,MS,JACKSON,MISSOURI,MO,JEFFERSON CITY(╚<Ж MONTANA,MT,HELENA,NEBRASKA,NE,LINCOLN,NEVADA,NV,CARSON CITY,NEW HAMPSHIRE,NH,CONCORD,NEW JERSEY,NJ,TRENTON)<FЖ NEW MEXICO,NM,SANTA FE,NEW YORK,NY,ALBANY,NORTH CAROLINA,NC,RALEIGH,NORTH DAKOTA,ND,BISMARCK,OHIO,OH,COLUMBUS)ЗPЖ OKLAHOMA,OK,OKLAHOMA CITY,OREGON,OR,SALEM,PENNSYLVANIA,PA,HARRISBURG)ёZЖ RHODE ISLAND,RI,PROVIDENCE,SOUTH CAROLINA,SC,COLUMBIA,SOUTH DAKOTA,SD,PIERRE,TENNESSEE,TN,NASHVILLE*_dЖ TEXAS,TX,AUSTIN,UTAH,UT,SALT LAKE CITY,VERMONT,VT,MONTPELIER,VIRGINIA,VA,RICHMOND,WASHINGTON,WA,OLYMPIA*кnЖ WEST VIRGINIA,WV,CHARLESTON,WISCONSIN,WI,MADISON,WYOMING,WY,CHEYENNE*░xЮ+\ВЗ@67,"*************************":З@99,"*    STATES-CAPITALS    *":З@131,"*    ===============    *":З@163,"*    BY J.A.WOODWARD    *":З@195,"*************************"+АМЗ:З"     PRESS <ENTER> TO PLAY"+ШаT$│ Т:Е T$│"" з 160+нкЕT$┤▓ Л(13) з160+╧┤М A(50),B(50),AN$(50),RA$(50)+ъ╥М A$(50),C$(50),S$(50),q▄З:З"  THIS PROGRAM IS DESIGNED TO     HELP YOU LEARN THE STATES OF    THE U.S.A., THEIR ABBREVI-      ATIONS, AND THEIR CAPITALS.",АцА P│1 е 50,ШЁН S$(P),A$(P),C$(P),Я·ЛP,к
Бж1120,░
Ю,╢
Ю,№
"З"CHOOSE A  CATEGORY  BY PRESSING THE NUMBER IN THE PARENTHESES."-2
,З"(1)   NAME THE STATE, GIVEN ITS  ABBREVIATION."-c
6З"(2)   NAME THE STATE, GIVEN ITS  CAPITAL."-У
@З"(3)   NAME THE CAPITAL, GIVEN THE STATE."-╥
JЗ"(4)   NAME THE CAPITAL, GIVEN THE STATE'S ABBREVIATION.".
TЗ"(5)   WRITE THE ABBREVIATION  OF THE STATE, GIVEN THE STATE.".g
^З"(6)   WRITE THE ABBREVIATION OF  THE STATE, GIVEN THE STATE'S    CAPITAL.".q
hG$│ Т.~
rG│ Й(G$).Ф
|Е G▓6 ▒ G┤1 з 360.а
ЖR│0:W│0.ж
РЮ.╡
ЪА Q│1 е 50.╗
дЮ.█
оЗ@2,R;" RIGHT  ";W;" WRONG".ц
╕Z│B(Q)/
┬И G Бж 930,960,990,1020,1060,1090/
╠З@64," ";Z$;F$/,
╓З@96,F1$/6
рБж710/>
ъЛ Q/_
ЇЗ@2,R;" RIGHT   ";W;" WRONG"/Э
■Ю:З@98," WOULD YOU LIKE TO SEE YOUR     MISTAKES ? <Y,N>"/┤X$│ Т:ЕX$│"" з 520/┼ЕX$│"N" з640/╫ЕX$┤▓"Y" з5200#&ЕW│0 з З@97,"YOU DID NOT MAKE ANY MISTAKES!!         VERY GOOD!!" :Д580050АE│1 е1111:ЛE0?:Бе6400MDА P│1 е W0вNЗ@32," YOUR ANSWER WAS ";AN$(P):З@97,"AND THE CORRECT ANSWER IS         ";RA$(P)0▐XЗ@321,"PRESS THE ENTER KEY FOR YOUR       NEXT MISTAKE"0ЇbW$│ Т:ЕW$│""з 6101lЕ W$┤▓ Л(13) з 6101vЛP1АЮ1fКЗ@384, "THE TEST IS FINISHED. WOULD YOU LIKE TO HAVE ANOTHER TEST? <Y,N>"1~ФO$│ Т:Е O$│"" з 6601СЮЕ O$│"Y" з 2601биЮ:З:З:З:З:З1ї▓ЕO$│"N" з З" I HOPE YOU STILL LIKE ME! LET'S PLAY AGAIN SOMETIME, O.K.?" :Д 6501√╝К27╞З@288,"PRINT YOUR ANSWER AND THEN PRESS          ENTER"2A╨Й AN$2K┌Бж7502QфР2jюLR│ З(R$):LA│ З(AN$)2}°Е LA┤▓LR з 8302РЕ R$┤▓AN$ з8302ЪR│Rл12░З@288," RIGHT!!!"2╬ З@320,"                 "2¤*╔"T6O3L4CFAL4.O4CL8.O3AL1O4C":АV│1 е 233:Л34Бе9103>W│Wл13*HА L│40 е 1 йм1:а L,13dRЗ@288,"       WRONG":З@288,"                   WRONG"3В\З@320,"                 "3КfЛ L3┼pЗ@288, "      THE RIGHT ANSWER IS ";"             ";R$3╪zА T│1 е 1300:Л3ёДRA$(W)│R$:AN$(W)│AN$3ўОР4ШАQ│1 е 504вZ$│A$(Z):R$│S$(Z)4XмF$│" IS THE ABBREVIATION OF WHAT STATE ?":F1$│" STATE ?"4^╢Р4t└Z$│C$(Z):R$│S$(Z)4е╩F$│" IS THE CAPITAL ":F1$│" OF WHAT STATE ?"4л╘Р4┴▐Z$│S$(Z):R$│C$(Z)4сшF$│"'S CAPITOL IS ?":F1$│""4чЄР4¤№Z$│A$(Z):R$│C$(Z)5BF$│" IS THE ABBREVIATION OF":F1$│" THE STATE WHOSE CAPITAL IS ?"5HР5iN G Бж 930,960,990,1020,10905$Z$│S$(Z):R$│A$(Z)5д.F$│"'S ABBREVIATION":F1$│" IS ?"5к8Р5└BZ$│C$(Z):R$│A$(Z)6LF$│" IS THE CAPITOL ":F1$│" OF THE STATE WHOSE ABBREVIATION IS ?"6VР6$`А N│1 е 50:A(N)│N:Л67jА I│50 е 1 йм16PtЗ@490,"           ";6\~X│ Д(I)6mИB(51мI)│A(X)6~ТЕ X│I з 12206ОЬА P│X е Iм16зжЗ@490,"PLEASE WAIT";6╖░A(P)│A(Pл1)6╛║ЛP6┼─ЛI6╦╬РX е Iм16зжЗ@490,"PLEASE WAIT";6╖░A(P)│A(Pл1)6╛║ЛP6┼─ЛI6╦╬Р