L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 CcˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`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- ( t Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`\(_رqٱq\(رqٱq\(رqٱq\(رqٱq\(Gٱq\(ٱq\(ٱq\(ٱq\(ٱq\([_@p()رqٱq\(ٱq\(ٱq\(ٱq\(ٱq\(ٱq\(رqٱq\(ٱqرq\(ٱqرq\(^ٱq\(ٱq\(ٱq\(ٱqرq\(رq\(رq\([_@p()رqٱq\(ٱq\(ٱq\(ٱq\(ٱq\(ٱqҬՠ)Gd2ea()Gd2e?D>a(ĠҠ)a(ĠŠԠӠϠϠҠŮ)G;oS(ӠΧϠ٠)&@d2e_nK@p()رqٱq\(ٱq\(ٱq\(ٱq\(WرqϠŠ)&@M6\^/oa(ƠŠԠŠĠӠ)a(ҠŬՠԠҠŮƠ)GU4a(ԠŠӠΠҠԠ)a(Ġ٠ϠҠӬĠ)\9a(ӠԠԠŠŠΠŠ)a(͠)a(ŠРӮŠŠ)[ a(ƠǠ̠ƠŠӠΠ)Ga(ΠҠϠŠǠͭ)X%a(ӬǠҭŮ)a(ӠԠӠӠǠŮ)7*cS(ӠΧԭ)a(ҠũŠԠӠϠŠŠ)GLa(ӠΠҠŠΠ٠Š)a(ΠĠ͠ŠŮ)cVa(ŠӠҠ͠Ϡ)a(ǠȠנϠŠͮ)Wa(ŠŠ͠ӬĠUVWPoa()GYY>@p()oPa@GP!a@GoPa@GP!a@GNd2e?oPa()oPa()GP"a()oP"a()*oUVWPbGYP` o a(ɠӠՠԠŠRαqFoP a(Š)G\2Pa(Š)G\2Pa(Ơ)G\2αq d2e@q q\q \q\q\q"\UVWYd2e?P\(d2eoUVW Pa()GY/UVW XP$" "UU012(U02):U0U:540K:"DO YOU WANT TO PLAY AGAIN";:N$`N$"Y"ĉ::410j::NU":35,37,8,38,35,38,36,38,37,38,38,38 88,39,39,39,-1,0j:22:"HA-HA ,I WON THIS TIME!":S11000:SpN$(1)", YOU HAVE $"DXN$(2)", YOU HAVE $"DO"PRESS SPACE BAR TO CONTINUE":"PRESS ANY OTHER KEY FOR NEW SETUP";:16368,0:P$#,29,22,29,35,29, 8,30,11,30,22,30,35,30,7,31,8,31,10,31,11,31,22,31,35,31# 7,32,10,32,14,32,15,32,16,32,17,32,18,32,19,32,20,32,21,32,35,32,7,33, 9,33,10,33, 11,33,12,33,13,33,35,33,7,34,9,34,10,34,35,34,7,35,8,35,9,35,35,35,7,36,8,36,35,36,7,37,8,37,,21,22,22,23,22,37,22,22,23,27,23,32,23,38,23,22,24,38,24,13,25,14,25,15,25,21,25,29,25,30,25,31,25,38,25I12,26,13,26,15,26,21,26,30,26,38,26,11,27,14,27,15,27,21,27,22,27,28,27,29,27,31,27,32,27,35,27,36,27,37,27,38,27,10,28,13,28,22,28,35,28,9,29,12DL0ĺ"VALUE OF GAME IS $0.00. NO WINNER.":S11000:S:1730`^Q02:Q202:W(Q,Q2)0940khQ2:Q~r:((1)15)1|A,B:A1čA,B:1670i24,19,25,19,34,19,24,20,26,20,33,20,34,20,35,20,23,21,27,21,28,21,29,21,30,21,31,21,32,21,36Q30:Q40:Q02:Q3Q3W(Q,Q):Q4Q4W(2Q,Q):Q:Q33VQ43V1560P1580:22:N$(U);", YOU WON!":S11000:S:U2DODODL:1730"DXDXDL:1730,C$A$6A$B$@B$C$JUU12(U2):TOGGLE BETWEEN 1 AND 2>TDLDL100:R2Z1580Z2620+Z36608Z4700EZ5740RZ6780_Z7820lZ8860yZ9900V2(U1)1:W(Q,Q2)V:PLUS OR MINUS ONEQ02:Q30:Q40:Q202:Q3Q3W(Q,Q2):Q4Q4W(Q2,Q):Q2:Q33VQ43V1560QFU1čX1,Y1:X15,Y1:X11,Y11:X14,Y11:X12,Y12:X13,Y12:X12,Y13:X13,Y13:X11,Y14:X14,Y14:X1,Y15:X15,Y15:1510xU2ďY12,Y13X1:Y12,Y13X15:X12,X13Y1:X12,X13Y15:X11,Y11:X14,Y11:X11,Y14:X14,Y14:1510-r$''q_' '̰q 'UVW̰-rq-rY '@p@)[*]٠ +M6& +a(ҠȠҺϠԬ)+a(ΧϠŠŬ)'+a(ŠϠŬϠŮ)(+a(ԠנӠȠŠUVW̰oR@B-rr+`'-rq;@r`-r-r$t'8j'@B-rrp@*-r#-rr-rq;@ro'oa@*-rrt'`@*-rr9()$'~'q_'']'Y'`$'6'R@B-rr-rq;@r`-r()%[#Q']٠ 'M6$'a()E@E@E().'a(ΧϠŠŮ)'3'a(ŠϠŬϠŮ)(5'a(ԠנӠȠŠԮ) 8'UVW̰3B'oUV-rW-ra@*#rGYcYL'-rqqV'M6[(#]ŠĠ(2#S(ϠՠԠϠŠҠ)&@<#`@*#r9()$#F#`@*#r:()%[P#S(ŠϠˠҠŠ)&@Z#`@*#r9()$x#d#`@*#r:()%[ n#\_#x#\2#S(ϠՠԠϠԿ)&@ #`@:נՠϠŠŠŠƠȠҠ٠Ǡ͠Ӯ)oZca(׬٠ԡΧԠ٠ԠӭӬŠՠ̠ŠŠϠԠ͠Ү) ca(Ԡ٠٠Ϡ)(q.?6@r`$d6?e)a(Š)(a()2a()<a()UFa(ƠŬՠ٠ԠϠŠŠӠά٬̠٠Π)xPa(ŮҠӠŬɠ)(q.?6@r`$d6?eM6qa(ŧӠŠŠŠȠŠͭӠĠή٬ŠĠŠŠӠĠӮ)c&a()c a(Ԫ)a(̠٠a(ŠӠĠŠħŠŠҠҠӠӠŮ)Ua(ҠӠŠӬɠנՠϠŠĠŠ٠)=a(ԠŠǠҠĠƠŠҧӠŮ) ca(Ԡ٠٠Ϡa(ҠŬՠԠŠŠΠŠĠŠΠ)ha(Π̠٬ՠĠŠŠӭҭΠӬĠϠŠӮ)GCa(ҠŬՠĠŠŠĠŠŬ)Sd6?e"q.?6@r`$d6?e M6Xca(ŠĠ̠٠٠Š٠ĠàӬԠ)qa(ӠŠԮȠӠ٠ŠŠ٠ǠҠŧƠϠ)Vή)Xja(ҠŬƠՠĠϠŠҬΠΠĠĠΠ)G)ta(ŠΠҠԮРϠӮ)S~a(ŠԠӠԠŠŬ̠٬ĠŮ) ca(Ԡ٠٠Ϡ) ҠҠ)FR@B-rr+z-rq;@r`-r-r$f ưqq_L]FVca(ŧӠנԠӺ)a(ɠ̠ˠՠϠŠԠƠ)R`a(ӠĠϠԠƠŠӠȠ̠ŠҠŠ٠ŠŧӠ٠ǠΠԠŠĮ)F>a(ŠҠ͠ŠԠŮ)a(ŠҠӠԠԮ)8Ha(Π̠ŠĬŠΠΧ) Rd6?e\-rqq@p()fq`$$pca(̰#bE()E@*-r#-rrY4a(ӠԠ٠ŠĠҠƠՠȮ) UVW,̰Yc` a(׬ɠĠԠƠŠԠӠԠŠԠϠՠΠ)G*a@E@cT4a(ҠϠ\(رqٱq\(ٱq\(ٱq\(Bٱq\(رqٱq\(رq\(رq\([p]Ġٺq]î̮r]ŮȠs]ˠt]Ҭt]Ҭq\(`رqٱq\(رq\(رq\(ٱqرq\(ٱqرq\(fرq\(رq\(ٱqرq\(ٱqرq\(ٱqرq\([d@p()رqٱq\(رq\(رqEVIOUSLY "::"CALCULATED)" :"WHEN USING ONE OF THE OTHER FUNCTIONS,"::"THE NUMBER MUST HAVE BEEN"::"PREVIOUSLY ENTERED OR CALCULATED":h "HIT RETURN TO CONTINUE";A$#:1052STURAL ";30);"LGN"5"HIT RETURN TO CONTINUE";:A$E3:1:958g"STOP CALCULATOR";30);"STP""CLEAR CALCULATOR";30);"CLR" ::"TO ADD, SUBTRACT, MULTIPLY, OR DIVIDE,"::"THE TWO NUMBERS MUST BE IN THE"::"'CALCULATOR' (ONE MAY BE PRR1";30);"SIN"-"COSINE OF R1";30);"COS"M"TANGENT OF R1";30);"TAN"p"ARCTANGENT OF R1";30);"ATN""ARCSIN OF R1";30);"ASN""ARCCOS OF R!";30);"ACN""RECIPROCAL(1/X)";30);"REC""LOG - BASE 10 ";30);"LOG""LOG - NA$70uUVWưUVW̰:ub-8rrJDuYcNuYXuUVWưUVW̰bub-8rrJluYcvuY[--rrr7Y(8a(Ԡ٠٠Ϡ)d6?e8`.?6@r$8d6?e8[Mf:UVWưqUVW̰q-8rr-8rrq`%qY@p:`@*-r#-rr9()@*-r#-rr9()$6u:_7z:`7UVW̰-rq17UVWư-rq-r-8rr-rYZ7UVW-rqY7UVW̰UVW̰$7q-rq-r`-r-r$77-rq-rq7YZ7a(ŧӠŠӺ)c 7UVW̰*7b--rrH@*--rr#F7qqUVW̰P7q-8rr`%q Z7`%qd7Yn7q`$x7=s7UVW̰-8rrq-8rr8drY_F7x7]C7UVW̰-8rrq8d8-8rrrr88rr7YZ7]ŠŠM6UVWưqUVW̰q-8rr-8rrq`%qY@6`@*-r#-rr9()@*-r#-rr9()$66_746UVW̰-8rrq-8rrY7Y7](7]ŠŠ <7UVWưrra@*#rG3Yc4YZ6`%q6[6]Š?6M6a(׬ɠ̠Š̠Š)E@E@U6a(٠ǠȠŠ)a@E@E(٠)a(ŠƠԠҮ)!6]ԠӠΠa()GUV--rrW--rra@*#rG 3YcY3qUVW̰`$4 3oT3`$"3q_4("3--r8rrqoa()FG#3`'%a()G$3`%a()G%3`d%a()G'3` %a()G2,3a()GUV--rrW--`-r-r%c92a(ԠŠĠՠŠ)G`-r-r%c72a@E@a(Š٠ҠҠǠҠԠ) 2UVW̰(2q--r8rroa()FG2`'%a()G2`%a()G2`d%a()G2` %a()G22{/`%q/[2]٠͠"2UVWưUVW̰-rqYT2UVW̰UVW̰q-rq-r`-8rr-8rr$22-rq-rq2YZM6M2a(Ǡ)E@*-r#-rrE(٬)GTq`$D/:/--rrq-?/oa()F--rrG`--rr %a()G7A/a()GUV--rrW--rra@*#rGYcD/YN/UVWư-rqYX/UVWưUVWư&b/q-rq-r`-r-r$v/l/-rq-rqv/YZŠ͠ϠŠΠŠҠΠŠŠŠǩ).a(Š٠Ү)7/UVWưoa()F--rrG`--rr %a()G2/a()GUV--rrW--rra@*#rG /YcY &/q+/UVWư`$D/0/o$p+f+q_z+p+]z+Y+`$+6+R@B-rr-rq;@r`-r-r$++q_+ +ưq +UVWư-rq-rY +@p@,[.]٠Ҡ .M6x.a(ŠŠŠƠȠҠΠԮ) +UVWư3*+oUV-rW-ra@*#rGYcY4+-rqq>+UVWưoR@B-rr+H+-rq;@r`-r-r$\+JR+@B-rrp@*-r#-rr-rq;@roa@*-rr\+`@*-rr9()ĠӮ)\,_'%.]ԠϠϠΠՠŠ .M6.o.@p()\d@p@/@p()\d\@p@/@p()\n@p@/@p()\d@p@&/@p()\z@p@0/@p()\d\@p@:/@p()\d\@p@ŮɠĠԠȠ٠)\@p()D+\@p(ӠҠĠĠĠŠŠΠ)\N+@p()\@p(ՠŠ٠)\@p()\@p(ŠĬ)\2+@p(Ġ٠ՠ٠ŠŠ)\#+@p(ƠŠŠ)\@p()\\*+@p()\@p(ĠӠҮ)\*+@p()\@p()\@p()\0+@p(ΠŠנŠǠ)\>+@p(ΠӠĮ)\@p(Ҭ)\@p(ĠŬ)F+\@p(ɠԠ̠@p@ +M6+\+P .+@p(Š)\X\:\:\:N+@p(ŠάŠҠƠ)\@p(Ӡ)\<+@p(ήΠŠ)\@p(٠Šˠ)\L+@p(ĠĠΠӠҧӠ)\f@p@ *+@p()\f\@p@4+@p()\d@p@>+@p()\d@p@H+@p()\l@p@R+@p()\x@p@\+@p()\d@p@f+@p()\d@p@p+@p()\d@p@z+@p()\d@p@+@p()\d@p@+@p()\d'@p(ˠϠӠ)\@p(ΠŠӬΠӠĠ)\@p()\X 'oP'(a(ŠΧΠէŠŮ)G (R@(\0uM6o_4*]Š +M6 +o+@p()\d@p@ +@p('@p(ԠĠ)\\@p()\@p(ӠӠӠҠٮΠӠӠ)\*'@p(ӠŠ͠ŠΠ)\H'@p(ĠӠԠĠ)\@p(ŠĠȮ)\X*'@p(ŠӠĠϠŠŠ)\X_Ơ)\\;'@p(ΠӠĠ)\@p(ĠӠ)\Z'@p(ŠΠŠԠƠ)\@p(ŠӠԠƠӠŠ)\V'@p(ĠǠ͠Š)\@p(ΠŠӠ٠ŠӠΠ)\Xe@p@t'@p()\f@p@~'@p()\v\@p@'@p()\f\@p@'@p()\n@p@'@p()\t@p@ 'M6'\#'P@p()\X\:\:i'@p(ŠƠŠ)\@p(ӠΠΠӠ)\@p(άϠԠĠӠĮԠĠӠĠΠڤ$'@p()\f@p@.'@p()\n@p@ 8'@p()\d\@p@B'@p()\f\@p@L'@p()\p@p@V'@p()\n@p@`'@p()\d@p@j'@p()\r/?r_']ؠΩX`@*#r9()@*#r9()@*#r9()@*#r9()@*#r9()$@p()_ @p(Π)@B;@rrp@@p@[ 'M6'on']٤ӠԠĮƠ٤Ӡ̠@E()E@pa()E@E(ŮӮЮ)E@ta()E@E()E@xa()E@E()E@|a(Ġ)cS(ȠŠҩ)'` $L_8r'ca(٬ŠӮ)UVWY qJ`@:()$@LM6oPPTa(٬ŧӠŠպ)Xc\a()E@E()E@)`a()E@E(Š)E@7da()E@E(ԠϠϠΠՠŠ)E@/ha()E@E(ǠРϠ)E@la()EoP (a(Ӡ̠͠ˠ)$,Pa(ҠŠӬΠ)0Pa(͠Πٮ)2qٱq4c(8a(ĠՠŠϠŠ٬)&<a(ҠŠŠŠŠԠ)@o a(àҠҩ)GDR@H`@9()$oPa(͠ҠŠŠ) P a(Π٠ )UVWY M6To Pa(ϠՠԠˠ)PS(ŠĿ¯ש)&@`@9()$`@*#r9()$"`@*#r:()$q M6 e)Y[] ]]  ]]νƠӠΠ q M6UVWoPa(‡)`.?2r?$ d2e?_ d2eUVWYY+\@p(ӠŠǠŠΠΠӠŮӮЮŠӠŮӮЮĠ)jj;\\@p@\X@p@\@p(ƠՠŠŮӮЮՠΠԠŠŠĠĠŧ)Tt;\@p(ՠΠӠŠǠӬ@p()\n@p@:@p()\d\@p@:@p()\d\@p@:@p()\d@p@;@p()\n@p@;@p()\f@p@;@p()\n@p@$;@p()\d@p@ .;M6 B;\PL;@p(ŮӮЮ)\X\:\:|`;@p(ŠӠ)\@p(Ӭ)a7\@p(Ġ)\@p(Ů٠ŠĠŠ̠Ǡ)\@p()\X7\' :]ŮӮЮ :M6:o:@p()\f@p@:@p()\@p@:@p()\@p@:@p()\@p@:@p(ǠŠԮŠƠŠԠҠŠӠӠ)g7\@p(̮ӠŠ)\@p(Ӡ)\@p(Ӯ٠ϠŠ)\o7@p(ӠĠŠϠ)\@p(ӠĮҠҠӠŠ)@p(ӠŠ)\T7@p(ĠΠŠԠ)\@p(ӮǠΠŠĠϠ)\d7@p(ΠӠȬĠƠՠ)\@p(Š̠ΠĠȠԮӠ̠Ϡ)\u7@p(ƠҠӠϠˠϠ)\@27@p()\f@p@<7@p()\|@p@F7@p()\f@p@P7@p()\n@p@Z7@p()\f@p@d7@p()\d\@p@ n7M6 7\P7@p()\X\:\:J7@p(ԧӠΠĠ)\@p(ǠӠΧӠ)\\7' 6] 6M66o6@p()\d@p@6@p()\f@p@6@p()\f@p@6@p()\d\@p@6@p()\d\@p@7@p()\j@p@ 7@p()\d@p@7@p()\d@p@7@p()\~@p@(7@p()\f@pԠ̠ĠŠĠ)\@p(Šӧ٠Ϡ)R4\@p(٠)\\@p()\@p()\\@p()\\f4@p(Ӡ٠ϠŠӠӬ)\@p(Ϡˠ)\@p(Π̠)\@p()\&4_p(ӠȠͮŨũӠ)\^3@p(͠ԠŠ٠)\@p(ŠΠӠϠ)\@p(Ӭ)\O4@p(Ӭ)\@p()\@p(ҠǠԠƠ͠)\g4@p(ӠԠ)\@p(ǠРϠ)\X\:\:S3@p(ҠҠԠŠӠŠΠӠ)\@p(ή)\\3@p(Ӡ٠ԠƠŠӠŠΠӠԧӠΠŠ͠)\@p()\Y3@p()\@p@\X@p()\@@p()\f@p@^3@p()\n@p@h3@p()\~@p@r3@p()\f@p@|3@p()\|@p@3@p()\n@p@3@p()\f@p@3@p(٠)\l@p@3@p()\l@p@3@p()\n@p@3@p()\z@p@ 3M6 3\P/3@p(РРϠ 2M62o2@p()\f\@p@2@p()\f@p@3@p()\n@p@3@p()\n@p@3@p()\f@p@"3@p()\n@p@,3@p()\t@p@63@p()\f@p@@3@p()\f@p@J3@p()\|@p@T3ՠΠ)\K/@p(Ġ)\\@p()\@p(ΠŠ̠Šՠ)\R/@p(ӠĠ̠ՠϠˠ)\@p(ƠՠϠԠԠŠӬ);/\X@p(է̠)\@p(ΠϠŠԠ̮)\X/_'2]ǠӠΠǠˮĠӠԠϠՠ)\U/@p(ϠՠΠԠĠȠԮ֮ĠҠŠӠΠ٠)\?/@p(Π)\@p(ƠҠŠӠ)\J/@p(ӬҠĠŠĮŠ̠РӠ̠ΠէŠǠĠŠ)\g/@p(̠̠٠Ġՠ̠)\@p(ŮŠԠǠϠϠӠŠŠ)O/\@p(ΠԠϠ)\@p(ĠԬĠˠ٠)\H/@p(ӠD/@p()\d@p@N/@p()\|@p@X/@p()\d@p@b/@p()\l@p@l/@p()\f@p@v/@p()\z@p@/@p()\f@p@ /M6 /\P7/@p(ԠϠϠΠՠŠ)\X\:\:N/@p(ՠΠ/?rq/?#rdedeMY`8r8r$ ӱqӱӲ`8r8r$ ӱqӱӲ`$`α $k]ŠĬŠҠŠҠɬʮŠƠΠΠŠҠΠԠŮ ±q6 ±q6 qɳqʳqԱqԲq$]ΠҠˠ.UVW8UVW =q B`-r$dL]Ġˠ`\j`Ʊ$d q6\2`ӱ$dUVWӱqqp`@9()$z`@:()$Hqqc.S(ϠՠԠϠϠԿ٠ҠΩ)&@\`@9()$`@:()$]Ԡ̠\ _]ҧӠ\  M6(a(ɧ͠Ǡ)Y -,rq-,rq -7rq-7rq --rq--rq -6rq-6rq ñq ȱq *αq 4q>]ΧӠFc@p()\@p@>@p()\z@p@?@p()\@p@ ?@p()\z@p@?@p()\n@p@ ?@p()\z@p@*?@p()\@p@ 4?M6 H?\PR?@p()\X\:\:ef?@p(ƠՠŠϠՠΠ٠ԠĠƠ)\@p(Ԡ)\@p(Ӯ)\X;_' >] >M6>o>@p()\f@p@>@p(ˠ)\n@p@>@p()\@p@>@p()\d@p@>@p()\@p@>@p()\@p@>@p()\@p@>@p()\@pڠ)\@p(Ƞ)\gy;@p(ŮΠŠӠĠΠ)\@p(ŠƠ͠ĠϠĠ)\M~;@p(ˠϠȮƠՠŠӠĠƠҬՠŠΠ)\X;@p(ĠĠŠŠϠŠ٠Dz2hرqزqiرjزkiرjزklٱmٲn>rرq زq"iرjزkiرjزklٱmٲn lmٲn"2|رq$زq&iرjزklٱmٲn$lٱmٲn&>رqزqٱqٲq iرjزk lٱmٲngh Dٱq ٲqlٱmٲnnlٱmٲn H@رq زqiرjزkiرjزkiرjزklٱmٲn lٱmٲn2Jرqزqiرjزkiرjزklٱmٲn=Tرqزqiرjزkiرjزklٱmٲnlٱmٲn=^رqزqiرjزkiرjزkiرjزklٱmٲnghgha()Gghgh[]ӠӠĠfUVWqUγVWijkγlmnγYγ"Y,fK6رqزq ٱqٲqiرjزkiرjزklٱmٲLM6fUVW'ij'kY?fUV W%XUV W%XghYY\["]ӠˠĠŠ&]Ġ٠ԭĠ`-r6%f`-r%fqqgh `@9()$ `@:()$  M6ccc) a(ӠҠǠ) Q) ]ŠҠĬԠӠ UVWD UVW I q X `-r$b ] `-r%\b Yv Y{ UVWd-rqY [-. ñq8@ñrα8 a(ԠӠ)GB `ñ $ L `ñ$ V `ñ'$ ` `ñ5$~ j a(ԠŮ)t _ ~ a(ٮ) _  a(Ԯ) _  a(ԠŠ) _  a(Ҡ) a(Ҡſ٠ҠΩ)G R@UVWY M6UVWY_ M6:a(ՠŠ)FȱGa(ӠĠɠŠ)FñGa()`ȱñ$`ȱñ$ a(٬ɠΠԠŮ)_ a(š)_  a(ՠΠ)  ñqñȱ `ñ$.  $ ñq6à)FӱGa(Ơ٠)UVWY q \2*ȱqȱӱ 4ñqñӱ >αqαR\ f`ñ$p`α@$z_]ĠƠŠM6q  q`$c'a(ĠƠŠ)`Ʊ$%a(٬ՠŠԠԠϠ)"a(Ơ٠Ӯ٠)_ q6\2`ӱ$&a(٬ԠΧԠˠ)a(٠)_ qcc a(ҠŠϠ)FGa()E@&a(Ӡq `@9()%q`@9()%q`@9()%q`@9()%q `@9()%q!`@9()%q"`@9()%q#`@9()%q&`$ Iq N`-r$v%Xa(٬ԠŠӠ)Ya(٠)b_v\ԱqԲq M6a(Ҡŭ)a()GTa(ο)GR@`$`$`$-a(ŠՠǠҠΠ٠ҠΩ)R@`@:()$`$ q_  q\2"ñqñӱ ,ȱqȱӱ 6αqα@a(ԠӠŠ)GJbӱGTa(ƠҠ)V`Ʋ$`XUVWY``Ʋ$h(bS(ӠΧĠɠ̠)&@h\ |`ȱ$`α@$]ΧӠ Y`$ q_]ŠŠqM6a(ɠ̠ŠϠ)GbɳG a()G`ʳ%a()`ʳ%a()`ʳ%a()`ʳ%a()`ʳ%a()`ʳ%a()`ʳ%a()`ʳ%a()qɳq$d q`ӱ±$d±qӱɴqʴq_d`ӱ±$d`ӱ±$< q/? r(`$d <±qӱFɳqPʳqdYnY`±$`$ɳqɴʳqʴ_ a(ɠŠϠԠ٠)UVW\`Ʊ$\2`ӱ$q_`$,UVWc-rq-r-rq-rYqqӱqԱqԲq `$/ ]ԠŠҠŠҠՠƠɢ$ ]ԠŠϠɽɻʽ`±ƠϬԠҽ,UVWc-rq-r-rq-rYqqqӱq\2$ԱqԲqq6qq q_qq_qq_qq_qq q `-r$L 4΅` ȑ` l΅υLD L4 xPiڄeΕPeϕxPȵxڰL# N ONi)OO i@ &N&O ϕLz JKLυML LMJυKL qL ȩ` 6 6P`JLKMLxL L6 L[` Oڵw۴Nv L`xw8OPL# (` 40!(L 4LdF`  %L"wL{ TL~&&&ڥې څΈ` l 4Ȑ,` 40L 4Ȑ-` 4(L(n ㊨ rLa ?&0ΰ` Δ䮥G 0 #gMghghPcQ)Wqqqqhhq`uuuQ줰䮲륥Q9O/Q) WjB`O~5'Q 䯭䮡ޜݜݞGg` ` `嶡䡯z~" `P O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @Gh X{gggggg'(dgxkg~9g'7(*7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTĠ 5EMҠL Šō?FِLϚΠ κ f ٢  ٦Τ ȹɀI ȄȹH h3 oL"RUN MADLIB"! D$"RUN OTHELLO"H D$"RUN SCREEN PRINT INSTRUCTIONS"o D$"RUN SCREEN WRITE INSTRUCTIONS" LD$"RUN SCREEN EDIT" D$"RUN STATE CAPITALS" D$"RUN TEXT EDITOR INSTRUCTIONS" xD$"RUN TOWERS OF HANOI SOLVED" :XS FAS(AC1)256(AC2)4:DS$("0000"(DS),5):I15:ASI,((DS$,I,1))::u dD$"RUN ARITHMETIC TAC DOUGH" D$"RUN AWARI" ,D$"RUN DECISION" D$"RUN HERB'S CALCULATOR" D$"RUN INVERSE FIELD INPUT" XD$"EXEC LIFE EXEC": D$F D$(13)(4):::D$"BLOAD MENU.1":A$::D$"BLOAD MENU.2":N1523:5:"INPUT YOUR CHOICE (1 - "N") ";:A$:A(A$):A1AN30#(DS100A: APPLESOFT VARIABLE GOTO--SEE NIBBLE/VOL.2/NO.7/1981/P.1132AC(121)256(122):70 <XXXX   (#f 2#UVW"7#`%q -r9#`%q <#`$K# A#\F#ghK#YP#[_\ !a(٠ŠҠӠ)H@UVWYqq_"  q q( UVW UVW \  Y UVWAY Y [?'#]Ӡ̠ŠӠƠԽҠƠPa X "2 5ݤ% Ld% [ :L̤İ?$ d ededededeLdedede`[dede`[lٱmٲnlٱmٲngh'ٱq ٲq"iرjزk lٱmٲnHٱq$ٲq&iرjزk$iرjزk&lٱmٲnlٱmٲnlٱmٲn[pQT}dede0dededededed ed e_}d ed elٱmٲnlٱmٲngh gh=ٱqٲqiرjزklٱmٲnlٱmٲnlٱmٲn3ٱqٲqiرjزkiرjklٱmٲnDٱqٲqlٱmٲnlٱmٲnlٱmٲnghghFٱqٲqiرjزklٱmٲn@`$JPLq/?rqT _Ta(Ǡ٠)_+^a(ϬԠՠԠҠŮ)_ha(٠Ρ)_%ra(ԧӠԠԠ٠)_|a(٠Š)_\ UVWYqa(ԠΡ)_a(ԠӠԮ)_a(ՠԠԡ)_ a(ӬԧӠԮ)_qZq<\ q\ UVWY_"W?]ԠԠǭԠ٠ΧӬŠŠҠԠӮŠԠӬŠ٠Ů XqZq^P  `q/? rbql _la(ԡ)_va(Ǡ١)_a(Ϯˮ)_a(٠ġ)_a(̡)_a(ԧӠԮ)_7hbE(Ԡ)FE()IE(Ǡ)FE()-rca(ҠЧϠЬӠΧ)|a(ϠŠ)GR@`@9()$pq_d o]pK zM6$o P a(ӠҠǮ)QEW]ԠԠԭըŠԩƠԣ"`%\4,`%\1`%\(#3`%\(# 6q@`2%q#E]ŠŠ٠ӮJ`$d,Tqqdqd ^M6ΠŬ̬ΠƠ̠ج٩ĠҠƠŮ \ M6#a(ԠӠŠ̠ƺ)a@E()G]ԠΠƠ\R@`@9()$p`@9@$X`@:@$@3]ŠĠ̠Ӡ͠٠ɮĽŠӠΠ̠Ү#d`%q -ri`%q  kqlq2/?2r7n]ǠŠ̠ŠҠҠɮx`%\ K]Ġ̠̠Ӡ)2a(Πή)4cM6S(ϠՠԠŠӠϠΠĠ٠ҠΩ)&@8`@9()%q:`@:()@:()$6+<ccS(ӠΧϠή)&@ O]P\\Z]ĽŠŮ),cS(ӠΧϠŮ)&@ &M63(oa(ŠŠӠ̠Š)-*a(ΠРƠŠծӮՠΠ)-,a(ϠŠ٠ŠԠŠ)'.a(ĬҠϠŠȠ)+0a(Π̠ҠĠ)c>a(ȠĠĠՠ)a(Ҡ)GT`$cH a(ŠҠ̠ŠҠ)a(ҠȠŠӮ)Cca(ϠЬҠЧĠ)a(Š̠ŠծӮŠӮ),a(Ҡ̠ŠŬĠ).a(ҠŠŠ̮ՠԠ))a(ŠŠƠŠ̠ٮ)*ca(ŠҠ̠Ԡ)Ja(ӠԠ͠ĠҠ)a(ΠƠ͠٠®ŮҬӠӠΠŠ٠ƠǠ͠ϢήŠŠҠΠȠŠΠӠ`ŠĠŮŠ   2͠ӠΠ :ŠŠŠĠ٠ǠŠԠĠΠŠϭΠ̮Ӡ/ͩ͠Ġ ӠӠͮ`٠ӬЧLΠҠϠŠŠΠŠΠԠά͠ĠӬîԠӠ٠  -rq6YX]٠ɠӠӠ͠Ϡ٠ĮϠҠĮ;]ŠΠϠӠӠǠРҠŮ M6o].a(ӠӠŠϠŠנ̠)*a(נӠ) P a() d2eEoPa(͠ҠŠɠ)cP a(Ӡ̮)7]Š͠ӠҠǠӮUVW1-rqY UVW1 q/?2r`-r$ -rq)q qq [2@p()@p()q qq[]ΠN@"drC@"drC@"drO41rD41r N@" rK M6 d2e?o P a() P a(Š@p()@p()qq#q][3b@p()@p()q q!qg[4l@p()@p()q qqq[:v@p(Ԡ)@p()q qq{[3@p()@p()q qq+[50@p(Ƞ)@p()qqq 5[5:@p()@p()q qq?[.D@p()@p()qqq I[5N@p()@p(ԠŠ)q q qS[4X)@p()q qq[.@p()@p()qqq [9@p()@p()qq q[9@p(Š)@p()q q$q ![9&@p(Ƞ)@p(qq[1@p(נ)@p()q q"q [8@p(Ƞ)@p()qq!q[6@p(Ƞ)@p()qqq[/@p()@p()qqq[8@p()@p()q qq[4@p()@p(Π)qqq[7@p(נ)@p()qq$q [4@p(נ)@p()q q"q[5@p(נ)@p()q q w[4|@p()@p(Ԯ)q qq [5@p()@p()qqq[9@p()@p(Π)qqq[0@p()@p()q q q[2@p()@p(Π)qqqO[/T@p()@p()q q%qY[4^@p()@p()qq!qc[6h@p()@p()qq$q m[2r@p()@p()q qqq[6"@p()@p()qqq'[1,@p()@p(Ӡ)qqq1[/6@p()@p()q qq;[4@@p()@p()qqqE[7J@p(ΠάŠҠ̠ŠԠŠ͠ƠŠήՠΠΠŬŠΠϠˬѧΠ̠ŠĠӠ٠ΠŠӮ`Ů 8̠͠ŮՠΠϠҠӠŠӠϠӭŠ͠   2Š/ŠΠ٠Ǡ̭ĠΠŠ͠ŮŠŠӠנϠ٠Š`ŠŠΠŠϠˠ٠ЭΠŠĠ٠ǠŠ͠LΠŠԠŠӠΠĬŠǠŠ ĠΠǠŠ  Ӡ͠ϠӠ  I2210025200',505^U02006P_I1:1000:K1:R0355a`T$"-"I1{aR2İ1000:R02001bK(T$)cJM:I0370hJ0ĺ:"BOTTOM OF DATA SET REACHED":2100iK02100jJF(J):KK1:J0MJk360&rJT$S$:1100:FP:R0235@B1:L$(C)(I$,1,PK1)E$:I0230WFP:1100:R0230xL$(C)L$(C)(I$,F,PFK)E$I0225O52100L$(C)L$(C)(I$,F,(I$)F1)O5I02100I2ĺL(C)6)L$(C)CF(C):222O0:B02007E$S$:E100000:214*E$(I$,C1,FC1)GR9:PBİ1000:R02001gR0S(T$):ES:PBİ1000PBR2İ1000:R12001R0E(T$)PB2001B0:CU:C02006C0L(C)SCF(C):221P1:C0L(C)E240I$L$(C):MC::T$A$T$Z$JJ1:J0202,J02001RT$(I$,RJ):T$"PRALL"I2:207jI1:T$"ALL"2001T$(I$,J,1):T$X$T$Y$2001(I$,J,1)T$FC:CB:BJ:F0210JJ1:J0208SL:EL:J0F02001S$(I$,B1,CB1):O5MC:CF(C):170^L(C)6);:I1(L$(C)):T$(L$(C),I,1):(T$)97ĺT$;::MC:CF(C)::170T$((T$)32)::T$;:::MC:CF(C)::170J0200225F0:C0:B0:J(I$):RJ:I0:O5BJT$(I$,J,1):T$A$T$Z$207T$(I$,J,1)CBC:120:SL:EL*U02006P1000:T$"ALL"S0:E100000:160^R02001R0S(T$):ES:1000:R2İ1000:R02001R0E(T$):ES2004CU:J0C0L(C)SCF(C):161C0L(C)E180J1:ADĺL(C)6)L$(C):JBF:FF(F):1112xI((IBY)):CUN:O12124GyR0L(R)E2100`zI$L$(R):RF(R):125|I$"":"<"BB$;:3:I$""2100}UN02003~UNF(C):F0IL(F)2005B0UC:129F(B)C:B(C)BF(C)F:B(F)C:B(UN)0:L(C)I:L$(C)I$:MF(B(B))F(F):B(F(F))B(B)9 IF(F)UN:B(UN)F:UNB:MB(B)F ZM0MUT [O12100d \ISBY:110| dIL:1000:R12001 eR0I(T$):1000 fT$"BY"İ1000:BY(T$):104 gR02001 hBY1E04BY100002004 nB0:FU:JIBYoF0L(F)ES2004( 5T$"BY"İ1000:BY(T$):55: 6R0R12001V 7BY1E04BY100002004p <B0:F0:CU:C02006 =C0L(C)SCF(C):61 >C0L(C)EBC ?C0L(C)EFC:L(C)0:CF(C):63 FB0F02002 GMB(B):UBUF(F):B(U)0:73 H1:(C$,O,1)T$Ă:2000^ O50,100,150,200,250,300,350,400,450,500,550,600,625,700,750,800~ O16850,900,6000,6500,950 (O5B0:235 )2000 2SL:EL:1000:R2İ1000:R02001 3R0S(T$):ES:1000:R2İ1000 4R0E(T$):1000:AD1Q$T$:19( :Q$;::I$I$T$:20: Q$;:I$I$Q$X X5X51:X5200ĺ(13);:_ 4q LC1LC0:4} LC1:4 :DZ$"NOMON C,I,O"::4000:5000:5040:"" LL(M):P1:LC0:I$""::"COMMAND ? ";:3:1000:R040 T$(T$,1):O12ՠΠΠ̠ŠΠȠҭ̭ɠԠ ӮӬĠŠŠâҠέ̭ΠԠ̠Ӯ̠ӠԠҠΩ̭ Ԡ̮Ԡ۩`̭ƠԠFLASHINGӮ̭֠ԠŠߩ 6ĠΠŠ/̠ӠΩҠŠŠϠŠ̠Ӯ̭ԠȠܩ`ӠŠҬҠάL   2ӠΠ٠ǠҠŠ͠ҠάîŠέĠӠŠ  ? (Y/N)";::" ";S$:(S$,1)"N"25:!(S$,1)"Y"702D!5025J!!I1(I$):(I$,I,1)" "I$(I$,(I$)I1):716!!DZ$"CATALOG"::"FILE NAME? ";I$:(I$)0714!720!I1(I$):(I$,I,1)" "I$(I$,(I$)I1):720":1FE0692 1210:V1691P OP$"P"İ8040: DIRECT OUTPUT BACK TO APPLEX 25 :"OUTPUT TO PRINTER OR SCREEN? (P/S) ";:OP$:OP$"P"ĺ: OP$"S"695 : U0710$!::"DO YOU REALLY WANT TO KILL ":"THE CURRENT DATA SET10,3120$E$E$S$:FF1:FW0680VPLBBE$E$B$:NF:BB1:FF1:I0:OP:674kS$B$I1:674I1BB1:I0:NF1:OPFW680B0NF:OPE$(E$,N):BB1:PO:FWN:1200P:FW0İ1200CF(C):658 FW0:1200:V670$S1:PP1:1000:R12008CS$(T$,1):1000:R12008ZR0S(T$):1000tPP1:T$(92)2008K119:(F$,K,1)S$Ă:2008K3000,3005,3010,3015,3020,3025,3030,3035,3040,3045K103050,3055,3060,3070,3080,3090,3100,31L$(C))180)CF(C):647695::OP$"P"Ğ:"SET CARRIAGE AT TOP OF":"PAGE AND HIT 'RETURN' ";::" ";S$:8030: 8030 DIRECTS OUTPUT TO PRINTERO0:C0L(C)E690I$L$(C):MC:L(I$):L0CF(C):658P1L:S$(I$,P,1):S$(92)QQ272101 16368,0:L(C);C(L$(C))61Ĺ36,7:L$(C):65536,7:(L$(C),60):(L$(C))121Ĺ36,7:(L$(C),(L$(C))60):65536,7:(L$(C),61,60):(L$(C))181Ĺ36,7:(L$(C),(L$(C))120):655 36,7:(L$(C),121,60):36,7:(L$(C),(NUM"657 1000:T$"RAW"645>T$"LNUM"Y51:FW0:657OT$""2001X657695::OP$"P"Ğ:"POSITION CARRIAGE AND HIT 'RETURN'";::" ";S$:8030: DIRECT OUTPUT TO PRINTER (PRINT RAW DATA SET)C0L(C)E692 QQ(16384):W1:1000:T$"LNUM"Y51:FW0:6385wT$"RAW"638CxR02001}yR0S(T$):ES:FE0:1000:T$"LNUM"Y51:FW0:638zT$"RAW"638{R2İ1000|R02001}R0E(T$):ES2004~C0L(C)SCF(C):638T$"RAW"645T$"L):F(C)B:590#KF(F)U:B(U)F:UB-N2100;SES2004JTESEIı]UIEIS2004cVlX550qCW0:MW1:FW1:UW6:DW4:LW0:RW62:PW66:NW0:FE1:S0:E100000:Y50: 'WRITE' ROUTINEtE$"":U02006#vCU:B0:F0:I0:N0:V1:WRWL1:110<RF(C):C0RU*=RBRF(F)I>MF:R0L(R)IKBY2005Q?RB{@I((IBY)):L(R)I:RFRF(R):576DB(B)CFC590FUBUF(F)GF(C)0B(F(C))BHF(F)0B(F(F))B(B)IB(B)0F(B(B))F(F) JB(B)C:C0F(F)F(CE04BY100002004/K0:59570JI:C0:B0:F0:RUE1R02006V2L(R)JCRn3L(R)SRF(R):5614L(R)EBR5R05706L(R)JCR7L(R)EKK1:FR:RF(R):5658R0L(R)JCR:RF(R):568:B02002;O12RB:KU:MU:KBY J021007L(J)K:KKBY:JF(J):525P&SL:1000:R02001m'I(T$):1000:R2İ1000)R0SI:I(T$):1000:R2İ1000:R22001+ES:R0EI:I(T$):1000:R12001,T$"BY"559-1000:R02001.BY(T$):BY10ĺ:"TOP OF DATA SET REACHED":21004sK02100NtJB(J):KK1:J0MJWu370eU02006sMU:2100FU:U02006F(F)0FF(F):451MF:21001000:R0BY10:520T$"BY"20011000:R02001BY(T$) J SCREEN)"::"TO EXECUTE SCREEN WRITE 2":D$"FP":~ 24:"HIT ";::"RETURN";::" TO CONTINUE, ";::"ESC";::" TO EXIT"; A(49152):A1271010 :49168,0:ddxD$(4)4N13:400:1000:A155500:C500e(4)"BLOAD SCR.WRI.INST."N::8:8:"LOADING ";::"SCREEN WRITE 2":2 D$"BLOAD SCREEN WRITE 2.1":13:"ENTER 'CALL 848' (CLEARS SCREEN)"::" OR 'CALL 851' (DOESN'T CLEAR :1200:FWR:680/ S0S10,/ SW2008\/ JS(E$)1:J0RFW:FW0:1200:FWR:JS1/ J0āK1J:E$E$B$::FFJ:NF:I1OO1/ 680/ MW(S):VSC:MW12008/ 680/ S(S):S12008/ RFW:FW0:1200:FWR:J1S0 1210:V13.). J1K:1210::680=. RFW:FW0:1200:FWR:S0S10K. SW2008p. J1S:E$B$E$::FFS:NF:680. S(S):(S0CW0)(S1CW1)(S0CW2)2008. CWS1:CW13014. K(W(E$))2:K03014. J1K:E$B$E$:FFK:J/ RFW:FW0LE->ADĺ:L(M)6)L$(M):25c-H:L(M)6);:I1(L$(M)):T$(L$(M),I,1):(T$)97ĺT$;:::25-RT$((T$)32)::T$;::::25- RFW:FW0:1200:FWR:S(S):S0680- JPWDWV:KSMW:KJKJ. V1İ1200:680: LINE ADDED NOV. 1979 (C.L.H SET IS EMPTY":25:,:"TEXT COULD NOT BE FOUND":2100b,:"FORMATTER COMMAND ERROR":2100,:"ILLEGAL VERTICAL SPACING":2100,:"ILLEGAL MARGIN VALUES":2100,4U02006-5POİ8040:16368,0: GOSUB 8040 DIRECTS OUTPUT BACK TO APP36,6((L(C))):L(C)". ";:E$;:?+:"NOT A COMMAND":25Z+:"SYNTAX ERROR":25|+:"ILLEGAL LINE NUMBER":25+:"EDITOR BUFFER FULL":2100+:"PARAMETER VALUE ERROR":25+:"NOT ENOUGH SPACE TO INSERT":2100,:"THE DATA7ġ:2101*16368,01*E$"":N0:B0:F0:I0P*:VV1:PWDWVMW11213\*MW1ıy*I1MW1:::VVMW1:*VPWDW1āIVPWDW:::VPWDW*NW0ĺ:36,(LWW2):NW:NWNW1:VV2*VPWāIVPW::*V1:*Y50ĺE$;:#+2009)RWLWMHS:2010<)V1ĭUW0āI1UW:::VUW1a)(E$)0E$"":N0:B0:F0:I0:~)36,LW:FW0İ1250:1209)J1:I1(E$):S$(E$,I,1):S$B$J1:1207)J1B0K(FB(1)):K);:BB1:FFK:J0 *S$;::QQ(16384):QQ2PP1:(PPJ:T$(I$,P,1)>(T$X$T$Y$T$D$R0:S(T$(I$,K,PK):k(PPJ:T$(I$,P,1)(T$A$T$Z$R1:(T$(I$,K,PK):(LK(T$):JP(I$):(I$,J,K)T$Ă:R1:(M(I$)0I0(NPJK:R0:)UWDWMWPWMVS: C = ";C:3'" I F B L"g':I115:2)I11)F(I)21)B(I)31)L(I):::25u'5040:25'R1:J(I$):PJT$"":'PPJ:(I$,P,1)B$Ă:'R2:KP:T$(I$,P,1):T$A$T$Z$1010'T$X$T$Y$T$D$1007(0860l&T::"QUIT WILL KILL DATA SET ":"DO YOU WANT TO QUIT? (Y/N)";::" ";S$:S$(S$,1):S$"Y"860}&VS$"N"852&X25&\:"NORMAL END"&aDZ$"MON C,I,O"&f216,0: ':2:"UNUSED = ";UN;" USED = ";U:"B = ";B;" F = ";F;" 0795,%L(C):(L$(C)):L$(C):CF(C):785<%DZ$"CLOSE"Z%:"FILE "I$" SAVED":25h% U02006%%::"DO YOU REALLY WANT TO ":"KILL THE DATA SET? (Y/N)";::" ";I$:(I$,1)"Y"İ5025:5040:"":25%'(I$,1)"N"805%*:25&RU" "I$(I$,(I$)I1):765&$:757B$(I$)65(I$)902001S$DZ$"OPEN"I$e$DZ$"WRITE"I$y$BB$"B"BB$"B"$UN:U:B:F:C:BB:BB$:I1Q:F(I):B(I):L(I):$BB$(BB$,2,1):BB$"B"BB$""$CU$ C0L(C)0CF(C):780%C#DZ$"CLOSE">#"FILE "I$" LOADED":"DATA INPUT OPTION ";Q#BB1ĺ"1":25^#"2":25l#U02006#I1(I$):(I$,I,1)" "I$(I$,(I$)I1):760##DZ$"CATALOG"::"FILE NAME? ";I$:(I$)0757#765$I1(I$):(I$,I,1)ϫ714 "(I$)65(I$)9020011"DZ$"OPEN"I$B"DZ$"READ"I$z"UN:U:B:F:C:BB:BB$:I1Q:F(I):B(I):L(I):"CU:BB$(BB$,2,1):BB$"B"BB$"""C0L(C)0CF(C):730"C0745"L(C):LQ:768:L$(C)(IN$,1):CF(C):735"89L ɐ`$%676$ [ 7$ (HI(hɠH)  @`0)? h %Ϥ$'ɩ 67$ [L l6)6040.:T$L$(I):L$(I)L$(I1):L$(I1)T$:K0>::K06030l:MJ:BY10:F(J)0:U1:UNJ1:JQB(J1)0z:JQUN0::"DONE!":FR(0):2100:d1000:T$(T$,1): 'HELP' ROUTINE:nT$"F"6600:pT$"E"6700:rT$"S"2001;xZ10:I1ED!":"DO YOU WANT TO ALPHABETIZE ? (Y/N) ";::" ";I$:(I$,1)"N"25_9v(I$,1)"Y"6005g9yJ09zI1Q:F(I)I1:B(I)I19L(I)060259L(I)0:JJ1:L$(J)L$(I):L(J)10J99J160509K19I2J9I1I1:L$(I)L$(I1 A":"LOWER CASE ADAPTER? (Y/N)";:" ";S$:S$(S$,1):S$"N"AD0:5095Y8S$"Y"5090_88:"LOWER CASE LETTERS WILL APPEAR":"IN ";::"INVERSE VIDEO";::".":8pU02006: ALPHABETIZE ROUTINE H9u::"CURRENT ORDERING CANNOT BE RECOVERU GOING TO ENTER":"LOWER CASE LETTERS? (Y/N)";:" ";S$:S$(S$,1):S$"N"ı^7S$"Y"50807:"'CNTL-S' SHIFT-LOCKS TO LOWER CASE.":"'ESC' SHIFTS BACK FOR ONE CHARACTER.":"'CNTL-S' SHIFT-LOCKS BACK TO U. CASE."G8LK1:10:"DOES YOUR APPLE HAVEDLE OF A WORD."6:5:"(NOTE: MAXIMUM LINE LENGTH IS 255":"CHARACTERS. INPUT LINE LIMIT OF 200":"CHARACTERS LEAVES ROOM FOR EDITING.)"623:5:"WHICH OPTION? (1 OR 2) ";BB6BB1BB$" ":50806BB250606BB0:BB$""L7:3:"ARE YOOGRAM AUTOMATICALLY INSERTS A BLANK":"CHARACTER AT END OF EACH LINE."5::"2.";::" TEXT MAY BE ENTERED CONTINUOUSLY":"WITHOUT REGARD FOR LINE LENGTH. INPUT":"WILL AUTOMATICALLY SWITCH TO NEXT LINE"6"AFTER 200 CHARACTERS, EVEN IN THE":"MID$(I)""::F(Q)0: INITIALIZE DATA SET ARRAYSF4U0:UN1:M0:BY10:4AD1:LK0::4:5:"DATA MAY BE ENTERED TWO WAYS:":: SET DATA INPUT OPTIONF5:"1.";::" EACH INPUT LINE (UP TO 200 CHARAC-":"TERS) SHOULD END WITH A COMPLETE WORD.":"PR, P. 26":=3Q150:MQ1:F(M),B(M),L(M),L$(M): INITIALIZE3B$" ":A$"A":Z$"Z":X$"0":Y$"9":D$".":C$"DIPCFONTBRMEWLSKQXAHZ"3G$(1):F$"SICTMEFUDLRPNABWXYZ"324:6:"(PRESS ANY KEY TO CONTINUE)";:T$-4I1Q:F(I)I1:B(I)I1:L(I)0:LORMATTER * ":6:27):A210:6:"ADAPTED BY CHARLES L. HEARN"^2:11:"TULSA, OKLAHOMA"215:9:"PROGRAM DEVELOPED BY"::5:"R. M. LAW AND D. C. MITCHELL" 320:3:"FOR DOCUMENTATION, SEE 'KILOBAUD'":10:"SEPT. 1978, P. 22":10:"MAY 19791 S$(1):3200"1 S$(2):320051 S$(28):3200H1 S$(29):3200[1& S$(30):3200n10 S$(31):32001 S1S220081 S1ĺS$;:6801 67013:15:"APPLE II": HEADER 25:6::" ":6:" * TEXT EDITOR/F0270 J:FWR:680+0 FW(S):FW1200840 680A0 S0S6T0 UWS:VSC:680a0 S0S4t0 DWS:VSC:6800 S0S00 LWS:WRWLW1:HSC:6800 S0S620 RWS:WRWLW1:HSC:6800 S0S600 PWS:VSC:6800 NWS(S0):680  ӠŠӠƠ 768ӠŠŠŠҠΠϠҮԠ̠ήԠԠҠΠΠ` .٠ԠҮҠǠŠŠŠӠԠƠ'Π̮ӠάŠҠӠĠϠӠҠҠŠӠԠΠԠ`  *    * ӠŠҠŠͬ -ӠΠLL>٠ŠŠҠӠǠΠ   z #Xΰ  ԠҠŠ ӠƠɠĠ$Үʰ" à * ҮɮԮ ΠŠΠԠ ŠӠ- ԠҠӠ ԮĮԠԠҮJ !Ϡ'"ΠԠӠҮԮԠΠԠΠŠӠ ҮɮԮ ҮɮԮ §ӠҠ§ӠҠ٠ŠĠԠ ֮ԮԠŠàŠͺͺ  < ՠծծààȠɠΠ+ӮΠ H ' (W)RITE > 3H!' IF 'RAW' NOT SPECI-NH"' FIED, PRINTS FORMAT-iH#' TED DATA SET IN LINEH$' RANGE A TO B. IF H%' 'RAW' SPECIFIED,H&' PRINTS RAW DATA SETH'' WITH LINE NUMBERS,H(' IN RANGE A TO B.H)' > IS OPTIONAL.I+' AND MITCHELL, 'KILO-2G' BAUD' MAGAZINE, SEPTMG' 1978 (P. 22) AND MAY`G' 1979 (P. 26)fG'G' ADAPTED FOR APPLE BYG' CHARLES L. HEARNG' 7626 E. 54TH PLACEG' TULSA, OKLA. 74145G' 918/622-1461G'G' MODIFICATIONS:G'9 C8 A9 02 91 69 BD 00 02 29 7F 9D 00 02 CA D0 F5 BD 00 02 29 7F 9D 00 02 60"bF2#Y$Y$" N D823G"F<#I1(Y$):511I,((Y$,I,1))128::72,0:: INPUT ROUTINE (SEE JUNE, 1979 CALL-APPLE)F' TEXT EDITOR/FORMATTERF'F' SEE ARTICLES BY LAWG18)256(219)E25lE^(4)"PR#1":PO1:(20);:1145,132:: DIRECT OUTPUT TO PRINTER (PO=1 REQUIRED)Eh(2)(29):1145,76:(4)"PR#0":PO0:: DIRECT OUTPUT BACK TO APPLE (PO=0 REQUIRED) MF(#Y$"300:A2 00 20 75 FD A0 02 8A 91 69 C8 A9 00 91 6TE PROTECTED":7100MDI5I6ĺ"FILE "I$" NOT FOUND":DZ$"DELETE"I$:7100pDI7ĺ"VOLUME MISMATCH":7100DI9ĺ"DISK FULL--SAVE ON ANOTHER DISK":DZ$"DELETE"I$:7100DI10ĺ"FILE "I$" LOCKED":7100E"ERROR "I" OCCURRED AT LINE "(2UTINEC]DZ$"CLOSE"CbDCgI255ĺ:"ENTER 'Q' TO STOP":7100nClI77ĺ"OUT OF MEMORY":FR(0):7100CqI176ĺ"TOO MANY CHARACTERS IN LINE--":"INSERT A CONTINUATION LINE":7100CvI254I163I16ĺ"INCORRECT INPUT":D{I4ĺ"DISK WRIENAME>":"MOVE > C ":"NEXT NEXT <-N>":"OVERLAY > ":"PRINT > "B2"QUIT":"RENUMBER ":"SAVE ":"TOP":"WRITE > ":"XRAY";B412:"'Z' CHANGES INPUT OPTIONS":25CXI(222): ERROR ROOPTIONAL PARAMETER"lA-3:"ALPHABETIZE":"BOTTOM":"CHANGE >/TEXT1/TEXT2/ <(PR)ALL>":"DELETE >"A."EXCERPT > C ":"FIND >/TEXT1/ ":"HELP EDIT HELP SPACE HELP FORMAT":"INSERT "gB0"KILL":"LOAD =MATTER COMMANDS FOR IDS 440 PRINTER "::6:BS$"AN"BS$" ENHANCED MODE"?BS$"BN"BS$" NORMAL MODE"::BS$"WN"BS$" 8.3 CHARACTERS PER INCH":BS$"XN"BS$" 10 CHARACTERS PER INCH"@BS$"YN"BS$" 12 CHARACTERS PER INCH":BS$"ZN"BS$" 16.5 CHARACTERS PERBS$"FN"BS$" SET ALIGNMENT AND JUSTIFICATION":" MODE ON (N=1) OR OFF (N=0). ALL":" OTHER FORMATTER COMMANDS ARE":" RECOGNIZED. (DEFAULT=1)">:6:"BACKSLASH ("BS$") IS CONTROL-A":24:6:"PRESS ANY KEY TO CONTINUE";:S$F?:3::" FOR UPPER MARGIN (D=6 LINES)":BS$"DN"BS$" SET LOWER MARGIN (D=4 LINES)"=BS$"LN"BS$" SET LEFT MARGIN (D=COLUMN 0)":BS$"RN"BS$" SET RIGHT MARGIN (D=COLUMN 62)":BS$"PN"BS$" SET PAGE LENGTH (D=66 LINES)">BS$"NN"BS$" NUMBER PAGES (1=YES, 0=NO) (D=0)":AULT=1)"<BS$"IN"BS$" BREAK, INDENT N CHARACTERS (D=10)":BS$"CN"BS$" BREAK, CENTER TEXT FROM C0 TO C1":BS$"TN"BS$" BREAK, TAB N CHARACTERS (D=10)"E=BS$"EN"BS$" BREAK, EJECT N PAGES (D=1)":BS$"MN"BS$" SET LINE SPACING BY N (D=1)":BS$"UN"BS$" SETQ:L(I)0Z1Z11:6522%;yL$(I)""+;zI;|FR(0):FR0FRFR65536|;}:"LINES USED = "Z1;:" LINES OPEN = "QZ1;"MEMORY REMAINING = "FR" BYTES":25<BS$(92)::3:9::" FORMATTER COMMANDS ":::BS$"SN"BS$" BREAK, SPACE N LINES (DEF2 PROGRAM SCREEN EDIT!<<F J.L.SHANKS 1/9/80BPHZTdD$(4)ZnzxD$"BLOAD SCREEN WRITE 2.1""INPUT NAME OF SCREEN FILE TO BE EDITED":A$:D$"BLOAD"A$854!f*"ijkijkijk,]5f 6ijkijk@]IfJlmnlmn T]]f^lmnlmn h]qf 7rlmnlmm n]f 7ijkijk l mnl mn]f lmnlmn ]flmnlmn ] f*lmnlmnlmn]f7lmnlmnlmnlmn]f *lmnlmnlmn]f*lm nlm nlm n]f *l m nl m nl nlm nlm"n7Flm$nlm%nlm#nlm!nP]Yf CZijkijkUVW ijkYijk  d]mf7nijk ijkijkijkx]kY]f )ijkUVWijkY ]f )ijkUVWijkY]ȡ'f 6(ijkUVWijkYijk 2];f7<lmnlmn  ]f UV Wi jkY]fUVWi jkY]נf UVWi jkY]ȠfUVW ijkY]ȠfUV W ijnl mn V]U`f lmn lm n UV W lm nYlm nlm n j]sf )tUVW lmnYlmn  ~]Iflmnlmnlmn lmn lmGf UV WijkYUVWijkYijk7$ijkijkijkijk .]7f78l m nlm nlm n l m n  9gh  B]/Lfl mnl m̠ϠΠ_]ԠҠLfUVW'ij'kY]f )UVWijkYijk ]HfUVW ijkYijk ijk ijk ]Έdededed ed e]d ed ed ededededeLdedede`]Š q q q q q6]ԠԠӠ҉+! ]ŠӠŠ]ŠɠҠ]٠Ӡ̮(]Ȭ_]Š_ dedeM[6]ŠŠŠҠǠTdede0dede  """""""""                 "RUN MADLIB"! D$"RUN OTHELLO"H D$"RUN SCREEN PRINT INSTRUCTIONS"o D$"RUN SCREEN WRITE INSTRUCTIONS" LD$"RUN SCREEN EDIT" D$"RUN TEXT EDITOR INSTRUCTIONS" xD$"RUN TOWERS OF HANOI SOLVED" :OF HANOI SOLVED" : XS FAS(AC1)256(AC2)4:DS$("0000"(DS),5):I15:ASI,((DS$,I,1))::u dD$"RUN ARITHMETIC TAC DOUGH" D$"RUN AWARI" ,D$"RUN DECISION" D$"RUN HERB'S CALCULATOR" D$"RUN INVERSE FIELD INPUT" XD$"EXEC LIFE EXEC": D$F D$(13)(4):::D$"BLOAD MENU.1":A$::D$"BLOAD MENU.2":N1523:5:"INPUT YOUR CHOICE (1 - "N") ";:A$:A(A$):A1AN30#(DS100A: APPLESOFT VARIABLE GOTO--SEE NIBBLE/VOL.2/NO.7/1981/P.1132AC(121)256(122):70 <XXXX  ĠӠȍӠӢ΢ĠŢŠ٠ǠϠŠҠ٭ӳ̱ҵðӠĠñ܍ӲɵǠŠҠƠԠ׮٬Ҡ*****P-( CHANGE LINES 80305P.( AND 8040 FOR YOURDP/( PRINTER.^P0( ********************MATTER COMMANDS)O"( FOR IDS 440 PRINTERAO#( ARE INCLUDED (USEYO$( 'H F' COMMAND FORsO%( DOCUMENTATION). USEO&( WITH CAUTION, SINCEO'( THEY CHANGE COLUNMO(( SPACING. IGNORE IFO)( YOU HAVE ANOTHERO*( PRINTER.O+(P,( **************( IN 'CHANGE' OR+N( 'FIND' COMMANDS, DOCN( NOT LEAVE A SPACEWN( BETWEEN LINE qN( NUMBER(S) AND TEXT.wN(N( DELIMITER CHARACTERN( FOR FORMATTER COM-N( MANDS IS A BACKSLASHN( WHICH IS ENTERED BYN( CONTROL-A.N (O!( FORM'!M' INPUT ROUTINE (LINES:M' 3-23) FROM PROGRAMQM' BY GENE JACKSON,eM' RALEIGH, N.C.kM(M ( WHEN USING 'MOVE' ORM ( 'EXCERPT' COMMANDS,M ( LINE C CANNOT BEM ( SPECIFIED WITHINM( RANGE OF LINES AM( THROUGH B.M(N 'ESC' KEY WILL ABORT,L' PRINTOUT (AFTER;L' A DELAY)AL'YL' IF YOU ACCIDENTLYmL' EXIT PROGRAM,L' 'GOTO 25' MAYL' SAVE DATA SETL'L' CHANGE 'Q' IN LINEL' 5000 TO INCREASEL' OR DECREASE NUMBERM' OF LINES IN DATA SETSAVES TEXT FILEKI' TO DISK#KJ'>KK' (W)RITE >YKL' PRINT FORMATTED DATAsKM' SET WITH LINE NUM- KN' BERS. ALIGNMENT AND KO' JUSTIFICATION MODEKP' TURNED OFF.KQ'KR' INPUT COMMAND 'Z' TOKS' CHANGE INPUT OPTIONSK^'L' (H)ELP (F)ORMAT'J;' LISTS FORMATTER7J<' COMMANDS.=J='RJ>' (H)ELP (S)PACEiJ?' LISTS LINES USEDJ@' AND UNUSED, ANDJA' REMAINING MEMORY.JB'JC' (L)OAD JD' LOADS TEXT FILEJE' FROM DISKJF'JG' (S)AVE KH' 'I,' (R)ENUMBER 3I-' RENUMBERS THE DATAJI.' SET SEQUENTIALLYcI/' IN INCREMENTS OF NiI0'}I1' (A)LPHABETIZEI2' ALPHABETIZES THEI3' DATA SET BY LINESI4' AND RENUMBERSI6'I7' (H)ELP (E)DITI8' LISTS EDIT COMMANDS.I9'J:'/ D$(13)(4):::D$"BLOAD TEXT.ED.INST"k24:3:"PRESS ANY KEY TO RUN ";::"TEXT EDITOR.50";:A$::5:10:"LOADING ";::"TEXT EDITOR.50":(D$"RUN TEXT EDITOR.50":$ @ @@ĠŬ@@@@@@   @@ΠƠ̠Ġ@@@`@       @@ɭ̠Ӡ͠@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ .@ @@@@PRESSANYKEY@&@      @@@@@`@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@L*@@@ *  * @@@   --------5????????????????????????????????????????7----------------------------------------5????????????????????????????????????????7-------------------------------------------------------------------------------5??????????????????????????????ȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  #`Lk"PouZ0Z o ----------------------------------------5????????????????????????????????????????7--------------------------------JS) PI ȄR%*QTU'T8ePT UeRU QJJJ` $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 91 eȱm)h`JJ`#J٬ŠŠĠԠĠ٠ŠЮӳӠӠŠŠЮӰưŠˠĠϠǠ͠լӲԴҮͮԴĮî̍ŠŠٍٮԠӠϠԠǠΠҠҮ٠ϠŠԠŠŬԠԠӠΠŠǠԍӍҍӍΠ͠àҮŠȠĠΠ΍ӠΠƠԬԠŠƠӠҠŠԍŠΠԠӠƠٮŠȠӠԠҍΠŠŬϠĠԠĠǠŠŠΠԠĠŠ΍ĠŠ̠ϠŠŠϠӬȠحԠӠĠΠ͠٠ҮͮנΠנϠŠŠǠĠҭ٠ƠŠӠĠΠέŠŠ    ӠΠ`ŠĠҠӮϠŠŠͬՠ̠ĠӠŠԠŠҠŠͮ BŠԠҠĠԠҠĠ٠ŠԠӠǠΠŠ&ҠŠŠɮԠӠΠ٠Ġ٠îή`ĠĮî̬ĠΠǠӮŠӠ!LŠ  .50͠ӠĢŬԮŠŠĠ٠͠Ӡ ȮàȠ̠ŠΠԠ٠ɠŠΠŠ٠͠Π ŠԠ`ϠŠ .Ӡ͠ӠҠéŠԠ٠ԠҠүҠ/ŠӠӠƠɠӠ` *  * ΠΠĠΠԠ٠ L@§ӠҠӠŠӠŠ   A3:14102:22:"YOU'RE RIGHT":A311000:A3:E Z1X14:Y14YZ2X118:Y14mZ3X131:Y14(Z4X14:Y1182Z5X118:Y118<Z6X131:Y118FZ7X14:Y131PZ8X118:Y131ZZ9X131:Y131d((1)15)1n"";:A1/:22:"SORRY,OUT OF TIME":A41CR$(U)"+"1220WR$(U)"-"1230kR$(U)"*"1240|A3XY:1250A3XY:1250A3XYA3A41280A401275:22:"SORRY, WRONG ANSWER"X" "R$(U)" "Y" = ";A3:A312500:= ";<`A40::" ";::A11T:A2144:(16384)1281160jA3(16384)176:16368,0:A31A310A410A4A3:(8);A3;::" ";::1160tA340A4(A310):(8);" ";(8);(8);::" ";::1160~A335ĺ(8);" ";:1190A2 2630Z3670Z4710,Z57509Z6790FZ7830S$Z8870`.Z99108X((1)(LX(U)SX(U)1))SX(U)=Y((1)(LY(U)SY(U)1))SY(U)BR$(U)"-"XYSY:YX:XSL:22:TT(U)VN$(U)", WHAT DOES "X" "R$(U)" "Y" 32,3532:32,3535:32,3538:(9)/R11080=R21580G:22}N$(U);", WHICH SQUARE DO YOU WANT";:16368,0:ZQ2Z1:Q(Q23):Q2Q23QW(Q,Q2)0ė:22:"THIS SQUARE IS OCCUPIED!":S11000:S:940R1:0Z1590Z:32,3519:32,3522:32,3525:(6)1 R11080?*R21580G411c>32,387:4,732: (7) qHR11080RR21580\12f32,3818:32,3821:18,2132:18,2135:18,2138:(8)pR11080zR2158013!32,3532:32,3835::32,355:32,3511:33,358:(3)/R11080=R21580D6g19,224:21,256:4,722:(4)uR11080R21580819,2218:22,2521:18,2119:18,2122:18,2125:(5)R11080R21580 9#19,2532:22,2535,Q2)0:Q2:Q"&R0:UU0:DL1600,0:15T:0,3913:0,3927:0,3913:0,3927[D1lN5,116:(1)zXR11080bR21580l2v5,821:8,1118:18,215:18,218:18,2111: (2) R11080R215804!5,1135," LARGEST VALUE OF FIRST NUMBER";LX(U)[:"SMALLEST VALUE OF SECOND NUMBER";SY(U)" LARGEST VALUE OF SECOND NUMBER";LY(U)R$(U)"A"R$(U)"+"R$(U)"S"R$(U)"-"R$(U)"M"R$(U)"*"U:U01(2(2)) Q02:Q202:W(Q=MULTIPLICATION"J 13:N$(U);", WHICH OPERATION":"DO YOU WANT? ";R$(U)t R$(U)"A"R$(U)"S"R$(U)"M"410 15:"HOW MUCH TIME,IN SECONDS, DO YOU WANT TO" 17:"ALLOW FOR EACH PROBLEM?";T(U)19:"SMALLEST VALUE OF FIRST NUMBER";SX(U)"# rS120000:(49152)127390:* |Su 16368,0:DO0:DX0:DL1600::2:"PLAYER 1, WHAT IS YOUR NAME?";N$(1) 4:"PLAYER 2,WHAT IS YOUR NAME?";N$(2) U12:: HANDICAPPING 7:6:"A=ADDITION" 9:6:"S=SUBTRACTION" 11:6:"M 6"SQUARE YOU PICKED WILL DISPLAY AN X OR "^ @"AN O.EACH GAME IS WORTH $1600.BUT,WHEN " J"SOMEONE TRIES TO ANSWER A PROBLEM,THIS " T"VALUE IS REDUCED BY $100.WHEN SOMEONE " ^"GETS THREE IN A ROW,THEY WIN ALL OF THE " h"MONEY LEFT. TAC DOUGH"> 4:"ARITHMETIC TAC DOUGH IS A GAME FOR TWO "n "PLAYERS.YOU WILL CHOOSE ONE OF THE NINE " "SQUARES IN THE TIC TAC TOE BOARD.THE " ""COMPUTER WILL ASK YOU AN ARITHMETIC " ,"PROBLEM.IF YOU ANSWER IT CORRECTLY,THE ".;:11:21:"C"V 17:31:"D":18:32:"O";:19:33:"U";:20:34:"G";:21:35:"H"j 18:3:"BRYAN" 18:16:"BUTLER" 9:3:"PROGRAM";:11:7:"B";:12:7:"Y" 3:3:"ARITHME-" S15000:S 16368,0: :2:11:"ARITHMETICk  :>W(2,2),N$(2),R$(2),T(2),LX(2),SX(2),LY(2),SY(2)JO121Q(O^213:"/"e<OrF26:"/"yPOZO140dOn7:"/"xO14:"/"O233:6:"T";:4:7:"I";:5:8:"C" 9:19:"T";:10:20:"A"          qٱqfUVذWرlٰmٱnY`-r%[UVW-rf/?rq/?رذrذq/?ٱٰrٰ`=>r$ ghY \2) `$qUVWY\[ N@"rKM6d2e?\%a(ҠנӠ٠)Gwd2eUVWY_z_/`$ذqرqٰqٱq#_/`$ذq#رq&ٰqٱq#_:`$ذq8rرqذٰqٱq&_*ذq8rرqذٰ-rq\q-rq\q-rq-r\ \\f_7fqUV Wq-rY`$pq_t0pqUVWq-rY`%[qt\d2e?oP+u`%a(٠נӠ٠)G-v`r-rq-r\ qUVWY`$`-r$4 \f_`$. q\ \ UVWYq\*_&4`$ `-r$ "Hq\ \ UVW YNMq-r-r_;qqUVW`-r$q-rq-rYq`$q/?r `-r$,bGαq \2αqUVWY6a()F-rE()G`-r%a()GUVWYq-r-rq\$q8UV Wq-rq8-rr`%qN`$l+X`$b-rq-rq q_l.b`-r$l-rq-rq-rqlY6vUV W`-r$-rq-rqqY.`$q/?r `-r$r$"d2eUVW Y=oP S(ҠſٯΩ)&@`@*#r9()$x`@*#r:()$ KM6Q%\oPa(ɠŠ͠)G&UVWYq90UV W`-r$:-rq-rq-rq:Y2Dqq-r-rq\-rq-rq\ \f_M6oPKa(ɠŠ)F-rE()G`-r%a()Ga(ϠҠ)F-rE()GUVWYd2e?`-r-r$`-r-r$ `-r-WY6`$ @qUVWq-rYJ`%\fT`$^3Uq\ \ UVWYq\_^`-r$`$h`-r$"q\ \ UVWY&q-r-rq\UVWY"q<\oPa(̠š)G\2UVWYαq_%oPbGa()GUVWY:oPa()F-rE()G`-r%a()G qq-r-rq\$q8r-rq-r\ "q,UV-rqY-rq-rqUVW\YIM6oS(ϠՠԠϠϠԿٯΩ)&@`@*#r9()$`@*#r:()$ M6&\oPa(ҠŠ)GT`$`-r$_0Π)Gde d2e[nO4$rD4$rD4r4xαqLM6fUVW"Xlm'nY M6&UVWXP8rbGY P8ra()GP8$ra()Gd"ecij"k0UVWWPYY_"a(ס)G_(Pرoٱa@G\2[Z2q6?UɱVWαq.?r.?r.?r.?r.?r.?r.?rYɱ4[OPd2e?UVWoPa()GYMZoPa(a(ɠ)G`%a(ՠ)Ga(š)G[U oPa(š)G`%a()G`%a()GoPa(ŠΡ)G[4d2ed ed!e(M6UVWY[a(ɠΡ)G_? αq2a(ՠΡ)GUVW\2UV_2a()G[)UVW o \o \Y?oa()Gde [G @p()d!ed eM6d2e?a@a@a@G[@ oP`%     rqq@p()q`$ca@E()FE()R@B-rr+-rq;@r`-r-r$`$$a(ɠĠŠΠŠ)E@_M6̰q(a(ˮӠӠŠԠҠ)a(ή)c UVW(#0_':_*D_2N_.X_6Jba(ɠ̠נĠԠ)a@E@a(ԠՠŠǮ))lca(ŠҠ͠ŠԠŮ)"va(ŠҠӠԠԮ)8a(Π̠ŠĬŠΠΧ)-@p()@p(Š)M6`$b!a(ԠΠϠՠԺ)=UVWUV-rW-ra@*#rGYccY%a(ŠҠԠҠ)c5S(ȠҠϠՠ)'`$\& _&_ՠŠϠſ)'|`$r@p()@p(Ƞ)@p(ŠƠ)`$Aa(ԠŠƠ͠ӠԠԠՠĠϠŠο)R@ q;@rUVW'`@*#r9@*#r%@p(Π)Y`@*#r:()$#r9()$GD`@*#r:()$ E\_IG\<I_JqM6NTa(ȠƠŠԠӠŠŠƠΠՠŠϠſ)c^a(ŠΠ͠)%ha(ŠŠƠΠ)3rcS(ȠŠҠϠ٠ҠΩ)&@`@*#r9()$\LFa(͠Ӡ͠٠ŠĠҠҠˠƠՠȮ) "d6?e8,a(ϠՠŠŠϠĿ)S(٠ҠΩ)&@6`@*#r9()$J@`@*#r:()$,BS(ŠҠˠ)&@`@*)UVW-rqY M6sa(ɠΠРՠŠӠ٠ǠŠԠ٠ҠՠԠƠ̠Ӯ)Eca(̠ɠĠϠϠӠŠΠՠ٠Ů)c@S(ϠՠԠӠp(٠ŠԠƠ)-rq;@r7@B-rrp(ŠŠ)-rq;@rL@B-rrp(ŠŠŠƠŠ)-rq;@r<@B-rrp(ŠŠ)-rq;@r@p(@" rC@" rC@" rD4r#O4rD4rD4r-UVW-rq-rq-rqY7O4rD4rD4rC@"rD4rC@p(٠ŠԠƠ)-rq-rq;@rB@B-rrŠԠՠԿ)9Ba(ϠԠŠŠΧ)R@`;@r%[Da(Ġ)E@E()bEq.?Jr.?KrHdede[dq]@nN@"rC@"rD4rD4rC@"rC@"rD4r,xNſ)R@5b96a(Š)E@E(ά)F.?Jr.?KrE()F8a(Š)E@E(Į):[<]ˠ>>S(ϠՠԠϠŠŠǿ)&@`@*#r9()$A?`@*#r:()%[@a()cc8Aa(ԠӠŠŠƠŠ2"bq.?Jr.?Krdede7#d<e.?Jrd=e.?Krd>ed?eM6$a(Š)%[&a(ϠȠ)[2]ˠ)3q.?r.?r.?Jr.?Kr14a(ԠŠ̠ՠŠŠŠ)[`a(ĠŠŠΠԠҠ)a(ˠŮ)a(ΠӠΧ)d6?eFq.?6@r`$d6?e`%[a(נǠ͠) de.?rde.?r-!d<ed=ed>ed?eM6Ů)a(ΠӠΧ)d6?eCq.?6@r`$d6?e`%[a(נǠϠ)Sq.?r.?r.?Jr.?Krd<ed=ed>ed?eM63b9d<e.?Jrd=e.?Krd>e.?rd?e.?rM63a(z) q]έ]ĠϠŠ]٠ΠӠ]]̠Π٠ ]̠ΠĠ͠]̬ KM6tu c_d^a(ĠŠΠԠŠҠ)a(Ġ               $(13)ĺ:$ LKQ$(27)CL1:4_ Q$(21)AS((40)256(41)(36)):Q$(AS128):19p Q$(8)14| X514 X5X51:(8);:X51I$"":3 I$(I$,X51):4 CL1CL0:19 LC119 Q$"A"Q$"Z"19 T$((Q$)32):_H 7000nIN$"X":I0:J0:K0:P0:C0:B0:F0:R0:U0:UN1:S0:E0:M0:L0:N0:DZ$(4):9000:144:24X51: INPUT ROUTINE. SEE REM COMMENTS AT END OF PROGRAM.Q$:Q$(1)Q$(92):19Q$(3)I255:7005LKQ$(19)22 Q                         =HKN[er~#)/̰6ư=CIO Ĭˬ֬өٮҠŪ¦נӯؠŠԠϠΠӠŠҭŠίٯŠŠ'0U_PUZPFd'0=HKN[er~ "*9. NddH?dQ@,(((@@@ #<d2< _PK_(Z2F((  00 00ffXL9Kr@"@5@FȠrӠ    ^~ x )  ٠ŠԠƠӲ٠ŠԠƠӳŠŠӴŠŠŠƠŠӵŠŠ O @ԠŠĬˠөȮҠ@ @E   !BddB!d!BٯH @@@ Šɫɠ͠ɠôӭ̠H@hH@  pH`hH( ȸ H(h Hب@HxHH H@h H@ `phH@@ HhH@HP O @ ԠŠĬˬ֬өٮҠŪ¦נӯؠŠԠϠΠӠŠҭŠί     "A"|"SUBTRACT";30);"S"5"MULTIPLY";30);"M"V"CLEAR R1 ";30);"C"o"ENTER PI";30);"P""STORE FOR RECALL";30);"STR""SQUARE ROOT";30);"SQR""E TO R1 POWER";30);"EXP""R1 TO R2 POWER";30);"XPN""SINE OF XSS(A)SR1:1100ElA10:K19:SS(K)SS(K1):K:SS(10)SR1:1100b@"FUNCTION";30);"ENTER"J"--------";30);"-----"T"ENTER RESULT IN STACK";30);"E"^"LOAD FROM LIFO STACK (10)";30);"L"h"RECALL CONSTANT";30);"R"r"ADD";30);0NP$"R"4280(R1SV:J1:1340;NP$"?"4320O:34,0::8000bNP$"L"4400qA04375R10:1300SL04380SL1:J1:R1SS(A):1300J1:AA1:A04360&R1SS(A):13000NP$"E"1160DAA1:A104460R10:SP20:NU$ZR$:LN15:SD0:90,1100?NP$"A"4105USR1SR1SP2:1500h NP$"P"4120SR1(1.0)4.0:J1:1500:NP$"M"4160,SR1SR1SP2:1500@NP$"D"4200TSR1SR1SP2:1500hNP$"S"4240|SR1SR1SP2:150(TH):SR1(TH):1500)$ NP$"EXP"2380>8 SR1(SR1):1500SL NP$"SQR"2420h` SR1(SR1):1500}t NP$"XPN"1160 SQ1SR1: SR1SQ1SP2:1500NP$"C"4080J04060R10:J0:SR10:SP20:NU$ZR$:LN15:SD0:901100"NP$"CLR"23007J0:SR10:SP20:SV0:R10:SD0NA14:SS(A)0:A0X1060mNP$"ATN"2322 SR1(SR1):1500 NP$"ASN"2326 TN1.0(1.0SR1SR1)1.0:TN(TN):SR1(TN):1500 NP$"ACN"2340 TH1.0(SR1SR1)1.0:TH$"TAN"2120"4SR1(SR1):15007HNP$"STP"2140LM::23:"BYE":a\NP$"STR"2180rpSVSR1:1500NP$"REC"2202SR11.0SR1:1500NP$"LOG"2208TN(10.0):SR1(SR1)TN:1500NP$"LGN"2220SR1(SR1):15001340(J1:SR1R1:SDR1:1100J<SP2R1:NU$(R1):LN(NU$):R101344\>NU$ZR$:LN15d@90nB1100NU$(SR1):LN(NU$)@90JSDSR11100NP$"COS"2040SR1(SR1):1500NP$"SIN"2080 SR1(SR1):1500  NP32062:932019:$:31976:2;31933:H=R1SD:SD01300^BNU$ZR$:LN15:90tL17:NP$:L(NP$)VNP$""1100`L11125bNP$"L"SL0d4000eSL0tL32000R1(NP$)NU$NP$:LNL:90SDR1J0::W "KEY IN A '?' TO DISPLAY":"CALULATOR CODES":::"HIT RETURN TO CONTINUE";A$d :62450 ::::34,23:24:18 18,134232,134232,15218,15218,134 $X14:K15 &31890,X )K1080,1081,1082,1083,1083 .XX2:K:10858 OR PREVIOUS CALCULATED3  NUMBER WITH A SECONDP  NUMBER AND THEN KEY INl  THE DESIRED OPERATION  CODE. AFTER RUN, KEY IN A ? TO DISPLAY CODES. SS(10)  : "HW-II CALCULATOR":"HERB WRIGHT":"TULAUG":"APR. 28,1980"LL OF MY"  MONEY ON A DISK AND;  THEN MY CALCULATORT  CRATERED. MY WIFEo  SAID TO ME " YOU ARE  GOING TO HAVE TO  MAKE DO WITH YOUR  APPLE. THAT'S IT ! !"   IN GENERAL, YOU FOLLOW  THE 1ST ENTERED NUMBER 411,413,415,417 XX2:K:, 32320:: 32707:H 32664:V 32621:d 32578:r 32535: 32492: 32449: 32406: 32363: 32191: 32277: 32234: 32148: 32105:  I SPENT ABL:32768,XX:418! uXXXX2:LL; xK1LN:W$(NU$,K,1)H 32768,XY W$"E"154b 420k 200| W$"+"157 422 200 W$"-"160 419 200 KK(W$) KK46165 421:200 KK47400,401,403,405,407,409, HERB WRIGHT+ TULSA, OKLAHOMA: 4/25/80@(4)"BLOAD HERB'S CALCULATOR DISPLAY": BINARY LOADED FROM $8000 TO $8600 SL0:6 ZR$"000000000000000":1042ZY17dX332LNiBL(X3)2nBL0120 sXX3:LL1     Ҡ΍ΠĮԠӠȠŠàƠ̍ōĠŠ٠ӠΠŠٮŠƠŠנӠĠŠ٠ǠӠԠРΠǠנŠΠΠӬӲԳҮͮԳĮîԳӍӴӰȬήȮӳκӱƱ܍ŠӠΠԠ͠ŠŠة:m$ȹm%́ ʈ`Ff6  %Lp~~~PLp~~```````````~~ةo:mnȹmoP"ʈ`"&*.26:>"&*.26:"&*.26:>"&*.26:~~~#!"L~~~~~~~N!"Ly!"L88!"L````~~````ύLp~~  Lp~~~ !!"L@`0 Ff6|x L!"L~~@`0 w!"Lx| x||x  !"Lx||x  ͍!"Lx||x !"L $(,048????????????.-------------->?7-->?7-->?7--R! a3a8 AS!L@_#qoPa(Š)FG[yq8r-rq-rqذq-rٰq-rMqqM-rq???????7----------------5????????????????7----------------5????????????????7-------------------------------5??????????????7--------------5??????????????7--------------5??????????????7---------------+------------>????????????.------------>?????????????????????????7--------------------5????????????????????7---------------------+------------------>??????????????????.------------------>??????????????????.------------------>??????????????????.----------------------------------5?????????----------------------------------5??????????????????????7----------------------5??????????????????????7----------------------5??????????????????????7-------------------------------------------5????????????????????7--------------------5????7--------------------------5??????????????????????????7---------------------------+------------------------>????????????????????????.------------------------>????????????????????????.------------------------>????????????????????????.------------------------------------5????????????????????????????7----------------------------5????????????????????????????7-------------------------------------------------------5??????????????????????????7--------------------------5???????????????????????????????????????????????????.------------------------------>??????????????????????????????.------------------------------>??????????????????????????????.----------------------------------------------------------5????????????????????????????7---------------5????????????????????????????????7--------------------------------5????????????????????????????????7--------------------------------5????????????????????????????????7---------------------------------+------------------------------>???------------5??????????????????????????????????7----------------------------------5??????????????????????????????????7----------------------------------5??????????????????????????????????7--------------------------------------------------------???????????????????????????????????.------------------------------------>????????????????????????????????????.------------------------------------>????????????????????????????????????.----------------------------------------------------------????????7--------------------------------------5??????????????????????????????????????7--------------------------------------5??????????????????????????????????????7---------------------------------------+------------------------------------>?נԠƠӠŠӠŠĠŠԠ͠ˮĮ̠ŠӠҠǠӠҠӠΠΠŠ͠ӠӠȠŠ`ĠƠĠȮԠ̠Ԡ͠ӠŠנȠŠ .͠Ǡ٠ŠŠӠӠȠ'ҠԠӮŠŠΠŠͮŠŠԠϭî̮Π`ΠϠ͠ΠŠήҠҠάŠ̭!LB     ӠΠŠϭЮЮ̮ŮŠŠ   rMYYa7#qUVWXذq&8rٰqMذq&8rMY[J#ذq/UVWٰqqq`%qMY[#_#  #q[ $q*[ $q[ $q[ "$-rq-rqUVW-rqYUVW-rqYq<_@de]de[[D(#qUVWذqٰqMٰqMYd2#UVW XUVWذq*8rٰqMذq*8q.\(#q\(#q\(#\#E(oPa()GP!a()Gq-rq-rq-rqC-oP d2e?a(ӠƠɠ)Gd2eUVWY/oP bE(Ӻ)Gy2-rq/-rq-rq-rqkod2e?a(Š̠ŠŠŠΠŠ)Ga(͠ŠӡΠՠ)GKa(ŠҠƠӠҠ)FG` %a()Ga(ӿ)Gd2e+ oPS(ӠΧϠ)&@M6Mq5qBo S(ΠˠҠ)'`$\#qAoS(ĠˠҠ)'`$\#qUoa(٠ΠӠ)a(Ϡ)a(Ǡ)#oPT`$Ӯ).oPS(ӠΧϠ)&@@M6oa(ҠƠӠ)GT`$Uoa(Ӻ)oa()a()a()a()a()<o S(ĠҠ)'`$\#a(ĠԠŬĠϠˠ٠)a(ĠҠˠҠΠƮ)ZcPa(ŬŠӠŠŠ)a(ՠĠ٠ӠŠӮ)Ua(ՠԠϠŠŠҠƠ)a(ĠŠӠƠŠӠĠ̠ƠŠӠŠĠΠŠԭ)Ga(ԠĬĠ٠ŠȠ)Yta(ԠˠΠŠͮŠí)a(ŠӠϠŠ̠ƠŠӠϠ)T~a(ԠĬȠŠǠӭ)a(Ӻ٠Šˠ٠)YP a(ӠƠ)oPa(ŠӠƠɠӠΠ)GVVa(ŠƠŠԮŠŠŭ)a(ӠŠ̠ӠĠ)Y`a(ҠƠӠȠӠΠŠ)Ga(ϠŠĠΠŠӮ٬)Wja((ġ)/.o P a()d2eT8oP a(٠Ӡ̮)oa(ĠΠ͠٠٠Ҭ)XBa(ŠŬȬŠ)oPS(ӠΧϠ)&@YLM6oM6UVWX\@YEq\@q\@q\@q\@q\@q\@UVWX\@YRoP d2e?a()oP a(ӠƠɠ)I$oP a()o P aP a(ҠοٯΩ)GR@`@*#r:()$K_1dededJedKeKM6Q0ذqٰd(ed)e 'qq q q7 7O4rD4rD4rD4-rD4rD4rC@"r"K-rq-r-rq-r-rq-r\%,\q-rq-r\-@-rq-r-rq-r-rq-r^\ hqr[NoPd2e?a()FE(Ӡˠ)FE(Ӡ)Gd2eSUVWYo-rcq-r-rq-rq-rq8r-r-rqq`-r%qGذq-rٰq-rM`%[UVW2Y[\_`$\q-rq-r\[5qԍͺͺΠŠͺͺĠΠΠ)FJ_('cca(ӠҠ)'Q$@q.?6@rd6?e`$x5M6ca(ΠĠΠΠ)F.S(ϠՠԠҠΨ٠ҠΩ)&@"`@*#r9()$' ,Lc_ ^@M6ca(ŠϠˠƠΠΠŠ)a(Π'ZS(ԠҠΠĿ)&@d`@*#r9()$xqMMM\M6ca(ΠӠנΠΠ)Fa(Ӡ٠٠ϠĠ)q.?r.?rUVWq.?6?rY`()r%q`<()r$`<()r$xVfghq(886r8(rrq(886r8(rrq_`qa()G_` Lfq/?Pr(UVW2q/? rq/? r <ghFYPa()ԠàԠ)ca(ĠΠҠԠǠΠ)GqqVqqq`fghjq.?6@rd6?et`$j`<()r%q`<()r%q`<()r%q`<ΠǠ)Wa(ҠŠŠ̠̠ή)a(ǠŠҠҠŠ̠)Va(ŠԮϠΠŠΠ)a(ǧԠ٠٠Π٠Ϡή)q.?6@rd6?e`$L_nLLca(ՠРŠҮϠŠŠ)Da(ŠŠǠӠԠΧ)a(ԠΠ)ccc+Pa(ՠР̠)cccc,Pa(ĠΠҠ)ccccVPa(ϠԠ̠ԠŠΠ)a(ŠҠԠçή)Sa(̠ӠĠӠҠԠŠ)a(ŠĠŠή) q-*cS(ԠϠˠŠ̠ο)&@4`@*#r9()$>`@*#r9()$LaoPKa(ŠĠԠӠŠ)a(ΠƠҠ)WPa(Ӡ͠ǮȠ)Pa(ȠҠӠ͠ή)Za(ӮȠ٠ŠԠϠ)Pa(ӬϠŬϠӬӠ)KPa(̮̠ӠŠ)Pa(ŠԠӮ)a(ŠàӠǠ)>a(ƠŠΠ͠Π)a(Πź)Wa(Ӯ٠̠ȠҠ)Pa(ǠӠӠϠ)EPa(Ԡή)a(ӮȠ̠Ƞ)a(ĠΠàάӠ)Yba(ĠǠΠŠĮ)a(ҠҠŠŠ̠Š٠)Vla(ĠȠӠħŠ)a(ӠԠĠӠΠŠ)Sva(ȠȠŠǠȪ)cccPa()cPIa(Ҡ)cPa(Š)cPa()cP a(Ҡͮ),UVWYM6o@S(ϠՠԠӨ٠ҠΩ)&@`@*#r9()$ ZXPa(Π٧ӠŠƠŧnN@"rC@"rC@"r!d]ԠͮnN@"rC@"rC@"rxKM6oP ]a()P a(Π٧Ӡ)P a(ŠƠŠ)P Wa(Π)P a(&H)pp hi& `h `(`'`(8HJ Gh`'iHJ Gh`'i'`'8'` i(`HJ GhHJ 1&?1&9 1&3 `1&2@1&,1&& &hL & &hL &hL & JJJJ&hL''&`ԠͮKdede_dx  '&HJ&)4 &i&  h%&)ɀ &i&  hh 3                 i(`HJ GhL