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 ! *ALG.1.MENU! '!\ STARTUPIn-!WPT  . _,%DHGR2 m! O)FP8i;!$ (XTRA.VAR_|* !@n6B.MGR,o7!o7BLANKG3!3D.RAMWK#!n &I.FONT!(*SCR.U2.PAC u%!@%F.PASTE.24!4NCPR2  !4*SCR.UN.PAC$!@$*SCR.U4.PAC &!@&(STUDENTS!'!O'ALG.1.1t !X)ALG.1.1.2)!O)ALG.1.1.1(1!OUNCPR1޲, !p $FONT :! *SCR.U3.PAC &!@&ALG11A.V.120189  ' &PRODOS }< ! ,BASIC.SYSTEM'(*!+(LOGO.PAC<i !@ )ALG1.BOOTJy! )ALG.1.1.4M'!O)ALG.1.1.3b`a  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`   Á          -  À-     耠āЄā ǁā   ā ׅāĂ&ăā        ^Zߕ&0%ÃÁ,$#ׅ##""ߕ 6=>?@ABCDEFGHILLwLLL) `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:/,s            Ĝ  +,ÃÁ   "#Ï  *& ( ၀'".      *) 0       Á                                              Á          à LJ  Ĝ       ၀  "    HI$LO$"2":AN(A$):" 430< 402:S$A$:500:A$S$W NX$"redo"A$(13)ı (A$VA$(1)A$VA$(2)A$VA$(3))KI%3C0:838:CPT:FF$A$:1140:AN$AN$A$:HH2: A$"0"A$"9"NN(A$):C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2:= : 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$"1"A$HI$AN(A$):HI$"9": (7);:420 400:A$LO$A$! ALG.1.1.4 - SJW V.101589 ,99006c9600VMODE(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)16V20(2(MO%2)):690: ^SC%(UN%,KI%,(MO%2)4)0NOPQRSTUVWXYZ[\]^_`a4Ĺ103,1:104,64:16384,0:(4);"RUN ALG.1.MENU":M & CONTROL-C TRAPPINGr &((218)(219)256)60Č822:61x &4810,85:4812,137:4804% E404489 F4848,0:4849,0 PCH$(4),RW$(6),S$(15),SS$(15),TY$(6),J$(15),D$(20),RI(3),AN$(9),SJ%(20),R%(30),SC%(4,5,5),TE%(20),A$(3,5),S(15),X(15),C$(15,10),J(15),C(15,10),VV(5),VA$(5),SI$(2) ZUN%04 d216,0::(104)6AC":28672< =4807,0:4808,64:4809,255:4811,0:4843,56s >:(4);"BLOAD SCR.UN.PAC":4810,73:4812,64:4804 @:(4);"BLOAD SCR.U4.PAC":4810,78:4812,84:4804 B:(4);"BLOAD SCR.U2.PAC":4810,83:4812,118:4804 C:(4);"BLOAD SCR.U3.PAC":" ALG1.BOOT - SJW - V.120189-9900B :(4);"-DHGR2"`8190,(974):8191,(975)i768:(4);"BLOAD UNCPR1"(:(4);"BLOAD BLANK"-:(4);"BLOAD B.MGR"2:(4);"-XTRA.VAR" <:15:B0:0,0:1,64::(4);"BLOAD LOGO.PKL##",(+*,),!'$)#ß''(&"$$##$###$ !&**,A$"/"KI%4C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2:w A$"-"C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2: A$"+"KI%3C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2: (7);: 906:C5:835 402 NX$"redo"(A$(13)AN$"")C0:835:T (A$"-"A$"+")AN$""KI%4ZS$A$:AN$AN$A$:C0:835:9000:~ KI%3A$"A"A$"Z"A$((A$)32) KI%3A$"a"A$"z"ZS$A$:AN$AN$A$:C0:835:9000: A$"0"A$"9"ZS$A$:AN$AN$A$:C0:835:9000: 446j (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:V8(7940)81:H8(7939)21:V9(7940)81:H9(7939)21:7939,I(H9):7940,V(V9):HH9:VV9:7939,45(ZS$):7940,17:9000:7969,8:^l7969,22:7939,45(ZS$):7940,5:9000:7969,8:dz{15:7939,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" "}9000:7939,2:7940,15:ZS$"M"(MO%):MO%4897ZS$ZS$" "(1)::baC(2):ZZ%10(PI1MO%3):I03:BOX(228I2,34ZZ%M(I)2)158I,74M(I)::b13:I01:CIRCLE(2I2,1I)BX,47::c7:PI1įBOX(EXBX(2SG),1)BX(2SG),47:866:dBOX(EXBX(2SG),1)BX(2SG),47:866:)k7969,22:\C(C):ZI03:14IZI,53JJ14IZI,59JJ:::7939,16:7940,36:ZS$"-10":9000:7939,40:ZS$"0":9000:7939,58:ZS$"10":9000]15:BOX(473,1)44,55:MODE(2):9,52:"!";:125,52:"&";:MODE(1): ^9:MODE(2):(EX4)3,62:X:"^";:MODE15:H842AI5126,7:5127,76:5128,72:5129,165:5120:}JPG%1MO%4Ĺ5126,2:5127,33:5128,76:5129,70:5120:K5126,2:5127,45:5128,76:5129,49:5120:5126,2:5127,62:5128,76:5129,70:5120:[I535:C3:JJ0:(I5)(I5)JJ2:C2615:B15:MODE(2):5,178:19);:MODE(1):B0:CC(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:D5126,3:5127,V(V):5128,76:5129,V(V1):5120:FC(C):MODE(2):ZI01:H(H)4,V(V)6ZIH(H)47,V(V)6ZI:ZI:(32))730710. LEFT ARROW SELECTEDMMO%4TT20NX$"fd":729ZNX$"bk"e822: RIGHT ARROW OR SPACE BAR SELECTEDPG%9((MO%4)(TT20))NX$"fd":739NX$"bk"822:55126,1:5127,30:5128,78:5129,168:5120:7):704<ZS$"Problems":MODE(2):68,178:9100:MODE(1)}MO%4TT20įMODE(2):44,178:ZS$"Problems":9100:MODE(1)MO%4TT20įMODE(2):56,178:ZS$"Menu":9100:MODE(1)15:B0ZA$"":ZA$ZA$(8)720 (ZA$(21))(ZA$V):ZS$T$:PA1PA0:9000:0ZP%1:9000:822:NX$"":ZS$"{]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1): " DRAW ARROWSMO%4704ZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1(S$)TCZS$S$:9000:905:QvLTTC11:X$(S$,LT,1):X$SP$X$"-"670|ZS$(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(YMO%2C0:835:(7);:KI%2H9H8:906:ZS$(EZ$,RA):9000:906:ZS$RA$:9000:_J$"":II1(S$):QR((S$,II,1)):QR64QR91QRQR32J$J$(QR)::S$J$:bL(S$):LTCLJ0T$S$:690:cHLJl7939,I(H):7940,V(V):906:470 (AN$)(RA)495II(AN$)1:445:H9H91:NX$"redo"(A$(13)AN$"")C0:835:NX$"redo"NX$"":H9H8:490(KI%1((AN$)(RA$)))(RA$AN$)(A$(13)AN$"")RA(AN$)491822:AN$RA$(KI%1(AN$)(RA$))RIRI1:NX$"":908:480H(A$(13)AN$"")(AN$RA$)RA(AN$):C0:838Q481xAN$RA$(KI%4AN$R2$)RIRI1:MO%3ı(7);:836:FA$RA$:KI%3FA$J$(2)FA$"("FA$908:C0:FL%0:1100: H8H9:AN$"":906:ZS$(EZ$,RA):9000:822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0: 907:AN$"":470 (AN$)(RA)486 C1:838:432:NX$"redo"İ836:MF1FA$J$(1)"(":836:NX$"":908:C0:FL%0:1100:480NX$"redo"V9V:H9H:HH9:VV9:34849,1:9200:fI1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I)n:N99:999:SG$"+":SG1:N(I)1SG$"-":SG1I((1)N9)1:KI%1001,1001,1050,1001II12:N99:999:J(II)I:995:J(II)J(II)SG::KI%21025eJ(3)J(1)J(2):J(5)J(2)(1):J(4)J(1)J(2):(J(3))14(J(4))141001NN5:992:N92:999:PII:L(FL%1)((FA$)6)įMODE(1):FL%1:1103MMODE(2):FL%0#OFF1(FA$):FF$(FA$,FF,1):C0FF$"@"F7936:*#F*# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2)R*#Z9(1)\*#ZS$;i*#ZP%1ĺs*#ZP%0y*#*# COMPRESSION BUFFER MANAGER*#Z9(1)*$0,0:(4849)9230,9240,9250,9260,9270,9280:4352* $4848,(4849): +$1,64::SC7);:867:866)Q[)VV15:LJ6:TC30:S$D$(13):LI2:610:C(2):BOX(EX320,1)320,62)`862:V20:T$D$(14)" "RA$".":690)j700:)(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1))-#Z9(1):840*2#ZL1(ZS$):7941,((ZS$,ZL,1)):46:7940,V(9(PI2)):905:RA2:490:RI1Ĺ5126,9:5127,115:5128,70:5129,163:5120:300g(700:(RI0:PG%1MO%3İ350($EXBX(14J(2)):RA$(J$(2PI),2,2):PI2EXBX(14J(2))(B7939,46:7940,V(11):905:RA2:490:RI1İ300:3690)L(0,V(18):ZS$"Move "J$(5)". (To the "RL$")":9000:867:RA$(J$(4),2,2):900' 5126,9:5127,115:5128,69:5129,163:5120' V17:LJ6:TC30:S$D$(13):LI1:610:C(2):BOX(EX280,1)280,62:RI0:7939,10:7940,V(20):ZS$D$(3):9000\( 862:7939, the "RL$")":9000:8676& RA$(J$(3),2,2):3570& 7939,10:7940,V(14):ZS$"Change the sign of "J$(2)" and add.":EXBX(14J(2)):900:7939,24:7940,V(13):ZS$"|"J$(1)" + "J$(5)"|= ":9000:RL$"left"& J(2)0RL$"right"R' 7939,10:7947940,V(13):ZS$(J$(4),2,2):9000r% V17PI:LJ6:TC30:S$D$(13):LI1:610:C(2):BOX(EX280,1)280,63:862% 7939,46:7940,V(9(PI2)):ZS$RA$:9000% 700:% 866:PI23550& EXBX(14J(2)):7939,10:7940,V(14):ZS$"Move "J$(2)". (Toange the sign of "J$(2)" and add.":EXBX(14J(2)):7939,24:7940,V(13):ZS$"|"J$(1)" + "J$(5)"|= ":9000:RL$"left"$ J(2)0RL$"right"$% 7939,10:7940,V(16):ZS$"Move "J$(5)". (To the "RL$")":9000:867:900:RA$(J$(4),2,2):7939,46:0(14J(1)):865:RL$"right":J(2)0RL$"left"P#M MO%3410,3500,3600,3600:d#R 866:PI23450#\ EXBX(14J(2)):7939,10:7940,V(14):ZS$"Move "J$(2)". (To the "RL$")":9000:867:900#f RA$(J$(3),2,2):3470}$z 7939,10:7940,V(14):ZS$"Ch00)"IMO%4ZF%1:ZF$"ALG.1.1":9950="MNX$"fd"2130x"NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110"O2110"RPG%0:MO%3İ25000"S2000"H PG%1MO%4İ8591#I 7939,24:7940,V(11):ZS$"|"J$(1)SI$(PI)J$(2)"|= ":9000:BX28S$A$:9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.1.1":9950`! MO%3SC%(UN%,KI%,(MO%2)4)0!91000:TL10:4849,3:9200:ZS$T2$:876:ZS$WD$:875:MO%4PG%1!:891:MO%3SC%(UN%,KI%,1)1!>822:840:841!CTC35:LI1:LJ4"H3400:MO%4İ10S$T2$:875:154 H14:V6(2KI%):WD$TY$(KI%)< 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:822:840:841^CTC35:LI1:LJ4uH3000:MO%4İ1000IMO%4ZF%1:ZF$"ALG.1.1":9950MNX$"fd"2130NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110O2110 RPG%0:MO%,V(V):ZS$MZ$(I1)" "CH$(I1):9000:VV2:7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:HI$"4":420:ZS$A$:9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.1.1":9950 MO%3SC%(UN%,KI%,(MO%2)4)091000:TL10:4849,3:9200:ZS$T2$:876:ZS$W13:ZS$FF$:MODE(2):H(H)4,V(V):9100:@MO%42105`MO%0:PG%0:KI%3:912:891ZS$T1$:876:ZS$T2$:875:15H14:V6(2KI%):WD$TY$(KI%) V6. LJ0:TC34:S$WD$:610:VV2:S$"Mode Selection":610:V11:I114:7939,6:7940,5)J$(3):C$(1,6)J$(6)J$(5):C$(1,3)"="J$(2):]LMODE(2):FF1(FA$):FF$(FA$,FF,1)oMFF$" "1110NFF$"*"FF$"%"QFF$"("FF$")"FF$"%"İ1130:HH2:1110S1120:HH2VFF:MODE(1):`9:ZS$FF$:H(H)4,V(V):9100:0j1):C$(1,4)J$(2)"*"J$(1):C$(1,5)J$(3):RR$J$(1)"*"J$(2):&C$(1,1)J$(3):C$(1,3)"="J$(2):C$(1,2)VA$(1):C$(1,4)J$(2)VA$(1):C$(1,5)J$(1):3)C$(1,1)VA$(1):C$(1,7)J$(4)"="J$(6):C$(1,2)J$(1):C$(1,4)J$(2)"*"J$(1):RR$J$(1)"*"J$(2):C$(1}J(1)J(1)(3((J(1))1)):J(3)J(1)J(2):J(5)J(4)(1):J(6)J(2)J(4):NN6:992:NN2:998:N910:999:PII:PIN(PI)1PL$J$(6):520:J$(6)PL$:PL$J$(3):520:J$(3)PL$PI1060,1062,1065,1065:@$C$(1,1)VA$(1):C$(1,3)"="J$(2):C$(1,2)J$(:9N99:999:SG$"+":SG1:N(I)1SG$"-":SG1?]I1NN:J$(I)(J(I))::rI((1)N9)1:KI%1001,1001,1050,1001RR$"":II14:N99:999:J(II)I:995:J(II)J(II)SG::II13:JJ(J(3))II:VV(II)JJ:VA$(II)SS$(JJ):):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:tV8(7940)81:H8(7939)21:V9(7940)81:H9(7939)21:V9V:H9H:HH9:VV9:4849,1:9200:I1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I)(ZS$):7940,5:9000:7969,8:'zo{15:7939,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893|ZS$ZS$" "}9000:7939,2:7940,15:ZS$"M"(MO%):MO%4897ZS$ZS$" "(PG%)9000:P822:1:B15:ZS$"Space Bar":MODE(26ZIH(H)47,V(V)6ZI:ZI:15:UH5126,2:5127,33:5128,76:5129,70:5120:I5126,7:5127,76:5128,72:5129,165:5120:K5126,7:5127,144:5128,72:5129,165:5120:k7969,22:7939,45(ZS$):7940,17:9000:7969,8:!l7969,22:7939,45RA(RA$)1:907:480!N 7939,8:7940,V(11):ZS$(EZ$,ER):9000:7939,8:7940,V(11):S$D$(16)C$(1,2)".":ER(S$):ZS$S$:9000:FA$C$(1,1)"="!X V14(PI2)2:H21:1100:RA$C$(1,4):RA(RA$)1:R2$RA$:RR$""R2$RR$!] 907:480:843H"b 7939,8:V17(2(PI2)):7940,V(V):ZS$D$(2):9000:FA$VA$(1)"=":H20:1100~"l RA$C$(1,5):RA(RA$)1:RI0:907:480:RI1İ300"v 700:" RI0:PG%1MO%3İ350" 7939,8:V15:7940,V(V):ZS$D$(2):9000:FA$VA$(1)"=":H20:1100"# RA$C$(1,5):RA(R2:ZS$"Delete":MODE(2):2:B15:15,178:9100:ZS$" to Erase":1:9100:MODE(1):15:B0:v XXS:AN$"":470 (AN$)(RA)485 C1:838:450:XEX16 NX$"redo"NX$"":835:480 481 MO%3ı AN$RA$ĺ(7);:835:XXS:FA$A$:1160:HH2:AN$AN$A$:C (A$)64(A$)91A$((A$)32) ((A$)64(A$)91)((A$)96(A$)123)C0:838:LEL1:FF$A$:C6:1160:HH2:AN$AN$SS$(L1): (A$"+")(A$"-")C0:838:C6:FF$A$:1160:HH2:AN$AN$A$: (7);:a 82 (7);:410) 400:A$(32)415/ T 400:A$LO$A$HI$AN(A$):] 420y 400:A$"2"A$HI$ı 430 402 NX$"redo"ı A$"0"A$"9"NN(A$):C0:838:FF$A$:1160:HH2:AN$AN$A$: A$"-"C0:838:C2:FF$36:400:A$"+"A$"-"FF$A$:1100:C0:836:@ (7);:405 906:C2:836:400:A$"a"A$"z"FF$A$:1100:C0:836: A$"A"A$"Z"A$((A$)32):FF$A$:1100:C0:836: (7);:407 400:A$"Y"A$"y"A$"N"A$"n"ZS$A$:9000:  ALG.1.1 - SJW - V.102489+99002iI16:TY$(I)::I12:SI$(I)::I117:D$(I):T2$"Real Numbers"9600MODE(1)::15:B0:200016368,0:390:A$:390:A$:A$(127)NX$"redo"0 906:C2:8uvwxyz{|}~SC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:25030t)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:)e21(ZS$))4,100:9100*(&16368,0:A$G(&::(4);"VERIFY ";ZF$j(&ZF%0:216,0::(4);"-";ZF$:(' ERROR TRAP FOR DISK FLIP('216,0:822:9965(a SCORE TRACKING ROUTINE(aI14(aJ14(aSC%(I,J,1)0SC%(I,J,5)3:250300)a,0:9990'&9981 '&9990N'&5126,1:5127,30:5128,78:5129,186:5120v'&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(C2)1(C3)15(C4)12(C5)13(C6)9(C7)7O&%M(X)((X2)(X2))2n&%N(I)(((I3)(I3))3)&%P(I)(((I5)(I5))5)&%&& CONTROL-C TRAPPING&&((218)(219)256)9220Č822:9225&&&& TRAP FOR DISK FLIP '&216PAC%"$1,118::SCR.U2.PAC6%,$1,73::SCR.KI.PACH%6$:SCR.MO.PACa%@$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)3&%C(C)(C0)0(C1)6(ACTERS ON DOUBLE HI-RES SCREEN, MODE(2)5$#Z9(1)?$#ZS$;L$#ZP%1ĺV$#ZP%0\$#$# 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.A$)1:907:480:RI1İ300:3290g# 7939,8:V19:7940,V(V):ZS$D$(14)":":9000:FA$RA$:H22:1100r# 700:#(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)#-#Z9(1):840#2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:##)$# DRAW CHARRA$:1100 6 bL(S$):LTCLJ0T$S$:690:? cHLJy 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$)LT):VV1:LI1VV1 620/::::(7);"WORD TOO LONG":yL(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA0:9000:ZP%1:9000:822:NX$"":ZS$"<-":MODE(2):1:B15:4,178:9100:ZS$"->":123,178:9100:MODE(1):" DRAW ARROWSMO%401!RUN%1:4000:PG%0:250001SMO%0:2000P FACTORING TEST RESULTSY821UC%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):9000z7939,56:50ZF$"ALG.1.1.3":99508ZF$"ALG.1.1.4":9950B PG%14UN%1:II14:SC%(UN%,II,3)5:SC%(UN%,II,4)0:SC%(4,II,3)0:SC%(4,II,4)0::UN%4:TT15KI%((R%(TT)1)5)19TL10:PG%TTHZF%1:KI%2061,2062,2063,2064OTTTT1:TT202190003KI%AN:AN6H14:V6(2AN):WD$TY$(AN)ZAN6ZF$"ALG.1.MENU":ZF%1:9950AN5MO%4:UN%4:ND%20:1500:II120:R%(II)TE%(II):TE%(II)0::2080 MO%0:ZF%1:KI%2061,2062,2063,2064 ZF$"ALG.1.1.1":9950ZF$"ALG.1.1.2":99939,I(H):7940,V(V):ZS$"CONTENTS":9000:V7:I115:H4:829nVV3::V8:I116:7939,18:7940,V(V)ZS$MZ$(I1):9000:S$TY$(I1):TC26:LJ14:LI1:610:VV2::7939,24:7940,V(V1):ZS$"Your choice? (1-6) ":9000:LO$"1":HI$"6":420:ZS$A$:IZJ%ND%aZI1ND%:ZK%((1)ZJ%1):TE%(ZJ%)SJ%(ZK%):SJ%(ZK%)SJ%(ZJ%):ZJ%ZJ%1:ZIgwMO%42127MO%0:PG%0:KI%0:913:891ZS$T1$:876:ZS$T2$:8756:I103:BOX(7I12,144M(I1)2)110I1,34M(I1):AV6:H20:7:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):{15:H(H),V(V)4:ZS$"2":9100:: " DRAW A RED EXPONENT TWO15:X(X)4,V(V)4:"2";::" DRAW A WHITE EXPONENT "TWO" SHUFFLE ROUTINETE%(1)0:SJ%1ZI1ND%:SJ%(ZI)ZI:Z(FF$)57İ1160:HH2<P(FF$"+")(FF$"-")İ1120:HH2_TFF$"a"FF$"z"İ1140:HH2iVFF:`9:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):t9:ZI18:FF$SS$(ZI)ZS$FF$uZI:MODE(2):H(H)4,V(V):9100:MODE(1):4915:9100:MODE(1)::B0:7V9(37)1:H9(36)17939,I(H9):7940,V(V9):X9(H91.1)8:Y9(V98)2:: GOTO OLD CURSOR POSITION4849,1:9200:LFF1(FA$):FF$(FA$,FF,1)MFF$" "1110NFF$"@"İ1190:HH1O(FF$)489,2:7940,7:ZS$"C"(KI%)" P":MO%4ZS$ZS$(PG%):893L|ZS$ZS$" "}9000:7939,2:7940,15:ZS$"M"(MO%):MO%4897ZS$ZS$" "(PG%)9000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:):ZI01:X(X9),Y(Y9)ZIX(X98),Y(Y9)ZI:ZI:15:FC(C):ZI01:X(X),Y(Y10)ZIX(X8),Y(Y10)ZI:ZI:15:k7969,22:7939,45(ZS$):7940,17:9000:7969,8:l7969,22:7939,45(ZS$):7940,5:9000:7969,8:z<{15:793\";:MODE(1);?(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):9000ACC(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI:ZI:15:<DC(C))NX$"fd":739NX$"bk"*822:c451206,17:51207,30:51208,78:51209,186:5120:551206,1:51207,30:51208,78:51209,168:5120:615:B15:MODE(2):5,178:19);:MODE(1):B0:=I11įMODE(2):15:H(H)43,V(V)12:"nu":9100:MODE(1)"15:B02ZA$"":ZA$DZA$(8)720e(ZA$(21))(ZA$(32))730n710 LEFT ARROW SELECTEDMO%4TT20NX$"fd":729NX$"bk"822: RIGHT ARROW OR SPACE BAR SELECTEDPG%9((MO%4)(TT20704bZS$"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$"Me7940,V(V):ZS$"5":9000:7939,70:7940,V(V):ZS$(SC%(4,II,4)):9000:VV2:SC%(UN%,II,3)5:SC%(UN%,II,4)SC%(4,II,4):SC%(UN%,5,1)20:SC%(UN%,5,2)UC%:((UC%20)DT)SC%(UN%,5,5)2:4040SC%(UN%,5,5)1900:821:@ ** DATA STATEMENTS **J"Add/Subtract Integers","Multiply/Divide Integers","Rational Numbers","Absolute Value","Real Numbers Test","Return to Algebra Menu"T" + "," - ","Plot the first point:","Your answer:","Enter the answer:","Multiply:","Divide:","The signs are ",:906:ZS$(EZ$,RA):9000:906:470; (AN$)(RA)495 II(AN$)1:445:H9H91:NX$"redo"(A$(13)AN$"")C0:835:NX$"redo"NX$"":H9H8:490 (KI%1((AN$)(RA$)))(RA$AN$)(A$(13)AN$"")RA(AN$) 491 822:AN$RA$(KI%32)C KI%3A$"a"A$"z"ZS$A$:AN$AN$A$:C0:835:9000:{ A$"0"A$"9"ZS$A$:AN$AN$A$:C0:835:9000: 446 822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0:% H8H9:AN$""9": (7);:420C 400:A$LO$A$HI$LO$"2":AN(A$):L 430^ 906:C5:835g 402 NX$"redo"(A$(13)AN$"")C0:835: (A$"-"A$"+")AN$""KI%4ZS$A$:AN$AN$A$:C0:835:9000: KI%3A$"A"A$"Z"A$((A$): ;690:. ^SC%(UN%,KI%,(MO%2)4)0:> 16368,0:M 390:A$:p 390:A$:A$(127)NX$"redo"v  400:A$"Y"A$"y"A$"N"A$"n"ZS$A$:9000: (7);:410 400:A$(32)415  400:A$"1"A$HI$AN(A$):HI$"! ALG.1.1.2 - SJW V.101589 ,99006c9600VMODE(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)1 7V18(KI%2):KI%2Ĺ7939,4:7940,V(V):ZS$T$:9000 CDFILE$ FOR READING, 166 BYTES/RECORD5%aI1NU%@%aJ15f%aSC%(I,J,1)0SC%(I,J,5)3:25030%aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:25030%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:%e(ZS$))4,75:9100:ZS$"Press ANY Key":H(21(ZS$))4,100:9100V$&16368,0:A$s$&::(4);"VERIFY ";ZF$$&ZF%0:Z9(1):216,0::(4);"-";ZF$:$' ERROR TRAP FOR DISK FLIP$'216,0:822:9965$a SCORE TRACKING ROUTINE(%a " OPEN#&%#& TRAP FOR DISK FLIP7#&216,0:9990A#&9981L#&9990z#&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:9100D$&ZS$"and":H(21ɏ%I(H)(H1)2("%V(V)((V1)8)<"%X(X)(X74)R"%Y(Y)(Y2425)~"%C(C)(C0)0(C1)6(C2)1(C3)15"%M(X)((X2)(X2))2"%N(I)(((I3)(I3))3)"%"& CONTROL-C TRAPPING#&((218)(219)256)9220Č822:9225 !#Z9(1)!#D!$0,0:(4849)9230,9240,9250,9260,9270:4352X! $4848,(4849):p!$1,64::SCR.UN.PAC!$1,98::SCR.U1.PAC!"$1,118::SCR.U2.PAC!,$1,73::SCR.KI.PAC!6$:SCR.MO.PAC!% * FUNCTION DEFINITIONS *!%H(H)(H1)14" CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)? -#Z9(1):840m 2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:s # # DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2) #Z9(1) #ZS$; #ZP%1ĺ #ZP%0 #!# COMPRESSION BUFFER MANAGER"the same.","different."^"The product is","The quotient is"," positive."," negative.","The distance of a number from 0 is its absolute value.","The answer is "h"Simplify and solve:","Multiply the equation by ","Type '*' to multiply". (# DRAW1(AN$)(RA$))RIRI1:t MO%2C0:835:(7);:KI%2H9H8:906:ZS$(EZ$,RA):9000:906:ZS$RA$:9000:z  bL(S$):LTCLJ0T$S$:690: 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:660iS$(S$,(S$)LT):VV1:LI1VV1r620::::(7);"WORD TOO LONG":L(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA0:9000:ZP%1:9000:`822:NX$а876:ZS$WD$:875:MO%4PG%1A:891:MO%3SC%(UN%,KI%,1)1J>822S?850gCTC35:LI1:LJ4~H2600:MO%4İ1000IMO%4ZF%1:ZF$"ALG.1.1":9950MNX$"fd"2130NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110O2110RP39,6:7940,V(V):ZS$MZ$(I1)" "CH$(I1):9000:VV2:7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:HI$"4":420:ZS$A$:9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.1.1":9950 MO%3SC%(UN%,KI%,(MO%2)4)0 91000:TL10:4849,6:9200:ZS$T2$:J1R%(2):7939,I(2J4):7940,V(6):ZS$(J):9000::JMO%42105jMO%0:PG%0:KI%2:912:891ZS$T1$:876:ZS$T2$:875:15H14:V6(2KI%):WD$TY$(KI%) V68 LJ0:TC34:S$WD$:610:VV2:S$"Mode Selection":610:V11:I114:79(2):X(25(J$(1)))14:Y54:XEX14((J$(3))14):SG0:J(2)0SG1KQjZS$"*":I513:R%(I5)(J(I5))::863:V6:I1R%(1):J1R%(2):7939,I(2J4):7940,V(7I):9000::kJ1R%(1):7939,4:7940,V(7J):ZS$(J):9000::PI2ı:l1001FII12:N99:999:J(II)I:995:J(II)J(II)SG::KI%21025LS s((J(1))2(J(2))2)1001J(3)J(1)J(2):NN5:992:N92:999:PII:FA$J$(1)" x "J$(2)" = ":RA$J$(3):SG0:J(3)0SG1EPI2FA$J$(1)")"J$(3)" = ":RA$J$H9):7940,V(V9):HH9:VV9:24849,1:9200:aNE1:RA(RA$)((RA$)1):RA$(RA$,RA):I1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I):N99:999:SG$"+":SG1:N(I)1SG$"-":SG1I((1)N9)1:KI%1001,1001,1050,O%):MO%4897'ZS$ZS$" "(PG%)39000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:V8(7940)81:H8(7939)21:V9(7940)81:H9(7939)21:7939,I(50M(II)::861Hk7969,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:7940,15:ZS$"M"(M27,34:5128,77:5129,66:5120:5126,49:5127,69:5128,77:5129,162:5120:]5126,8:5127,52:5128,43:5129,122:5120:5126,2:5127,34:5128,6:5129,128:5120:5126,2:5127,134:5128,45:5129,162:5120:_6:II05:BOX(264II2,83M(II)2)49II,,2:5127,33:5128,76:5129,70:5120:K5126,2:5127,45:5128,76:5129,49:5120:5126,2:5127,62:5128,76:5129,70:5120:R5126,2:5127,35:5128,44:5129,162:5120:853:SMO%2ıT5126,2:5127,35:5128,44:5129,162:5120:LU5126,49:51C(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:LH842IC(2):I03:BOX(473I2,93M(I)2)44I,74M(I)::5126,7:5127,76:5128,72:5129,165:5120:'JPG%1MO%4įC(1):I03:BOX(537I2,41M(I)2)9I,31M(I)::51260NX$"fd":729NX$"bk")822:Q RIGHT ARROW OR SPACE BAR SELECTED|PG%9((MO%4)(TT20))NX$"fd":739NX$"bk"822:55126,1:5127,30:5128,78:5129,168:5120:615:B15:MODE(2):5,178:19);:MODE(1):B0:CCMO%4TT20įMODE(2):44,178:ZS$"Problems":9100:MODE(1)~MO%4TT20įMODE(2):56,178:ZS$"Menu":9100:MODE(1)15:B0ZA$"":ZA$ZA$(8)720(ZA$(21))(ZA$(32))730710 LEFT ARROW SELECTEDMO%4TT2"":ZS$"{]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1): " DRAW ARROWSoMO%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)AG%0:MO%3İ25000S2000( 7939,50:7940,V(6):ZS$D$(3PI):9000:7939,50:7940,V(8):ZS$FA$:9000:904:PI2į15:BOX(XEX,1)X3,Y2- MO%2610,2700,2800,2800: 2 TC14:LJ26:LI1:1130:900:V11:S$D$(6)" "D$(7SG):610:V13:S$D$(8PI)D$(11SG):900:V14:610:9000< PI2İ1132SF V9V8:H9H8:906:ZS$RA$:9000^ 700: RI0:TC14:LJ26:LI1:1130:900:V11:S$D$(6)" "D$(7SG):610:V13:S$D$(8PI)D$(11SG):V14:610 V9V8:H9H8:914:490:RI1İ300:2790 PI2İ113HI$LO$"2":AN(A$):" 430< 402:S$A$:500:A$S$W NX$"redo"A$(13)ı (A$VA$(1)A$VA$(2)A$VA$(3))KI%3C0:838:CPT:FF$A$:1140:AN$AN$A$:HH2: A$"0"A$"9"NN(A$):C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2:= : 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$"1"A$HI$AN(A$):HI$"9": (7);:420 400:A$LO$A$! ALG.1.1.1 - SJW V.101589 ,99006c9600VMODE(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)16V20(2(MO%2)):690: ^SC%(UN%,KI%,(MO%2)4)0:25030'aSC%(I,J,5)2"'a:('e' ERROR TRAP FOR DISK FLIP8&'216,0:822:9965V&a SCORE TRACKING ROUTINEa&aI14l&aJ14&aSC%(I,J,1)0SC%(I,J,5)3:25030&aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:25030 'aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1ve":9972%&ZS$"Flip Disk"T%&: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$))4,100:9100%&16368,0:A$%&::(4);"VERIFY ";ZF$%&ZF%0:216,0::(4);"-";ZF$:"&)"$%P(I)(((I5)(I5))5)($%B$& CONTROL-C TRAPPINGk$&((218)(219)256)9220Č822:9225q$&$& TRAP FOR DISK FLIP$&216,0:9990$&9981$&9990$&5126,1:5127,30:5128,78:5129,186:5120 %&ZF%1ZS$"Check Disk DriION DEFINITIONS *'#%H(H)(H1)14:#%I(H)(H1)2P#%V(V)((V1)8)d#%X(X)(X74)z#%Y(Y)(Y2425)#%C(C)(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 BUFFER MANAGER"#Z9(1)S"$0,0:(4849)9230,9240,9250,9260,9270,9280:4352g" $4848,(4849):"$1,64::SCR.UN.PAC"$1,98::SCR.U1.PAC""$1,118::SCR.U2.PAC",$1,73::SCR.KI.PAC"6$:SCR.MO.PAC"@$1,137::SCR.U3.PAC#% * FUNCT:>!(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)O!-#Z9(1):840}!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  1130:1132 " 7939,4:7940,V(18):ZS$D$(14)":":9000:7939,8:7940,V(20):ZS$FA$RA$:9000:PI2XX291:XEXE291:Y149:15:BOX(XEX1,1)X,Y1 , TC14:LJ26:LI1:V11:S$D$(6)" "D$(7SG):610:S$D$(8PI)D$(11SG):V14:610 @ !J 7002 7939,4:7940,V(18):ZS$D$(14)":":9000:7939,8:7940,V(20):ZS$FA$RA$:9000:PI2XX291:XEXE291:Y149:15:BOX(XEX1,1)X1,Y1 700: RI0:PG%1MO%3İ350 V9V8:H9H8:914:490:RI1İ300:2790  ((RA$))((AN$))2850A$"/"KI%4C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2:w A$"-"C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2: A$"+"KI%3C0:838:CPT:FF$A$:1120:AN$AN$A$:HH2: (7);: 906:C5:835 402 NX$"redo"(A$(13)AN$"")C0:835:T (A$"-"A$"+")AN$""KI%4ZS$A$:AN$AN$A$:C0:835:9000:~ KI%3A$"A"A$"Z"A$((A$)32) KI%3A$"a"A$"z"ZS$A$:AN$AN$A$:C0:835:9000: A$"0"A$"9"ZS$A$:AN$AN$A$:C0:835:9000: 446j  9000:822:1:B15:ZS$"Space Bar":MODE(2):39,177:9100:MODE(1):415:MODE(2):39,177:15:9100:MODE(1)::B0:V8(7940)81:H8(7939)21:V9(7940)81:H9(7939)21:7939,I(H9):7940,V(V9):HH9:VV9:V9V:(ZS$):7940,17:9000:7969,8:Wl7969,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%):MO%4897ZS$ZS$" "(PG%)[aC(2):ZZ%10(PI1MO%3):I03:BOX(228I2,34ZZ%M(I)2)158I,74M(I)::b13:I01:CIRCLE(2I2,1I)BX,47::c7:PI1įBOX(EXBX(2SG),1)BX(2SG),47:866:dBOX(EXBX(2SG),1)BX(2SG),47:866:"k7969,22:7939,45\C(C):ZI03:14IZI,53JJ14IZI,59JJ:::7939,16:7940,36:ZS$"-10":9000:7939,40:ZS$"0":9000:7939,58:ZS$"10":9000]15:BOX(473,1)44,55:MODE(2):9,52:"!";:125,52:"&";:MODE(1):^9:MODE(2):(EX4)3,62:"^";:MODE(1):15:H842AI5126,7:5127,76:5128,72:5129,165:5120:}JPG%1MO%4Ĺ5126,2:5127,33:5128,76:5129,70:5120:K5126,2:5127,45:5128,76:5129,49:5120:5126,2:5127,62:5128,76:5129,70:5120:[I535:C3:JJ0:(I5)(I5)JJ2:C2615:B15:MODE(2):5,178:19);:MODE(1):B0:CC(C):ZI01:H(H9),V(V91)ZIH(H9)14,V(V91)ZI::15:D5126,3:5127,V(V):5128,76:5129,V(V1):5120:FC(C):MODE(2):ZI01:H(H)4,V(V)6ZIH(H)47,V(V)6ZI:ZI:(32))730710. LEFT ARROW SELECTEDMMO%4TT20NX$"fd":729ZNX$"bk"e822: RIGHT ARROW OR SPACE BAR SELECTEDPG%9((MO%4)(TT20))NX$"fd":739NX$"bk"822:55126,1:5127,30:5128,78:5129,168:5120:7):704<ZS$"Problems":MODE(2):68,178:9100:MODE(1)}MO%4TT20įMODE(2):44,178:ZS$"Problems":9100:MODE(1)MO%4TT20įMODE(2):56,178:ZS$"Menu":9100:MODE(1)15:B0ZA$"":ZA$ZA$(8)720 (ZA$(21))(ZA$V):ZS$T$:PA1PA0:9000:0ZP%1:9000:822:NX$"":ZS$"{]":MODE(2):1:B15:4,178:9100:ZS$"]}":123,178:9100:MODE(1): " DRAW ARROWSMO%4704ZS$"Menu":MODE(2):18,178:9100:MODE(1):PG%9įMODE(2):90,178:9100:MODE(1(S$)TCZS$S$:9000:905:QvLTTC11:X$(S$,LT,1):X$SP$X$"-"670|ZS$(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(YMO%2C0:835:(7);:KI%2H9H8:906:ZS$(EZ$,RA):9000:906:ZS$RA$:9000:_J$"":II1(S$):QR((S$,II,1)):QR64QR91QRQR32J$J$(QR)::S$J$:bL(S$):LTCLJ0T$S$:690:cHLJl7939,I(H):7940,V(V):906:470 (AN$)(RA)495II(AN$)1:445:H9H91:NX$"redo"(A$(13)AN$"")C0:835:NX$"redo"NX$"":H9H8:490(KI%1((AN$)(RA$)))(RA$AN$)(A$(13)AN$"")RA(AN$)491822:AN$RA$(KI%1(AN$)(RA$))RIRI1:NX$"":908:480H(A$(13)AN$"")(AN$RA$)RA(AN$):C0:838Q481xAN$RA$(KI%4AN$R2$)RIRI1:MO%3ı(7);:836:FA$RA$:KI%3FA$J$(2)FA$"("FA$908:C0:FL%0:1100: H8H9:AN$"":906:ZS$(EZ$,RA):9000:822:ZS$"Delete":MODE(2):2:B15:15,178:ZP%0:9100:ZS$" to Erase":1:9100:MODE(1):15:B0: 907:AN$"":470 (AN$)(RA)486 C1:838:432:NX$"redo"İ836:MF1FA$J$(1)"(":836:NX$"":908:C0:FL%0:1100:480NX$"redo"H9H:HH9:VV9:RY(V11)8:5126,7:5127,Y:5128,72:5129,165:5120:f4849,1:9200:I1NN:J$(I)(J(I)):J(I)0J$(I)"+"J$(I):N99:999:SG$"+":SG1:N(I)1SG$"-":SG1I((1)N9)1: KI%1001,1001,1050,1001KII12:N99:999:J(II)I:995:J(II)J(II)SG::KI%21025J(3)J(1)J(2):J(5)J(2)(1):J(4)J(1)J(2):(J(3))14(J(4))141001NN5:992:N92:999:PII:L(FL%1)((FA$)6)įMODE(1):FL%1:1103MMODE(2):FL%1)):910:RI1İ300:2490l* 7939,10:7940,V(20):ZS$"The correct answer is "J$(2PI)".":9000:(7);w* 700:*(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)*-#Z9(1):840*2#ZL1(ZS$):7941,((ZS$,ZL,1)):7936:*#.+# DRAW866:PI224504)t EXBX(14J(2)):RA$J$(3):2470) 7939,10:7940,V(17):ZS$"Change the sign of "J$(2)" and add.":9000:EXBX(14J(2)):RA$J$(4)) 7939,10:7940,V(18(PI2)):ZS$D$(3):9000:V911:H924:RA(RA$)* 490:862:867:V118(3(RI0:7940,V(20):ZS$D$(3):9000:V913:H924:RA$J$(4):RA(RA$):862:490:V115(3(RI0)):910:RI1İ300(Q RI0Ĺ7939,10:7940,V(20):ZS$D$(14)J$(2PI)".":9000:(7);(V 700:(` RI0:PG%1MO%3İ350)a 7939,10:7940,V(15):ZS$D$(1):9000:V(17):ZS$"Change the sign of "J$(2)" and add.":9000:900:EXBX(14J(2)):7939,26:7940,V(13):ZS$J$(1)" + "J$(5)" = ":9000:RL$"left"'8 J(2)0RL$"right"'B 7939,10:7940,V(18):ZS$"Move "J$(5)". (To the "RL$")":9000:867k(L 7939,122350& EXBX(14J(2)):7939,10:7940,V(17):ZS$"Move "J$(2)". (To the "RL$")":9000:900:867:7939,10:7940,V(19):ZS$D$(3):9000:RA$J$(3):RA(RA$)& V911:H924:862:490:V115(3(RI0)):910:RI1İ300:2390&$ 2385'. 7939,10:7940,ht"V%7939,10:7940,V(18):ZS$"Move "J$(5)". (To the "RL$")":9000:867:900%7939,10:7940,V(20):ZS$D$(3)" "J$(4)".":9000:7939,46:7940,V(13):ZS$J$(4):9000:862%700:&RI0:7939,10:7940,V(15):ZS$D$(1):9000:866:900:PI$D$(2)" "J$(3)".":9000:7939,46:7940,V(11):ZS$J$(3):9000:862:2290$7939,10:7940,V(17):ZS$"Change the sign of "J$(2)" and add.":9000:EXBX(14J(2)):7939,26:7940,V(13):ZS$J$(1)" + "J$(5)" = ":9000:RL$"left"%J(2)0RL$"rig:865:RL$"right":J(2)0RL$"left"E#MO%2210,2300,2400,2400:#7939,10:7940,V(15):ZS$D$(1):9000:866:900:PI22250#EXBX(14J(2)):7939,10:7940,V(17):ZS$"Move "J$(2)". (To the "RL$")":9000:867:900N$7939,10:7940,V(19):ZSMO%4ZF%1:ZF$"ALG.1.1":99506"MNX$"fd"2130q"NPG%PG%1:891:MO%3SC%(UN%,KI%,(MO%2)5)PG%:2110{"O2110"RPG%0:MO%3İ25000"S2000"PG%1MO%4İ859&#7939,26:7940,V(11):ZS$J$(1)SI$(PI)J$(2)" = ":9000:BX280(14J(1))9000:MO%AN:A$"4"ZF%1:MO%0:ZF$"ALG.1.1":9950Y! MO%3SC%(UN%,KI%,(MO%2)4)0!91000:TL10:4849,3:9200:ZS$T2$:876:ZS$WD$:875:MO%4PG%1!:891:MO%3SC%(UN%,KI%,1)1!>822:840:841!CTC35:LI1:LJ4!H2200:MO%4İ1000""I875:15- H14:V6(2KI%):WD$TY$(KI%)5 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:5!7939,6:7940,152:ZS$"Your choice? (1-4) ":9000:HI$"4":420:ZS$A$:((H1)72),V(V):9100:HMODE(1):7939,I(H):7940,V(V):9000:R119215:MODE(1):H(H),V(V)4:ZS$FF$:9100MODE(2):FL%1įMODE(1): DRAW.EXPONENTMO%42105MO%0:PG%0:KI%1:912:891 ZS$T1$:876:ZS$T2$:MODE(1):C0:FL%0:N`9:ZS$FF$:FL%0įMODE(2):H(H)4,V(V):9100:{aMODE(1):7939,I(H):7940,V(V):9000:j13:ZS$FF$:MODE(2):H(H)4,V(V):9100:MODE(1):t9:ZS$FF$:((H1)72),V(V):9100:C(C):ZS$FF$:FL%0į0VOFF1(FA$):FF$(FA$,FF,1):C0FF$"@"FF$"#"İ1160:HH1(FL%0):1110}PFF$"@"FF$"2":1190:HH1:1110QFF$"("FF$")"CLC:C5:1160:CCL:HH1(FL%0):1110RFF$"#"FF$"3":1190:HH1:1110S1120:HH1(FL%0)VFF: CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(2):+#Z9(1)D+#ZS$;Q+#ZP%1ĺ[+#ZP%0a+#+# 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,118::SCR.U2.PAC;,,$1,73::SCR.KI.PACM,6$:SCR.MO.PACf,@$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);-%C(C)(C0)0(🼀🀀🼞🀀🀀🀞ܝ𝀀ܝܝܝ🀞́𙀀Lp 'pp&)p(09ppppxHJh,T,U&,T( p ppз`ppxHJh,T,U&,T( p ppp ppP ,p`)&JJ&&' &' &' f&')'`03080aSC%(I,J,1)0SC%(I,J,1)5SC%(I,J,5)2:25030|0aSC%(I,J,1)4((SC%(I,J,2)SC%(I,J,1))DT)SC%(I,J,5)1:250300aSC%(I,J,5)20a:0ey":H(21(ZS$))4,100:91002/&16368,0:A$O/&::(4);"VERIFY ";ZF$r/&ZF%0:216,0::(4);"-";ZF$:/' ERROR TRAP FOR DISK FLIP/'216,0:822:9965/a SCORE TRACKING ROUTINE/aI14/aJ140aSC%(I,J,1)0SC%(I,J,5)3:25.&216,0:9990.&9981(.&9990V.&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$"Press ANY KeC1)6(C2)1(C3)15(C4)12(C5)13(C6)9(C7)7W-%M(X)((X2)(X2))2v-%N(I)(((I3)(I3))3)-%P(I)(((I5)(I5))5)-%-& CONTROL-C TRAPPING-&((218)(219)256)9220Č822:9225-&.& TRAP FOR DISK FLIP🼞🀞  >>< (>>88  $*0 >>~~"2*&" " >>  ">> "8""> """"""< >> "33A3333 33A333f ffAffff ffAfffL LLALLLL LLALLL A A3 33A3333 33A333f fL A A3 33A3333 33A333f ffAffff ffAfffL LLALLLL LLALLL A A3 ffL LLALLLL LLALLL A A3 33A3333 33A333f ffAffff ffAfffL LLALLLL LLALLA333f ffAffff ffAfffL LLALLLL LLALLL A A3 33A3333 33A333f ffAffff ffAfA3 33A3333 33A333f ffAffff ffAfffL LLALLLL LLALLL A A3 33A3333 33LL LLALLL A A3 33A3333 33A333f ffAffff ffAfffL LLALLLL LLALLL A ffAfffLLLALLLLLLALLLAA3 33A3333 33A333ffAfffffAfffL LLALLfAffffffAfffLLLALLLLLLALLLAA333A333333A333fffAffff2 2F2r22 2F2 r2f fdA$dfff fdA$df fLLLALLLLLLALLLAA333A333333A333ff  <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>~` ?>>"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >` >>fAffff ffAfffL LLA@LLLL LLA@LLL C C3 3C333 3C33f f0fff f/ffL L""0"LLL L""/"LL DD0D DD/D3 30333 3/33f f0fff f/ffL L""0"LLL L""33f f0fff f/ffL LCLLL LCLLFF33 3/33f f0fff f/ffL L""0"LLL L""/"LL DD0D DD/D3 30333 3/3 30333 3/33f f0fff f/ffL L""0"LLL L""/"LL DD0D DD/D3 303DD/D3 30333 3/33f f0fff f/ffL L""0"LLL L""/"LL DD0D DD/DDD0D DD/D3 30333 3/33f f0fff f/ffL L""0"LLL L""/"LL DD0D /"LL DD0D DD/D3 30333 3/33f f0fff f/ffL L""0"LLL L""/"LL 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"-"L-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-33-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 3 D-D3 333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 L 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"-"Lf-fffff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff-fff fff-3ffff-ffffff-ffLLLL"-"LLLLLL"-"LLD-DD-D3 333-333 333-33ff3ffff-ffffff-ffLLLL"-"LLLLLL"-"LLD-DD-D3333-333333-32 2F2r22 2F2 r2f fd$d0fff fd$d0f fLLLL/ LLLLLL/ LLD-DD-D3333-333333-3L 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 Pff 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 fPfLLPLLLPLPP33P333P3ffPfffPfLLPLLLPLPP33P333P3ffP 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&')'`-fff fff-ffL L 0LLL L 0LLFF33-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 333-33f fff333-333 333-33f fff-fff fff-ffL LLL"-"LLL LLL"-"LL D-D D-D3 333-333 3f fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPL P P3 3P33 3P3f fPff fPfL LPLL LPLPPff 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"L0000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000piky 000000000000000000000000000000000000000000000000000000000000000000000000 Shrauger linda 000000000000000000000000000000000000000000000000000000000000000000000000 f a 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 s Mark 000000000000000000000000000000000000000000000000000000000000000000000000 s Kelly 000000000000000000000000000000000000000000000000000000000000000000000000 Froger S00000000000000000000 Shrauger kelly 000000000000000000000000000000000000000000000000000000000000000000000000 Shrauger Mark 000000000000000000000000000000000000000000000000000000000000000000000000 s Linda 00000000000000000000000 Monkey 9955985499549955DB990000000000000000000000000000000000000500040004000500 Shrauger Kelly 000099000000000000000000000000000000000000000000000000000000000000000000 8910111213 2345670000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 Boyle Terry 9955005500550055DD0055005500550055DD0055005400550055DC000500050005000500 Shrauger Linda 660000000000000000000000000000000000000000000000000000000000000000000000 Face 0000000000000000000000000000 Cares Who 000000000000000000000000000000000000000000000000000000000000000000000000 Walter Scott 0050005043510050D1000000002100000000000000000000000000000000000001000000 WalterrrrrrrrrrScotttt00000000000000019 Covington Cindy 750020000000000000000000000000000000000000000000000000000000000000000000 Covigton Cindy 00000000000000000000000000000000000000000000LL L"B"LL DCD DBD3 3E333 3D33f fFfff fFffL LFLLL LFLLFF000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 é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 ӠˠŠŠҠÍxЅԅ؅:020'0"(!!L(!,@, ,!"(!0! L  L q!q! ^"]":";"io!:* /:" o!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"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ӅܥLFH /Inp"8eop opqrqrh`0 wEhоMލLLmALTF  LJ klnm<ŁћȱeȱeעkL x8` ћL*L ȥʆȑ $PhihiHHHHHH hhhhhh) HH , ޥ  LeAL\A 0# wE 8ompn8L8s寅t尅LE A$2$P ": ,i = CLrH h J CLr/ȥqȥr TAL51hh jhhV"  ީ j ީ ލ .`HH jhh1 \AopȱLㅄ1 \A D`oH r .HHȱHH g LPFLLcCDHDH H!HLgE A } A }$%0ҩ A 8(LD$0PLD \A6;)hh ޥHH {h* mhH KAh cڍ TA`op`L#Dh KA/F F rаirLCLC/q ɽ ɿ 0ALAhh AH A g RPQh PQj%PsQtPQ PQijLrBLԥPiQjP Q st 0AL eLVF` 꺽  \A  KA ' TA 8 uvL׊i , A BLPFhh 0AL+A,Aso/Atpꍉ`L_FLAL0= ijklmn op` `$ ` KA8Læ TA`-Ihh AL{BhhLEFɬ6hhh A L~EF1! 78LئFL LBstopɣɤɬ @J 8s_tB' A ? /) 0ȱ =` ȩF  e ȱ e 8e/ 0A_F(A)A ө_F<=_R>?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ĠŠ̤ĠŠ̤̍Íà̍̍àҳҠę/ M/H 0h L:) =<x?BC `>Q>>>ńŅ D `` >ń Ņ D `e>>?ņ?>?Emn'>e>ȱ>e?>Q>ڠ> ie>>?`; =:<:<=;`Łi ;>:8o>oȑ>ppȑ>> :op`/opqr/ hoȥqoȥroLG o8/oppiojpMޭLP ` LJ p " npL ptso8pinii>j?kʼn3pIiŁʼn % l `>i>?Ek?"!"( NU%4:DT0.8:I15:TY$(I):O I16:RW$(I)::I115:SS$(I):n I13:J15:A$(I,J):: I14:CH$(I): T1$"Algebra 1 - Volume 1.1":EZ$" " MODE(1)::15:B0:NA$""1900 2006 16368,0:A$:0 400:A$(32)4156 [ 400:A$LO$A$HI$AN(A$):d 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$):LTCmplifying Expressions","Evaluating Expressions","Writing Expressions","Variables Test""Solving Equations","Simplifying Equations","Graphing Equations","Word Problems","Linear Equations Test" "Lesson and Demonstration","Examples with help","Practc!","Super!","Good work","Good job","That's it"rT"b","c","d","f","g","j","k","n","p","q","s","t","v","x","z""Add/Subtract Integers","Multiply/Divide Integers","Rational Numbers","Absolute Value","Real Numbers Test"X"Combining Like Terms","SiL`::A$(I,5);29(A$(I,5)));UC$;16(SC%(I,5,2)10));SC%(I,5,2):::ij(12):(4);"PR#0"::@<0>,<1>,<2>,<3>,<4>,<5>,<6>,<7>,<8>,<9>E"Real Numbers","Variables","Linear Equations","Progress Report","Exit Program"1J"Great!","Fantasti9000:900:823::jL::(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"940,56:ZS$"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,70:7940,V(V):ZS$(SC%(I,J,2)):(ZS$)2ZS$" "ZS$ S$" Screen":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,7500 CI13:UC$"20":823:7939,52:7940,56:ZS$"Tried":9000:7939,63:7%1:ZF%1:ZF$"ALG.1.1":9950=HUN%2:ZF$"ALG.1.2":9950[RUN%3:ZF$"ALG.1.3":9950k\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:VV2bR:7940,V(V)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>UN60000:S$OZ$:(S$)2İ500:510.NL$S$925000LUN%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:829VV3::V8:I115:7939,184849,1:9200:)4849,1:9200:Kl912:ZS$T1$:876:WZ$"":LZ7vY12:7939,8:7940,64:ZS$"Enter your first name: ":9000:H28:V9:60000:S$OZ$:(S$)2İ500:510#NA$S$:LZ15:7939,8:7940,80:ZS$"And your last name: ":9000:H23:V11:7969,22:7939,45(ZS$):7940,5:9000:7969,8:hl7969,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:):15:H(H)43,V(V)12:"\";:MODE(1)U ?(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:2kTOO LONG":O L(T$):H20(L2):7939,I(H):7940,V(V):ZS$T$:PA1PA0[ 9000: 55126,3: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(2LJ0T$S$:690: cHLJW 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 ice","Return to Unit Menu"V(# DRAW CHARACTERS ON DOUBLE HI-RES SCREEN, MODE(1)g-#Z9(1):8402#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 MANAGER4#Z9(1)[$0,0:(4849)9230,9240,9250:4352o $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)OZ$(OZ$,(OZ$)1) (60400(91))(IZ$(96)IZ$(123))612000'60400:'HH1J'BOZ$OZ$IZ$b'tNP0ZS$IZ$:9000m'60400}' BACKSPACE' (OZ$)060400'<7939,(7939)2:7940,V(V):ZS$" ":9000:7939,(7939)2:7940,V(V):HH1'n(OZ$)1OZ$"":60400($)0ı'&IZ$(8)IZ$(127)61450]&(IZ$)2IZ$(IZ$,1):IZ$(75)IZ$(83)61450r&(OZ$)LZ60400&WZ$""60900&NZL1(WZ$)&IZ$(WZ$,ZL,1)61200&ZL:60400%'(IZ$(32))(IZ$(39))(IZ$(44)IZ$(59))(IZ$(64)IZ$move the":11,55:9100:ZS$"Write-Protect Tab":11,71:9100:ZS$"and":60,87:9100:ZS$"Strike ANY Key":25,103:9100:MODE(1)%@e400::TF%25020,25710,25014%` INPUT CONTROL ROUTINE%OZ$"":IZ$""% CURSOR ON%IZ$&TIZ$(13)(OZS,R0":1$d216,0:9900W$dSB$"":II122:SB$SB$" "::II172:SB$SB$"0"::$dII130:(4);"WRITE STUDENTS,R";II:SB$:$d(4);"CLOSE STUDENTS"$d25030$d822:25020$,e216,0:822:9900%6e:MODE(2):12:B0:821:ZS$"Please Re4:ZK14)#cSB$SB$(SC%(ZI,ZJ,ZK))X#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:TF%2:25900 $xd:(4);"OPEN STUDENTS,L95":(4);"WRITE STUDENTSC%(I,J,1))DT)SC%(I,J,5)1'"c:9"c216,0:9900B"c:a"cZ9(1): 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$" ": #cZI14:ZJ1"!bI14:J15S!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)2"bSC%(I,J,1)4((SC%(I,J,2)āII115(NL$):SB$SB$" ":W bSB$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);"CLOSE STUDENTSNTS,L95":(4);"READ STUDENTS,R0":P%:RC%1GaRC%30RC%P%:25100na:(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:25070 bSB$NL$:(NL$)150:TF%3:259007a(4);"DELETE FINDER.DATA":25030Pa216,0:TF%1:25900a:(4);"OPEN WPT,L5":(4);"WRITE WPT,R0":"N":(4);"CLOSE WPT":(4);"DELETE WPT"a216,0:25700a:(4);"VERIFY STUDENTS"a216,0:9900-a(4);"OPEN STUDE$))4,100:9100:MODE(1),&16368,0:A$I&::(4);"VERIFY ";ZF$l&ZF%0:216,0::(4);"-";ZF$:' ERROR TRAP FOR DISK FLIP'216,0:822:9965a READ.SCORE.FILEaa216,0:25800a:(4);"VERIFY FINDER.DATA"a216,90&9981&9990G&5126,1:5127,30:5128,78:5129,186:5120o&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(ZS2%V(V)((V1)8)-%X(X)(X74)C%Y(Y)(Y2425)o%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:99  STARTUP - SJW - V.070989+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);"BLOAN D CLEAR"* 2216,0::(4);"-ALG1.BOOT"B & CONTROL-C HANDLERH &