' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Р734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`󠭠ƍ΍     Ӎ΍ᠭ󠭠     ircle Circus - "B$(CH):KQ1:AA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:M$:K$:L$:N:K:P~v D$;"CLOSE": D$:D$;"OPEN INPUT":D$:D$;"WRITE INPUT":"CIRCUS":D$;"CLOSE":D$:D$;"RUN INST"X5:Y10:510:D2:610:B$"Y"B$"y"ī2030: S$"Does anyone else want to play? ":X5:Y12:510:D2:610:B$"Y"B$"y"İ410:2008: D$:D$;"RUN HELLO"::2030N ::D$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190lb L$"C examples with help.","Do problems yourself.":P0:W0:K0:3040:(B$)27KK1 P((NL)100.5)::S$"You got "(N)" right out of "(L)" numbers,":X2:Y5:510:S$F$". That's "(P)"%.":X2:Y7:510:3150- S$"Do you want to play again? ":0:(B$)C5(B$)C5İ110:2495C (7);:S$(C):X20:Y13:510 S$"Do you want me to show you this one? (Y/N) ":X1:Y18:510:D2:610:B$"Y"B$"y"WA1:410:XX2:1000:S$E$:X20((S$)2):Y5:510:2200 P Q:"See examples done.","Do0:E2BB2kt S$(C$,1)" = ":X16:Y13:510:C(3.1416(B2)):D12:610:(B$)C5(B$)C5İ110:2495x (7);:S$(C):X21:Y13:510:2490 S$"The "C$" is:":X16:Y9:510:E2BB2! S$(C$,1)" = ":X16:Y13:510:C(3.1416B2):D12:61B$)B23752> (7);:S$(B):Y11:X13:E1XX4;B 510G S$(C$,1)" = ":X16:Y13:510:C(3.1416B2):D12:610:(B$)C5(B$)C5İ110:2395P (7);:S$(C):X20:Y13:510:2395[ ` S12450 j S$"Calculate the "C$":":X16:Y9:512395- (7);:S$(C):X20:Y13:510:2395. S$"The "C$" is:":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"D = 2r":X7:Y7:510:BB2 8 X16:Y11:S$(C$,1)" = 2 X 3.1416 X ":510:D4:610:(:(B$)B223301 (B$)BS$" X ":510:2326_ (7);:S$(B)" X ":Y11:X29:510:2326z D4:610:(B$)B2330 (7);:S$(B):X28((B))4:Y11:510 S$(C$,1)" = ":X16:Y13:510:C(3.1416(B2)):D12:610:(B$)C5(B$)C5İ110:416(B2)):X16:Y13:510-S12350 S$"Calculate the "C$":":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"r = D/2":X7:Y7:510:BB2 S$(C$,1)" = 3.1416 X ":X16:Y11:510:D4:610(3.1416B2)):X16:Y15:510:2295S$"The "C$" is:":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"D = 2r":X7:Y7:510:BB2S$(C$,1)" = 2 X 3.1416 X ":X16:Y11:510:S$(C$,1)" = "(3.1":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"r = D/2":X7:Y7:510:BB2#S$(C$,1)" = 3.1416 X "(B)" X "(B):X16:Y11:510:S$(C$,1)" = 3.1416 X "(B2):X16:Y13:510:S$(C$,1)" = "(ms? ("(R)"-"(O)") ":X1:510:D3:610:L(B$):LRLOG140:840:20754410:Q1L:1000:S$E$:X20((S$)2):Y5:510:C$"area"Y4:X16:S$"2":5106L$"CIRCUS":T2200,2300,2400:910:410:2500S12250S$"Calculate the "C$":ast name? ":510:D10:610:G$B$410:X1:Y8:S$"Do you want to:":510:Y10:Z13:X8:S$(Z)") "A$(Z):510:YY2:Z:R1:X1:S$"Your choice? (1-3) ":O3:510:310:XX1:TJ:S$(J):510:R2:O20:T1O5:R1YY2NI$"":S$"How many proble05:S$(B):X7:Y12:510:WA0:410:3:49234,0:49232,0:49236,0:49239,0:S$"Do you want instructions? (Y/N) ":X1:Y10:510:D2:610:S$B$:B$"Y"B$"y"İ3200 Y12:X1:S$"What's your first name? ":510:D10:610:F$B$:Y14:X1:S$"And your l07,Y:36102:WA11030:C$"circumference":E$"C = 2(Pi)r Pi = 3.1416":S((1)2)1:S2C$"area":E$"A = (Pi)r Pi = 3.1416" H$"diameter":E((1)2)1:E1H$"radius" B((1)34)25:X54:E2X22X2X:0:X,10686,106:X,10586,1:H ) HFG191:3:0,F269,F:F:i S$" to continue : to exit ":X1:Y22.5:510} Z$:Z$(13)ı Z$(27)İ410:3040 (7);:911 VL(2):X26:Y86:0,V(V256)256:1,(V256):36105,X(X255)256:36106,X255:361F: bB$"":A$"":H1D1 cA$:A$(13)650C lA$(8)630\ m(B$)0ĺ(7);:611 n(B$)1B$"":XX1:S$" ":510:XX1:611 oXX1:S$" ":510:XX1:B$(B$,(B$)1):HH1:611 v(A$)32(A$)149ĺ(7);:611 B$B$A$:S$A$:5108,0:JKE128:JJ48:JRJOı0 h(7);:310 0,L(1)(L(1)256)256:1,(L(1)256):36096:S$"Circle Circus":X17:Y1.875:510: QXX:F1(S$):A((S$,F,1)):A32A149ij 39424,A:39425,X:39426,(Y8):39427:XX1:X40YY2:XQX 080,190 S$"Great!":2004 S$"Fantastic!":200I S$"Super!":200e S$"You're right!":200 S$"Yes! Yes! Yes!":200 S$"That's great!" G140:840:X20((S$)2):Y20:510: 616368,0:16384,128:KE(16384):KE128310:1636D$"":D$;"MAXFILES1":8192:D$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H":::1:1:958:D$;"BLOAD CIRCUS.H,A16384":L(2):I12:L(I)::16384,16508:I13:A$(I):I:J$".":P0:M0:G0:N0:2000nT3NN1 xI1(6(1))1:I1140,150,160,170,1             ;"WRITE INPUT":"AREA":D$:D$;"CLOSE":D$:D$;"RUN INST"N :NX D$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190xb S$"Angles on Area - "CH$(CH):KTL1l AA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:Pv D$;"CLOSE":9 D$:D$;"OPEN INPUT":D$:D$$NA$". That's "(P)"%.":X2:Y7:510:3150z S$"Do you want to play again?":X5:Y10:510:370:XX89XX121ī3070 S$"Does anyone else want to play? ":X5:Y12:510:370:XX89XX121İ410:2008  D$:D$;"RUN HELLO"  2030o XX121XX89İ510:2200  ( K9s "See examples done.","Do examples with help.","Do problems yourself." CH3P0:W0:K0:3040 XX27TLTL1/ P((NTL)100.5)::S$"You got "(N)" right out of "(TL)" numbers,":X2:Y5:510:S:Y13:5106d X20:LTH6:610:RE$(AREA)İ110:2495j S$"Do you want me to show you this one? (Y/N)":X2:Y18:510:370:S$(XX):XX1:510:XX89XX121S$" ":X16:Y14:510:S$" ":X2:Y18:510< X20:LTH6:610:RE$(AREA)G150:840:110:2330n (7):WA1WA1:S$" ":X20:510:2326 S$" ":X20:510:X20:S$(AREA):510 ` WA0:S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:Y11:510 b WA0:S$"A = ":X1620:Y13:510J WQX:S$" ":510:XWQ:LTH6:610:RE$(VA(1))2320k (7):WA1WA1:XWQ:2310 S$" ":XWQ:510:S$(VA(1)):XWQ:510 F2S$"/2":510 G150:840:S$"What is the answer?":X5:Y20:510:WA0:S$"A = ":X16:Y15$"A = ":X16:Y13:510:X20:LTH6:610:X3X RE$(VA(2))G150:840:S$"Enter the height.":X5:Y20:510:XX3:Y13:S$" X ":510:WA0:2310 (7):WA1WA1:2304  G150:840:S$"Enter the height.":X5:Y20:510:WA0:S$(VA(2))" X ":X(VA(1)):510:S$"A = ":X16:Y15:510:940:S$(AREA):510:F2S$"The hypotenuse has nothing to do with the area.":X2:Y18:510WA0:S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:Y11:510S$"Enter the base.":X5:Y20:5102 S 5510 \CH2200,2300,24004f910:410:2500S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:Y11:510:S$"A = ":X16:Y13:510:F3S$(VA(2)):510:S$" X ":510:S$(VA(1)):510:F2S$"/2":510F3S$(VA(1)):510:S$" X ":510:S$1:CHXX:S$(XX):510:SM2:LG20:CH1LG5:SM1:YY2TL$"":S$"How many problems? ("(SM)"-"(LG)") ":X1:510:LTH3:610TL(RE$):TLSMTLLGG140:840:20754410:II15:T(II)0:II:K91TL:1000:S$MULA$(F):X20((S$)2):Y60:NA$RE$IY14:X1:S$"And your last name? ":510:LTH10:610:NL$RE$jG0:M0:N0:H0:V0:Q0:410 X1:Y8:S$"Do you want to:":510:Y10:QR13:X8:S$(QR)") "CH$(QR):510:YY2:QR:SM10X1:S$"Your choice? (1-3) ":LG3:510:350:XX/ 2":MULA$(3)"Area = side X side"^FRM$(1)"A = bh":FRM$(2)"A = bh/2":FRM$(3)"A = s x s"S$"Do you want instructions? (Y/N)":X1:Y10:510:370:S$(XX):XX1:510:XX89XX121İ3200: Y12:X1:S$"What's your first name? ":510:LTH10:61):1100:X(1)6:Y(1)13:X(2)9:Y(2)11:LVLR(CX):X26:Y86:0,V(V256)256:1,(V256):36105,X(X255)256:36106,X255:36107,Y:36102:"410:3:49234,0:49232,0:49237,0:49239,0:MULA$(1)"Area = base X height":MULA$(2)"Area = base X height 1)13:X(2)9:Y(2)11:rF1:VA(1)VA:VA(2)VA4:SID2:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:AREA(VA(1)VA(2)):F3:SID2:VA(1)VA:VA(2)VA:AREA(VA2):1100:X(1)2:Y(1)12:X(2)6:Y(2)16:'$F1:SID2:VA(1)VA:VA(2)(VA1.25):AREA(VA(1)VA(2)ID:XX(IJ):YY(IJ):S$(VA(IJ)):510::F2:VA(1)VA:VA(2)(VA2.3):VA(3)((VA(1)2VA(2)2)):SID3:1100:AREA(VA(1)VA(2))2:X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)9:Y(3)12:F1:VA(1)VA:VA(2)(VA2.3):SID2:AREA(VA(1)VA(2)):1100:X(1)6:Y(& HIIG191:3:0,II269,II:II:m S$" to continue : to exit ":X1:Y22.5:510:330: DL11000:: AREA0:VA((1)50)5:CX((1)5)1:CH1T(CX)11000 CH1T(CX)0T(CX)1(CX1020,1030,1040,1050,1060:IJ1SIX1LTH cA$:A$(13)6501 lA$(8)630K m(RE$)0ĺ(7);:611} n(RE$)1RE$"":XX1:S$" ":510:XX1:611 oXX1:S$" ":510:XX1:RE$(RE$,(RE$)1):IXIX1:611 v(A$)32(A$)149ĺ(7);:611 RE$RE$A$:S$A$:510:IX 410:3040d 0,L(1)(L(1)256)256:1,(L(1)256):36096:S$"Angles on Area":X16:Y1.875:510:y QXX:II1(S$) A((S$,II,1)) A32A149ij 39424,A:39425,X:39426,(Y8) &39427:XX1:X40YY2:XQX 0II: bRE$"":A$"":((S$)2):Y20:510:J 616368,0:16384,128:KE(16384):KE128310o @16368,0:XXKE128:XX27390: J310:XX13ĺ(7);:330 T ^310:XXXX48:XXSMXXLGı h(7);:350 r310:XX78XX89XX110XX121ı |(7);:370 3:CH$(I):I PPD$".":2000/ nCH3NN1B xI1(6(1))1b I1140,150,160,170,180,190w S$"Great!":200 S$"Fantastic!":200 S$"Super!":200 S$"You're right!":200 S$"Yes! Yes! Yes!":200 S$"That's great!" X20: NATHAN AREA 6/1/877 D$"":D$;"MAXFILES1"B16384pD$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H"x(:2D$;"BLOAD AREA.H,A24576"<L(5),LR(5):I15:L(I)::I25:LR(I1)L(I)::LR(5)LR(2): 24576,24700,24755,24822,24874 FI1            󠭠殍΍Ǎ󠭠殍̍̍󠭠殍󠭠󠭠΍ᠭ殍΍     NuS$"The shapes I will use are circle,":X5:Y130:610:S$"triangle, rectangle, square,":X5:Y140:610:S$"rhombus, and octagon.":X5:Y150:610:910:800:P@]*** ( YEQTUTP@T* "(***(( PUUAPTUO"(* TUW** \X a{TP@]**  ( YAPTUTV* " (***( QUEQTUO (* TUX** \ˀP] **]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]***]UUU]* ^vT  KOSW[_@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CGKOSW[_@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CGKOSW[_Hp((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CG  >'p2LB`LL`  L``6?$-5>'TQQ?$ -?$-6$$?? A?w??66v--- $??76.--%$???-----666>'$$d ????,---- 666 ---????-----?????----?????.5?v--- $?.???---%XXXX(%??.- 6v-ے6-- $$??---????6v-57-%g$ ?- $<6> ;?'$JII.d -6-,%?d --u6--5>????', /)5 .>.>w?????----1.-- ??'----6v6???$-v-ed d-7157? ???<$II ?6.----%?66v--- ...7----%????)66?$$M >66/)b-.-%--u?I.-#\X$--.-6? -6v- ?--6)u?$ -)u>3-5???.----e w??-6666???$$$$ ---u6666???$$$$---5666>??'$$$M 6 II66666-6???$-$$$% 66666>/ - -557??  <,<,< --55757*-(. )<,<,<,--557??).. ).--,<.>>>. !$$,666%%%555%$$,666 ),,$''/ 777... $<<<, )>>>6. ),,,,, ???7 )-- !$$,-5366-- )...... )-$$$+-566.%%%%<,< --55:*-- )<,<,<,---:.>.>*-- )<,<,<,---;?*-- )<,<,<,----- <,<,< --55??*-%- )<,<$,6-%!,6>.>. )%$$+--366- ).--,<,<,< )<,<$,6%%%5... !$$,666--- )<,<,<,555%%%->.>.>. )<,<,<,...6!$$,666 )<,<,,--.>.>.+-- )<,<,<,--57571.5--$$??'%+--56 <,<,,,5-55?*-  !,,,,-55?*-  )%%%??''%--.> !!5.)$!56 <<< %%5* --9?7 ),,,''7  !; --55;6* <,<,< --5577'<6*-- )<,<,,,-..>*-->. )<,<,<,--557--.>+-- <,3 -5%-,?><'') 6%,*5 ),,,,,,;7. 6 ->3- -%;, %;,,557. 7)- )$5  !''%'), ),,<,'7 %%?'5-,:7. !<' ,6-3 %,. (-- !5 ),,,,,, <,%;,< --.>?*)>.+- )%$$? -666- !%%) %'??5---5--$.>. <,< -55?7*- )<,<,< -5- <,< -->.>>7-%% )<,<$,6-5575/ !$$(66 *%%#$$(66 )<$$,66%-,.. !$$,666 )<,<,-56.$$)5575+ )<,<,-5575+ -;,< --:.>. 1.$<,<,--:.>*- -;,< -->.>6.$ )<,<,-5- )-%%;?< -- !$'!5.56.-ij$4FU^k{ *7IWn~-CN[iz,>Tgox #7K`s2GYk'1;HUaiu),-%'?7*-,.)<,<$,6-5579*- )<,,-   p @   `?DD@@@@@@K "(   L@@@AAEP@D10@ 0 #& p dD1 '0  bB2b)83fDp 8@%#3X`@$@@` 0`H ` D3f|1BBB !#HbBBB  FLz#    !˯ˠ!Ҡ îȠ ŠӠ Πˠ  ŠӠĠӠ Ӡ  Ԡ Π! Р Š Ƞ ԮȠȠӮȠɮȠŮȠ ԮӠϠ ӠȠ ӠԠϠ Ѐ@`LI` S$"Do you want to play again?":X5:Y10:510:370:XX89XX1213070 D$:D$;"RUN 070 D$:D$;"RUN 1213070 D$:D$;"RUN D``0@`0`00``00`Ѐ@`L`0``0ths","4. Shapes of Geometrya "5. The Shape Game","6. Information Please","7. Exit Program"`0``0@`0::T$S$::990:2350g>::10:5:"Please turn off the computer and":12:5:"put the disk away.":. XX7ĉ::990::23708 940:T$S$:10:::990B :(4);"RUN ";F$_  "1. Angles on Area","2. Circle Circus","3. Perimeter Pa7:X2:510/YY4:940:S$"Using this program, you will soon learn to find geometric shapes in your surroundings!":X2:510:940:S$"LOADING The Shape Game. . .":Y22:X2:5100F$"GAME":23504F$"INFO":S$"LOADING Information Please."metric shapes by seeing pictures of them on your screen!":X2:510:940:S$"LOADING Shapes of Geometry. . .":Y22:X2:510&F$"SHAPES":2350 *480:S$"THE SHAPE GAME":X14:Y1.875:510:S$"Identify the shapes in our ginger- bread house.":Y:S$"LOADING Perimeter Paths. . .":Y22:X2:510FF$"PATH":2350 480:S$"SHAPES OF GEOMETRY":X15:Y1.875:510:S$"Do you know what a heptagon is?":Y7:X2:510%YY4:940:S$"Using this program, you will soon learn the names of many geo"CIRCUS":2350480:S$"PERIMETER PATHS":X15:Y1.875:510:Y7:X2:S$"Can you find the perimeter of a squarethat has a side 5 inches long?":510:YY4:9402S$"You will learn to find the answers to questions like this with pictures!":X2:510:940to find the area and circumference of a circle with the help of our" S$S$" graphic program.":Y7:X2:510:YY4:940:X2:S$"You will soon have it down to a science!":510:940:S$"LOADING Circle Circus. . .":Y22:X2:510F$shapes?":510:940:YY4 X2:S$"Practice with us and you will be able to find the areas of basic geometric shapes.":510:S$"LOADING Angles on Area. . .":Y22 X2:940:510:F$"AREA":2350R 480:S$"CIRCLE CIRCUS":X17:Y1.875:510:S$"Learn XX$:XX$(18)F$"READ GRADES":2370O XX$(4)F$"DELETE GRADES":2370s XX(XX$):XX12030:XX72030 XX2050,2060,2070,2080,2090,2100,2110 480:S$"ANGLES ON AREA":X17:Y1.875:510:Y7:X2:S$"Can you find the area of geometric ):10:H:T$::10:H:"LOADING":::Q 16304,0:16302,0:16299,0:16297,0 480:S$"G E O M E T R Y":X15:Y1.875:510:S$"Choose a program:":X2:Y8:510 YY2:QR17:S$PR$(QR):X10:YY1:510:QR:S$"Your choice? (1-7)":X2:YY2:510( :1,(L(1)256):36096:- QXX:II1(S$)A A((S$,II,1))S A32A149ijv 39424,A:39425,X:39426,(Y8) &39427:XX1:X40YY2:XQX 0II: 6,Y265,Y:6,Y1265,Y1: DE1500:QQ1DE1 D1DE::& ::H20((T$)2' TITLE - GEOMETRY 4/26/87B D$"":D$;"MAXFILES1"HS16384D$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H"#I12000:2D$;"BLOAD AREA.H,A24576"<L(1):L(1): 24576,I17:PR$(I):I:2000 0,L(1)(L(1)256)256     er the base.":X5:Y20:510S S$"A = ":X16:Y13:510:X20:LTH6:610:X3X RE$(VA(2))G150:840:S$"Enter the height.":X5:Y20:510:XX3:Y13:S$" X ":510:WA0:2310 (7):WA1WA1:2304. G150:840:S$"Enter the height.":X5:Y$(VA(1)):510:S$" X ":510:S$(VA(1)):510:S$"A = ":X16:Y15:510:940:S$(AREA):510:F2S$"The hypotenuse has nothing to do with the area.":X2:Y18:510WA0:S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:Y11:510S$"Ent:X20((S$)2):Y65510*6L$"AREA"A\CH2200,2300,2400Uf910:410:2500S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:Y11:510:S$"A = ":X16:Y13:510:F3S$(VA(2)):510:S$" X ":510:S$(VA(1)):510:F2S$"/2":510/F3SLG3:510:350:XX1:CHXX:S$(XX):510:SM2:LG20:CH1LG5:SM1MYY2TL$"":S$"How many problems? ("(SM)"-"(LG)") ":X1:510:LTH3:610TL(RE$):TLSMTLLGG140:840:20754410:II15:T(II)0:II:K91TL:1000:S$MULA$(F) ":510:LTH10:610:NA$RE$\Y14:X1:S$"And your last name? ":510:LTH10:610:NL$RE$}G0:M0:N0:H0:V0:Q0:410 X1:Y8:S$"Do you want to:":510:Y10:QR13:X8:S$(QR)") "CH$(QR):510:YY2:QR:SM1CX1:S$"Your choice? (1-3) ":ea = base X height / 2":MULA$(3)"Area = side X side"qFRM$(1)"A = bh":FRM$(2)"A = bh/2":FRM$(3)"A = s x s"S$"Do you want instructions? (Y/N)":X1:Y10:510:370:S$(XX):XX1:510:XX89XX121İ3200:Y12:X1:S$"What's your first name?25):AREAVA(1)VA(2):1100:X(1)6:Y(1)13:X(2)9:Y(2)11:LVLR(CX):X26:Y86:0,V(V256)256:1,(V256):36105,X(X255)256:36106,X255:36107,Y:36102:5410:3:49234,0:49232,0:49236,0:49239,0:MULA$(1)"Area = base X height":MULA$(2)"ArVA(1)VA(2):1100:X(1)6:Y(1)13:X(2)9:Y(2)11:F1:VA(1)VA:VA(2)VA4:SID2:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:AREAVA(1)VA(2):F3:SID2:VA(1)VA:VA(2)VA:AREAVA2:1100:X(1)2:Y(1)12:X(2)6:Y(2)16::$F1:SID2:VA(1)VA:VA(2)(VA1.,1030,1040,1050,1060:IJ1SID:XX(IJ):YY(IJ):S$(VA(IJ)):510::F2:VA(1)VA:VA(2)(VA2.3):VA(3)((VA(1)2VA(2)2)):SID3:1100:AREA((VA(1)VA(2))2):X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)9:Y(3)12:2F1:VA(1)VA:VA(2)(VA2.3):SID2:AREAE$RE$A$:S$A$:510:IX B HIIG191:3:0,II269,II:II: S$" to continue : to exit ":X1:Y22.5:510:330: DL11000:: AREA0:VA((1)50)5:CX((1)5)1:CH1T(CX)11000 CH1T(CX)0T(CX)1DCX1020 0II:% bRE$"":A$"":IX1LTH; cA$:A$(13)650M lA$(8)630g m(RE$)0ĺ(7);:611 n(RE$)1RE$"":XX1:S$" ":510:XX1:611 oXX1:S$" ":510:XX1:RE$(RE$,(RE$)1):IXIX1:611 v(A$)32(A$)149ĺ(7);:611 RX121ı |(7);:370& 410:3040 0,L(1)(L(1)256)256:1,(L(1)256):36096:S$"Angles on Area":X16:Y1.875:510: QXX:II1(S$) A((S$,II,1)) A32A149ij 39424,A:39425,X:39426,(Y8) &39427:XX1:X40YY2:XQXS$"That's great!"3 X20((S$)2):Y20:510:f 616368,0:16384,128:KE(16384):KE128310 @16368,0:XXKE128:XX27390: J310:XX13ĺ(7);:330 T ^310:XXXX48:XXSMXXLGı h(7);:350 r310:XX78XX89XX110X682 FI13:CH$(I):I; PPD$".":P0:M0:G0:N0:2000K nCH3NN1^ xI1(6(1))1~ I1140,150,160,170,180,190 S$"Great!":200 S$"Fantastic!":200 S$"Super!":200 S$"You're right!":200 S$"Yes! Yes! Yes!":200 Q NATHAN AREA 7/29/877 D$"":D$;"MAXFILES1"A8192oD$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H"(::1:1:9582D$;"BLOAD AREA.H,A16384" <L(5),LR(5):I15:L(I)::I25:LR(I1)L(I)::LR(5)LR(2): 16384,16508,16563,16630,16          "And your last name? ":510:D10:610:G$B$G0:M0:N0:H0:V0:Q0:410:X1:Y8:S$"Do you want to:":510:Y10:Z13:X8:S$(Z)") "A$(Z):510:YY2:Z:R1:X1:S$"Your choice? (1-3) ":O3:510:310:XX1:TJ:S$(J):510:R2:O20:T1O5:R1X,10586,105:S$(B):X7:Y12:510:WA0:410:3:49234,0:49232,0:49237,0:49239,0:S$"Do you want instructions? (Y/N) ":X1:Y10:510:D2:610:S$B$:B$"Y"B$"y"İ3200:,Y12:X1:S$"What's your first name? ":510:D10:610:F$B$:Y14:X1:S$5:36107,Y:36102:WA11030 C$"circumference":E$"C = 2(Pi)r Pi = 3.1416":S((1)2)1:S2C$"area":E$"A = (Pi)r Pi = 3.1416" H$"diameter":E((1)2)1:E1H$"radius" B((1)34)25:X54:E2X22)X2X:0:X,10686,106::510:FX / HFG191:3:0,F269,F:F:o S$" to continue : to exit ":X1:Y22.5:510 Z$:Z$(13)ı Z$(27)İ410:3040 (7);:911 VL(2):X26:Y86:0,V(V256)256:1,(V256):36105,X(X255)256:36106,X250F: bB$"":A$"":FX1D4 cA$:A$(13)650F lA$(8)630_ m(B$)0ĺ(7);:611 n(B$)1B$"":XX1:S$" ":510:XX1:611 oXX1:S$" ":510:XX1:B$(B$,(B$)1):FXFX1:611 v(A$)32(A$)149ĺ(7);:611 B$B$A$:S$A$368,0:JKE128:JJ48:JRJOı2 h(7);:310 0,L(1)(L(1)256)256:1,(L(1)256):36096:S$"Circle Circus":X17:Y1.875:510: QXX:F1(S$):A((S$,F,1)):A32A149ij 39424,A:39425,X:39426,(Y8):39427:XX1:X40YY2:XQX ,180,190 S$"Great!":2006 S$"Fantastic!":200K S$"Super!":200g S$"You're right!":200 S$"Yes! Yes! Yes!":200 S$"That's great!" G143:840:X20((S$)2):Y20:510:" 616368,0:16384,128:KE(16384):KE128310:16% D$""::D$;"MAXFILES1":16384W:D$;"BLOAD PICDRAWH"::D$;"BLOAD HPRINT.H"]:D$;"BLOAD CIRCUS.H,A24576"#L(2):I12:L(I):: 24576,24700(I13:A$(I):I:J$".":2000nT3NN1 xI1(6(1))1:I1140,150,160,170     D$;"OPEN INPUT":D$:D$;"WRITE INPUT":"AREA":D$:D$;"CLOSE":D$:D$;"RUN INST"RLLO"   2030N :eX D$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190b L$"Angles on Area - "CH$(CH):KK91l AA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:Pv D$;"CLOSE":P D$:(TL)" numbers,":X2:Y5:510:S$NA$". That's "(P)"%.":X2:Y7:510:3150 S$"Do you want to play again?":X5:Y10:510:370:XX89XX1213070 S$"Does anyone else want to play? ":X5:Y12:510:370:XX89XX121410:2008 D$:D$;"RUN HE ":X2:Y18;o XX121XX89İ510:2200A I K9 "See examples done.","Do examples with help.","Do problems yourself." CH3P0:W0:K0:3040 XX27KK1N P((NTL)100.5)::S$"You got "(N)" right out of "Y11:510+b WA0:S$"A = ":X16:Y13:510Wd X20:LTH6:610:RE$(AREA)İ110:2495j S$"Do you want me to show you this one? (Y/N)":X2:Y18:510:370:S$(XX):XX1:510:XX89XX121S$" ":X16:Y14:510:S$" 20:510:WA0:S$"A = ":X16:Y15:510] X20:LTH6:610:RE$(AREA)G150:840:110:2330 (7):WA1WA1:S$" ":X20:510:2326 S$" ":X20:510:X20:S$(AREA):510 ` WA0:S$"Find the area:":X16:Y9:510:S$FRM$(F):X16:20:510:WA0:S$(VA(2))" X ":X20:Y13:510k WQX:S$" ":510:XWQ:LTH6:610:RE$(VA(1))2320 (7):WA1WA1:XWQ:2310 S$" ":XWQ:510:S$(VA(1)):XWQ:510 F2S$"/2":510& G150:840:S$"What is the answer?":X5:YG0:N0:2000 nCH3NN10 xI1(6(1))1P I1140,150,160,170,180,190e S$"Great!":200~ S$"Fantastic!":200 S$"Super!":200 S$"You're right!":200 S$"Yes! Yes! Yes!":200 S$"That's great!" X20((S$)2):Y6:5F PERIM NATHAN 7/27/877 D$"":D$;"MAXFILES1"B16384pD$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H"v(2D$;"BLOAD PERI.H,A24576"<L(6):I16:L(I):: 24576,24700,24752,24807,24856,24914 FI13:CH$(I):I PPD$".":P0:M0:       ;"CLOSE":D$:D$;"RUN INST"D GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190\b L$"Circle Circus - "CH$(CH):KL1l AA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:Pv D$;"CLOSE": D$:D$;"OPEN INPUT":D$:D$;"WRITE INPUT":"CIRCUS":D$":X2:Y7:510:3150g S$"Do you want to play again? ":X5:Y10:510:D2:610:B$"Y"B$"y"ī2030: S$"Does anyone else want to play? ":X5:Y12:510:D2:610:B$"Y"B$"y"İ410:2008: D$:D$;"RUN HELLO"::2030N :4X D$"":D$;"OPEN510:2200 v K9: "See examples done.","Do examples with help.","Do problems yourself.":T3P0:W0:K0:3040 (B$)27KK1 P((NL)100.5)::S$"You got "(N)" right out of "(L)" numbers,":X2:Y5:510:S$F$". That's "(P)"%.,1)" = ":X16:Y13:510:C(3.1416B2):D12:610:(B$)C5(B$)C5İ110:2495s (7);:S$(C):X20:Y13:510  S$"Do you want me to show you this one? (Y/N) ":X1:Y18:510:D2:610:B$"Y"B$"y"WA1:410:XX2:1000:S$E$:X20((S$)2):Y5:2450<j S$"Calculate the "C$":":X16:Y9:510:E2BB2t S$(C$,1)" = ":X16:Y13:510:C(3.1416(B2)):D12:610:(B$)C5(B$)C5İ110:2495x (7);:S$(C):X21:Y13:510:2490 S$"The "C$" is:":X16:Y9:510:E2BB2Q S$(C$C$,1)" = 2 X 3.1416 X ":510:D4:610:(B$)B2375b> (7);:S$(B)" ":Y11:X34:E1XX4kB 510G S$(C$,1)" = ":X16:Y13:510:C(3.1416B2):D12:610:(B$)C5(B$)C5İ110:2395P (7);:S$(C):X20:Y13:510:2395[ ` S1B2)):D12:610:(B$)C5(B$)C5İ110:2395W (7);:S$(C):X20:Y13:510:2395. S$"The "C$" is:":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"D = 2r":X7:Y7:510:BB248 X16:Y11:S$(,1)" = 3.1416 X ":X16:Y11:510:D4:610:(B$)B22330[ (B$)BS$" X ":510:2326 (7);:S$(B)" X ":Y11:X29:510:2326 D4:610:(B$)B2330 (7);:S$(B):X28((B))4:Y11:510/ S$(C$,1)" = ":X16:Y13:510:C(3.1416((B):X16:Y11:510:S$(C$,1)" = "(3.1416(B2)):X16:Y13:510IWS12350 S$"Calculate the "C$":":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"r = D/2":X7:Y7:510:BB2: S$(C$2):X16:Y13:510:S$(C$,1)" = "((3.1416B2)):X16:Y15:510:2295S$"The "C$" is:":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"D = 2r":X7:Y7:510:BB2CS$(C$,1)" = 2 X 3.1416 X "12250S$"Calculate the "C$":":X16:Y9:510:U16:S$"Substitute 3.1416 and the radius in the formula.":X2:Y18:510:E2S$"r = D/2":X7:Y7:510:BB2HS$(C$,1)" = 3.1416 X "(B)" X "(B):X16:Y11:510:S$(C$,1)" = 3.1416 X "(BYY2rI$"":S$"How many problems? ("(R)"-"(O)") ":X1:510:D3:610:L(B$):LRLOG140:840:20754410:K91L:1000:S$E$:X20((S$)2):Y5:510:C$"area"Y4:X16:S$"2":5106L$"CIRCUS":T2200,2300,2400:910:410:2500S` S$"P = ":X16:Y14:510:LTH5:610:(RE$)PERIMETERW0:110:2495j S$"Do you want me to show you this one? (Y/N)":X2:Y18:510:LTH2:610:RE$"Y"RE$"y"S$" ":X16:Y14:510:S$" ":X2:Yly:":X2:Y18:510:S$"2 X ("(VA(1))" + "(VA(2))").":XX2:510$ S$"P = ":X16:Y14:510:LTH5:610:(RE$)PERIMETERW0:110:2395. S$" ":X20:Y14:510:WA2S$(PERIMETER):X20:Y14:510:(7);:23958 (7);:WAWA1:2340[ F"2 sides of the figure are "(VA(2))" and four sides are "(VA(1))" long.":X2:Y18:510 CX4S$"Since all 4 sides are equal, you could multiply 4 x "(VA(1))PD$:X1:Y18:510E CX2S$"Since the opposite sides are equal, you could multip))").":XX2:510>S$"P = "(PERIMETER):X16:Y14:510:WA0:S$"Add the sides:":X16:Y9:510:S$"P = ":X16:Y11:510:CX5āI1SID1:S$(VA(I))" + ":510::S$(VA(SID)):510\ CX5S$"(2 X "(VA(2))") + (4 X "(VA(1))")":510:S$des are "(VA(1))" long.":X2:Y18:510CX4S$"Since all 4 sides are equal, you could multiply 4 x "(VA(1))PD$:X1:Y18:510CX2S$"Since the opposite sides are equal, you could multiply:":X2:Y18:510:S$"2 X ("(VA(1))" + "(VA(2910:410:2500S$"Add the sides:":X16:Y9:510:S$"P = ":X16:Y11:510:CX5āI1SID1:S$(VA(I))" + ":510::S$(VA(SID)):510)CX5S$"(2 X "(VA(2))") + (4 X "(VA(1))")":510:S$"2 sides of the figure are "(VA(2))" and four si"How many problems? ("(SM)"-"(LG)") ":X1:510:LTH3:610mTL(RE$):TLSMTLLGG140:840:20754410:II15:T(II)0:II:K91TL:1000:S$"Perimeter = Sum of the sides.":X5:Y4:CH1Y655106L$"PATH"\CH2200,2300,2400f$"G0:M0:N0:H0:V0:Q0:410 X1:Y8:S$"Do you want to:":510:Y10:QR13:X8:S$(QR)") "CH$(QR):510:YY2:QR:SM1X1:S$"Your choice? (1-3) ":LG3:510:350:XX1:CHXX:S$(XX):510:SM2:LG20:CH1LG5:SM1YY2ATL$"":S$234,0:49232,0:49237,0:49239,0|S$"Do you want instructions? (Y/N) ":X1:Y10:510:LTH2:610:RE$"Y"RE$"y"İ3200:Y12:X1:S$"What's your first name? ":510:LTH10:610:NA$RE$Y14:X1:S$"And your last name? ":510:LTH10:610:NL$RE12:VA(I2)VA(I):I:VA(5)VA:VA(6)VA:SID6:1100:X(1)2:Y(1)11:X(2)7:Y(2)17:X(3)12:Y(3)11:X(4)7:Y(4)9:X(5)2:Y(5)15:X(6)12:Y(6)15:LX26:Y86:0,V(V256)256:1,(V256):36105,X(X255)256:36106,X255:36107,Y:36102: 410:3:49A(2)VA(1)5:VA(3)VA(1):VA(4)(VA2.5):SID4:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)11:Y(3)12:X(4)6:Y(4)10:VL(6):IJ14:VA(IJ)VA:IJ:SID4:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)12:Y(3)12:X(4)7:Y(4)9:$VL(4):VA(1)VA:VA(2)VA4:IA:VA(2)(VA2.3):VA(3)((VA(1)2VA(2)2)):SID3:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)9:Y(3)12:VL(2):VA(1)VA:VA(2)VA4:VA(3)VA(1):VA(4)VA(2):SID4:1100:X(1)2:Y(1)12:X(2)7:Y(2)16:X(3)10:Y(3)12:X(4)7:Y(4)10:sVL(5):VA(1)VA:VESC> to exit ":X1:Y22.5:510:330:g PERIMETER0:VA((1)50)5:CX((1)5)1:CH1T(CX)11000 CH1T(CX)0T(CX)1 CX1020,1030,1040,1050,1060:IJ1SID:PERIMETERPERIMETERVA(IJ):XX(IJ):YY(IJ):S$(VA(IJ)):510::hVL(3):VA(1)V6115 n(RE$)1RE$"":XX1:S$" ":510:XX1:611r oXX1:S$" ":510:XX1:RE$(RE$,(RE$)1):IXIX1:611 v(A$)32(A$)149ĺ(7);:611 RE$RE$A$:S$A$:510:IX  HIIG191:3:0,II269,II:II:% S$" to continue : to continue : t25,X:39426,(Y8)3 &39427:XX1:X40YY2:XQX= 0II:X bRE$"":A$"":IX1LTH` cA$s gA$(13)620 iRE$""650 j(7);:611 lA$(8)630 m(RE$)0ĺ(7);:611 n(RE$)1RE$"":XX1:S$" ":510:XX1:611/ oXX1:S$(7);:3502 r310:XX78XX89XX110XX121ıB |(7);:370Q 410:3040 0,L(1)(L(1)256)256:1,(L(1)256):36096:S$"The Shapes of Geometry":X12:Y1.875:510: QXX:II1(S$) A((S$,II,1)) A32A149ij 39424,A:394! Yes! Yes!":200* S$"That's great!"S X20((S$)2):Y21:CH3X25:Y15^ 510: 616368,0:16384,128:KE(16384):KE128310 @16368,0:XXKE128:XX27390: J310:XX13ĺ(7);:330 T ^310:XXXX48:XXSMXXLGı h:CH$(I):I:I110:PE$(I),SHP$(I),DFSHP$(I):IR PPD$".":P0:M0:G0:N0:2000b nCH3NN1u xI1(6(1))1 I1140,150,160,170,180,190 S$"Great!":200 S$"Fantastic!":200 S$"Super!":200 S$"You're right!":200 S$"Yes SHAPES NATHAN 7/21/87: D$"":D$;"MAXFILES1"E16384sD$;"BLOAD PICDRAWH":D$;"BLOAD HPRINT.H"y(2D$;"BLOAD SHAPE.H,A24576"<L(10):I110:L(I):: 24576,24700,25071,25128,25178,25226,25283,25354,25416,254660 FI13       PUT":D$:D$;"WRITE INPUT":"PATH":D$:D$;"CLOSE":D$:D$;"RUN INST":D$:D$;"RUN INST"O" N :YX D$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190b L$"Perimeter Paths - "CH$(CH):KTL1l AA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:Pv D$;"CLOSE":E D$:D$;"OPEN IN510:S$NA$". That's "(P)"%.":X2:Y7:510:3150 S$"Do you want to play again?":X5:Y10:510:LTH2:610:RE$"Y"RE$"y"ī2030: S$"Does anyone else want to play?":X5:Y12:510:LTH2:610:RE$"Y"RE$"y"İ410:2008: D$:D$;"RUN HELL18"o RE$"Y"RE$"y"İ510:2200( 0 K9{ "See examples done.","Do examples with help.","Do problems yourself." CH3P0:W0:K0:3040 XX27KK15 P((NTL)100.5)::S$"You got "(N)" right out of "(TL)" numbers,":X2:Y5: X13ĺ(7);:250 :Y ,:I13:CH$(I)::FI$"SHAPES"āI13:CH$(I)::310n 1I13:TRASH$: 6FI$"AREA"FI0 @FI$"CIRCUS"FI1 JFI$"PATH"FI2 TFI$"SHAPES"FI3 ^FI0355 `II1FI4:TRASH$: cII14:IN$(I"][";::40:I120:"][";::"]"h :3:T$"VISION SOFTWARE PRESENTS:":200:5:T$QQ$:200:34,8:: PG1:23:T$" TO CONTINUE : TO EXIT "::200: 16368,0:16384,128:KE(16384):KE128250 16368,0:XKE128:X271000SP$)):1608 I1LT:J((S$,I,1)):(J32(J95));:W S$(S$,(S$)LT):LI1ĺ` 120 ::(7);"WORD TOO LONG";: L(T$):H20(L2):H:T$;:FLAG1Ģ(37)2:H:TR1L:"-";:: :" ::"[";:I120:"][";::I14:40:ons for "Q1$ P220:300A dL(S$):LTCH20(L2):L0ıQ nLJ0HLJ xH:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0190:: LTTC11:X$(S$,LT,1):X$SP$X$"-"180 E2ĺ(S$,LT(X$Б  INSTRUCTIONS -GEOM DISK-Q"OPEN INPUT":"READ INPUT":FI$:"CLOSE"vFI$"AREA"Q1$"Angles on Area"(FI$"CIRCUS"Q1$"Circle Circus"2FI$"PATH"Q1$"Perimeter Paths"<FI$"SHAPES"Q1$"Shapes of Geometry" FQQ$"Instructi     ITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:PUv D$;"CLOSE": D$:D$;"OPEN INPUT":D$:D$;"WRITE INPUT":"SHAPES":D$:D$;"CLOSE":D$:D$;"RUN INST"T;"RUN INST"PD$:D$;"CLOSE":D$:D$;"RUN INST" else want to play?":X5:Y12:510:370:XX89XX1213080R D$:D$;"RUN HELLO"X b 2030q 410:2008yN :X D$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A493190b L$"Geometric Shapes - "CH$(CH):KTL1Cl AA1:D$;"WR3040 XX27KK1 P((NTL)100.5)::S$"You got "(N)" right out of "(TL)" numbers,":X2:Y5:510:S$NA$". That's "(P)"%.":X2:Y7:510:3150 S$"Do you want to play again?":X5:Y10:510:370:XX89XX1213070: S$"Does anyonehas eight sides." "rectangle","The opposite sides of a rectangle are equal.","They are connected with right angles.","parallelogram","The opposite sides of a parallelogram are equal.","The opposite angles are equal, too." CH3P0:W0:K0: figure.","square","","A square has four equal sides and four right angles.","pentagon" "","A pentagon has five sides.","hexagon","","A hexagon is a six sided figure.","heptagon","","A heptagon has seven sides.","octagon","","An octagon urself." "straight line","","A straight line is the shortest distance betweentwo points.","circle","A circle is a closed curve.","All points on the circle are the same distance from the center."\ "triangle","","A triangle is a three sided J$PE$(SL)İ110:2470c~ 3:ER4858:0,ER279,ER::S$"This is a "PE$(SL)PD$:X2:Y6:510:0 S$SHP$(SL):X15:Y9:S$""2460 510:Y18:X2 S$DFSHP$(SL):510  K9 "Learn the shapes.","Name the shapes with help.","Test yo$"This is a "PE$(SL)PD$:X2:Y6:510:ER64155:120,ER279,ER::0k3 S$SHP$(SL):X15:Y9:S$""2357}4 510:Y18:X25 S$DFSHP$(SL):5108 ` 1000j S$"This shape is a ":Y6:X2:510:LTH20:610:RE$""S$RE$:700:2420o 2410t1 HELP02340 HELP1Ē3:ER4858:0,ER279,ER::ER6494:120,ER279,ER::0:Y9:RQ110:X20:S$PE$(RQ):510:YY1:RQ S$"This shape is a ":Y6:X2:510:LTH20:610:S$RE$:700$ J$PE$(SL)İ110:2360F. 3:ER4858:0,ER279,ER::Sa "PE$(SL)PD$:X2:Y6:510:S$SHP$(SL):X15:Y9:S$""2230O510:Y18:X2hS$DFSHP$(SL):510:y1000:HELP0 Y6:X2:S$"Type 'Help' for help.":510:Y9:X20:S$"Name this shape:":510:Y11:X21:LTH18:610:S$RE$:700 J$"help"HELP0:33,1:34,23:35,24::16368,0< :(4)"PR#"PS::350Y T$:A1(T$):"-";::a A$ (A$,1)" "A$(A$,(A$)1):260 A$""ĺ:250 B$ "B$""B$(13) ,(A$,1)"-"A$(A$,(A$)1):C%1 6(16384)155Ĺ16368,0::( :(4)"RUN HELLO" :16368,0:14:1:"What slot is your printer in? (1-7)? ";:A$:A$"1"A$"7"ĭA$(13)A$(27)180 A$(13)A$(27)360 PS(A$) :13:14:"Printing...":::"Press [SPACE] to pause, [ESC] to abort"! 32,,0o x23:1::" [RETURN] TO CONTINUE [ESC] TO QUIT ":" [P] TO PRINT ";::1:23 16368,0:16384,128:A(16384):A141A155A208A240130 A141ė: A208A240180 :12:12:"One moment please..." " INFORMATION PLEASE 6/8/87ET$"About this disk":RP$"TOC"V(QQ$T$:1000_<450F:14:" Press [RETURN] to re-read or [ESC] to quit"P16368,0:16384,128:A(16384):A141A15580ZA141Ĭd160 n34      If you miss one, I will review it with you so you will know it the next time.":15:S$"Returning to "Q1$". . .":100:"RUN";FI$F2F";FI$0 figure and tell you a little about it so that they will be easy to remember."V "This option lets you try to name the figures. If you type in 'Help,' I will show you a list of all the names."PX "The 'Test yourself' option will keep your score.y work problems by yourself. If your answer is incorrect, I will review it with you. You may need a calculator or paper and pencil."Q SHAPES R "Learn the names and patterns for common geometric figures with me!"NT "I will show you eachides so that the periemter is easy to calculate. I will do the figuring for you."L "I will set up the problem and you can calculate the answer. I will help if you make a mistake. You may need a calculator or pencil and paper."N "Last, you mayou miss one, I will review it with you."8G PATH H "The perimeter of a shape is the distance around the outer edge. With perimeter problems, drawing and labeling the shapes can help."RJ "We will look at different figures and label the sith this option you may try to work the problems yourself. I will help if you make a mistake. You will need a calculator or pencil and paper.")D "The third option is to work problems by yourself. You will need a calculator or pencil and paper. If er."= CIRCUS h> "Learn how to calculate the area and circumerence of a circle with ease!"@ "We will look at circles and the measurements that you need to calculate the circumference and area. I will do the figuring for you."B "W and calculate the answer. A calculator or paper and pencil will help you on this option.": "The third option is to work problems by yourself. If your answer is incorrect, I will review it if you wish. You may need a calculator or pencil and paps by using the correct formulas. Drawing diagrams can help you."6 "We will look at different figures and label the base and height so that the area is easy to find. I will do the calculations for you."[8 "I will help you set up the problemmples done.","Option 2. Do examples with help.","Option 3. Do problems yourself."* "1. Learn the shapes.","2. Name the shapes with help.","3. Test yourself."3 AREA A4 "Find the area of parallelograms, triangles, and rectangleI):2 hE2(637)223:SP$(32):TC36:LJ2:LI2 rS$IN$(1):100:V93:S$"There are three ways to use the program.":100:240 |II13:LI2:LJ2:TC38:T$CH$(II):FLAG1:200:FLAG0:12:S$IN$(II1):100:240:II:1000S  "Option 1. See exa                ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? =/I1L"QȥQ L`                         . .8eeNj ӎ L`   i H 8 ih i 8 ` @ ӎe   &LJA ) =/I1ȥ i) 8Ȱ8  i ` 0`  1`E))/%` WȹW`)0  5`)0 J.` @ ӎ  L ӎ  5 Q . h% (0  Q (LȄ (  h (Lޏem m 8 m ɀ  Luɠ  :Lu CLu ~Lu iLr`` JJJJJm  i` <e  JL ` L:L?L)ȱȱLD    Lu))  ` L@  L`ȱ L0L̍Pȱ  L ȱȱ 28    tle Rock, Arkansas 72205"<N " (501) 227-4670"BX_H20((T$)2):H:T$:::"[";:I120:"][";::I14:40:"][";::40:I120:"][";::"]":3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8::T retaught when the child misses a","problem.","",""D " ","These programs were developed by","Micki Fitzpatrick, Programming Coor.","Send your comments and ideas to:",""," Vision Development Office"," 23 Nob View Circle"," Lit name which is used in","recording his score. Children will","be able to use the disk independently","after going through the 'See Examples"3: "Done' or the 'Do Examples With Help'","option.","","In most of the programs the concepts","areD GRADES program.",""+ "When the GRADES file has more","than 50 scores, use the DELETE GRADES","program to create a new file. Press"," and D for this program."0 ,"","The title page of each program asks","for the child'srom","the menu with control keys.","","The READ GRADES program prints the"& "scores on the screen or printer, with","child's name, program, number right,","number possible and percentage.","","Press and R at the same","time for the REAA$(37)(34)A$""4603A$:(A$)40ĺO(37)20A$""Ĺ37,21c(37)21İ110l460|216,0:11070J "Each program is accessed from the main","menu and recycles back to that menu.","Scoring programs are accessed fto continue, [ESC] to abort "W 16368,0:16384,128:A(16384):A160A155390f A155360 :13:14:"Printing...":::"Press [SPACE] to pause, [ESC] to abort" 32,0:33,1:34,23:35,24: (4)"PR#"PS:16368,0: ::5204)"PR#0":360/ @(16384)160Ĺ16368,0:370R JS$" ":C%1(A$,1)" "S$""t TA$S$B$:A$"":B$"":C%0:250 ^216,0:A$""ĺA$" ";:B$""ĺB$ h:(4)"PR#0":::34,8:: r(4)"PR#0"::34,8: |14:14:"Pausing...":::" [SPACE] @ F F`F $ (4(`e   ( *!CD"EG@`W;:ddddTUUTTU'`Fj_iiiiihhiddddTUUTTU`Fi`'i_ii_h^hi^IYddddTUUTTUpnljhfd]_ac~eg|zikmxvsuqnpca_]]~[|[zb]__]a]c[e[gYiYkYnYmYxYvYtYrYpU@ F F`F $ (4(`e   ( *!CD"EG@`W;:ddTUUTTU`Fdb`4AzUsUUU}U{UwUxUtUvUWWWYY[[pWnWlWjYhYf[d[s}{xyvuTUUTTU'`Fj_iiiiihhiddddTUUTTU'`Fj_iddiicchhc*@a F F`F $ (4(`e   ( *!CD"EG@`W;:ddddTUUTTU`Fi`'i_ii_h^hi^IYddddTUUTTU'`Fgdbrqr\bqZpqqqsqddddJ JJJJJe ) e<)`KysgOaOALA||`LLL`aL|LaOOALLLAaL`|acIy`yyyaLLAOa||`LLLLsssssOOOOLLa||LdpdLqsssssa@$$$$`LLLLaLLLa`LL`||ALLAOO`L|||a|aOayy`yyIcLLLLALLLasLasaLLLLAOa@gsy@cayxyacssssssssqagGgaqWkssa@L@@LL`@L`L@`a@L|L@a`@LLL@`@@|`|@@@@|``||a@|DL@aLLL@@LL@@sss@@OOOOL@aLD`p`DL|||||@@LLH@DLLa@LLL@a`@L@`||a@\\TdQ`@L@`DLa@|aO@a@@sssssLLLLL@aLLLLLasLLasaLLLLLasss@@gsy@@``|||``|xqcG``ggg`` ? ccccccII[Im@@m@@ms@|@O@sXhpCEFyv}{UnQsswsGcqqqcGqcGGGcqwUcAcUwss@@sscgsAAccGcqx|aLLLLLaCILOOOOa@LGq@@a@OAO@aGCIL@OO@@|`O@acy|`LLa@@Ogsssa@LaL@aa@LAOAacccccccgsGcqcGAAAAxqcGcqxa@Lg@@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "   U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]@@@``@."B I11000:::"PRESS ANY KEY TO RETURN TO MAIN MENU.";:Z$J :^ D$;"RUN HELLO" ME GRADES,";F$( LD$;"OPEN GRADES,L50"0 QA0H VD$;"DELETE GRADES"b `D$;"OPEN GRADES,L50"| jD$;"WRITE GRADES,R0" tA ~D$ I150 D$;"WRITE GRADES,R";I " " D$ I D$;"CLOSE GRADES" :"NEW GRADES FILE OPENED:::::"DO YOU WANT TO SAVE THE OLD FILE?":255:K :"(YES/NO)? ";Z$a ::Z$"NO"1100u Z$"YES"1010 V(37)1 "WHAT IS THE NEW FILENAME? ";F$ (F$,1)"A"(F$,1)"Z"1050 I13:V:1:(7)::V:958:1040 D$;"RENA`D$"": CTRL-D::150:"THIS PROGRAM WILL DELETE ALL THE GRADES"::"IN THE 'GRADES' FILE AND SET UP A NEW"::"FILE WHICH WILL HOLD 50 RECORDS. "::4 DE11000:::"IF YOU WANT TO SAVE THE OLD FILE, YOU"::"MUST RENAME IT.":DE11000ysgOaOALA||`LLL`aL|LaOOALLLAaL`|acIy`yyyaLLAOa||`LLLLsssssOOOOLLa||LdpdLqsssssa@$$$$`LLLLaLLLa`LL`||ALLAOO`L|||a|aOayy`yyIcLLLLALLLasLasaLLLLAOa@gsy@cayxyacssssssssqagGgaqWkssa@L@@LL`@L`L@`a@L|L@a`@LLL@`@@|`|@@@@|``||a@|DL@aLLL@@LL@@sss@@OOOOL@aLD`p`DL|||||@@LLH@DLLa@LLL@a`@L@`||a@\\TdQ`@L@`DLa@|aO@a@@sssssLLLLL@aLLLLLasLLasaLLLLLasss@@gsy@@``|||``|xqcG``ggg``sa@eccccccII[Im@@m@@ms@|@O@sXhpCEFyv}{UnQsswsGcqqqcGqcGGGcqwUcAcUwss@@sscgsAAccGcqx|aLLLLLaCILOOOOa@LGq@@a@OAO@aGCIL@OO@@|`O@acy|`LLa@@Ogsssa@LaL@aa@LAOAacccccccgsGcqcGAAAAxqcGcqxa@LgPT7SR{aXddddxdZKxAdAUKUZdd`@xUA00vAvA0`PG7HKUdddddxdxdd`<~mUKKUUK`5x^_mqdddddxFxPddd`Xkl>k>j=h=g=i=f=e=d>b>c>a?`?_?^@]@\A[BZCYDXEWFWGVHVIVJUKULULUMTNTOTPTQTRTSUTUUUVVWVXVYWZW[X\Y]Z^[_\`]a^a_b`babbccc`RnF4A4Azz4`PR?irMc\dddd d@ F F`F $ (4(`e   ( *!CD"EG@`W;:dddd@`5ddedfdgdhdidjdkclcmcnbobpbqaras`t_u^v]w\x[xZyYyXyWzVzUzT{S{R{Q{P{O{NzMzLzKyJyIy    `F'`~rx_r_YxrddddTUUTTU`F'h\iiiiiihihhihddddTUUTTU'`Fj_iddiicchhci_r_Yxrbfjnhpj`Nj堭Ӎ̍󠭠殍ڍӍōӍ̍𱱍̍̍Ӎƍ΍ō  23900 ::10:"UNUSUAL ERROR CODE - ";Y;"."R :10:"SEE YOUR DOS MANUAL." OF ";G(I);SP$;P(I);"%"8 :I<B :"END OF ";F$;" FILE."KL D$;"PR#0"V 23:"PRESS ANY KEY TO RETURN TO THE MENU.";:G$` :10:10:"ONE MOMENT PLEASE...."j D$;"RUN HELLO" Y(222):Y5Ģ16:958:18:"THERE ARE NO GRADES IN THE FILE.":FILE." 2390 D$;"PR#1"7  30:F$;" FILE"::J  I1A:SP$" "  L(N$(I))(NA$(I)):SP37L:J1SP:SP$SP$" ": $ N$(I);", ";NA$(I);SP$;L$(I) ) SP$" ":L((N(I)))16((G(I))):SP39L:J1SP:SP$SP$" ":. N(I);" CORRECT OUT 2300  Y(222)% Y52040B "UNUSUAL ERROR CODE ";YH o *:2:T$F$" FILE":990:LL1:850z 4I1A >:N$(I);", ";NA$(I);" ";L$(I) CN(I);" CORRECT OUT OF ";G(I),P(I);"%" HJJ1:J6İ900:J0 RI \:"END OF ";F$;" VD$"": CTRL-D/ `D$;"OPEN ";F$;",L50"H jD$;"READ ";F$;",R0"O tAW ~D$b I1A| D$;"READ ";F$;",R";I N$(I):NA$(I):L$(I):N(I):G(I):P(I) D$ I D$;"CLOSE ";F$ :10:"*** ";F$;" FILE CLOSED ***" Z2090,19:10:"'GRADES' (Y/N) ";:Z$:Z$C Z$"Y"F$"GRADES":1105a 17:1:958:Z$"N"1050k 1045 19:"WHAT IS THE NAME OF THE SCORES FILE?":21:F$ LF$(13)F$"GRADES": READ GRADES QN$(65),NA$(65),L$(65),N(65),G(65),P(65)"SCREEN OR WITH A PRINTER. WHICH DO YOU":9:"WISH TO USE?" 12:15:"1) SCREEN":14:15:"2) PRINTER":17:1:"YOUR CHOICE (1 OR 2) ";:Z$:Z(Z$):1 Z$"1"1045 Z$"2"Ģ12:1:958:198:1020% 17:"IS THE NAME OF THE SCORES FILE":T d2450::10004RH:IHHL:"-";::o23::T$"PRESS ANY KEY TO CONTINUE.":990:756:::L(T$):H(40L)2:H:T$: READ GRADES= :3:"THIS PROGRAM WILL PRINT THE GRADES":5:"FROM THE SCORES FILE EITHER ON THE ":7:     P*P*U*U ppyCxxy|a U*U*Up?`<Oy?`C<`CCaCa@*U*UU*U*U~|~@~`3pLMMLfff> ` U**U*U*`~`@`~@@@LM pLqLMM1L L}3f`l 0L U U*U**U*U**Up`xO?``?@*U*U*P*U*U*p@ LMMMMM}LM,; l8|8|lLM}L9 lP*U**U*U*P*U*U* U*U*xpp*U T*U*UU*U*UT*U*~q?pp?p`|aP*P*U*U*`U*U*U`@<|y0`C<`C``pa*U*UU*U*U~|@~pxx~8`xxxL<<>< > syq`xq U*(U*U*`~`@`~@@~|xxpp`y8L}|0xLy {9vCg0|x U U*U*(U*U*@*U@?@pp|A`p@*U*U*P*U*U*p@ L}xx|x |L|xL |}x|xLP*U**U*U*Q*U*U* U*U*xpp*U*P*U*UU*U*UT*U*@q?pp?p``x T*P*U*U*`U*U*U~<@ x@x |@ {xLy xp| xqxxL@*U*A*U*U T*U*U U*U*@|~C?pp`?L(UU*U*U U*U*UP*U p~q?pp?xpG?@`|?P T*U*U aC@ Ly L Ly 3Lm0 0XY}LY 0LmP*U*A*U*U*T*U*U U*U*p||~c`|xo@(U T*U*U U*U*UP*U ~q?pp?pG`|P T*U*U `|p~?xya U*U*Up?p`xpOa> VISION LOGO& :: 216,169,32,133,7,169,0,133,6,160,0,177,6,73,128,145,6,165,7,201,64,208,3,76,42,3,24,165,6,105,1,133,6,165,7,105,0,133,7,76,9,3,96:X768810:A:X,A:X :(4);"BLOAD ROUN,A$2000":16304,0:16302,0:1   U*(U*U*pO~@`~@@x0x`x@T*A*U*U*0*U*U*A*U*U*x?(| 3@ 0|10@ @*U*UU*U*Ux`>l p*U*P*U*U U*U*UT*U*|`@pp?p@`x|< U"U*U*(U*U*@*U```pp~}}C?@`p~@U*U*U|x to go on: to exit":X3:Y180:610:420:KQQ12000::kX140(((S$)6)2):610:TT(16),T(16):K015T((1)16)1:TT(T)11005TT(T)1:T(K)T:KL$"GAME":16304,0:16302,0:16299,0:16297,0:S$"The1 XXDI::; 1,70:2,190:3,0:4,39:5,0:37950: !1,1:2,20:3,8:4,39:5,0:37950:1,0:2,45:3,0:4,26:5,0:37950: "1,50:2,190:3,0:4,39:5,0:37950: #A8192:LOA(A256)256:HI(A256):0,LO:1,HI:230,64 $24576:8S$5 ՠȈ*jrrj*Jp>p`p`ppp:*+>@ @+*)''+)*  ++uUUU=0,  ,0yo_?|ueUu~:CUUUU~~~ " @j  j g_*jrrj*Jp>` :***j:++>j*j.+>jj.++>j*z y몪`p+*)''+)* u]UWUW}Uw а~}}~ yo?|ueTj*j:/z*j:./zz  OSUTUSO~}w? """*Uu_U_uUU.=j.**+>j:/*+>z**?+*+:*kg~ꪪꪪꪪ/+(( p^UUUW}UW}UW}_U_]UUUuWWuu Օy~~> ~@@@Dj***:/*/zj>+*/zj:.+/z/+**+:/**jՀGSTTUSO~~|p uWU_uU_uU_uUWuA@<+**.j*~#?| < ~jj.+*/~/***(~⪨ |@ "" `\W}UUu_U]U|?><<><*z*:.++^:$_P ( ("" `\Uu_uUuUUUW_U}WUU_uUU?o{T_QUQA `⪪gycLUU_@xWUUUW}UuUU}^l` X?G ~`@**jxyxa@8+>jz.**/~+***!P@PDD@DL( ( "*""KTDEAE@@   ( ("`jpx|~Uu||~xJݝݽ@P_ P_PPPTPUQUUT*|*/??ӛ @ *}}m *}}m*   UU  2b&,  @ฬ aQX4dMY1&`Հ "!#hH0hH( `꺀3fLECQ@`$ 3f,p@p$@@@`p!!!! 00 0`B   ր QQ3fLX0`(P @ @  B"!hH P P P ݀ ECFEC    o>@ت>)*+''+*#  UUUu(BF(ฬ~w_??yeUUeyPPEE~U""UՀ~~~( p*0D@0*꺀 @@0~ʪ~>)*+''+* }WU_uU_uU ؀~}}}Հ~w?yeUEQD:*z/>j*j.+>j ?WUTTSW~}{O**uu]WUUUWUUu Հ*JjrrJ*jx`d`e`edj*?" @XWUUUuUUUWuU_}UUWuUUu]U]U=ฬ}~~> ~P;***j>++>j:.*+>j:.++>Z/***.~+**:Հ?SUTTSW~|x@( u]UW}UW}UW}U]=꺀oՀ*JjrrJ*j`a j***z.+/z*j:./zj:.*/z*j^uUU]WuUUA??<<=<k***.j*~>.j>jj:+*/z#_\((  xWU_}UW}UUUU]wu]UUW}UUu_wyξξξ}t}t @8/z:+**/z:.+*/*/**/j*7yʪʪʪ':@gQ8 c<G~rb ***jQp.++:*;>jz.+*/~/**)`⪨|ygO>yqO (( p^UUD||| l }UuUU}_P}~|` xG@PPp.**+z*(|L Lzj:.*+^+***#?? p (  "pW`,{*,td~ꪪꪪUU  ʪ`\UUU_uUU}VCՕ9> ~x**jqxxpP`./zj>+*+>o***(??Osq8UUs?"`^U_uUw}UUuam ( `xz|~?Uuz~~zb PP_ P_PPPTPTQQ*|~*?y p **m}} *m}}*" UU  э݀`\UV``x**AA@˛