8BR4"'!NL$(6)│"U8R8BD4L8BD4BR12"'CXL$(7)│ "U8R8BD4L4BR4D4L8BR12"'cbL$(8)│"U8BR8D8BU4L8BD4BR12"'ВlL$(9)│"BU8R8BL4D8BL4R8BR4"'аvL$(10)│"U4BU4BR8D8L8BR12"'┐АL$(11)│"U8BR8G4L4BR4F4BR4"'╫КL$(12)│"U8BD8R8BR4"'ЁФL$(13)│"U8F4E4D8BR4"(
ЮL$(14)│"U8F8U8BD8BR4"($иL$(15)│"U8R8D8L8BR12"(A▓L$(16)│"U8R8D4L8BD4BR12"(_╝L$(17)│"U8R8D8H4BG4R8BR4"(}╞L$(18)│"U8R8D4L8BR4F4BR4"(в╨L$(19)│"BU4U4R8BD4L8BR8D4L8BR12"(╜┌L$(20)│"BU8R8BL4D8BR8"(╪фL$(21)│"U8BR8D8L8BR12"(ўюL$(22)│"BU8D4F4E4U4BD8BR4")°L$(23)│"U8BR8D8H4G4BR12"),L$(24)│"E8BL8F8BR4")IL$(25)│"BU8F4E4BG4D4BR8")cL$(26)│"BU8R8G8R8BR4")u L$(27)│"BR12"){*Р)о4И XX Бж 840,860,880,900,920,940,960,980,1000:Р)╗>:ГSHAPES*H╗(A,B)м(Aл20,Bл30),╜:╗м(A,Bл30),╜:╗м(A,B),╜:├(Aл2,Bл6),4,4::ГRT TRIANGLE*RР*b\╗(A,B)м(Aл30,Bл15),╜:╗м(A,Bл30),╜:╗м(A,B),╜:├(Aл2,Bл4),4,4::Г ISOCELES TRIANGLE*hfР*╟p╗(A,B)м(Aл20,B),╜:╗м(Aл30,Bл15),╜:╗м(Aл10,Bл15),╜:╗м(A,B),╜:├(Aл4,Bл4),4,4::ГPARALLELOGRAM*═zР*щД╗(A,B)м(Aл25,Bл25),╜,BF*яОР+Ш╗(A,B)м(Aл30,Bл15),╜,BF::Г RECTANGLE+вР+qм╗(Aл10,B)м(Aл20,B),╜:╗м(Aл30,Bл15),╜:╗м(A,Bл15),╜:╗м(Aл10,B),╜:├(Aл14,Bл2),4,4+w╢Р+х└╗(Aл10,B)м(Aл25,B),╜:╗м(Aл30,Bл15),╜:╗м(Aл17,Bл23),╜:╗м(A,Bл15),╜:╗м(Aл10,B),╜:├(Aл14,Bл2),4,4::ГPENTAGON+ы╩Р,j╘╗(Aл15,B)м(Aл25,B),╜:╗м(Aл35,Bл15),╜:╗м(Aл25,Bл30),╜:╗м(Aл15,Bл30),╜:╗м(Aл5,Bл15),╜:╗м(Aл15,B),╜:├(Aл18,Bл2),4,4::ГHEXAGON,p▐Р-ш╗(Aл15,B)м(Aл30,B),╜:╗м(Aл40,Bл10),╜:╗м(Aл40,Bл25),╜:╗м(Aл30,Bл35),╜:╗м(Aл15,Bл35),╜:╗м(Aл5,Bл25),╜:╗м(Aл5,Bл10),╜:╗м(Aл15,B),╜:├(Aл18,Bл2),4,4-
ЄР-^№Е P│4 з З" UP"; :Д Е P│2 з З" RIGHT"; :Д Е P│3 з З" DOWN"; :Д Е P│1 з З" LEFT";-ФЗ" ARROW":а30,5::АT│1е700:ЛT:┐1,1:АT│1е900:ЛT:Ю:РюSA$│SA$лX$:ЗX$;:Бе 725.	єЗ@384,"USE ONLY THESE LETTERS":ЗC1$:╔"O4T64L64BAGFEDC":З"PRESS space bar TO                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  Х9
В JAMES W. WOOD, 424 N. MISSOURI, ATWOOD, IL, 61913N└4:Х255:М L$(27)fЮ:З@200,"GEOSHAPES"v(АT│1е300:ЛT2З:З"YOU ARE TO IDENTIFY VARIOUS":З"GEOMETRIC SHAPES. USE THE ARROW":З"KEYS TO POINT TO THE SIDE OF":З"THE SCREEN WHICH CONTAINS THE":З"NAMED SHAPED."2<З:З"RIGHT TRIANGLE--3 SIDES,"ZFЗ"                   1 RT. ANGLE":ЗВPЗ"ISOCELES TRIANGLE--2 SIDES EQUAL"├ZЗ"PARALLELOGRAM--OPPOSITE SIDES":З"                PARALLEL"шdЙ"PRESS (ENTER) TO CONTINUE";JW$ nЮ:З"SQUARE--4 EQUAL SIDES," )xЗ"          4 RIGHT ANGLES." rВЗ:З"RECTANGLE-- 4 RIGHT ANGLES":З"          OPPOSITE SIDES EQUAL.":З НМЗ"TRAPEZOID--4 SIDES," ░ЦЗ"          ONE SET PARALLEL," ╙аЗ"           OTHER TWO EQUAL." юкЗ"PENTAGON---5 SIDES."!┤З"HEXAGON---6 SIDES."!"╛З"OCTAGON---8 SIDES."!Y╚З:З" YOU WILL BE ASKED EACH SHAPE":З"ONLY ONCE!!!"!А╥З:Й"PRESS (ENTER) TO CONTINUE";JW$!З▄Ю0!▒цU$│ Л(94):D$│ Л(10):R$│ Л(9):L$│ Л(8)!╗ЁБж530!╘·А A│1 е 9:Н D$(A):ЛA"=
Ж RIGHT TRIANGLE,ISOCELES TRIANGLE,PARALLELOGRAM,SQUARE,RECTANGLE,TRAPEZOID,PENTAGON,HEXAGON,OCTAGAN"H
╚3,1:╝"T
R│ Д(9)"p
"ЕZ(R)│1 з 280 :Д Z(R)│1"|
,P│ Д(4)"П
6АA│1е З(D$(R))"╫
@Е  К( Р(D$(R),A,1))│32 з ST$│L$(27) :Д ST$│L$( К( Р(D$(R),A,1))м64)"ё
JPO│55л10нA:PO$│ И(PO)#
T╞"S3BM"лPO$л",130"лST$#
^ЛA#)
hЕ P│4 з A│120:B│0#@
rЕ P│2 з A│200:B│80#X
|Е P│3 з A│120:B│140#m
ЖЕ P│1 з A│0:B│80#|
РXX│R:Бж820#╬
ЪRA│ Д(9):RB│ Д(9):RC│ Д(9):Е RA│R ▒ RB│R ▒ RC│R ▒ RA│RB ▒ RA│RC ▒ RB│RC з 410$#
дЕP│4 з A│200:B│80:XX│RA:Бж820:A│120:B│140:XX│RB:Бж820:A│0:B│80:XX│RC:Бж820:Бе460$x
оЕ P│2 з A│120:B│0:XX│RA:Бж820:A│120:B│140:XX│RB:Бж820:A│0:B│80:XX│RC:Бж820:Бе460$╠
╕Е P│3 з A│120:B│0:XX│RA:Бж820:A│200:B│80:XX│RB:Бж820:A│0:B│80:XX│RC:Бж820:Бе460%
┬Е P│1 з A│120:B│0:XX│RA:Бж820:A│200:B│80:XX│RB:Бж820:A│120:B│140:XX│RC:Бж820%-
╠┐1,0:IN$│ Т%B
╓A$│ Т:ЕA$│""з470%Н
рЕ P│4 ░ A$│U$ ▒ P│2 ░ A$│R$ ▒ P│3 ░ A$│D$ ▒ P│1 ░ A$│L$ з NC│NCл1:FL│1%▄
ъЮ:Е FL│1 зЗ@200,"CORRECT":Д З@192,"WRONG, SHOULD HAVE PRESSED THE":Бж 1020&J
ЇFL│0:NQ│NQл1:З:Й" PRESS ENTER TO CONTINUE";E$:Ю:Е NQ│9 з Ю:З:З"YOU GOT";NC;"OUT OF 9 CORRECT":К :Д Бе 270&T
■Бе510&ZС&n:ГCHARACTER SET&ЛL$(1)│"U8R8D4L8BR8D4BR4"&п&L$(2)│"U8R6F2D2L8BR8D2G2L6BR12"&╔0L$(3)│"U8R8BD8L8BR12"&ц:L$(4)│"U8R6F2D4G2L6BR12"'DL$(5)│"U8R8BD4L8BD4R                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                lЗ@419,"press" Л(128)"enter" Л(128)"to" Л(128)"play" Л(128)"again";'ИvЗ@451,"press" Л(128)"break" Л(128)"to" Л(128)"stop" Л(128)"play";'ЯАЕ  Т┤▓ Л(13) з7040'еКО'╗@:Гsub for heading'╒JТ359,60::Гscreen poke'▐T┐0,1'ф^Ю(hЗ@39,"TYPING PRACTICE";(цrЗ@129,"YOU WILL BE GIVEN NINE LETTERS  ALONG THE BOTTOM OF THE SCREEN. AS YOU TYPE THESE LETTERS THEY  WILL BE BLANKED AND ONE POINT   SCORED.  ANY LETTERS YOU DON'T  TYPE BEFORE TIME EXPIRES WILL   CAUSE THE PYRAMID TO GROW")7|З" WHEN THE PYRAMID REACHES THE    TOP OF THE SCREEN, THE PRACTICE IS OVER.")]ЖЗ:З"    PRESS ENTER TO CONTINUE";)vРЕ  Т┤▓ Л(13) з 8080 *PЪЗ@129,"SELECT THE DIFFICULTY LEVEL     THAT YOU WISH TO TRY--JUST      PRESS THE NUMBER YOU WANT:                                            1.  EASY                        2.  MEDIUM                      3.  FAST*dдА N│1376 е 1535*oоТN,128*u╕Л*Б┬SPEED│0*Щ╠A$│ Т:Е A$│""з 8140*▓╓Е A$│"1" з SPEED│450*╦рЕ A$│"2" з SPEED│350*фъЕ A$│"3" з SPEED│250*∙ЇЕ SPEED│0 з 8140+■Т 359,126::Гreg screen+ РВ SASK.MARKET DATA+ЙA│.496:B│.504:C│.36:D│.2:E│.09:F│.19:G│.1:H│3269:I│3.1:J│6882:K│.76:L│.24:M│.013:N│.7+┘"O│.04:P│.48:Q│.15:R│.03:S│.77:T│.03:U│.2:V│.42:W│.01:X│.555:Y│.455:Z│956000+я,E$│"SASKATCHEWAN"+√6Бе 2000,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                -*-*-*-*-*-*-*-"K@З#м2,"Your product will earn, per unit, $"ARKГЗ#м2,"The annual return in the first 12 months will be $"AS"."KПЗ#м2,""KнЕ AS┤(AMлAO)н.2 з Бе 4500K╕Бе4600K╚А ZZ│1 е 25K╒З#м2,"."K▐Л ZZL.З#м2,"MARKETSTUDY IS A COPYRIGHTED REPORT PROGRAM OF DANIEL POLE (83.02.15)L;Ю:а 89,2LТ&З @230,"DO YOU WANT TO (1) TRY AGAIN, (2) GET ANOTHER REPORT COPY, (3) END ?":Й ZZLп0И ZZ Бе 1000, 4000, 5000L╗{Бе 4375M	ФЗ#м2,"Using a suggested return ratio of 20%, your project is NOT VIABLE."MЮБе 4375Mi°З#м2,"Since your project has a return greater than 20%, MARKETSTUDY recommends"M┴З#м2,"That you study this proposal in more depth as it seems to be viable.":Бе 4475MтИЮ:З @230, "HAVE A GOOD DAY!"MшТК                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    TOMER/YEAR-"AJB-ХЗ"POSSIBLE SALES/YR.-"AAнAJBRЦЗ"MARKET SHARE-"(AKо100)н(AJнAA)BнЮЗ"ANNUAL GROWTH RATE-"M"%":З"PER CAPITA-":З"  DISPOSABLE INCOME-"J:З"  RETAIL SALES-"HB╜иЙ XX:а 89,2BЎЮ:З                 "marketstudy                P.3"C1З                     " *-*-*-*-*-*-*-*-*-*-*-*-*-*-*"CW#З"REVENUE BASED ON MARKET PRICE:"Cp$AO│AKо100н(ALнAAнAJ)CР%AP│AMл(ANн(AKо100н(AAнAJ)))Cв&AQ│ANл(AMоAO)Cп'AR│ALмAQC╠(AS│ARн((AKо100)н(AAнAJ))Cт)Е ZZ│2 з Бе  3630Cш*РD
.З"MARKET POTENTIAL-$"ALнAAнAJD 8З"YOUR SHARE-$"AOD6BЗ"YOUR COSTS-$"APDLLЗ"UNIT COSTS-$"AQD^VЗ"conclusion"DС`З"YOUR PRODUCT, PER UNIT, WILL":З"EARN $"AR"."DкjЗ"ANNUAL PROFIT-$"ASD║tЙ ZZ:а 89,2D╚~Ю:Бж 1050EИЗ"DO YOU WANT TO TRY AGAIN?":З"    1.YES":З"    2.NO":Й ZZ:а 89,2E$ТИ ZZ Бе 1000,3850ED
Ю:З @230,"HAVE A GOOD DAY!"EJКE├аЮ:З @230, "TURN ON PRINTER AND PRESS enter FOR A REPORT. ALIGN PAPER TO TOP. IN CASE OF MALFUNCTION, PRESS break ANDE▀бЗ@336   ,"'GOTO 3010'."EякЙ ZZ:а 89,2F9┤Ю:З#м2,"********************* MARKETSTUDY REPORT *******************"FQ├З#м2,"analyst = "A$Fi╚З#м2,"product = "C$FБ╥З#м2,"market  = "E$FЩ▄З#м2,"date    = "B$FсцЗ#м2,"------------------------------------------------------------"GЁЗ#м2,"TARGETED MARKET:":З#м2,"----------------"G"·З#м2,AB$G/З#м2,AC$G<З#м2,AD$GIЗ#м2,AE$GV"З#м2,AF$Gc,З#м2,AG$Gp6З#м2,AH$G}@З#м2,AI$G┼JЗ#м2,"------------------------------------------------------------"HhЗ#м2,"The total market you have defined consists of "Z" possible customers."H\rЗ#м2,"Of these, "AA" COULD buy "C$", but you feel that only some"HЦ|З#м2,AAн(AKо100)" will in the 12-months under study."H╝ЖЗ#м2,"sales/customer/year   = "AJHхРЗ#м2,"potential sales       = "AAнAJIЪЗ#м2,"your sales (ms)       = "(AKо100)н(AJнAA)IeдЗ#м2,"Market growth per annum "M"%, per capita disposable income $"J","IЗоЗ#м2,"and retail sales $"H"."I╧╕З#м2,"------------------------------------------------------------"I█┬Бж 3620J#╠З#м2,"                     REVENUE BASED ON MARKET PRICE          "JP╓З#м2,"market potential       =$"ALнAAнAJJwрЗ#м2,"    your share         =$"AOJЮъЗ#м2,"    your costs         =$"APJ┼ЇЗ#м2,"    unit costs         =$"AQK■З#м2,"-*-*-*-*-*-*-*-*-*-*-*-*- conclusion -*-*-*-*-* 26009#
AG$│"BOTH LANGUAGE GROUPS"91
(Ю:Бж 10509▒
2З                     "ARE YOU INTERESTED IN:               1.ALL PERSONS                   2.ONLY THOSE NOW WORKING       9╟
3З@198,"(1 OR 2?)"9╫
<Й ZZ:а 89,29э
FИ ZZ Бе 2690,26509∙
ZAA│AAнV:
_AH$│"EMPLOYED ONLY":
dБе 2700:@
ВAH$│"EMPLOYMENT NOT IMPORTANT":N
МЮ:Бж 1050:╬
ЦЗ                     "YOU WILL BE SELLING TO:                1.ALL RESIDENTS                 2.ONLY THOSE RENTING         ;
ЧЗ@199,"3.ONLY HOMEOWNERS                (1,2, OR 3?)";
аЙ ZZ:а 89,2;3
кИ ZZ Бе 2790,2750,2770;?
╛AA│AAнL;\
╚AI$│"ONLY THOSE RENTING";h
╔Бе 2800;t
╥AA│AAнK;О
╫AI$│"ONLY HOMEOWNERS";Ъ
╪Бе 2800;╡
цAI$│"ALL RESIDENTS"   ;├
ЁЮ:Бж 1050;ў
·З                     "NOW YOUR PRODUCT, "C$"."<_З                     "WHAT IS THE BASIC UNIT OF SALE  (LIKE PER 100,EACH,LITRE,ETC.)?":Й F$:а 89,2<{З"HOW MANY "F$"'S WILL"<┐З                     "EACH CUSTOMER BUY ANNUALLY?":Й AJ:а 89,2=A"З                     "WHAT PERCENTAGE OF THE TOTAL    MARKET YOU IDENTIFIED DO YOU    PLAN TO TRAP IN YEAR ONE?":Й AK:а 89,2=OTЮ:Бж 1050=Ь^З                     "WHAT IS THE CURRENT MARKET PRICEOF "C$"'S PER "F$=╝cЗ "IN DOLLARS?":Й AL:а 89,2>hЗ                     "WHAT IS YOUR FIXED OVERHEAD PER YEAR (IN DOLLARS)?":Й AM:а 89,2>mrЗ                     "WHAT IS THE VARIABLE, OR UNIT   COST FOR EACH "F$" "C$"'S">Ф|З"BASED ON "AKо100н(AAнAJ)" SALES">дЖЙ AN:а 89,2>╡╕В REPORT SUB>├┬Ю:Бж 1050?C╠З                     "YOU HAVE COMPLETED YOUR ANALYSISAND ARE READY FOR THE REPORT. DOYOU WANT IT:                        ?е═З@200,"1.PRINTED                       2.DISPLAYED                       (1 OR 2?)":ЙZZ:а89,2?╗╓И ZZ Бе 4000,3100@Ю:З @230,"** $$ marketstudy $$ **":а 89,4:а 129,2:а 89,2:а 129,4@/NЮ:З                 "marketstudy "B$" P.1"@_XЗ"ANALYST--"A$:З"PRODUCT--"C$:З"MARKET--"E$@Ъ]З                     " *-*-*-*-*-*-*-*-*-*-*-*-*-*-*"@тbЗ"TARGETED MARKET:":З AB$:З AC$:З AD$:З AE$:З AF$:З AG$:З AH$:З AI$@ЄgЙ XX:а 89,2A,АЮ:З                 "marketstudy                 P.2"AgКЗ                     " *-*-*-*-*-*-*-*-*-*-*-*-*-*-*"AЛЛЗ"UNIT AND MARKET CALCULATIONS"AбМЗ"TOTAL MARKET-"ZAяПЗ                     "POSSIBLE CUSTOMERS-"AA:З"MARKET SHARE-"AAн(AKо100)B
ФЗ"SALES/CUS│00:O│00:P│00:Q│00:R│00:S│00:T│00:U│00:V│00:W│00:X│00:Y│000[;Z│00:E$│"XXXXXXXXXXXXXXXXXXX"0i╨Ю:Бж 10500╢┌З                     "ARE YOU INTERESTED IN:                  1.ALL "E$0хфЗ                     "        2.URBAN "E$1юЗ                     "        3.RURAL "E$1E°З                     "        (1,2, OR 3?)"1lЙ ZZ:а 89,2:И ZZ Бе 2095,2070,20851wAA│ZнX1ЗAB$│"URBAN"1У Бе 21001Ю%AA│ZнY1о*AB$│"RURAL"1║+Бе 21001╚/AB$│"ALL"1╤1AA│Z1▀4Ю:Бж 10502T9З"DO YOU WANT TO SELL TO:           1.INDIVIDUALS (THEIR OWN USE)   2.HOUSEHOLDS (COMMON USE)         (1 OR 2?)"2d>Й ZZ:а 89,22zHИ ZZ Бе 2150,21802РfAC$│"INDIVIDUALS"2ЬpБе 22002иДAA│AAоI2╜ОAC$│"HOUSEHOLDS"2╦ШЮ:Бж 10503KвЗ"THE CUSTOMERS SEX:                  1.DOES NOT MATTER               2.PROBABLY MALE                 3.PROBABLY FEMALE    3fгЗ@230   ,"(1,2 OR 3?)"3vмЙ ZZ:а 89,23С╢И ZZ Бе 2290,2250,22703Э╩AA│AAнA3м╘AD$│"MALE"3╕╒Бе 23003─▐AA│AAнB3╒шAD$│"FEMALE"3сщБе 23004ЄAD$│"BOTH MALE AND FEMALE"4№Ю:Бж 10504О	З                     "WHAT AGE GROUPS INTEREST YOU:        1.ALL AGES                      2.ADULTS ONLY(OVER 20)         5		З@197,"3.YOUTHS AND TEENS ONLY         4.AGES 20-45 ONLY               5.AGES ABOVE 45 ONLY            (1,2,3,4,OR5?)"5	Й ZZ:а 89,25>	И ZZ Бе 2390,2350,2360,2370,23805R	.AA│AAн(DлEлFлG)5q	3AE$│"ADULTS ONLY(OVER 20)"5}	4Бе 24005Й	8AA│AAнC5г	=AE$│"TEEN/YOUTH ONLY"5п	>Бе 24005┐	BAA│AAн(DлE)5┘	GAE$│"AGES 20-45 ONLY"5х	HБе 24005ї	LAA│AAн(FлG)6	QAE$│"AGES 45 AND UP"6	RБе 240063	VAE$│"ALL AGE GROUPS"6A	`Ю:Бж 10506╣	jЗ"WILL EDUCATION PLAY A ROLE:          1.NOT IMPORTANT                 2.ONLY HIGH SCHOOL OR LESS      3.ONLY POST-6ц	kЗ@209,"SECONDARY           (1,2, OR 3?)"6Ў	tЙ ZZ:а 89,27	~И ZZ Бе 2490,2450,24707!	ТAA│AAн(OлP)7D	ЧAF$│"SECONDARY SCHOOL OR LESS"7P	ШБе 25007`	жAA│AAн(QлR)7~	лAF$│"POST-SECONDARY ONLY"7К	░Бе 25007л	║AF$│"SCHOOLING NOT RELEVANT"7╣	─Ю:Бж 105089	╬З                     "WILL LANGUAGE BE A FACTOR?            1.NOT IMPORTANT                 2.ENGLISH-SPEAKING ONLY       8t	╧З@198,"3.FRENCH-SPEAKING ONLY            (1,2, OR 3?)"8Д	╪Й ZZ:а 89,28Я	тИ ZZ Бе 2590,2550,25708л	ЎAA│AAнS8┼
AG$│"ANGLOPHONE ONLY"8╤
Бе 26008▌

AA│AAнT8°
AG$│"FRANCOPHONE ONLY"9
БеL│.28:M│.012:N│.69'b(O│.05:P│.47:Q│.14:R│.03:S│.64:T│.33:U│.03:V│.33:W│.03:X│.523:Y│.477:Z│701000'y2E$│"NEW BRUNSWICK"'Е<Бе 2000'ЧFВ P.E.I. DATA'ЇPA│.502:B│.498:C│.45:D│.13:E│.09:F│.16:G│.17:H│2929:I│3.5:J│5073:K│.77:L│.23:M│.014:N│.69(GUO│.03:P│.45:Q│.16:R│.05:S│.928:T│.55:U│.017:V│.37:W│.03:X│.371:Y│.629:Z│123000(WZE$│"P.E.I."(cdБе 2000(|xВ QUEBEC MARKET DATA(╫ВA│.495:B│.505:C│.35:D│.25:E│.11:F│.18:G│.11:H│3056:I│3.2:J│6563:K│.5:L│.5:M│.004:N│.74)*МO│.05:P│.48:Q│.16:R│.05:S│.128:T│.8:U│.072:V│.39:W│.03:X│.791:Y│.209:Z│6303000):ЦE$│"QUEBEC")FаБе 2000)`кВ ONTARIO MARKET DATA)╝┤A│.496:B│.504:C│.33:D│.24:E│.11:F│.19:G│.13:H│3177:I│3.1:J│7927:K│.64:L│.36:M│.01:N│.72*╛O│.03:P│.48:Q│.17:R│.04:S│.781:T│.056:U│.163:V│.42:W│.027:X│.812:Y│.188:Z│8506000*#╚E$│"ONTARIO"*/╥Бе 2000*J▄В MANITOBA MARKET DATA*дцA│.497:B│.503:C│.35:D│.23:E│.1:F│.19:G│.13:H│2842:I│3:J│6988:K│.66:L│.34:M│.003:N│.73*·ЁO│.04:P│.47:Q│.16:R│.06:S│.712:T│.054:U│.234:V│.42:W│.019:X│.699:Y│.311:Z│1031000+·E$│"MANITOBA"+Бе 2000+/В SASK.MARKET DATA+ЙA│.496:B│.504:C│.36:D│.2:E│.09:F│.19:G│.1:H│3269:I│3.1:J│6882:K│.76:L│.24:M│.013:N│.7+┘"O│.04:P│.48:Q│.15:R│.03:S│.77:T│.03:U│.2:V│.42:W│.01:X│.555:Y│.455:Z│956000+я,E$│"SASKATCHEWAN"+√6Бе 2000,@В ALBERTA MARKET DATA,qJA│.493:B│.507:C│.34:D│.23:E│.1:F│.15:G│.18:H│3827:I│3.1:J│7563:K│.65:L│.35:M│.034:N│.66,╛TO│.02:P│.4:Q│.2:R│.04:S│.8:T│.02:U│.18:V│.41:W│.01:X│.75:Y│.25:Z│2006000,╧^E$│"ALBERTA",█hБе 2000,ЄrВ B.C. MARKET DATA-J|A│.5:B│.5:C│.32:D│.23:E│.1:F│.15:G│.09:H│3528:I│2.9:J│9058:K│.65:L│.35:M│.014:N│.72-ЮЖO│.02:P│.45:Q│.19:R│.06:S│.83:T│.015:U│.155:V│.39:W│.04:X│.769:Y│.231:Z│2568000-╕РE$│"BRITISH COLOMBIA"-─ЪБе 2000-█дВ NFLD MARKET DATA.6оA│.508:B│.492:C│.44:D│.24:E│.1:F│.15:G│.07:H│2487:I│4.1:J│5047:K│.81:L│.19:M│.01:N│.64.И╕O│.07:P│.42:Q│.13:R│.02:S│.978:T│.005:U│.017:V│.26:W│.04:X│.59:Y│.41:Z│574000.Ю┬E$│"NEWFOUNDLAND".к╠Бе 2000.фЮ:З"this routine will customize     your marketstudy"/b
З"RE-TYPE CUSTOM VALUES EXACTLY   AS THE LINES TO BE SHOWN.       WHEN FINISHED PRESS enter,THEN  TYPE goto 1850.WHY NOT /ЦЗ@183   ,"WRITE THAT DOWN. READY?(PRESS enter)"/иЙ DD:а 89,2:Ю/╕Ф 1850м185109:A│00:B│00:C│00:D│00:E│00:F│00:G│00:H│00:I│00:J│00:K│00:L│00:M│00:N /щ
В MARKET STUDYФВ MARKETSTUDY COPYRIGHT DANIEL POLE 780 MONTGOMERY ST APT. 505 FREDERICTON NB E3B 2Y1 TELEHONE 506-454-7623 MODEM AVAILABLE╒В VERSION THREE/PRINTING SUBS PLUS VIABILITY REPORT 83 07 30¤Ю:З @196,"*** $$ WELCOME TO $$ ***")З @416,"COPYRIGHT DANIEL POLE 83.02.14"dЗ @264,"**marketstudy**":а 89,4:а 176,4:а 89,4:а 176,8т(Ю:З"marketstudy IS A REPORT PROGRAM WHICH WILL IDENTIFY THE TARGET  MARKET FOR YOUR PRODUCT, AND THERETURN POSSIBLE OVER ў)З@117,"ONE YEAR" s2З:З"YOU WILL NEED:                   1. A CUP OF COFFEE              2. PAPER AND PENCIL             3. FIVE MINUTES OF К3З@275," YOUR TIME" Ё<З:З"TO ENTER ANSWERS OR CONTINUE THEPROGRAM, PRESS enter. IF AT ANY TIME YOU WANT TO START AGAIN,! =З@414   ,"PRESS break AND TYPE 'GOTO 1000'"!;FЙ ZZ$:Ю:а 89,2:Бе 1000!╡шЮ:З                 "marketstudy WILL FIRST ASK FOR  SOME INFORMATION ABOUT YOU AND  YOUR PRODUCT, THEN ABOUT THE    "щЗ@94,"TARGET MARKET SEGMENTS. WHEN WE ARE FINISHED, YOU CAN REQUEST A WRITTEN REPORT.""5ЄЗ:З"PLEASE TYPE YOUR NAME:":Й A$"@ўа 89,2"Z№З"NOW THE DATE:":Й B$"e
а 89,2"ГЗ"THE PRODUCT NAME:":Й C$"Ра 89,2:Ю"ЬБж 1050"иБе 1100"└З"marketstudy - "C$"╤$З B$" BY "A$"°8З"-------------------------------""■BР#"LЗ"THE MARKET:CHOOSE FROM LIST:"#ЭVЗ"     1.ALL CANADA                    2.NEWFOUNDLAND                  3.NOVA SCOTIA                   4.NEW BRUNSWICK#└WЗ@257   ,"    5.PRINCE EDWARD"$@`З                     "     8.MANITOBA                      9.SASKATCHEWAN                 10.ALBERTA                      $`aЗ@388,"11.BRITISH COLOMBIA"$roЙ DD:а 89,2:Ю$КtЕ DD│0з1800: Бе1150$═~И DD Бе 1200,1700,1250,1300,1350,1400,1450,1500,1550,1600,1650$ц░В CANADA MARKET DATA%B║A│.497:B│.503:C│.35:D│.26:E│.23:F│.12:G│.03:H│3190:I│3.1:J│7225:K│.62:L│.38:M│.01:N│.74%Ы─O│.037:P│.585:Q│.074:R│.044:S│.614:T│.256:U│.13:V│.44:W│.03:X│.755:Y│.245:Z│23681000%л╬E$│"CANADA"%╖╪Бе 2000%╬тВ NOVA SCOTIA DATA&&ьA│.5:B│.5:C│.37:D│.24:E│.11:F│.19:G│.09:H│2973:I│3.3:J│5816:K│.72:L│.28:M│.01:N│.71&zЎO│.02:P│.46:Q│.17:R│.06:S│.927:T│.044:U│.029:V│.34:W│.03:X│.558:Y│.442:Z│848000&ПE$│"NOVA SCOTIA"&Ы
Бе 2000&┤В NEW BRUNSWICK DATA'A│.501:B│.499:C│.38:D│.23:E│.09:F│.16:G│.14:H│2779:I│3.5:J│5524:K│.72: 

:ГWH BARBER%:Г978 CHERRY ST=:ГWINNETKA IL 60093Q:Г(312)446-9482c:Г564-76-9578n
Бж8010uЮ0ЖЗ б(32,255);Я(А N│1056 е 1504 й 32┤2ТN,255:ТNл31,255║<Л┘FZ$│ Л(144)л Л(154)л Л(144)щPАN│1е30 й 3∙ZЗ@448лN,Z$;	dЗ@480лN,Z$;nЛ&xЗ@11,"SCORE=    ";`ВЗ@422,"press" Л(128)"enter" Л(128)"to" Л(128)"start";wМЕ  Т┤▓ Л(13) з 140НЦЗ@420, б(23,128);Эш:Гgame loopйЄSCORE│0┤№Бж4000┐Бж2000╩Бж3000шЗ@11,═"SCORE=####";SCORE;°$TURN│TURNл9 .PYRAMID│PYRAMIDлTURN )8А N│1е9:LR(N)│207:Л 4BБж2000 ?LБж5010 JVTURN│0 c`Е PYRAMID▓197 з 7010 аjЗ@420,"press" Л(128)"enter" Л(128)"to" Л(128)"continue"; ╕tЕ  Т┤▓ Л(13) з 1140 ╬~З@420, б(23,128); ┘ИБе1020 √╨:Г*sub to print chr at bottom!┌┐1,0!фАN│1е9!(юЗ@480лNн3, Л(LR(N));!.°Л!9а255,1!?Р!Z╕:Гsub to read keyboard!i┬ Я│PYRAMID!s╠X$│ Т!М╓Е  Я▓SPEED з а50,1:Р!ЯрЕ X$│"" з 3020!лъА N│1е9!юЇЕ  К(X$)л32│LR(N) з LR(N)│143:Бж2000:SCORE│SCOREл1:TURN│TURNм1!Ї■Л! Бе3020"а:Гsub to select letter")кLX│ Д(м Я)"4┤АN│1е9"B╛LX│ Д(26)"R╚LR(N)│96лLX"X╥Л"^▄Р"yИ:Гsub to print pyramid"ДТY│1378"бЬТ65495,0::Гspeed-up poke"йжZ│0"╔░Е PYRAMID▓198 з PYRAMID│198"▌║А X│1 е PYRAMID"ф─НB"Ё╬ТYлVB,B"№╪VB│VBл1#тЕ VB▓27мZ з VB│0:Y│Yм31:Z│Zл2#$ьЛ#-ЎVB│0#3П#Q
Т65494,0::Гslow down poke#WР#jp:Гdata section#рzЖ 175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175,175$NДЖ 165,175,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,159,175,170$┤ОЖ 165,175,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,207,175,170%ШЖ 165,175,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,175,170%hвЖ 165,175,223,223,223,223,223,223,223,223,223,223,223,223,223,223,223,223,175,170%╢мЖ 165,175,191,191,191,191,191,191,191,191,191,191,191,191,191,191,175,170%№╢Ж 165,175,159,159,159,159,159,159,159,159,159,159,159,159,175,170&:└Ж 165,175,255,255,255,255,255,255,255,255,255,255,175,170&p╩Ж 165,175,207,207,207,207,207,207,207,207,175,170&Ю╘Ж 165,175,143,143,143,143,143,143,175,170&─▐Ж 165,175,239,239,239,239,175,170&▄X:Гsub to play again&√bЗ@395,"game" Л(128)"over";'B                                                                                                                                                                                                                                                                                       ╟ ┼├├$╚├┼─├─┼,-┴                      TITLE   BAS"╔EXERCISEBAS#QMRKTSTDYBAS ьTYPTEACHBAS!CROAKER4BIN%
TIMER   BAS&▀MULTICHKBAS'эEDITR   BAS(КEDITI   BAS)йSPELLCHKBAS*╕ARTQUIZ BAS+ЫGEOSHAPEBASШ                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╞HЮ7:А H│0е63:А V│0е4:Ь(H,V,3):ЛV:ЛH:АH│0е63:АV│28е31:Ь(H,V,3):ЛV:ЛH|З@128,"     HOT COCO MAGAZINE":З:Зд7)"PRESENTS"╕
З:З д5) Л(130)л Л(131)л"              "л Л(129)л Л(135)√З д5) Л(136)л Л(140)л" N S T A N T  "л Л(132)л Л(140)л" O C O"З:Зд5)"SEPTEMBER 1984")(А X│1е5000:Л Xq-Ю7:А H│0е63:АV│0е4:Ь(H,V,3):ЛV:ЛH:А H│0е63:АV│28 е31:Ь(H,V,3):ЛV:ЛH║2З@128,"     SPECIFIC INSTRUCTIONS FOR  PROGRAMS APPEAR IN HOT COCO "рFЗд5)"* CLOAD  FOR BASIC PROGRAMS" PЗ д5)"* CLOADM  FOR MACHINE LANG-UAGE PROGRAMS" (ZА X│1 е5000:Л X o_Ю7: А H│0е63:АV│0е4:Ь(H,V,3):ЛV:ЛH:АH│0е63:АV│28е31:Ь(H,V,3):ЛV:ЛH ┼dЗ@128,"     ALL PROGRAMS COPYRIGHT 1984  HOT COCO MAGAZINE":З" WAYNE GREEN, INC."74,87,109,120,135,165,210 ъБе 5 ·:ГINPUT/ADD!│LNл10:╗(HH,VV)м(H,V),╜"\ЁU$│ И(LN)л"LINE("л И(HH)л","л И(VV)л")-("л И(H)л","л И(V)л"),PSET""h·З#м1,U$"nР"|@:ГMISTAKS"УJA$│ Т:ЕA$│""Бе1610"░TЕA$│"L"з╗(HH,VV)м(H,V),╛"┬^ЕA$│"C"Бж2100"╚hР"▄д:ГPAINT ROUTINE"ыо├(H,V),3,3"°╕LN│LNл10#'┬U$│ И(LN)л"PAINT("л И(H)л","л И(V)л"),3,3"#3╠З#м1,U$#9╓Р#T:ГCIRCLE SETUP ROUTINE#bX1│H:Y1│V#lA$│ Т#Г&Е Ж(344)│247зH│Hл1#Ъ0Е Ж(343)│247зH│Hм1#е5Бж4500#╩:X2│H:╜(H,V,3):АTMR│1е25:Л:╛(H,V)#▀DЕA$│"O"зБж2000:Р#ъАБе1820$╨:Г CIRCLE ROUTINE$!┌┬(X1,Y1),( В(X1мH)):LN│LNл10$]фU$│ И(LN)л"CIRCLE("л И(X1)л","л И(Y1)л"),"л И( В(X1мH))$iюЗ#м1,U$$o°Р$Е4:ГMISTAKEN CIRCLE$л>┬(X1,Y1),( В(X1мX2)),2:LN│LNм10:Р$┼Ш:ГDRAW INKEY$ ROUTINE$▌вA$│ Т:ЕA$┤▓""Бе2210$ымX2│H:Y2│V%)╢LN│LNл10:U$│ И(LN)л"DRAW"л Л(34)л"BM"л И(H)л","л И(V)л";"%3└A$│ Т%E╩ЕA$│"B"Бж2400%V╘ЕA$│"N"з2550%h▐ЕA$│"U"Бж2600%zшЕA$│"D"Бж2700%НЄЕA$│"R"зБж2800%Я№ЕA$│"L"Бж2900%▒	ЕA$│"E"Бж3000%├	ЕA$│"F"Бж3100%╒	ЕA$│"G"Бж3200%ч	$ЕA$│"H"Бж3300&	.ЕA$│"X"зU$│U$л Л(34):З#м1,U$:Бе1320& 	8Е W│1 Бе2230&+	BБе2240&K	`:ГBLANK DRAW INKEY$ ROUTINE&S	jW│1&]	tA$│ Т&o	~ЕA$│"U"Бж3600&Б	ИЕA$│"D"Бж3700&Ф	ТЕA$│"R"зБж3800&ж	ЬЕA$│"L"Бж3900&╕	жЕA$│"E"Бж4000&╩	░ЕA$│"F"Бж4100&▄	║ЕA$│"G"Бж4200&ю	─ЕA$│"H"Бж4300&∙	╬ЕW│0зР'	╪Бе2400'	Ў:ГDRAW SUBROUTINES'4
(:ГDRAW UP SUBROUTINE'<
2G│0'G
<V$│"U"'Щ
FЕ Ж(343)│251з╜(H,V,3):Т343,255:G│Gл1:АTMR│1е25:Л:V│Vм1:Бж4500:╜(H,V,2):Бе2630'▓
PV$│V$л И(G):Бж3400:Р'╞
М:ГDRAW DOWN SUB'╬
ЦG│0'┘
аV$│"D"(+
кЕ Ж(342)│254з╜(H,V,3):Т342,255:G N#
Ю:З"EXERCISE BY J.M. MCGUIRE"8А T│1 е 1000:Л Th#Й"INSTRUCTIONS (Y/N)";Q$:Е Q$│"Y" з Бж 3000p(Ю:ЗУ2З"WHAT IS YOUR CURRENT WEIGHT"п7П:А X│1 е 9:Н A$(X):Л X├<Й"IN POUNDS ";W▌FЮ:З"P I C K   O N E:"яKЗ"0 YOUR OWN"PЗ"1 BICYCLING"!ZЗ "2 CROSS COUNTRY SKIING"2dЗ"3 JOGGING"CnЗ"4 RUNNING"YxЗ"5 JUMPING ROPE"sВЗ"6 RUNNING IN PLACE"ЕМЗ"7 SWIMMING"ХЦЗ"8 TENNIS"жаЗ"9 WALKING"╛кA$│ Т:Е A$│"" з 170▀┤Е  К(A$)┤48 ▒  К(A$)▓57 з 70 ╣A│ Й(A$):Е A│0 з Бж 1000:Бе200 9╛И A Бж1100,1200,1300,1400,1500,1600,1700,1800,1900 ^╚З"NUMBER OF HOURS YOU EXERCISE?" Ж═Й"USE WHOLE NUMBERS OR DECIMALS ";H л╬З"HOW MANY DAYS A WEEK WILL YOU" ╛╧Й"EXERCISE ";D ╙▄Ю:З"WHEN ";A$(A) ЄцЗ"YOU BURN ";F;" CAL./HR."!ЁЗ"YOU ACTUALLY BURNED "; Б(FнH);" CAL."!E·З"AND LOST ";(FнH)о3500;" POUNDS."!i
З:З"IF DONE ";D;" DAYS A WEEK,"!г
	З"YOU COULD LOSE "; Б(((FнH)о3500)н(Dн52));" POUNDS,"!╙
З"OR "; Б(FнH)н(Dн52);" CALORIES PER YEAR,""
З"ASSUMING THAT YOU DO NOT","INCREASE YOUR CALORIC INTAKE""T
З"DURING THE YEAR. MOST WILL","FIND THAT THEY WILL BE EATING""Е
З"EVEN LESS WHEN THEY EXERCISE","REGULARLY.""Ь
X$│ Т:Е X$│"" з280"в
О"ишЮ"═ЄЗ"TO USE THIS YOU MUST KNOW HOW""Ї№З"MANY CALORIES YOU BURN PER HOUR"#
З"WHILE EXERCISING."#4З"USE ZERO (0) IF YOU DON'T KNOW."#NЙ"HOW MANY CAL/HR ";F#m$Й"NAME OF EXERCISE ";A$(0)#s.Р#ШLЮ:A$(A)│"BICYCLING":З"BICYCLING"#▒VЙ"MPH (6 AND UP) ";M#┬`Е M┤6 з 1100#╧jF│Mн40:Р#ю░Ю:A$(A)│"SKIING":З"SKIING"#·║F│700:Р$Ю:A$(A)│"JOGGING":З"JOGGING"$4Й"MPH (5 TO 7.5) ";M$E(Е M┤5 з 1900$X-Е M▓7.5 з 1400$f2F│Mн134:Р$ЗxЮ:A$(A)│"RUNNING":З"RUNNING"$вВЙ"MPH (7.6 AND UP) ";M$╡МЕ M┤7.6 з 1300$├ЦF│Mн128:Р$ю▄Ю:A$(A)│"JUMPING ROPE":З"JUMPING ROPE"$·цF│750:Р%-@Ю:A$(A)│"RUNNING IN PLACE":З"RUNNING IN PLACE"%9JF│650:Р%\дЮ:A$(A)│"SWIMMING":З"SWIMMING"%оЙ"AVERAGE YARDS PER MINUTE ";M%М╕F│Mн11:Р%лЮ:A$(A)│"TENNIS":З"TENNIS"%╞З"S E L E C T   O N E"%ъЗ"(S)INGLES, (D)OUBLES, (W)ALL"&&B$│ Т:Е B$│"" з 1830&0Е B$│"S" зF│400:Р&/:Е B$│"D" зF│300:Р&EDЕ B$│"W" зF│475:Р&QNБе 1800&rlЮ:A$(A)│"WALKING":З"WALKING"&ЛvЙ"MPH (1 TO 4.9) ";M&ЬАЕ M┤1 з 1900&пЕЕ M▓4.9 з 1300&╜КF│Mн115:Р'╨Ж BICYCLING,SKIING,JOGGING,RUNNING,JUMPING ROPE,RUNNING IN PLACE'(┌Ж SWIMMING,PLAYING TENNIS,WALKING'.╕Ю'S┬З"THIS PROGRAM IS BASED UPON AN"'w╠З"ARTICLE IN THE MAGAZINE navy"'Ы╓З"lifeline WHICH IS PRINTED BY"'└рЗ"THE U.S. GOV. PRINTING OFFICE"'цъЗ"AND WAS AUTHORED BY SHILA POHL"(ЇЗ"AND DR. STEPHEN HAVAS."(&ЎЗ:З:З"ANY KEY TO CONTINUE..."(9∙Е  Т│"" з 3065(?·Ю(g■З:З"THE PROGRAM TAKES YOUR CURRENT"(ОЗ"WEIGHT, AND CALCULATES HOW MANY"(┤З"CALORIES YOU WOULD BURN IF YOU"(╫З"EXERCISE REGULARLY. IT DOES"(¤&З"NOT TAKE INTO ACCOUNT DAILY OR")0З"MONTHLY WEIGHT LOSS WHICH")C:З"COULD HAVE AN EFFECT UPON THE")fDЗ"AMOUNT OF CALORIES YOU BURN")ЙNЗ"EACH TIME YOU EXERCISE. THE")пXЗ"LESS YOU WEIGH, THE FEWER CAL.")╤bЗ"YOU WILL BURN OFF FOR EACH")ЎlЗ"HOUR OF EXERCISE. THE REVERSE"*vЗ"IS TRUE ALSO. YOU WON'T OF"*=АЗ"COURSE LOSE ANY WEIGHT IF YOU"*aКЗ"INCREASE YOUR CALORIC INTAKE"*tПЕ  Т│"" з 3215*zРЮ*ЯФЗ"TO MATCH THE CALORIES YOU ARE"*┴ЮЗ"BURNING OFF WITH EXERCISE."*чиЗ"YOU MAY ELECT TO MAINTAIN YOUR"+▓З"CURRENT WEIGHT BY EXERCISING TO"+2╝З"JUST BURN OFF EXTRA CALORIES"+V╞З"CONSUMED ON YOUR LATEST FOOD"+|╨З"BINGE. BE CAREFUL OF THIS! YOU"+Я┌З"MUST OF COURSE BE ON A GOOD"+├фЗ"BALANCED MAINTENANCE DIET TO"+щюЗ"UTILIZE THIS PROGRAM THIS WAY.",°З:З"ANYWAY YOU CHOOSE TO USE THIS",4
З"PROGRAM, YOU SHOULD REMEMBER",X
З"THAT A GOOD BALANCED DIET IS",k
Е  Т│"" з 3345,q
Ю,Ф
З"JUST AS IMPORTANT AS A GOOD",╢
 З"EXERCISE PROGRAM. ALSO, BE",┌
*З"SURE YOU CONSULT YOUR DOCTOR",■
4З"BEFORE STARTING ANY PHYSICAL"-
>З"FITNESS PROGRAM."-9
HЗ:З"YOU MAY CHOOSE ANY OF THE"-`
RЗ"LISTED EXERCISES OR ONE OF YOUR"-Ж
\З"OWN. IF YOU CHOOSE ONE OF YOUR"-к
fЗ"OWN, YOU MUST FIRST KNOW HOW"-╬
pЗ"MANY CALORIES ARE BURNED PER"-Є
zЗ"HOUR BY A 150 LB PERSON. THE".
ДЗ"COMPUTER WILL TAKE IT FROM".4
ОЗ"THERE. HAVE A GOOD TIME!".G
лЕ  Т│"" з 3499.M
мРГBLANK 135/aG│0/mV$│"BF"/┼"Е Ж(344)│254з╜(H,V,3):Т344,255:G│Gл1:АTMR│1е25:Л:╜(H,V,2):H│Hл1:V│Vл1:Бж4500:Бе4130/▐,V$│V$л И(G):Бж3400:Р/юh:ГBLANK 225/ЎrG│00|V$│                                                                                                                                                                                                                                                                Ў+{ОЖ зАМ&∙ОгНтО╡Н▌О#Н╪О5Н╙Ж1╖кЖ2╖╝Ж3╖*Ж4╖<О?сО┼НзО?╪О╫НЮО?╥ОEНХО?╠ОW Л╢?fЛ0╖├╢?gЛ0╖╒╢?hЛ0╖C╢?iЛ0╖UО%4ОЖцачАJ&∙О)ЖцачАJ&∙ОIЖцачАJ&∙ОdЖцачАJ&∙9ОЖUзАМа&Жк їМА&Ж  ьМ&Ж уМА&Ж  ┌М&╒ОаЖЛ
╞UчАчА╞VчА╞кчАчА╞йчАБ&цЖ╞UчАчАМ
&┘Ж
╖БЖE╖б╖┴╖с╖уЖОгзАМ╕&∙О├зАМ╪&∙ОузАМ°&∙Ж╖?мЖ ╖?лО

╜&иОL╜&иО
╒╜&иО╜&иОБ╜&ЖОL╜&Ж╢?┼Б"'О
╜&иОV╜&иО
┴╜&иО╜&иОХ╜&ЖОV╜&Ж╢?┼Б"(О
╜&иОB╜&иО
╦╜&иО╜&иО#ЇОЛ╜&ЖОB╜&ЖО$DО
╜&^О$lОK╜&^О$ФОХ╜&^О$╝О┴╜&^О$фО╜&^О%ОU╜&^╢?┼Б%О$lОA╜&^О$╝О╒╜&^О%ОA╜&^ОБ┐?йОL┐?зО┐?еО/┐?г╜'bО!Д╜'8Ж╖?вЖ
╖?Я╢?╩Б
&О?В Б&О?} Б&О?x О?s┐?qцД┴
&ОC┐?гО#Р╜'8╛?qц
┴
&ОI┐?гО#Р╜'8╛?qц┴
&ОO┐?гО#Р╜'8╛?qц┴
&ОU┐?гО#Р╜'8╛?qц┴
&О[┐?гО#Р╜'8О/┐?г9                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ▄
:Г   LISTING ONE%:Г   TIMER?:Г   BY RICK CAMPBELLX:Г   WESTON, ONTARIOi
Х 256,&H3000А L│12288 е 12529НН A:Т L,AХ(Л Lп2Т 360,&H30:Т 361,&HC8╔<Т 363,&H30:Т 364,&HC8┘F╣ Г0│&H3000цPA│ Г0(0)ZЖ 142,5,224,204,143,143,237,129,140,67dЖ 0,38,246,204,84,73,253,5,235,204ZnЖ 77,69,253,5,237,134,0,183,48ЕxЖ 243,183,48,244,183,48,245,183,48,246░ВЖ 183,48,247,183,48,248,183,48,242,142╓МЖ 48,62,191,1,13,134,53,183,255,3 ЦЖ 28,239,57,182,48,242,129,60,37,124 *аЖ 127,48,242,124,48,243,182,48,243,129 SкЖ 10,37,58,127,48,243,124,48,244,182 w┤Ж 48,244,129,6,37,45,127,48,244 а╛Ж 124,48,245,182,48,245,129,10,37,32 ╦╚Ж 127,48,245,124,48,246,182,48,246,129 є╥Ж 6,37,19,127,48,246,124,48,247,182!▄Ж 48,247,129,10,37,6,127,48,247,124!EцЖ 48,248,142,5,241,182,48,248,139,112!rЁЖ 167,128,182,48,247,139,112,167,128,134!Я·Ж 122,167,128,182,48,246,139,112,167,128!╠
Ж 182,48,245,139,112,167,128,134,122,167!°
Ж 128,182,48,244,139,112,167,128,182,48"#
Ж 243,139,112,167,132,182,255,2,124,48"L
"Ж 242,59,52,118,158,136,140,5,223,34"n
,Ж 2,32,28,142,4,0,16,142,4,32"Щ
6Ж 236,161,237,129,140,5,192,38,247,159"─
@Ж 136,204,143,143,237,129,140,5,224,37"█
JЖ 249,53,118,57,47"ф─НB"Ё╬ТYлVB,B"№╪VB│VBл1#                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ъ\
:Г"""  LISTING #1, """""""""""A SHORT PROGRAM THAT CHECKS FOR MULTIPLE CORRECT ANSWERS╔Е  Ю(A$,SA$)│0 з З"I DON'T HAVE THAT IN MY LIST OF CORRRECT ANSEWERS" :Д З"THAT IS CORRECT":╔"T8L8O3CEG"╧(Ю╪2Н Q$7Е Q$│"END" з Ю 3:З@330,"THAT IS ALL";:╔"T4L4CEGCEGCEG":Ю:К 9Н A$(<ЗQ$9FЗ  б(32,"-")CPЙ SA$WZSA$│"/"лSA$л"/"└dЕ  Ю(A$,SA$)│0 з З"I DON'T HAVE THAT IN MY LIST OF CORRECT ANSWERS" :Д З"THAT IS CORRECT":╔"T8L8CEG"╤nЗ  б(32,"-")°xЗ"PRESS THE space bar TO CONTINUE" ВX$│ Т:Е X$┤▓  Л(32) з 130  МБе 40 2Ц:ГQUESTION #1 TаЖ "WHO PAINTED THE MONA LISA" iк:ГANSWERS FOR #1 Ч┤Ж "/DA VINCI/LEONARDO/LEONARDO DA VINCI/" ╧╛:ГTHE REMAINING QUESTIONS AND     POSSIBLE ANSWERS" №╚Ж "WHAT  IS THE CAPITAL OF NEW     YORK"!╥Ж "/ALBANY/albany/"!A▄Ж "NAME ONE COLOR IN THE AMERICAN  FLAG"!ZцЖ "/RED/WHITE/BLUE/"!vЁЖ "NAME A SUMMER MONTH"!С·Ж "/JUNE/JULY/AUGUST/"!н
Ж "NAME A WINTER MONTH"!▌
Ж "/DECEMBER/JANUARY/FEBRUARY/DEC/JAN/FEB/"!щ
Ж "END"7,128,182,48"#
Ж                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  З+Ю:З"TRY USING BLANKS OR LOWER CASE":ЗE
Й"STUDENT ANSWER";SA$QSI$│SA$\Бж 800КЗ:З"INPUT ANSWER  = "; Л(239);SI$; Л(239)╕З:З"EDITED ANSWER = "; Л(239);SA$; Л(239)▌(З:З"PRESS space bar TO CONTINUE"√2X$│ Т:Е X$┤▓" " з 50 :Д 5O:ГDELETE LINES 5-50 AND YOU CAN ADD THIS AS A SUBROUTINE TO YOUR BASIC PROGRAMSС :Г(3) EDIT RESPONSE """"""""""""""(SA$,C)""""""""""""""""""""в*Е SA$│"" з Р╕4А C │ 1 е  З(SA$)╠>LT$│ Р(SA$,C,1) 
HЕ LT$│▓"a" ░ LT$┤│"z" з  Р(SA$,C,1)│ Л( К(LT$)м32):Бе 860 4RЕ LT$┤"A" ▒ LT$▓"Z" з  Р(SA$,C,1)│" " <\Л C АfC│ Ю(SA$," "):Е C┤▓0 з SA$│ О(SA$,Cм1)л П(SA$, З(SA$)мC):Бе 870 ЖpРRDO DA VINCI/" ╧╛:ГTHE REMAINING QUESTIONS AND     POSSIBLE ANSWERS" №╚Ж "WHAT  IS THE CAPITAL OF NEW     YORK"!                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ж
Х 1000Ю"╔"T8L8O4CG"Т#З @128, б(32,128);:З"TRY USING CHARACTERS OTHER THAN LETTERS or LOWER CASE           (SHIFT 0)":З б(32,128)▒(З@0,"ENTER A RESPONSE":З:З╝2Бж 700я<З@320,"ANSWER ACCEPTED = "; Л(223);SA$; Л(223)FЗ@480,"PRESS space bar TO CONTINUE";7PX$│ Т:Е X$┤▓" " з 80 :Д 20Г▓:ГYOU MAY DELETE LINES 10-80 THEN ADD THIS ROUTIE TO YOUR BASIC PROGRAM┼╝:Г(4) EDIT INPUT""""""""""""""""""(LT$,SA$,C1$,C2$)""""""""""╨┴SA$│"" 	╞C1$│"ABCDEFGHIJKLMNOPQRSTUVWXYZ      1234567890!?.," .╦C2$│"abcdefghijklmnopqrstuvwxyz" <╨З@64,SA$; T╒X$│ Т:Е X$│"" з 725 h┌Е X$│ Л(13) з Р ╖▀Е X$│ Л(8) з Е  З(SA$)▓0 з З  Л(8);:SA$│ О(SA$, З(SA$)м1):Бе 725 :Д Бе 725 ▌фC│ Ю(C2$,X$):Е C┤▓0 з X$│ Л(Cл64) ∙щЕ  Ю(C1$,X$)│0 з Бе 755!юSA$│SA$лX$:ЗX$;:Бе 725!oєЗ@384,"USE ONLY THESE LETTERS":ЗC1$:╔"O4T64L64BAGFEDC":З"PRESS space bar TO CONTINUE";!е°X$│ Т:Е X$┤▓" " з 760 :Д З@384, б(127,32);:Бе 720ONTH"!▌
Ж "/DECEMBER/JANUARY/FEBRUARY/DEC/JAN/FEB/"!щ
Ж "END"7,128,182,48"#
Ж                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ╡Х 1000ЮFЗ@448, б(32,255);:З"TRY TO MISPELL THE ANSWER";З
P$│"WHAT IS THE CAPITAL OF ILLINOIS?":H│1:V│1:LB│30:Бж 10000▒З:З:Й" ANSWER";SA$:CA$│"SPFLD":Бж 900Е CF│0 з P$│"I THINK YOU HAVE THE WRONG ANSWER - THE CORRECT ANSWER IS SPRINGFIELD":Бе 50X(Е SA$│"SPRINGFIELD" з ╔ "T16L16CDEFGAB":P$│"THAT IS VERY GOOD":Бе 50╢-P$│"YOUR ANSWER DOES APPEAR TO BE CORRECT BUT YOU SHOULD SPELL IT THIS WAY 'SPRINGFIELD'"╔2V│Vл5:Бж 10000 <P$│"PRESS THE space bar  TO CONTINUE":V│Vл2:Бж 10000  FX$│ Т:Е X$┤▓" " з 70 :Д 7 \:ГDELETE LINES 5-70 THEN ADD THIS TO YOUR BASIC PROGRAM ЮД:Г(2) KEY LETTERS """"""""""""""""(C,CA$,SA$,CF,LT$)""""""""" зОCF│1 ╗ША C│1 е  З(CA$) ╧вLT$│ Р(CA$,C,1) тмЕ CF │ 0 з 980 ·╢CF │  Ю(CF,SA$,LT$)!
└Е CF │ 0 з 980!╩CF │ CF л 1!%╘Л C!+▐Р!k':Г(1) PRINT ROUTINE"""""""""""""""(H,V,LB,P$)""""""""""""""!y'P$│P$л" "!У'$TB│LB:Е V▓15 з З:V│15!║'.Е TB ▓  З (P$) з З@ (Hл32нV),P$;:Р!ы'8Е  О(P$,1)│" " з P$│ П(P$, З(P$)м1):Бе 10020"?'BT$│ О(P$,LB):Е  Ю(T$," ")│0 з З@(Hл32нV),T$;:P$│ П(P$, З(P$)мTB):V│Vл1:Бе 10020"v'LЕ  Р(P$,TB,1)┤▓" " з Е TB▓1 з TB │ TB м 1:Бе 10060"┤'VЗ@ (Hл32нV), О(P$,TB);:P$│ П(P$, З(P$)мTB):V│Vл1:Бе 10020,140,5,224,37"█
JЖ 249,53,118,57,47"ф─НB"Ё╬ТYлVB,B"№╪VB│VBл1#                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ШХ 1000БQB$│ Л(142)л б(30,140)л Л(141):А A│1 е 5:QB$│QB$л Л(138)л б(30,143)л Л(133):Л:QB$│QB$л Л(139)л б(30,131)л Л(135)е:Г****YOU MAY OMIT 6-58 *******│TP$│QB$:Ю┘
З@270,"by":З@328,"charles santee"ЁА B│137 е 249 й 16А A│34 е 162 й 32  Р(TP$,A,30)│ б(30,B)(Л A| Р(TP$,74,3)│"ART": Р(TP$,78,3)│"and": Р(TP$,82,5)│"MUSIC": Р(TP$,142,4)│"QUIZ"ИЗ@0,TP$┤CT│CTл1:И CT Бж 28,34,40,46,52,58,28,34┬Л B:Бе 66 e╔ "T4O3CL2.L50T4FFAO4CO3FFAO4CO3FFAO4CO3FFAO4CO3FFAO4CL4O3AL2FL50T4O4CO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CEL2O3CL2." ы╔ "L50T4O3FDFAFDFAFDFAFDFAFDFAL4GL2EDL50T4CCGB-CCGB-CCGB-CCGB-CCGB-L2CL50T4GGB-O4DO3GGB-O4DO3GGB-O4DO3GGB-O4DO3GGB-O4DL4O3AL2GL1" ё Р!Ф"╔"L50T4O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-L2GL50T4B-GB-O4DO3B-GB-O4DO3B-GB-O4DO3B-GB-O4DO3B-GB-O4DL4L2""@$╔"L50T4O3AO3CGB-O3AO3CGB-O3AO3CGB-O3AO3CGB-O3AO3CGB-L2O3GL1L50T4O3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CL1""F&Р"ъ(╔"L2T4O3CL2.L50T4FFAO4CO3FFAO4CO3FFAO4CO3FFAO4CO3FFAO4CL4O3AL2FL50T4O4CO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CECO3AO4CEL2O3CL2."#o*╔"L50T4O3FDFAFDFAFDFAFDFAFDFAL4GL2EDL50T4CCGB-CCGB-CCGB-CCGB-CCGB-L2CL50T4GGB-O4DO3GGB-O4DO3GGB-O4DO3GGB-O4DO3GGB-O4DL4O3AL2GL1"#u,Р$.╔"L50T4O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-O4CO3CGB-L2GL50T4B-GB-O4DO3B-GB-O4DO3B-GB-O4DO3B-GB-O4DO3B-GB-O4DL4L2"$─0╔"L50T4O3AO3CGB-O3AO3CGB-O3AO3CGB-O3AO3CGB-O3AO3CGB-L2O3GL1L50T4O3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CO3FO3FAO4CL1"$╩2Р%I4╔"L4T4O3GAL2B-L4B-AGB-L50T4AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CO3AFAO4CL2O3FL4GB-AGFEL1"%П6╔"L50T4O3FDFAFDFAFDFAFDFAFDFAFDFAFDFAFDFAFDFAFDFAL4DEL2FL4FEDFL1"%Х8Р&
:╔"L50T4O3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEO3EAO4CEL2O3EL4FEDEFDL1"&~<╔"L50T4O3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DO3GO3GB-O4DL1"&Д>Р&з@:Г****** START AGAIN HERE ****&┤BЗ@0,QB$;&║ZВ&╔dА A│1 е 10&╪iЮ:З@0,QB$;&сnН T$'sЕ  О(T$,1)│";" з P$│"NAME THIS TUNE" :Д P$│T$'.xH│2:V│2:LB│28:Бж 10000'H}Е  О(T$,1)│";" з ╔ T$'WВН A$:Н CA$'bМБж 700'mЦБж 900'uаV│9'─кЕ  Ю(SA$,A$) ┤▓0  з P$│"VERY GOOD ANSWER":Бж 10000:╔"T8L8CEGCEGCEG":Бе 300(&┤Е CF│0 з P$│"THE CORRECT ANSWER IS "лA$л" - BETTER LUCK NEXT TIME - ":Бж 10000:╔"01GC":Бе 300(Г╛P$│"I THINK YOU MIGHT BE RIGHT BUT THE CORRECT SPELLING IS "л Л(191)лA$л Л(191):Бж 10000(м
,З@480,"PRESS space bar TO CONTINUE";(╞
6X$│ Т:Е X$┤▓" " з 310(╬
@Л A(ў
JЮ:З"YOU HAVE SEEN ALL THE QUESTIONS")
MЗ:З"DO YOU WANT TO TRY AGAIN? y/n")h
TX$│ Т:Е X$│"" з 340 :Д Е  Ю("Yy",X$)┤▓ 0 з О :Д Е  Ю("Nn",X$)│0 з 340)n
^К)л
РЖ "WHAT ITALIAN WORD MEANS 'TO CUT INTO'",INTAGLIO,INGLO*
ЪЖ "WHAT IS THE NAME OF A PRINT MADE FROM A STONE MARKED WITH A GREASE PENCIL",LITHOGRAPH,LTHGR*R
ЯЖ ";T4O4L8CCL5CO3GL8O4EEL4ECL8CEL4GGL8FEL2.D",CLEMENTINE,CLMTIN*Ы
дЖ "WHO MADE THE SCULPTURE - LORENZO DE' MEDICI",MICHELANGELO,MIANGLO*╬
йЖ ";T4L4O4EFEDCO3AAL2O4F",BLUE TAIL FLY,BLTAFL+
оЖ "WHO PAINTED - THE THREE FATES",FIORENTINO,FRENTNO+:
╕Ж ";O3L4T4AGAO4CDO3L8GL4GL8FL4G",SAN JOSE,SNOS+r
┬Ж ";O4T2L4DEFL2B-L4CDEL4AL4.A",AUTUMN LEAVES,TMLEVS+ж
╠Ж ";T4L4O4CO3B-AB-AB-AL2GL4AGAGAGL2F",MASH,MASH+▄
╓Ж ";T4L8O3GAL4BO4DDEDO3BGABBAGL2A",SUSANNAH,SUSAN,0╔ ";L4T4O3AAB-O4CCO3B-AGFFGAL4.AL8GL2G",ODE е JOY,OJOY,Y╝:Г(4) EDIT INPUT""""""""""""""""""(LT$,SA$,C1$,C2$)"""""""""",d┴SA$│"",Э╞C1$│"ABCDEFGHIJKLMNOPQRSTUVWXYZ      1234567890!?.,",┬╦C2$│"abcdefghijklmnopqrstuvwxyz",╓╨З@226,"? ";SA$;,ю╒X$│ Т:Е X$│"" з 725-┌Е X$│ Л(13) з Р-Q▀Е X$│ Л(8) з Е  З(SA$)▓0 з З  Л(8);:SA$│ О(SA$, З(SA$)м1):Бе 725 :Д Бе 725-wфC│ Ю(C2$,X$):Е C┤▓0 з X$│ Л(Cл64)-УщЕ  Ю(C1$,X$)│0 з Бе 755-оюSA$│SA$лX$:ЗX$;:Бе 725.	єЗ@384,"USE ONLY THESE LETTERS":ЗC1$:╔"O4T64L64BAGFEDC":З"PRESS space bar TO CONTINUE";.?°X$│ Т:Е X$┤▓" " з 760 :Д З@384, б(127,32);:Бе 720.БД:Г(2) KEY LETTERS """"""""""""""""(C,CA$,SA$,CF,LT$)""""""""".КОCF│1.ЮША C│1 е  З(CA$).▓вLT$│ Р(CA$,C,1).┼мЕ CF │ 0 з 980.▌╢CF │  Ю(CF,SA$,LT$).Ё└Е CF │ 0 з 980/╩CF │ CF л 1/╘Л C/▐Р/N':Г(1) PRINT ROUTINE"""""""""""""""(H,V,LB,P$)""""""""""""""/\'P$│P$л" "/v'$TB│LB:Е V▓15 з З:V│15/Э'.Е TB ▓  З (P$) з З@ (Hл32нV),P$;:Р/╬'8Е  О(P$,1)│" " з P$│ П(P$, З(P$)м1):Бе 100200"'BT$│ О(P$,LB):Е  Ю(T$," ")│0 з З@(Hл32нV),T$;:P$│ П(P$, З(P$)мTB):V│Vл1:Бе 100200Y'LЕ  Р(P$,TB,1)┤▓" " з Е TB▓1 з TB │ TB м 1:Бе 100600Ч'VЗ@ (Hл32нV), О(P$,TB);:P$│ П(P$, З(P$)мTB):V│Vл1:Бе 10020:                  1.ALL "E$0хфЗ                     "        2.URBAN "E$1юЗ