8L xC)pJJJJ IH(ȱH:=IH[H`@H^H 2 9 @   I/H`JLNGȄBȄF aK ' faaFF  RJm# KKJ qJ )J ۈJJm  JFȱJGJKaȄM ' 5aaNNJFLGJ  !"#$%&CLEARS !)ALG2.BOOTn/!O('STARTUPn-!H$ WPT8i;!$ (XTRA.VAR_|* !@n6*SCR.U1.PAC z9 !@ B.MGR,o7!o7BLANKG3!3(LOGO.PAC8!@8D.RAM WK#!n NCPR2  !4*ALG.2.MENU-}$!O &I.FONT! $FONT :! *SCR.UN.PAC~!@ %DHGR2 m! O)FP(Ȳ3!O (STUDENTS ݲ_A2'ALG.2.4b-!O UNCPR1޲, !p *SCR.U4.PAC ݲ"!@ *SCR.U2.PAC ݲ!!@ F.PASTE.24!ALG22A.V.101589O ' &PRODOS }< ! ,BASIC.SYSTEM'(*+*SCR.U3.PAC< (ֲ!@ )ALG.2.4.3F-Ȳ!O)ALG.2.4.2^'Ȳ;!O)ALG.2.4.1s`aa8aa XL LG &PRODOS`DaElH$?EGvѶK+`L XX LU ŠϠĠӥS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RL !C_" %k"l" (#M8( % ) L*"m"n" (_7, )7(P0 ( @X p 8  u"!_"f"0 ~&f"0 %o"p" (,) &q"r" ( %L*")0I0hx H( +آ <B*IBGF08Lé'+8H <,``h(`@ڍL3<>=?<>CAB@?A` 1 L  <>`ڢF]PL8i m L   6< L  BLRAM' hLDLHB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`eLJCAB@=?.<ʆ>,=?BC8 é&'112``* G** c*` v* G* c*`hh8`8`***`}*`e`H)hJJ*0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <ȱȱȱȱ0]cȱeem*ȱ*ȱ**ȱ**ȱ* )* * )L(`L?* *Ll) ) L( )Ll)8e` ,$`ee` < @( )m((.(( M(i  ``) |'(j21 z& {&!` ({&z&(i({&(( CBDFGE (r&$ 3(,}&r& … 3(ŅL&JJJJ`Ϡ'8`r&h)hr')L&18|&"m11 2H22h2舌|&|&12H)M0 h10200I20h2 (`LE%12 `_'"L  <8# ȱ)ɀ  )( ` (Xp0`ŠӠֱǭԠŠҬî̠ӠĮʎ1|&… (n}&Dž (\%Tz&Lc()8= (J 8'z&'{& 3((ʎ1|&|&|&3223 `=YYZLYLYLY뿭` 8!@8` %MNЩUMߩ  L 5   8 0 8  `0 / X& & +&&7&P^&  VG+ #X ɛL ' 0% '8 Jm ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ ͍B B(8 ) ɘ"    L:#:#ŠϠĠԠ  m# m# J Qڨ)̰}] нȱ ̀𩠙 i V N c ɘ\ h"i"j" e" iL X>"L;"ίΠ`v""""""*$ Fk%YeQP!/RB}QBiBB}\ }FEL,#> ȏ6 . %Щ ߩu"L! )L! 8'  )ɀ)4,- U JNT) u"Ls"t" ( !` ^"M)Fi/ b"3 hh@ihAiH(ؠȱ@JJJJq@)@qvȱ@Hȱ@Ah@@cqe J) LL LJiB LJ) BxNhHHHHL(  ްƠx@BEOD  ް(`( C)CJJJl`B g-`J,~@~@}J@` ߩ%S @ ~`E hhhߺ0 h ߐ( ߐ ߐ  0 HϭߍLпlll IL3FHGI ҭJjHIHB>IؙJJ [: IL}HIHI`JKJK`FHIG ( Ȣ؝}؈JL)eKM`)` J vJ͛ $0 ΊJFJL8`JGBJ T(8`ؑ@`M8`8@ؐʈI묂)v8vv L} LةC8`؍)@ i)v8vyJ ^ ؅F Ls) +%J(a .FإGؐ.` .JHIH۩ ٰvw`JJJJ;i z묁͖ zٍ0  `H8` `ٍyٍiB0H0FG h0`FG `ϩBxED0C ް(`vw `ٽJJJJ`H͌hn)NjNjNjN. GH͌ z;٭ *Nۙ۰ڙک `Z8` G# ,`w .w .w .w8۰*Jv٭'ܝ٭(ܝ`)َ 8ʈ` 0ٝ)i `8`R ꍌvw zNمFمG < Ό0 FGL鮁0 ٭w٭vٽ8`H8`  ,v w 8` 1 E8`1ݺ00 ] 0ʩ 谼 谷`12)1`0`Ȏi 0U`)8`Ψ` W |G 4A)H ܝʈh٭0٭)ܝ٭*ܝ٥F٥GȱHΨ`Ί8AeHI SB60I ٙGٙEFJCʈ h猪`8m0`,0H hi PȽΨhٍ0GF8yאFG  $0 K08`܅I `L܍MN h8D`F` alH)HFȍJHGK $%܍&܍!ܢ8* J8` L ܝ:)I 'ܝ6`B8iNFLGM`B܅IH3H ( )ݰJK 밨C%܈@" T)Ii)܍N*܍A'ܮ( 4 䭐 $H %HFFHGHG 됬`R8`)` AHO` 'Q'܅IHHOOЍO@`8 ` ͉% ΉQיOʈ@mȱ@_ȱ@iklbJtKuO)5OI0ܢܽ eL'A* 7`aFG (CD Lz܅IN mAIH` pm mI0LM AOHJFKG 0NN` G8`F@ 0 H LK8`6 7I8`FHGH hGhF܌ բFܽܕF芝ܝ 밶67 8܅I m9IHHyHȘI Lܝ` @_@ g@Ю׍O)mJHi 뎁`C8` @ 3N@) K莭 ⭪i`0 ]; 뮁ٝ٘ 0 W,0 .H hȑNWȮّNW8`ٍّNΨ뎎׮Б` L ` @>O)I38 I`aם`K8`@Nȱ@O@ IiNȽבN)/ȩ/N`@[ WHJjjjhA D'KI؍0lhh8` Q)T'P#) ɺiL? )?      `l@Hȱ@IױHXATȱH ɯȩ׍̎5H)/@a)_ .0 :A[8@`, FإG`BH TFإG`,H hHB؅F  ؅GxDE؍00C ް(`(8` zL+J  :"L zH  : 9ؙ` @ P8`K8`B8` H؈OJJJJحm) ) )Ю ЪG `F $ ᭔ع+ؠ 6H  Rh8` 䮁ٽ ٬ؠ@` ( H )8`)i п` H h)N$хhꭋILhH),fx8 (8` ԍ`@Ae J m00[roIIJK,-NOPQRSu' >K@J5 {9X(K {XXK تKo`V8`no` D on {I9XX`)HJJJh`OeNeO࿰ {9XАO`@ȭ@` ON aNJKO`H݅G ` { rͬ 밽܅F݅G ` {* r% L`L뮰HH hFhG܍ݍ 8 `FHGH  hGhF`ݹܙ݊`@Bɼ`FaG 6%&N    ܮ `J HH hh` 0 @ LGL r`̴Yܝ ݝ0̴ȩFG   0` ܅F`a 밑 LȹL@ȅH@IL,0` G קּ= ]H.m)N 0 H`aO)@LP8` \᮰ ֩OCDC z L䬁yٙ٭yٙ٩`K GE@LL =@ /ȹP8` i` =ם0 /B =)( ȹ`8m8m@8` G8`F Pm)@N8`O)@J /טyרםOO)׍OꭱJJJJ Ȣ؝I؈ 6h(8H = h(8Hh(`ؑ@`@ȱ@ ` B@8ZO h鮁ٍٍٍoHٍn8bhcOJJJJO)O@` %I -m) 0@O)N8` ) ;⬂Ȣ؝z@zݚ@ʈLJ KIJHȢݚ h魚)Jn 8 δ ؍ ؍ \H8 ع)8` L )߹0 )p )@ ) ȩ ؝H0JK 방 LMJKFG 嬂؍b؍c؝d ؝_ vO) vO )حI͖ z`H@h`h``N8`  IhH  iع `  عiعi` )؍0CGHFHBFGx ް(8hFhG`@4͔ L @Ai ׭2` . R#ع؍0 ]讁)`.@+ i ؊ PLKΞʱNLMO MЈMEKݸP%MEKΞL( O, PeNNO J(` C  7 2JvHIwHI؊ LI  .` A Hv ع Hw ؙ؊ؠIhHƱ@O`؝}}vIvؐ` jzؽ}؝v j ) j؝zv؈` ` H Th)N@ ;; L  6$ )bJ ] ) H 8hL )  )حJjIwHIvHNNO 8 ؍JL`RΞʱLN1MOMEKP/MEKΞL;L-M O,p莝eNNO(`JNKOL 6/ &P L8 } [ؑJ`L@ȱ@ `@NȐ% LL L L 6 &pJ덟 )@።NJOK 6iKKΞΞ IJΟ JФ̭JjHFIH HIGxKE ް((H hH h8`8@ȭ@L6쬂8@   !"#$Ԡ͠(C)1983-87APPLELKL`BLL ެެެެެެެެެެެެެެެ(C)APPLE'83xLLM Mh@8nЍLޭ 0J @,,LR()*+,-./0123456789:;0h)ύh0HHHH " ׍hhhhhhh .hh8`JIMJAYKERRY&MIKEFby LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ  ɈL :Lɍ)ې)ɮ۰ɺH h 'L  ġLL ̹L)'L ȳL O'F ʻ ̹(((L $ʩ $$ $L `ީ % K@D E  / XʩXύX X %   % ɍRH hɛɘɉɈ $ Ld :Ldې)ɮ۰ɺ' Ld  : X ( % ɛ$ɘɉ 8V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌1֍ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` *L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| ֽ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+>P׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3QZYXXWV[HEVhEhH)IWHPHHHAHHHLaVEWLӿ``LG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)<j>>m>` _m8injkiljo풼i>?Ek?>Q>> L> \/ e>>?́?ޱ>ȥpnG @p;G=po:Q>>>̀ `` \> ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m};>:8o>oȑ>ppȑ>> :op`G DKJپھ pHJh` D!hgt}~p `~t}p8n~ni}tpi~~tso8pinii>j?k̈́>~|p|Ii||̈́ l - `>i>L8933LΞAAJL ةޘг uv $ 8LƞaЌ>?@`>?@`B8` K  춼LK ҟ ҟ ( KK`HJJJJ8`HK)` #hhL𚾤3 @LtJ)s@J b  l`a?sa?,E30ɍФ3 E3HD F3 Ʉ%h3 bM E  lLthɍLL3`3,A0s0% Ipn DpnI:L ؅303پھ p H־Ǿh۰8L־Jjjjɾ)Ⱦ8 ѱ OLӜ ĤLLX>(F`־ؾپھ׾` bɄ KDEF vLl v lL bKɍKL?` w  vLl@$݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ]c־Jjjj `O>0O l PODEF޾ p ޾ p($ذ v (0 ( L?ԦʚLeةީa s  lL b,FLg,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ B94 l% bʽ  ՚,S` H EH06172839h` v97L75v^a ?/( va?LLLɍ$?`?a ɍɥAH93827160hH46576879h`,C bL ɍ b w,S0 @ lLޭBYL 8!9 詍` "  4"/pŠϠŠà͠ӠàԠŠJJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IzLh,PIN'ҍIxy /L6Ix y JpnoF /= plm /w)!,ZJYH)h****)  md8幙`\H[< h  /( 载쳼󩭙L/id /`H) hJJJJ ɺi` M  ` ת.8 `O`S  AI-L9 ᪰B C VWS`޾Lp h־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8`ȾɾʾNfne}ȾȾI>Ie f`8` P־ǾҾ,G0C f=W)_``\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) 5W) =)W)@! pZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ f p vۥs׾tؾE` LL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"Lffff-ffLLLL"-"LLLLLL"-"LLD-DD-D3 333-333 333-33fff-fffff-fff-ffLLL L"-"LLLLL L"-"LLD-DD-D3333-333333-33ffff-ff2 2F2r22 2F2 r2f f/fff f/f fLL"-"LLLL"-"LLD-DD-D33-3333-33ff-f=>?@ABCDELLwLLL) `8` ԠŬLLʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~TV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nֵ#ح#׮2}q :IC@@ -!S    !C- !ABELSDFRV@@ !$(19@EüϠž(+@ABCDEFGHIKLMNPSsƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND6D(!쫂8 ( 8о(־Ǿ,G 8`_`W)H־Jjjjh p̭ fLᶢǾ ת..8 ۭ (8mȾȾmɾɾʾiʾ` Lpl8l:/,ŝL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 3" ALG.2.4.3 - SJW - V.101589-99007c9600WMODE(1)::15:B0:2000,RW(6(1))1:T$RW$(RW):RW4T$T$CM$NA$EX$5MO%3SC%(UN%,KI%,(MO%2)4)SC%(UN%,KI%,(MO%2)4)16V19:690:^MO%3SC%(UN%,KI%,(MO%2)4)0 _GHIJKLMNOPQRSTUVWXYZ[\]LLFFfff f-ffL L"-"LLL L"-"LL D-D D-D3 3-333 3-33f f-fff f-ffL L/LLL L/3-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 3-333 3-33f f-33-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 33 D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 3L D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-DLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"Lfff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-3-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-33-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 33 16368,0:# 390:A$:F 390:A$:A$(127)NX$"redo"L d 400:A$(32)415j  400:A$"0"A$"9"AN(A$): 420 420:AN1AN4ı 440 906:C5:835 ((MO%1)1)400,402 NX$"redo"(A$(13)AN$"")C0:835:6 A$"A"A$"Z"A$((A$)32) (A$"+")(A$"-")(A$"a"A$"z")ZS$A$:9000:AN$AN$A$:C0:835: A$"0"A$"9"(RA$,II,1)"@"A$"@":AN$AN$A$:C0:835:FF$"2":HH9:VV9:1191:% A$"0"A$"9"(RA$,II,1)"@"S$(9)"+"S$(9):/S$(9)S$:J9$"none":>S$(9)"":MS$(9)S$:I19:DN$(I)"":S$(I)""::1001:I13:DN$(I)S$(I):$1001:S$(1)DN$(1)1060.S$(4)"":DN$(4)"":I23:J23:S$(I)DN$(J)S$(4)S$(I):DN$(4)DN$(J):X1I:X2J/I:I((1)9)1:8997:LEI:S$SS$(I):1050HJ9$"":995999:PI1N(I):J(8)1P(I):PI1010,1015,1020:999:P21N(I):P21400,1409,1420:II45PL$S$(II):520:S$(II)PL$::II67:J(II)0:(S$(9),1)"+"(S$(9),1)"-"ı5:4849,1:9200:kNE((RA$,1)"-"):RA(RA$):(RA$,1)"+"(RA$,1)" "RARA1:RA$(RA$,RA)qI1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I):999:SG$"+":SG1:N(I)1SG$"-":SG1I((1)7)1:I(I7)6(I7)MO%4897#ZS$ZS$" "(PG%)/9000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:V9(7940)81:H9(7939)21:7939,I(H9):7940,V(V9):X9(H91.1)8:Y9(V98)X2851,852:Dk7969,22:7939,45(ZS$):7940,17:9000:7969,8:yl7969,22:7939,45(ZS$):7940,5:9000:7969,8:z{15:7939,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" " }9000:7939,2:7940,15:ZS$"M"(MO%):5127,34:5128,71:5129,49:5120:SQ5126,21:5127,52:5128,71:5129,68:5120:tRFA$"%":C7:V7:H22:1100:S6:7939,18:7940,120:BOX(136,1)154,Y:T6:BOX(136,1)322,Y:V7:BOX(ZK28,1)H(H),V(V)10:\Y43:X1851,852:Y58:FDC(C):ZI01:X(X9),Y(Y9)ZIX(X98),Y(Y9)ZI::15:wG5126,3:5127,129:5128,75:5129,161:5120:J5126,7:5127,34:5128,71:5129,68:5120:K7:BOX(328,1)157,50:L5126,3:5127,78:5128,75:5129,161:5120:#P5126,21:$"bk"822:; RIGHT ARROW OR SPACE BAR SELECTEDfPG%9((MO%4)(TT20))NX$"fd":739sNX$"bk"~822:4615:B15:MODE(2):5,178:19);:MODE(1):B0:CC(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:2):44,178:ZS$"Problems":9100:MODE(1)hMO%4TT20įMODE(2):66,178:ZS$"Menu":9100:MODE(1)v15:B0ZA$"":ZA$ZA$(8)720(ZA$(21))(ZA$(32))730710 LEFT ARROW SELECTEDMO%4TT20NX$"fd":729NX1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1): " DRAW ARROWSYMO%4704ZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1):704ZS$"Problems":MODE(2):68,178:9100:MODE(1)+MO%4TT20įMODE(X$"-"6708ZS$(S$,LT(X$SP$)):ZP%1:9000:660aS$(S$,(S$)LT):VV1:LI1VV1j620::::(7);"WORD TOO LONG":L(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA09000:J822:NX$"":ZS$"{]":MODE(2):""RA(AN$):4967 A$(13)AN$""H9H9(H9H8)@ 491l LP(PL$)1:(PL$,1)"+"PL$(PL$,LP)r  bL(S$):LTCLJ0T$S$:690: cHLJ l7939,I(H):7940,V(V):(S$)TCZS$S$:9000:905: vLTTC11:X$(S$,LT,1):X$SP$J(7)9J(7)9:RIRI1: v H8H9:906:ZS$(EZ$,RA):7940,(7940)4:9000:906:9000:906:AN$"":NX$"":470 (AN$)(RA)485 II(AN$)1:445:H9H91:NX$"redo"A$(13)496 C0:836:NX$"redo"NX$"":H9H8:490 A$(13)AN$ZS$A$:9000:AN$AN$A$:C0:835:. 446 822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0: 822:RA$AN$RIRI1: MO%3KI%1ı AN$S$(2)J(6)9J(6)9:RIRI1: AN$S$(3)͂::1LMODE(2):FF1(FA$):FF$(FA$,FF,1)_MC0FF$"@"FF$"#"İ1160:HH2:1110NFF$"@"FF$"2":1190:HH1:1110OFF$"("FF$")"CLC:C5:1160:CCL:HH2:1110PFF$"#"FF$"3":1190:HH1:1110Q1120:HH2 VFF:MODE(1):C0:1`9:ZS$FF$:H(H)4,V(V):9100:lj13:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):t9:ZS$FF$:((H1)72),V(V):9100:C(C):ZS$FF$:((H1)72),V(V):9100:15:MODE(1):H(H),V(V)4:ZS$FF$:9100:MODE(26:7940,88:ZS$"You can cancel in this problem.":9000(0 7939,6:7940,104:ZS$"What can you cancel:":9000:V914:H926:7939,48:7940,104:ZS$"( )":9000:490:AN$RA$Ĺ7939,6:7940,144:ZS$"Try ("RA$")":9000:3120): I23:S$(I)S$(4)X1I1$(1):V14:H10:1100:900Z' V17:S$D$(12)D$(14):610:FA$DN$(1):V19:H10:1100:900' FA$S$(1):848:C0:H14:V6:1100:843:FA$DN$(1):849:H14:V8:C0:1100' BLANK AREA ON SCREEN' 700:' '& RA$S$(4):914:DN$(4)""31508(+ 7939,1100:860:900:844& 7939,16:7940,120:ZS$D$(8)":":9000:905:I12:X1IFA$S$(I1):HH92:V15:C0:1100:HH92:ZK(S$(I1)):854& :I12:X2IFA$DN$(I1):HH92:V17:C0:1100& :3090' 900:844:S$D$(12)D$(13):V12:610:FA$S2:C0:1100:.% MO%3010,3100,3200,3200:}% X10:X20:S$D$(6):V12:610:V16:S$D$(7):610:I23:S$(I)S$(4)X1I1% DN$(I)DN$(4)X2I1% :X10X203050& 7939,6:7940,152:ZS$"You can cancel:":FA$S$(X11):9000:905:HH92:VV9:C5:5)PG%:2110$O21100$RPG%0:MO%3İ25000:$S2000$ V7:7939,8:7940,V(V):ZS$"Reduce:":9000:IJ23:FA$"("S$(IJ)")":V6:H12(IJ3)12:C0:1100$ H12(IJ3)12:ZK(S$(IJ))2:854::850% IJ23:FA$"("DN$(IJ)")":V8:H12(IJ3)1L10:4849,2:9200:ZS$T2$:876:ZS$WD$:875:MO%4PG%1\#:891:MO%3SC%(UN%,KI%,1)1j#>842:844~#?TC35:LI1:LJ4#H390:3000:MO%4İ1000#IMO%4ZF%1:ZF$"ALG.2.4":9950#MNX$"fd"2130$NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)de Selection":610:V11:I114:7939,6:7940,V(V):ZS$MZ$(I1)" "CH$(I1):9000:VV2:"7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:440:ZS$A$:9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.2.4":9950" MO%3SC%(UN%,KI%,(MO%2)4)0;#91000:TJ$(9):1429c!S$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$i!y!MO%42105!MO%0:PG%0:KI%3:912:891!ZS$T1$:876:ZS$T2$:875:15!H14:WD$TY$(KI%)! V6[" LJ0:TC34:S$WD$:610:VV2:S$"MoJ$(5)(J$(5),1)_ S$(1)S$"@"J$(5)S$J$(1):S$(2)S$J$(2):S$(3)S$J$(3):S$(8)S$J$(8) J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1429!S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$2)J(3)1420JJ(4)2N((J(4))):IJ23:J(IJ)J(8)J(IJ)J(IJ)(1):J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)((J(8)J(2))J(3)):J(8)J(8)(J(8)9)3 J(6)J(4)J(5):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:IJ23:S$(IJ)S$J$(IJ)::(J(5))1@"J$(1)S$:S$(5)S$"@"J$(8)S$:1419S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1419S$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$IJ24:999:995:J(IJ)ISG::J()ISG::999:J(4)2N(I):J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)(J(8)J(2))J(6)J(5)J(4):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$(2):S$(1)S$"@"J$(5)S$J$(1):S$(8)S$J$(8))J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"$(9)S$:S$(4)S$"#"J$(1)S$:S$(5)S$"@"J$(8)S$:1408}S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(7):S$(5)J$(4)S$J$(9):1408~S$(9)J$(4)S$:S$(4)S$(9)"#"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$KI%21420P999:995:IJ23:J(IJ):.15:H(H),V(V)4:ZS$FF$:9100:x999:J(2)I:J(3)J(2)(1):999:J(4)2N(I):J(1)J(2)J(3):J(8)J(8)(J(8)J(2)){J(9)J(4)J(8):J(7)J(1)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$J$(3):S$(1)S$"@"J$(1):S$(8)S$J$(8);|J9$"none"S); DN$(I)DN$(4)X2I1{)? :860:839:7939,16:7940,136:ZS$D$(8)":":9000:905:I12:X1IFA$S$(I1):AS$(1)FA$)@ X2IRA$DN$(I1):AS$(2)RA$)D :V17:HH92:C0:1100:ZK(FA$):HH92:854:FA$RA$:V19:HH92:C0:1100:3190Y*N 844:S$D$(12)D$(13):V12:JZLJ:LJ3:610:LJJZ:RA$S$(1):914:V912:H928:490:AN$S$(1)3170*X 7939,16:7940,104:ZS$D$(8)" ":9000:905:I1(S$(1)):(S$(1),I,1)"@"ZS$(S$(1),I,1):7939,I(H9):9000:3165*Y HH9:VV9:FF$"2":1191 +] H9H91::ZS$" ALG.2.4.2 - SJW - V.101589-99007c9600WMODE(1)::15:B0:2000,RW(6(1))1:T$RW$(RW):RW4T$T$CM$NA$EX$5MO%3SC%(UN%,KI%,(MO%2)4)SC%(UN%,KI%,(MO%2)4)16V19:690:^MO%3SC%(UN%,KI%,(MO%2)4)0 __`abcdefghijklmnopqr965#5a SCORE TRACKING ROUTINE05aI1NU%;5aJ14a5aSC%(I,J,1)0SC%(I,J,5)3:250305aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:250305aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1:250305aSC%(I,J,5)25a:5eB0:H(21(ZS$))4,55:9100z4&ZS$"and":H(21(ZS$))4,75:9100:ZS$"Press ANY Key":H(21(ZS$))4,100:91004&16368,0:A$4&::(4);"VERIFY ";ZF$4&ZF%0:216,0::(4);"-";ZF$:4' ERROR TRAP FOR DISK FLIP5'216,0:822:9OL-C TRAPPING83&((218)(219)256)9220Č822:9225>3&[3& TRAP FOR DISK FLIPm3&216,0:9990w3&99813&99903&5126,1:5127,30:5128,78:5129,186:51203&ZF%1ZS$"Check Disk Drive":99723&ZS$"Flip Disk"!4&:MODE(2):12:1)22%V(V)((V1)8)12%X(X)(X74)G2%Y(Y)(Y2425)2%C(C)(C0)0(C1)6(C2)1(C3)15(C4)12(C5)13(C6)9(C7)72%M(X)((X2)(X2))22%N(I)(((I3)(I3))3)2%P(I)(((I5)(I5))5)2%3& CONTR9240,9250,9260,9270,9280:435241 $4848,(4849):L1$1,64::SCR.UN.PACd1$1,98::SCR.U1.PAC}1"$1,118::SCR.U2.PAC1,$1,73::SCR.KI.PAC16$:SCR.MO.PAC1@$1,137::SCR.U3.PAC1% * FUNCTION DEFINITIONS *1%H(H)(H1)142%I(H)(H, MODE(1)0-#Z9(1):840J02#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:P0#0# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)0#Z9(1)0#ZS$;0#ZP%1ĺ0#ZP%00#0# COMPRESSION BUFFER MANAGER0#Z9(1) 1$0,0:(4849)9230,,142:5128,75:5129,161:5120:RI2İ300:3282f/ 7939,4:7940,152:(7);:ZS$D$(17)NA$".":9000/ 822:FA$AS$(1):848:C0:H14:V6:1100:843:FA$AS$(2):849:H14:V8:C0:1100/ BLANK/ 700: 0(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN:9000:15:BOX(70,1)225,114:V914:H918S. HH12:RA$AS$(HH):RA(RA$):490t. H918:V9V92:HH:839:3280. AS$(1)S$(1):AS$(2)DN$(1):15:BOX(156,1)175,114:H915:V914:I312:RA$AS$(I3):914:490. . H915:V916:I30/ 5126,3:51271)DN$(JJ1)X1IJ:X2JJ:3220E- SA$(1)S$(IJ1):SA$(2)DN$(JJ1)f- ::V19:S$D$(10):610:470- I12:X1IAS$(1)S$(I1)- :I12:AN$(I)"":X2IAS$(2)DN$(I1)- :X103250,. 7939,32:7940,104:ZS$"( )":9000:7939,32:7940,12091%,j H9H91::ZS$".":9000:900s,l FA$S$(1):848:C0:H14:V6:1100:843:FA$DN$(1):849:H14:V8:C0:1100,q BLANK AREA ON BOARD,v 700:, RI0:TC37:LI1:LJ3:844:V11:S$D$(9):610:PG%1MO%3İ350 - X10:X20:IJ12:JJ12:S$(IJ".":9000s+b V17:S$"And the"D$(14):JZLJ:LJ3:610:LJJZ:RA$DN$(1):914:H928:V917:RI0:490:RA$AN$3180+g 7939,16:7940,144:ZS$D$(8)" ":9000:905:I1(RA$):7939,I(H9):(RA$,I,1)"@"ZS$(RA$,I,1):9000:3178,h HH9:VV9:FF$"2":11 16368,0:# 390:A$:F 390:A$:A$(127)NX$"redo"L d 400:A$(32)415j  400:A$"0"A$"9"AN(A$): 420 420:AN1AN4ı 440 906:C5:835 ((MO%1)1)400,402 NX$"redo"(A$(13)AN$"")C0:835:6 A$"A"A$"Z"A$((A$)32) (A$"+")(A$"-")(A$"a"A$"z")ZS$A$:9000:AN$AN$A$:C0:835: A$"0"A$"9"(RA$,II,1)"@"A$"@":AN$AN$A$:C0:835:FF$"2":1190: A$"0"A$"9"(RA$,II,1)"@"ZS$A$:9$(1)  6LMODE(2):FF1(FA$):FF$(FA$,FF,1)dMC0FF$"@"FF$"#"İ1160:HH2:1110NFF$"@"FF$"2":1190:HH1:1110OFF$"("FF$")"CLC:C5:1160:CCL:HH2:1110PFF$"#"FF$"3":1190:HH1:1110Q1120:HH2VFF:M"+"(S$(9),1)"-"ı-S$(9)"+"S$(9):GS$(9)S$:J9$"none":VS$(9)"":eS$(9)S$:1001:J(1)(J$(8))J(2):J(2)J(2)(J$(8)):NN2:992:S$(6)S$"@"J$(2)S$J$(1)(J(2))2S$(6)S$"@"(J$(2),1)S$J$(1):J(2)0S$(6)S$"@"J1)7)1:I(I7)6(I7)I:2I((1)9)1:P997:LEI:S$SS$(I):1025`J9$"":995999:PI1N(I):J(8)1P(I):PI1010,1015,1020:999:P21N(I):P21400,1409,1420:II45PL$S$(II):520:S$(II)PL$::II67:J(II)0:(S$(9),1):X9(H91.1)8:Y9(V98)5:24849,1:9200:NE((RA$,1)"-"):RA(RA$):(RA$,1)"+"(RA$,1)" "RARA1:RA$(RA$,RA)I1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I):999:SG$"+":SG1:N(I)1SG$"-":SG1I((7940,15:ZS$"M"(MO%):MO%4897;ZS$ZS$" "(PG%)G9000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:V9(7940)81:H9(7939)21:7939,I(H9):7940,V(V9)1:5127,52:5128,71:5129,68:5120:\k7969,22:7939,45(ZS$):7940,17:9000:7969,8:l7969,22:7939,45(ZS$):7940,5:9000:7969,8:z{15:7939,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" "$}9000:7939,2:8,75:5129,161:5120:JI6:BOX(((S$(2))2)284,1)H(H),V(V)2:yJ5126,7:5127,34:5128,71:5129,68:5120:K7:BOX(328,1)157,50:L5126,3:5127,78:5128,75:5129,161:5120:P5126,21:5127,34:5128,71:5129,49:5120:&Q5126,2$"fd":739NX$"bk"%822:\615:B15:MODE(2):5,178:19);:MODE(1):B0:CC(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:DC(C):ZI01:X(X9),Y(Y9)ZIX(X98),Y(Y9)ZI::15:H5126,3:5127,108:5129100:MODE(1)15:B0-ZA$"":ZA$?ZA$(8)720`(ZA$(21))(ZA$(32))730i710 LEFT ARROW SELECTEDMO%4TT20NX$"fd":729NX$"bk"822: RIGHT ARROW OR SPACE BAR SELECTED PG%9((MO%4)(TT20))NXZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1):704ZS$"Problems":MODE(2):68,178:9100:MODE(1)MO%4TT20įMODE(2):44,178:ZS$"Problems":9100:MODE(1)MO%4TT20įMODE(2):66,178:ZS$"Menu":LT):VV1:LI1VV1!620G::::(7);"WORD TOO LONG":L(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA09000:822:NX$"":ZS$"{]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1)MO%4704]L$)1:(PL$,1)"+"PL$(PL$,LP)) N bL(S$):LTCLJ0T$S$:690:W cHLJ l7939,I(H):7940,V(V):(S$)TCZS$S$:9000:905: vLTTC11:X$(S$,LT,1):X$SP$X$"-"670 ZS$(S$,LT(X$SP$)):ZP%1:9000:660S$(S$,(S$)7)9:RIRI1: L H8H9:906:ZS$(EZ$,RA):9000:AN$"":NX$"":470b (AN$)(RA)485 II(AN$)1:445:H9H91:NX$"redo"A$(13)495 C0:836:NX$"redo"NX$"":H9H8:490 A$(13)AN$""RA(AN$):C0:835 491# LP(P000:AN$AN$A$:C0:835:$ 446 822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0: 822:RA$AN$RIRI1: MO%3KI%1ı AN$S$(2)J(6)9J(6)9:RIRI1: AN$S$(3)J(7)9J(ODE(1):C0:6`9:ZS$FF$:H(H)4,V(V):9100:qj13:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):t9:ZS$FF$:((H1)72),V(V):9100:C(C):ZS$FF$:((H1)72),V(V):9100: 15:MODE(1):H(H),V(V)4:ZS$FF$:9100:MODE(2):`x999:J(2)I:J(3)J(2)(1):999:J(4)2N(I):J(1)J(2)J(3):J(8)J(8)(J(8)J(2)){J(9)J(4)J(8):J(7)J(1)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$J$(3):S$(1)S$"@"J$(1):S$(8)S$J$(8)|J9$"none"S$(9)S$:S$(4)S$"#"J$(1)S$:S$(5)000:7939,32:7940,120:ZS$"( )":9000:S$(2)S$(8):15:BOX(83,1)217,115:V914:H918:RI0:HH321( RA$S$(HH):914:490:H918:V9V92:( 5126,3:5127,142:5128,75:5129,161:5120:RI2İ300:2890Z); 7939,4:7940,136:ZS$"The right answer isS$(3)")":V8:H12:1100:5126,3:5127,142:5128,75:5129,161:5120:V19:S$D$(5):LJ3:610~' IJ12:H12:V4IJ2:841:' 700:' ' S$D$(9):TC37:LI1:LJ3:V11:610:PG%1MO%3İ350j( V19:S$D$(10):610:7939,32:7940,104:ZS$"( )":9H12:1100:840:7939,4:7940,112:ZS$D$(3):9000& RI0:7939,22:7940,128:ZS$"( ) ( )":9000:V917:H913:HH23:RA3:490:H919::J(6)0:J(7)0:822:RI22760& V19:S$"Try ("S$(2)") ("S$(3)")":610:900:2740]' 849:FA$"("S$(2)")("7940,80:FA$"("S$(2)")("S$(3)")":ZS$D$(2):9000% RI0:7939,22:7940,96:ZS$"( ) ( )":9000:V913:H913:HH23:RA3:490:H919::822:J(6)0:J(7)0:RI22730% S$"Try ("S$(2)") ("S$(3)").":V15:610:900:27103& S$(3)S$(8):848:V6:1100$< 7939,4:7940,112:FA$"("S$(2)")("S$(8)")":ZS$D$(3):9000:V17:H10:C0:1100:900:849:V8:H12:C0:1100:900:844$F 7939,4:7940,88:ZS$D$(4):9000:V15:S$D$(5):TC35:LJ3:LI1:610:IJ12:H12:V4IJ2:841:$ 700:6% 7939,4:0t#( V7:7939,8:7940,V(V):ZS$"Reduce:":9000:905:IJ165:FA$S$(IJ):V6(IJ1)2.1:HH93:C0:1100::843#- MO%2610,2700,2800,2800:$2 7939,4:7940,80:FA$"("S$(2)")("S$(3)")":ZS$D$(2):9000:V13:H10:C0:1100:900:848:V6:H12:C0:WD$:875:MO%4PG%19":891:MO%3SC%(UN%,KI%,1)1G">842:844c"H390:2600:MO%4İ1000"IMO%4ZF%1:ZF$"ALG.2.4":9950"MNX$"fd"2130"NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110"O2110"RPG%0:MO%3İ25000#S2009,6:7940,V(V):ZS$MZ$(I1)" "CH$(I1):9000:VV2:!7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:440:ZS$A$:9000:MO%AN:A$"4"ZF%1::MO%0:ZF$"ALG.2.4":9950! MO%3SC%(UN%,KI%,(MO%2)4)0"91000:TL10:4849,2:9200:ZS$T2$:876:ZS$)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$E U MO%42105u MO%0:PG%0:KI%2:912:891 ZS$T1$:876:ZS$T2$:875:15 H14:WD$TY$(KI%) V67! LJ0:TC34:S$WD$:610:VV2:S$"Mode Selection":610:V11:I114:793(5)S$J$(1):S$(2)S$J$(2):S$(3)S$J$(3):S$(8)S$J$(8)J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1429S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1429? S$(9)J$(4)S$:S$(4IJ23:J(IJ)J(8)J(IJ)J(IJ)(1)|:J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)((J(8)J(2))J(3)):J(8)J(8)(J(8)9)3J(6)J(4)J(5):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:IJ23:S$(IJ)S$J$(IJ)::(J(5))1J$(5)(J$(5),1);S$(1)S$"@"J$419\S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1419S$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$IJ24:999:995:J(IJ)ISG::J(2)J(3)1420&J(4)2N((J(4))):J(3):J(5)J(2)J(3):J(8)J(8)(J(8)J(2))J(6)J(5)J(4):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$(2):S$(1)S$"@"J$(5)S$J$(1):S$(8)S$J$(8)J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1S$"@"J$(8)S$:1408e}S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(7):S$(5)J$(4)S$J$(9):1408~S$(9)J$(4)S$:S$(4)S$(9)"#"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$KI%21420,999:995:IJ23:J(IJ)ISG::999:J(4)2N(I):J(1)J(2): ("S$(3)")":9000:7939,48:7940,152:ZS$"("S$(8)")":9000:15:BOX(88,1)327,146e)J 700:)(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1))-#Z9(1):840)2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:)#*# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)(*#Z9(1)2*#ZS$;?*#ZP%1ĺI*#ZP%0O*#r*# COMPRESSION BUFFER MANAGER~*#Z9(1)*$0,0:(4849)9230,9240,9250,9260,9270,9280:4352* $4848,(4849):*$1,64::SCR.UN.PAC*$1,98::SCR.U1.PAC+"$1,11$)TCZS$S$:9000:905:NvLTTC11:X$(S$,LT,1):X$SP$X$"-"670yZS$(S$,LT(X$SP$)):ZP%1:9000:660S$(S$,(S$)LT):VV1:LI1VV1620::::(7);"WORD TOO LONG":L(T$):H20(L2):7939,I(H):7940,V(V):H9H91:NX$"redo"A$(13)495O C0:836:NX$"redo"NX$"":H9H8:490x A$(13)AN$""RA(AN$):C0:835 491 LP(PL$)1:(PL$,1)"+"PL$(PL$,LP)  bL(S$):LTCLJ0T$S$:690: cHLJl7939,I(H):7940,V(V):(S9100:MODE(1):15:B0:7 822:RA$AN$RIRI1:J MO%3KI%1ır AN$S$(2)J(6)9J(6)9:RIRI1: AN$S$(3)J(7)9J(7)9:RIRI1:  H8H9:906:ZS$(EZ$,RA):9000:AN$"":NX$"":470 (AN$)(RA)485$ II(AN$)1:445:C0:835:\ A$"0"A$"9"(RA$,II,1)"@"A$"@":AN$AN$A$:C0:835:FF$"2":1190: A$"0"A$"9"(RA$,II,1)"@"ZS$A$:9000:AN$AN$A$:C0:835: 446 822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:906:C5:835) ((MO%1)1)400,402W NX$"redo"(A$(13)AN$"")C0:835: A$"+"A$"-"ZS$A$:9000:AN$AN$A$:C0:835: A$"a"A$"z"ZS$A$:9000:AN$AN$A$:C0:835: A$"A"A$"Z"A$((A$)32):ZS$A$:9000:AN$AN$A$: 16368,0:# 390:A$:F 390:A$:A$(127)NX$"redo"L  400:A$"Y"A$"y"A$"N"A$"n"ZS$A$:9000: (7);:410 400:A$(32)415  400:A$"0"A$"9"AN(A$): 420 420:AN1AN4ı 440 " ALG.2.4.1 - SJW - V.101589-99007c9600WMODE(1)::15:B0:2000,RW(6(1))1:T$RW$(RW):RW4T$T$CM$NA$EX$5MO%3SC%(UN%,KI%,(MO%2)4)SC%(UN%,KI%,(MO%2)4)16V19:690:^MO%3SC%(UN%,KI%,(MO%2)4)0 _tuvwxyz{|}~,1)0SC%(I,J,1)5SC%(I,J,5)2:25030l/aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1:25030}/aSC%(I,J,5)2/a:/e4,100:9100 .&16368,0:A$=.&::(4);"VERIFY ";ZF$`.&ZF%0:216,0::(4);"-";ZF$:.' ERROR TRAP FOR DISK FLIP.'216,0:822:9965.a SCORE TRACKING ROUTINE.aI1NU%.aJ14.aSC%(I,J,1)0SC%(I,J,5)3:25030(/aSC%(I,J -&9981-&9990D-&5126,1:5127,30:5128,78:5129,186:5120l-&ZF%1ZS$"Check Disk Drive":9972-&ZS$"Flip Disk"-&:MODE(2):12:B0:H(21(ZS$))4,55:9100.&ZS$"and":H(21(ZS$))4,75:9100:ZS$"Press ANY Key":H(21(ZS$))3)15(C4)12(C5)13(C6)9(C7)7E,%M(X)((X2)(X2))2d,%N(I)(((I3)(I3))3),%P(I)(((I5)(I5))5),%,& CONTROL-C TRAPPING,&((218)(219)256)9220Č822:9225,&,& TRAP FOR DISK FLIP-&216,0:99908::SCR.U2.PAC)+,$1,73::SCR.KI.PAC;+6$:SCR.MO.PACT+@$1,137::SCR.U3.PACt+% * FUNCTION DEFINITIONS *+%H(H)(H1)14+%I(H)(H1)2+%V(V)((V1)8)+%X(X)(X74)+%Y(Y)(Y2425)),%C(C)(C0)0(C1)6(C2)1(CZS$T$:PA1PA0:9000:-ZP%1:9000:822:NX$"":ZS$"{]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1)MO%4704ZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1):704)ZS$"Problems":MODE(2):68,178:9100:MODE(1)jMO%4TT20įMODE(2):44,178:ZS$"Problems":9100:MODE(1)MO%4TT20įMODE(2):66,178:ZS$"Menu":9100:MODE(1)15:B0ZA$"":ZA$ZA$(8)720(ZA$(21))(ZA$(32))730710$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$K~IJ24:999:995:J(IJ)ISG::J(2)J(3)1420J(4)2N((J(4))):IJ23:J(IJ)J(8)J(IJ)J(IJ)(1):J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)((J(8)J(2))J(3)):J(8)JS$J$(2):S$(3)S$(2):S$(1)S$"@"J$(5)S$J$(1):S$(8)S$J$(8)J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1419S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1419ES$(9)J$(4)S)J$(4)S$:S$(4)S$(9)"#"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$GWKI%21420999:995:IJ23:J(IJ)ISG::999:J(4)2N(I):J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)(J(8)J(2))AJ(6)J(5)J(4):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:S$(2)J(8):J(7)J(1)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$J$(3):S$(1)S$"@"J$(1):S$(8)S$J$(8)|J9$"none"S$(9)S$:S$(4)S$"#"J$(1)S$:S$(5)S$"@"J$(8)S$:1408}S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(7):S$(5)J$(4)S$J$(9):1408A~S$(9FF$:((H1)72),V(V):9100:SC(C):ZS$FF$:((H1)72),V(V):9100:15:MODE(1):H(H),V(V)4:ZS$FF$:9100:MODE(2):: DRAW.EXPONENTx999:J(2)I:J(3)J(2)(1):999:J(4)2N(I):J(1)J(2)J(3):J(8)J(8)(J(8)J(2))`{J(9)J(4)0:HH1:1110DOFF$"("FF$")"CLC:C5:1160:CCL:HH2:1110kPFF$"#"FF$"3":1190:HH1:1110{Q1120:HH2VFF:MODE(1):C0:`9:ZS$FF$:H(H)4,V(V):9100:j13:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):"t9:ZS$II)PL$::II67:J(II)0:B(S$(9),1)"+"(S$(9),1)"-"ıXS$(9)"+"S$(9):rS$(9)S$:J9$"none":S$(9)"":S$(9)S$:LMODE(2):FF1(FA$):FF$(FA$,FF,1)MC0FF$"@"FF$"#"İ1160:HH2:1110NFF$"@"FF$"2":119"+":SG1:N(I)1SG$"-":SG1(OI((1)7)1:I(I7)6(I7)I:cI((1)9)1:{997:LEI:S$SS$(I)J9$"":995999:PI1N(I):J(8)1P(I):PI1010,1015,1020:999:P21N(I):P21400,1409,1420:II45PL$S$(II):520:S$(9):7940,V(V9):X9(H91.1)8:Y9(V98)5:: GOTO OLD CURSOR POSITIONc4849,1:9200:NE((RA$,1)"-"):RA(RA$):(RA$,1)"+"(RA$,1)" "RARA1:RA$(RA$,RA)I1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I):"999:SG$00:7939,2:7940,15:ZS$"M"(MO%):MO%4897FZS$ZS$" "(PG%)R9000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:V9((7940)8)1:H9((7939)2)1:O7939,I(H2:5128,71:5129,68:5120:: CLEAR.DENOMINATORgk7969,22:7939,45(ZS$):7940,17:9000:7969,8:l7969,22:7939,45(ZS$):7940,5:9000:7969,8:z{15:7939,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" "/}905129,68:5120:/K7:BOX(328,1)157,50:_L5126,3:5127,78:5128,75:5129,161:5120:N7:ZJ01:H(H)ZJ,V(V)6ZJH(H)(S$(9))28ZJ3,V(V)ZJ2::P5126,21:5127,34:5128,71:5129,49:5120:: CLEAR.NUMERATOR1Q5126,21:5127,5ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:DC(C):ZI01:X(X9),Y(Y9)ZIX(X98),Y(Y9)ZI:ZI:15:G5126,3:5127,129:5128,75:5129,161:5120:H5126,3:5127,108:5128,75:5129,161:5120:J5126,7:5127,34:5128,71: LEFT ARROW SELECTED:MO%4TT20NX$"fd":729GNX$"bk"R822:z RIGHT ARROW OR SPACE BAR SELECTEDPG%9((MO%4)(TT20))NX$"fd":739NX$"bk"822:615:B15:MODE(2):5,178:19);:MODE(1):B0:<CC(C):(8)(J(8)9)3J(6)J(4)J(5):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:IJ23:S$(IJ)S$J$(IJ)::(J(5))1J$(5)(J$(5),1)S$(1)S$"@"J$(5)S$J$(1):S$(2)S$J$(2):S$(3)S$J$(3):S$(8)S$J$(8)' J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1429~ S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1429 S$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$  MO%42105 !MO%0:PG%0:KI%1:9ISK FLIP.&216,0:9990&.&99811.&9990_.&5126,1:5127,30:5128,78:5129,186:5120.&ZF%1ZS$"Check Disk Drive":9972.&ZS$"Flip Disk".&:MODE(2):12:B0:H(21(ZS$))4,55:9100)/&ZS$"and":H(21(ZS$))4,75:9100:ZS$"Pre(C0)0(C1)6(C2)1(C3)15(C4)12(C5)13(C6)9(C7)7`-%M(X)((X2)(X2))2-%N(I)(((I3)(I3))3)-%P(I)(((I5)(I5))5)-%-& CONTROL-C TRAPPING-&((218)(219)256)9220Č822:9225-& .& TRAP FOR D,98::SCR.U1.PAC,,"$1,118::SCR.U2.PACD,,$1,73::SCR.KI.PACV,6$:SCR.MO.PACo,@$1,137::SCR.U3.PAC,% * FUNCTION DEFINITIONS *,%H(H)(H1)14,%I(H)(H1)2,%V(V)((V1)8),%X(X)(X74),%Y(Y)(Y2425)D-%C(C)Ќ# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)C+#Z9(1)M+#ZS$;Z+#ZP%1ĺd+#ZP%0j+#+# COMPRESSION BUFFER MANAGER+#Z9(1)+$0,0:(4849)9230,9240,9250,9260,9270,9280:4352+ $4848,(4849):+$1,64::SCR.UN.PAC,$1right answer is: ("S$(2)")("S$(3)")":9000:7939,54:7940,152:ZS$"("S$(8)")":9000:15:BOX(158,1)327,146* 700:*(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)*-#Z9(1):840*2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:*#7+:AN$(I)""::7939,26:7940,104:ZS$"( ) ( )":9000:7939,32:7940,120:ZS$"( )":9000:15:BOX(167,1)175,115:V914:H915)~ HH23:RA$S$(HH):914:490:H921::V916:H918:RA$S$(8):914:490:839:RI3İ300:2490u* 7939,4:7940,136:ZS$"The 849u(8 FA$S$(9)"("S$(8)")":V8:H12:1100:5126,3:5127,142:5128,75:5129,161:5120:V19:S$D$(5):LJ3:610(L IJ12:H12:V4IJ2:846:(V 700:(` RI0(j S$D$(9):TC37:LI1:LJ3:V11:610:PG%1MO%3İ350)t V19:S$D$(10):610:I131100:840:7939,4:7940,112:ZS$D$(3):9000'$ RI0:7939,22:7940,128:ZS$"("(EZ$,(S$(9)))") ( )":9000:H2(S$(9))1:V917:H913:RA$S$(9):914:490:H917H2'. RA$S$(8):914:490:RI2V19:S$"Try ("S$(9)") ("S$(8)")":610:900:2340(340,96:ZS$"("(EZ$,(S$(9)))") ( ) ( )":9000:H2(S$(9))1& RI0:V913:H913:RA$S$(9):914:490:H917H2:HH23:RA$S$(HH):914:490:H923H2::RI32336& S$"Try ("S$(9)") ("S$(2)") ("S$(3)").":V15:610:900:2310.' 848:V6:H12::C0:1100:900:849:V8:H12:C0:1100:900:844%7939,4:7940,88:ZS$D$(4):9000:V15:S$D$(5):TC35:LJ3:LI1:610:IJ12:H12:V4IJ2:846:%700:%%7939,4:7940,80:FA$S$(9)"("S$(2)")("S$(3)")":ZS$D$(2):9000C& 7939,22:792.1:FA$S$(IJ):C0:1100::843A$MO%2210,2300,2400,2400:$7939,4:7940,80:FA$S$(9)"("S$(2)")("S$(3)")":ZS$D$(2):9000:V13:H10:C0:1100:900:848:V6:H12:C0:11003%7939,4:7940,112:FA$S$(9)"("S$(8)")":ZS$D$(3):9000:V17:H10MO%4ZF%1:ZF$"ALG.2.4":99505#MNX$"fd"2130p#NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110z#O2110#RPG%0:MO%3İ25000#S2000"$PL$S$(9):520:S$(9)PL$:V7:7939,7:7940,V(V):ZS$"Reduce:":9000:905:IJ45:H12:V6(IJ5)440:ZS$A$:9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.2.4":9950f" MO%3SC%(UN%,KI%,(MO%2)4)0"91000:TL10:4849,2:9200:ZS$T2$:876:ZS$WD$:875:MO%4PG%1":891:MO%3SC%(UN%,KI%,1)1">842:844"?"H390:2200:MO%4İ1000!#I12:891,!ZS$T1$:876:ZS$T2$:875:15B!H14:WD$TY$(KI%)J! V6! LJ0:TC34:S$WD$:610:VV2:S$"Mode Selection":610:V11:I114:7939,6:7940,V(V):ZS$MZ$(I1)" "CH$(I1):9000:VV2:B"7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:ss ANY Key":H(21(ZS$))4,100:9100;/&16368,0:A$X/&::(4);"VERIFY ";ZF${/&ZF%0:216,0::(4);"-";ZF$:/' ERROR TRAP FOR DISK FLIP/'216,0:822:9965/a SCORE TRACKING ROUTINE/aI1NU%/aJ140aSC%(I,J,1)0SC%(I,J,5)3:25030C0aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:250300aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1:250300aSC%(I,J,5)20a:0e0000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000 Covington Cindy 960055000000000000000000000000000000000000000000000000000000000000000000 f m 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000005 Covington Cind 970000000000000000000000000000000000000000000000000000000000000000000000 Walter Scott 00000000000043000000000000000000000021000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 5129,161:5120:BP5126,21:5127,34:5128,71:5129,49:5120:rQ5126,21:5127,52:5128,71:5129,68:5120:V7:BOX(ZK28,1)H(H),V(V)10:XFA$"/":C7:V7:H22:1100:k7969,22:7939,45(ZS$):7940,17:9000:7969,8:%l7969,22:793IH(H9)14,V(V91)ZI::15:eDC(C):ZI01:X(X9),Y(Y9)ZIX(X98),Y(Y9)ZI::15:G5126,3:5127,129:5128,75:5129,161:5120:J5126,7:5127,34:5128,71:5129,68:5120:K7:BOX(328,1)157,50:L5126,3:5127,78:5128,75:=I11įMODE(2):15:H(H)43,V(V)12:"\";:MODE(1)h?(SC%(UN%,I1,5)0)15C(SC%(UN%,I1,5))@LI03:BOX(56LI2,16M(LI)2)H(H)7LI,V(V)M(LI)5::7939,I(H):7940,V(V):ZS$MZ$(I1):9000A"CC(C):ZI01:H(H9),V(V91)Z822:% RIGHT ARROW OR SPACEBARPPG%9((MO%4)(TT20))NX$"fd":739]NX$"bk"h822:55126,1:5127,30:5128,78:5129,168:5120:615:B15:MODE(2):5,178:19);:MODE(1):B0:75126,3:5127,30:5128,78:5129,186:5120:;44,178:ZS$"Problems":9100:MODE(1)eMO%4TT20įMODE(2):50,178:ZS$"Menu":9100:MODE(1)s15:B0ZA$"":ZA$ZA$(8)720(ZA$(21))(ZA$(32))730710 LEFT ARROWMO%4TT20NX$"fd":729NX$"bk"]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1)VMO%4704ZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1):704ZS$"Problems":MODE(2):68,178:9100:MODE(1)(MO%4TT20įMODE(2):-"6703ZS$(S$,LT(X$SP$)):ZP%1:9000:660\S$(S$,(S$)LT):VV1:LI1VV1e620::::(7);"WORD TOO LONG":L(T$):H20(L2):79363,I(H):79364,V(V):ZS$T$:PA1PA0:9000:ZP%1:9000:G822:NX$"":ZS$"{AN$):496. A$(13)AN$""H9H9(H9H8)7 491c LP(PL$)1:(PL$,1)"+"PL$(PL$,LP)i  bL(S$):LTCLJ0T$S$:690: cHLJ l79363,I(H):79364,V(V):(S$)TCZS$S$:9000:905:vLTTC11:X$(S$,LT,1):X$SP$X$"(7)9:RIRI1: m H8H9:906:ZS$(EZ$,RA):7940,(7940)4:9000:906:9000:906:AN$"":NX$"":470 (AN$)(RA)485 II(AN$)1:445:H9H91:NX$"redo"A$(13)496 C0:836:NX$"redo"NX$"":H9H8:490 A$(13)AN$""RA(elete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0: 390:400:A$LO$A$HI$AN(A$): 480 822:RA$AN$RIRI1: MO%3KI%1ı AN$S$(2)J(6)9J(6)9:RIRI1: AN$S$(3)J(7)9J$"+")(A$"-")(A$"a"A$"z")ZS$A$:9000:AN$AN$A$:C0:835: A$"0"A$"9"(RA$,II,1)"@"A$"@":AN$AN$A$:C0:835:FF$"2":HH9:VV9:1191: A$"0"A$"9"(RA$,II,1)"@"ZS$A$:9000:AN$AN$A$:C0:835: 446_ 822:ZS$"DI%,(MO%2)4)0 _' 16368,0:1 A$:O A$:A$(127)NX$"redo"U r 390:400:A$(32)415x  906:C5:835:390 ((MO%1)1)400,402 NX$"redo"(A$(13)AN$"")C0:835: A$"A"A$"Z"A$((A$)32)F (A  ALG.2.4 - SJW - V.101589+99002XI16:TY$(I)::I117:D$(I):|T2$"Multiply/Divide Fractions"9600MODE(1)::15:B0:2000,RW(6(1))1:T$RW$(RW):RW4T$T$CM$NA$EX$6V20:690: ^MO%3SC%(UN%,K9,45(ZS$):7940,5:9000:7969,8:q{15:79363,2:79364,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" "}9000:79363,2:79364,15:ZS$"M"(MO%):MO%4897ZS$ZS$" "(PG%)9000:01:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415::15:B0:TV9(7940)81:H9(7939)21:7939,I(H9):7940,V(V9):X9(H91.1)8:Y9(V98)2:4849,1:9200:NE((RA$,1)"-"):RA(RA$):(RA$,1)"+"(RA$,1)" "RARA1:RA$(RA$,RA),I1 (1-6) ":9000:LO$"1":HI$"6":480:ZS$A$:9000_$KI%AN:AN6H14:V6(2AN):WD$TY$(AN)$AN6ZF%1:ZF$"ALG.2.MENU":9950$AN5MO%4:UN%4:ND%20:1500:II120:R%(II)TE%(II):TE%(II)0::2080$ ZF%1:MO%0:KI%2061,2062,2063,2064% ZBOX(7I12,144M(I1)2)110I1,34M(I1):m#7939,38:7940,40:ZS$"CONTENTS":9000:V7:I115:H4:829#VV3::V8:I116:7939,18:7940,V(V)2$ZS$MZ$(I1):9000:S$TY$(I1):TC26:LJ14:LI1:610:VV2::7939,24:7940,V(V1):ZS$"Your choice?HUFFLE ROUTINE#"TE%(1)0:SJ%1@"ZI1ND%:SJ%(ZI)ZI:ZIL"ZJ%ND%"ZI1ND%:ZK%((1)ZJ%1):TE%(ZJ%)SJ%(ZK%):SJ%(ZK%)SJ%(ZJ%):ZJ%ZJ%1:""MO%42127"MO%0:PG%0:KI%0:913:891"ZS$T1$:876:ZS$T2$:875-#6:I103:(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1429!S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)S$J$(9):1429!S$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$!" S)J(8)((J(8)J(2))J(3)):J(8)J(8)(J(8)9)3 J(6)J(4)J(5):J(7)J(4)J(1):J(9)J(8)J(4):NN9:992:IJ23:S$(IJ)S$J$(IJ)::(J(5))1J$(5)(J$(5),1) S$(1)S$"@"J$(5)S$J$(1):S$(2)S$J$(2):S$(3)S$J$(3):S$(8)S$J$(8)G!J9$"none"S$S$J$(9):1419eS$(9)J$(4)S$:S$(4)S$(9)"#"J$(6)S$"@"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$kIJ24:999:995:J(IJ)ISG::J(2)J(3)1420J(4)2N((J(4))):IJ23:J(IJ)J(8)J(IJ)J(IJ)(1)0 :J(1)J(2)J(3):J(5)J(2)J(3):J(8:J(9)J(8)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$(2):S$(1)S$"@"J$(5)S$J$(1):S$(8)S$J$(8)J9$"none"S$(9)S$:S$(4)S$"#"J$(5)S$"@"J$(1)S$:S$(5)S$"@"J$(8)S$:1419S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(6)S$J$(7):S$(5)J$(4)5)J$(4)S$J$(9):1408a~S$(9)J$(4)S$:S$(4)S$(9)"#"J$(7)S$:S$(5)J$(4)S$"@"J$(9)S$gwKI%21420999:995:IJ23:J(IJ)ISG::999:J(4)2N(I):J(1)J(2)J(3):J(5)J(2)J(3):J(8)J(8)(J(8)J(2))aJ(6)J(5)J(4):J(7)J(4)J(1))J(8)(J(8)J(2)){J(9)J(4)J(8):J(7)J(1)J(4):NN9:992:S$(2)S$J$(2):S$(3)S$J$(3):S$(1)S$"@"J$(1):S$(8)S$J$(8)|J9$"none"S$(9)S$:S$(4)S$"#"J$(1)S$:S$(5)S$"@"J$(8)S$:1408}S$(9)""S$(9)J$(4):S$(4)S$(9)S$"@"J$(7):S$(9:ZS$FF$:((H1)72),V(V):9100:ZC(C):ZS$FF$:((H1)72),V(V):9100:15:MODE(1):H(H),V(V)4:ZS$FF$:9100:MODE(2):15:H(H),V(V)4:ZS$FF$:9100:x999:J(2)I:J(3)J(2)(1):999:J(4)2N(I):J(1)J(2)J(3):J(82":1190:HH1:1110KOFF$"("FF$")"CLC:C5:1160:CCL:HH2:1110rPFF$"#"FF$"3":1190:HH1:1110Q1120:HH2VFF:MODE(1):C0:`9:ZS$FF$:H(H)4,V(V):9100:j13:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):)t1:I13:DN$(I)S$(I):6$1001:S$(1)DN$(1)1060.S$(4)"":DN$(4)"":I23:J23:S$(I)DN$(J)S$(4)S$(I):DN$(4)DN$(J):X1I:X2J/::LMODE(2):FF1(FA$):FF$(FA$,FF,1)MC0FF$"@"FF$"#"İ1160:HH2:1110NFF$"@"FF$",1015,1020:999:P21N(I):P21400,1409,1420:II45jPL$S$(II):520:S$(II)PL$::II67:J(II)0:(S$(9),1)"+"(S$(9),1)"-"ıS$(9)"+"S$(9):S$(9)S$:J9$"none":S$(9)"":S$(9)S$:I19:DN$(I)"":S$(I)""::100NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I)4:a999:SG$"+":SG1:N(I)1SG$"-":SG1gI((1)N9)1:I(IN9)(N91)(IN9)I:I((1)9)1:997:LEI:S$SS$(I):1050J9$"":9957999:PI1N(I):J(8)1P(I):PI1010F$"ALG.2.4.1":99500%ZF$"ALG.2.4.2":9950J%ZF$"ALG.2.4.3":9950j%ZF%0:ZF$"ALG.2.4.4":9950t% PG%1%4UN%1:II14:SC%(UN%,II,3)5:SC%(UN%,II,4)0:SC%(4,II,3)0:SC%(4,II,4)0::UN%4:TT1%5KI%((R%(TT)1)5)1%9TL10:PG%TT&HZF%1:KI%2061,2062,2063,33006&OTTTT1:TT202101S&RUN%1:4000:PG%0:25000c&SMO%0:2000}& FRONT END FOR C4,M4& 1000:TL10:4849,2:9200:ZS$T2$:876:ZS$WD$:875& 891:842:844& TC35:LI1:LJ4& 390:3400:2000'H V7:7939,8:&4' ERROR TRAP FOR DISK FLIP<4'216,0:822:9965Z4a SCORE TRACKING ROUTINE4a " OPEN CDFILE$ FOR READING, 166 BYTES/RECORD4aI1NU%4aJ154aSC%(I,J,1)0SC%(I,J,5)3:250304aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:25030B5 Drive":9972#3&ZS$"Flip Disk"X3&:MODE(2):12:B0:H(21(ZS$))4,55:91003&ZS$"and":H(21(ZS$))4,75:9100:ZS$"Press ANY Key":H(21(ZS$))4,100:91003&16368,0:A$3&::(4);"VERIFY ";ZF$4&ZF%0:216,0::(4);"-";ZF$:3))3)'2%P(I)(((I5)(I5))5)-2%F2& CONTROL-C TRAPPINGo2&((218)(219)256)9220Č822:9225u2&2& TRAP FOR DISK FLIP2&216,0:99902&99812&99902&5126,1:5127,30:5128,78:5129,186:51203&ZF%1ZS$"Check DiskFUNCTION DEFINITIONS *,1%H(H)(H1)14?1%I(H)(H1)2U1%V(V)((V1)8)i1%X(X)(X74)1%Y(Y)(Y2425)1%C(C)(C0)0(C1)6(C2)1(C3)15(C4)12(C5)13(C6)9(C7)71%M(X)((X2)(X2))22%N(I)(((I3)(I0#ZP%1ĺ0#ZP%00#@0# COMPRESSED PICTURE MANAGERL0#Z9(1)}0$0,0:(4849)9230,9240,9250,9260,9270:43520 $4848,(4849):0$1,64::SCR.UN.PAC0$1,98::SCR.U1.PAC0"$:ASCII0,$1,73::SCR.KI.PAC06$:SCR.MO.PAC1% * d term and multiply.","Look at the correct answer, "p/(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)/-#Z9(1):840/2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:/#/# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)/#Z9(1)0#ZS$;correctly, your answer will be a reduced fraction.","The answer is"."Use a pencil and paper to calculate the answer.","Enter the final answer only.",6/"Multiply the"," numerators: "," denominators:","There are no common factors.","Invert the seconions","Fractions I Test"7-|"Algebra Menu","Solve:"-"Factor the numerator.","Now the denominator.","Find the common factor.","Divide both the numerator and denominator by the common factor."E."Look for terms that you can cancel.","If you cancel C%(UN%,II,4)SC%(4,II,4):e,SC%(UN%,5,1)20:SC%(UN%,5,2)UC%:((UC%20)DT)SC%(UN%,5,5)2:4040x,SC%(UN%,5,5)1,900:821:,@ ** DATA STATEMENTS **-r"Simplifying Fractions","Dividing by a Binomial","Multiplying Fractions","Dividing Fract%0:7939,52:7940,40:ZS$"Tried":9000:7939,64:7940,40:ZS$"Correct":9000:V8:II14:7939,2:7940,V(V):UC%UC%SC%(4,II,4):ZS$TY$(II):9000,7939,56:7940,V(V):ZS$"5":9000:7939,70:7940,V(V):ZS$(SC%(4,II,4)):9000:VV2:SC%(UN%,II,3)5:S915:RA$AN$(IJ):914:490:V916:s*`FA$AN$(1):848:C0:H14:V6:1100:843:FA$AN$(2):849:H14:V8:C0:1100*e822:839:RI2Ĺ7939,4:7940,152:(7);:ZS$D$(17)NA$".":9000:3690*f300*j700:* FACTORING TEST RESULTS*821+UC2:7940,104:ZS$"( )":9000:7939,32:7940,120:9000:15:BOX(70,1)225,114:V914:H918).RI0:HH12:H918:RA$AN$(HH):914:490:V916::RI2İ839:300:3690)33680)BRI0:AN$(1)S$(1):AN$(2)DN$(1):15:BOX(156,1)175,114$*CV914:IJ12:H:844:V11:S$D$(9):610:PG%1MO%3İ350p(X10:X20:IJ12:JJ12:S$(IJ1)DN$(JJ1)X1IJ:X2JJ:3620(AN$(1)S$(IJ1):AN$(2)DN$(JJ1)($::V19:S$D$(10):610(&AN$(1)S$(M(X1)2)('AN$(2)DN$(M(X2)2)()X103650\)*RI0:7939,37940,V(V):ZS$"Divide:":9000:FA$"("S$(2)")":V6:H12:C0:1100:FA$"("DN$(3)")":H24:C0:1100:H12:ZK(S$(2))2:854:H24:ZK(DN$(3))2:854'I V8:H12:FA$"("DN$(2)")":C0:1100:H24:FA$"("S$(3)")":C0:1100:856,(RI0:TC37:LI1:LJ3aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1:25030S5aSC%(I,J,5)2[5a:a5eLp 'pp&)p(09ppppxHJh,T,U&,T( p ppз`ppxHJh,T,U&,T( p ppp ppP ,p`)&JJ&&' &' &' f&')'`ff fBffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCfff fBffL L"C"LLL L"B"LL DBD3 3C333 3B33f fCfff fBffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCfff fBffL L"C"LLL L"B"LL DCD 33 3B33f fCfff fBffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCfff fBfL LLBLLL C B3 3E333 3D33f fCfff fBffL L"C"LLL L"B"LL DCD DBD3 3C33 33B333f ffCfff ffBfffL LLCLLL LLBLLL C B3 33C333 33B333f ffCfff ffBfffL LLCLL LLBLLL C B3 33C333 33B333f ffCfff ffBfffL LLCLLL LLBLLL C B3 33C3333B333f ffCfff ffBfffL LLCLLL LLBLLL C B3 33C333 33B333f ffCfff ffBfffL LLCLLLLBLLLCB3 33C333 33B333ffCffffBfffL LLCLLL LLBLLL C B3 33C333 fBfffLLLCLLLLLBLLLCB333C33333B333fffCfffffBfffLLLCLLLL2 2F2r22 2F2 r2f fdC$dfff fdB$df fLLLCLLLLLBLLLCB333C33333B333fffCffffDCD DBD3 3C333 3B33f fCfff fBffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCfff fBffL L"C"LLL L"B"LL DCD DBD3 3C333 3B33f fCfff fBffL L"C"LL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"fL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffL LL$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fffff fff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff f$fff fff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$f3f fff$fff fff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f ff3$33fff$fffff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$333ffff$ffffff$ffLLLL"$"LLLLLL"$"LLD$DD$D3 333$333 33f$ffffff$ffLLLL"$"LLLLLL"$"LLD$DD$D3333$333333$2 2F2r22 2F2 r2f f &fff f&f fLL "$"LLLL"$"LL D$DD$D3333$333333$33fffLL L"B"LL DCD DBD3 3E333 3D33f fFfff fFffL LFLLL LFLLFFLLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL"$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL# ALG.2.MENU - SJW - V.101589.99008c9600dBL(8190)(8191)256:BL3,0:BL4,14::(4);"BLOAD FONT"::(4);"BLOAD I.FONT"::(4);"BLOAD NCPR2"::(4);"BLOAD F.PASTE.2"nI09:MZ$(I):xSP$" ":CM$", ":PD$".":EX$"!" NU% h`L '&  )(0;xHJhx,T,U&,T(   д`xHJhx,T,U&,T(    P ,`)&JJ&&' &' &' f&')'`H<>=?BCL`&iPۭԍmm  PHJhx,T,U&,T(Ȍm``H)&JJ&&h' &' &' f&')'`D3 3 $333 3$33f f $fff f$ffL LFLLL LFLLFF D$D3 333$333 333$33f fff$fff fff$ffL LL@L"$"LLL LL@L"$"LL D$D D$ D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL"$"LL D$DD$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL"$"LL D$DL D$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL"$"LL "$"LL D$D D$D3 333$333 333$33f fff$fff fff$ffL LLL"$"LLL LLL"$"L4:DT0.8:I15:TY$(I):B I16:RW$(I)::I18:SS$(I):a I13:J15:A$(I,J)::v I14:CH$(I): T1$"Algebra 1 - Volume 2.2":EZ$" " MODE(1)::15:B0:NA$""1900 2006 16368,0:A$:# 400:A$(32)415) N 400:A$LO$A$HI$AN(A$):W 430 J$"":II1(S$):QR((S$,II,1)):QR64QR91QRQR32 J$J$(QR)::S$J$: QR((S$,1))32:LS(S$):S$(QR)(S$,LS1): bL(S$):LTCLJ0T$S$:al Denominators","Adding Polynomials","Subtracting Polynomials","Fractions II Test""Fractional Equations","Ratio and Proportion","Complex Fractions","Equations from Formulas","Fractions III Test"! "Lesson and Demonstration","Examples with help","J"Great!","Fantastic!","Super!","Good work","Good job","That's it"lT"a","b","c","d","n","z","s","r""Simplifying Fractions","Dividing by Binomials","Multiplying Fractions","Dividing Fractions","Fractions I Test"U"Like Denominators","MonomiI,5);28(A$(I,5)));UC$;16(SC%(I,5,2)10));SC%(I,5,2):::]j(12):(4);"PR#0"::@<0>,<1>,<2>,<3>,<4>,<5>,<6>,<7>,<8>,<9>E"Multiply/Divide Fractions","Add/Subtract Fractions","Equations with Fractions","Progress Report","Exit Program"G900:823::^L::(4);"PR#1":(9);"80N":"Progress Report for "NA$" "NL$":"::M27);"Tried";12);"Correct"QI13:UC$"20":TY$(I):VJ14::A$(I,J);29(A$(I,J)));SC%(I,J,1);17);SC%(I,J,2):SC%(I,5,2)0UC$" 0"@`::A$(Correct":9000:7939,18:7940,40:ZS$TY$(I):9000:V9J15:VV2:7939,4:7940,V(V):ZS$A$(I,J):9000:7939,54:7940,V(V):ZS$(SC%(I,J,1)):(ZS$)2ZS$" "ZS$9000:7939,68:7940,V(V):ZS$(SC%(I,J,2)):(ZS$)2ZS$" "ZS$9000:":I12:7939,18:7940,V(V):ZS$MZ$(I)RS$:9000:VV2:RS$" Printer"::7939,4:7940,V(V):ZS$"Your choice? (1-2) ":9000:HI$"2":LO$"1"l430:AN7300,75007I13:UC$"20":823:7939,52:7940,56:ZS$"Tried":9000:7939,64:7940,56:ZS$"F$"ALG.2.4":99502HUN%2:ZF$"ALG.2.5":9950PRUN%3:ZF$"ALG.2.6":9950`\7000:2006f::216,0::(4);"-FP"X823:ZS$WD$:874:S$"Do you want the report on the screen or on the printer?":TC36:LI2:LJ3:V7:610:VV2bRS$" Screen)ZS$MZ$(I1):9000:S$TY$(I1):TC26:LJ14:LI1:610:VV2::7939,24:7940,V(V1):ZS$"Your choice? (1-5) ":9000:LO$"1":HI$"5":430:ZS$A$:9000Y5:KIND%AN:H14:V6(2AN):WD$TY$(AN) ZF%0:KI%2110,2120,2130,2140,2150>UN%1:ZF%1:ZZ$:(S$)2İ500:510#NL$S$.25000AUN%0İ25500UN%0:913:6:I103:BOX(7I12,144M(I1)2)110I1,34M(I1)::ZS$T1$:8757939,38:7940,40:ZS$"CONTENTS":9000:V7:I113:H4:829:VV3:V8:I115:7939,18:7940,V(V9200:4849,1:9200:?l912:ZS$T1$:876:WZ$"":LZ7vY12:7939,8:7940,64:ZS$"Enter your first name: ":9000:H28:V9:60000:S$OZ$:(S$)2İ500:510NA$S$:LZ15:7939,8:7940,80:ZS$"And your last name: ":9000:H26:V11:60000:S$O39,45(ZS$):7940,5:9000:7969,8:\l7969,22:7939,45(ZS$):7940,11:9000:7969,8:13:B2:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:B0:0:9100:MODE(1):15:V9(7940)81:H9(7939)21: 4849,1:H)43,V(V)12:"\";:MODE(1)I ?(SC%(I1,5,5)0)15C(SC%(I1,5,5)) @LI03:BOX(56LI2,16M(LI)2)H(H)7LI,V(V)M(LI)5::7939,I(H):7940,V(V):ZS$MZ$(I1):9000 A j7969,22:7939,45(ZS$):7940,17:9000:7969,8:&k7969,22:79 L(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA0N 9000: 55126,17:5127,30:5128,78:5129,186:5120: 60:B0:MODE(2):5,178:19);:MODE(1):15: 75126,3:5127,30:5128,78:5129,186:5120: =I11įMODE(2):15:H(690: cHLJJ l7939,I(H):7940,V(V):(S$)TCZS$S$:9000:905:} vLTTC11:X$(S$,LT,1):X$SP$X$"-"670 ZS$(S$,LT(X$SP$)):ZP%1:9000:660 S$(S$,(S$)LT):VV1:LI1VV1 620 ::::(7);"WORD TOO LONG":BPractice","Return to Unit Menu"Z(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)f-#Z9(1)2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:## DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)#Z9(1)#ZS$;#ZP%1ĺ#ZP%0#'# COMPRESSION BUFFER MANAGER3#Z9(1)Z$0,0:(4849)9230,9240,9250:4352n $4848,(4849):$1,64::" SCR.UN.PAC$1,98::" SCR.U1.PAC"$1,73::" SCR.KI.PAC% * FUNCTION DEFINITIONS *%H(H)(H1)14%I(H)(H1)2:60400!&OZ$(OZ$,(OZ$)1),&60400$(64)IZ$(91))(IZ$(96)IZ$(123))61200<%60400F%HH1V%BOZ$OZ$IZ$n%tNP0ZS$IZ$:9000y%60400% BACKSPACE% (OZ$)060400%<7939,(7939)2:7940,V(V):ZS$" ":9000:7939,(7939)2:7940,V(V):HH1 &n(OZ$)1OZ$""$(13)(OZ$)0ı3$IZ$(8)IZ$(127)61450i$(IZ$)2IZ$(IZ$,1):IZ$(75)IZ$(83)61450~$(OZ$)LZ60400$WZ$""60900$NZL1(WZ$)$IZ$(WZ$,ZL,1)61200$ZL:604001%(IZ$(32))(IZ$(39))(IZ$(44)IZ$(59))(IZTUDENTS,R0":1"#d216,0:9900]#dSB$"":II122:SB$SB$" "::II172:SB$SB$"0"::#dII130:(4);"WRITE STUDENTS,R";II:SB$:#d(4);"CLOSE STUDENTS"#d25030#` INPUT CONTROL ROUTINE#OZ$"":IZ$""# CURSOR ON#IZ$$TIZZI14:ZJ14:ZK146"cSB$SB$(SC%(ZI,ZJ,ZK))e"c::ZK12:SB$SB$(SC%(ZI,5,ZK)48)::"c:(4);"WRITE STUDENTS,R";RC%:SB$"c(4);"CLOSE STUDENTS""c:"dd216,0:822"nd216,0:9900#xd:(4);"OPEN STUDENTS,L95":(4);"WRITE S)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)18!c:J!c216,0:9900S!c:n!c WRITE.SCORE.FILE!c::(4);"OPEN STUDENTS,L95"!cSB$NL$:(NL$)15āZI115(NL$):SB$SB$" ":!cSB$SB$NA$:(NA$)7āZI17(NA$):SB$SB$" ":"c);"CLOSE STUDENTS"& bI14:J15d bJ5āK14:SC%(I,J,K)((SB$,I18J422K,1))::25320 bK12:SC%(I,J,K)((SB$,I182K,1))48: bSC%(I,J,5)2:SC%(I,J,1)0SC%(I,J,5)3:25350 bSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)20!bSC%(I,J,1B$NL$:(NL$)15āII115(NL$):SB$SB$" ":hbSB$SB$NA$:(NA$)7āII17(NA$):SB$SB$" ": bII172:SB$SB$"0":::(4);"WRITE STUDENTS,R";RC%:SB$*bP%P%1:P%(P%30)(P%31)P%:(4);"WRITE STUDENTS,R0":P%4bSB$(SB$,23) pb(4(4);"OPEN STUDENTS,L95":(4);"READ STUDENTS,R0":P%:RC%1XaRC%30RC%P%:25100a:(4);"READ STUDENTS,R";RC%:SB$b(SB$,(NL$))NL$(SB$,16,(NA$))NA$LB$(SB$,(NL$)):FB$(SB$,16,(NA$)):SB$(SB$,23):25200bRC%RC%1:250701 bS))4,100:9100"&16368,0:A$?&::(4);"VERIFY ";ZF$b&ZF%0:216,0::(4);"-";ZF$:' ERROR TRAP FOR DISK FLIP'216,0:822:9965a READ.SCORE.FILEaa216,0:25700a:(4);"VERIFY STUDENTS"a216,0:9900>a0 &9981&9990F&5126,1:5127,30:5128,78:5129,186:5120n&ZF%1ZS$"Check Disk Drive":9972&ZS$"Flip Disk"&:MODE(2):12:B0:H(21(ZS$))4,55:9100&ZS$"and":H(21(ZS$))4,75:9100:ZS$"Press ANY Key":H(21(ZS$%V(V)((V1)8),%X(X)(X74)B%Y(Y)(Y2425)n%C(C)(C0)0(C1)6(C2)1(C3)15%M(X)((X2)(X2))2%& CONTROL-C TRAP&((218)(219)256)9220Č822:9225&& TRAP FOR DISK FLIP&216,0:999  >>< (>>88  $*0 >>~~"2*&" " >>  ">> "8""> """"""< >> "🼞🀞🼀🀀🼞🀀🀀🀞ܝ𝀀ܝܝܝ🀞́𙀀"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >` >>  <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>~` ?>>~P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPLPP fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPLPPLOLPLLOLPLPf fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPffPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPf fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f f3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3ffffPfLLPLLLPLPP3 3P33 3P3fPffPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P2 2P22 2P2f fPff fPfLLPLLLPLPP33P333P3ffPfffPfLLPLLLPLPP33P333P3ffPxЅԅ؅:020'0"(!!L(!,@, ,!"(!0! L  L q!q! ^"]":";"io!:* /:" o!"m" .L?. >Jrh Z1[1Y1iY1Y1Z1[1 Y#hh`8Y1iY1L?.8Z1Z1[1[1Z1m1Z11[1L?. L?. /L?.䍠1Y1HZ1[1 Y#0ѥӠұԢFԭ11H,10 # # $hҩY1Y1Y1 &х0ӅPӅ , Щ S' Y#L+ =/Y1eЅPZ1eӅ[1eԅ̈́1 ץ̓1ЬY1 -P -PZ1[1 -Y1Z1[1 -Y1` /&L#,1-1-0-э001`10--Y1`ЊHHY1 =/) ' &&méQ v, W, v, e,Q , , W, , , W, , , W, , , W,Y1Z1[1 Y#Y1`HP #h`HP /& #h` ,Q 8Y1P`Y1}P`Q8Z1[1`Z1}[1}`Ӆԅ&FPeӥeԐՈ`,1 g RQԅѥ*$\1```,1 g RPЅҥQ ,  S'Y1Z1[1Ls+ =/Нѝ ,̈́1 +̓1$ ,ҝ , P ,Y1L81ȄPЅх ,ԝ՝HI91ȄPh҅ ,ԝ %`ҥ P `*ҹ01$% %``H)&JJ&&h' &' &' f&')'` "()`ҹ010`j$ )b1ԅL#Ј∹҈`ХȥҙȥȄ` `*Ҥ001$%M%G04$ `* `***$ <* * D)ɛ  +)L# ) `) *í1䭤1 Y#` `* k* s*)E%0EѤ 1,C)L"(? % `* k*$%0/ s*)%0%0 s*)%0  * &` &`? & `* k*$%0/ s*)%0%0 s*)%0  * %` S' Y#` 'L& 'L&1HJhxTUp&P&T(1` LI1ԅՆ , I1Ն ޥѰ$)ӥ)Ӆӥ)ԥ)ԅԥӅթ S' Y#䍣1⍤1 `* k*%0 %`Хҍ9 *ӊ)81I91ȄҤѢԆզ8eЅԐ $e҅Ր $JJJ` g RQP̄1914HH, $hh` I1` I11`L,1 S' # S' /&L' ` `  eȱe酅'`'i,71&i,&&iPII&if&H8HӰ hIiHӅхhЅhIi҄f8Ъх 2$8e҅ԥ #(Ӱ %eЅԥeP`JJJJӊ)81I91ȄҤѢԆզ8eЅԐ N%e҅Ր O%JJJ`JJJJ1%0Q&&T(1,12Ȍ1JxTU-11&,10-1Q&&T(1L%)m1JxTU1) 1Q&%01Q&&T(1,16HȌ1JxTU $ Q&-1,10Q&&T(1h(e)jL2$0/',71"&,%i8i#H&ii&hif&iȌ1JxTU $ Q&,1-1Q&&T(1h`P,1,HΤ000r10y11k1 O z$h`0JI0`O0J `,13H0k1 P $000r10y11h`0 I0P0  `)L%1JxTU1%01&80 _" |",S11) 1x,U $) 1,T( $)` >*,1 & &ҤHi #i)ҽ700,1ҽd10r10y11)  ` Y#1JxTU) 1Q&,1%0Q&&T(1,1ʥHL"L0!0`10(Ѹ01 110H0HL Lލ111 ,P,T,R,W`10] ^` \^`L > 0 _"L|"0 _"] ^`mq!8":8e::;i;:i:;i;:" o!mq!8":L!<"=>1?Bq!C ,6Å7r! lp! $ $ $8LG ӠˠŠŠҠÍ1 #hY1Z1iZ1[1[1̈́18Z11Z1[1` S' Y#Y1Z1[1`1$1 Ԑ1АLԭ`ԭ`LީЄ - { lݩ , { lݩ / M/Hh L0 0 / M/H 0h L:) =<x?BC8 Í st ijI,0::FIX BIT MAP0 P49003,63:FIX BIT MAP6 Z  FP; 1010,0:1011,190:1169: REMOVE RESET TRAPW48888:RELEASE BUFFERSr(4)"PR#3":RESET I/O(48647,158:48648,190:RESET EXTRNCMD21014,3:1015,190:RESET AMPERSAND<103,1:104,8:2048,0:RESET PROGSTART FI4898549002:(XXCIRCLE(XBOX(XBMODE(HŴxaI1"3DUfwĠŠ̤ĠŠ̤̍Íà̍̍àҳҠ/opqr/ hoȥqoȥroLG o8/oppiojpMޭLP ` LJ p " npL ptso8pinii>j?kʼn3pIiŁʼn % l `>i>?Ek?>Q>>>ńŅ D `` >ń Ņ D `e>>?ņ?>?Emn'>e>ȱ>e?>Q>ڠ> ie>>?`; =:<:<=;`Łi ;>:8o>oȑ>ppȑ>> :op`ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+f+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff ffff fff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff ffff fff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+ff+fff fff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+ff+fff fff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff33fff+fffff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f ffff+ffffff+ffLLLL"+"LLLLLL"+"LLD+DD+D3 333+333 333+fff+ffLLL L"+"LLLLL L"+"LLD+DD+D3333+333333+33f2 2F2r22 2F2 r2f fFfff fFf fLL"+"LLLL"+"LLD+DD+D33+3333+33ff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"^Zߕ&0%ÃÁ,$#ׅ##""ߕ 6 CCF``CH)&JJ&&h' &' &' f&')'`L L`PPEEߍC ЍFF8E8F DJx,T,U&,T(DECCF```  PC mE mF D DPHJhx,T,U&,T(DȌDEL<=>?BC `f/fff f/ffL L1LLL L1LLFF D+D3 3+333 3+33f f-fff f-ffL LFLLL LFLLFF3 3/333 3/33f "LL D+D D+D3 3+333 3+33f f+fff f+ffL L"+"LLL L"+"LL D+DLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"+"LLL LLL"+L LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"+"LLL LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"+"LL+"LLL LLL"+"LL D+D D+D3 333+333 333+33f fff+fff fff+ffL LLL"+"Lā ׅāĂ&ăā       耠ā  Єā ǁā      Á                                            Á          à LJĜ Ĝ         Á           -  À-        *) 0 .   W ^RT U ` @`hhߚHH`,L,,0`)00M&'=12)ɳ0,232&'&'1`##$###$##",(+*,),!*,')ß'("$$  !&*         ၀  " + , ÃÁ " # Ï   *& ( ၀' "" ALG2.BOOT - SJW - V.072889-9900B :(4);"-DHGR2"8190,(974):8191,(975):838,(1014):839,(1015):1014,64:1015,3768:(4);"BLOAD UNCPR1"(:(4);"BLOAD BLANK"-:(4);"BLOAD B.MGR"2:(4);"-XTRA.VAR"7 <N 4);"OPEN WPT,L5":(4);"WRITE WPT,R0":"N":(4);"CLOSE WPT":(4);"DELETE WPT"c a216,0:9900i ay d822:25020 ,e216,0:822:9900 6e::"Please remove the Write-Protect Tab and Press CONTROL-RESET" @e25920D CLEAR" /250005 2216,0::(4);"-ALG2.BOOT"M & CONTROL-C HANDLERS &l a READ.SCORE.FILE a216,0:25800 a:(4);"VERIFY FINDER.DATA" a216,0:TF%3:25900 a(4);"DELETE FINDER.DATA":25030 a216,0:TF%1:25900Q a:(  STARTUP - SJW - V.100889+9900 ::((49048)128)(((49048)128)64)(((49048)128)48)ĺ:"Not a //e, //c, or //gs":" with at least 128K RAM":1012,0: SET RESET TO REBOOT:(4);"PR#3"(:(4);"-D.RAM" -:(4);"BLOA%(20),A$(3,5) ZUN%0c d216,0::(104)64Ĺ103,1:104,64:16384,0:(4);"RUN ALG.2.MENU":| & CONTROL-C TRAPPING &((218)(219)256)60Č822:61 &2,98:4804D B:(4);"BLOAD SCR.U2.PAC":4810,83:4812,118:4804| C:(4);"BLOAD SCR.U3.PAC":4810,85:4812,137:4804 E40448 F4848,0:4849,0 PCH$(4),RW$(6),S$(10),SS$(9),TY$(9),J$(10),D$(27),RI(3),AN$(7),SJ%(20),S%(30),R%(30),SC%(4,5,5),TE:15:B0:0,0:1,64::(4);"BLOAD LOGO.PAC":28672g =4807,0:4808,64:4809,255:4811,0:4843,56 >:(4);"BLOAD SCR.UN.PAC":4810,73:4812,64:4804 @:(4);"BLOAD SCR.U4.PAC":4810,78:4812,84:4804 A:(4);"BLOAD SCR.U1.PAC":4810,84:481