[~\]q`CaÍaab=cde+hÇmÿqëtu!" !N* ^! ͺG\* #" [* #" !N* ^!(rGR\!Q!N* #^s* ####" `\!Q!Q^s!O^!PG}\!Q!CsA"4A!R^#V!rGҤ\!}2* ]!Rͻ+!*4!R^#V+))ͻ+͈&!*4!R^#V+))ͻ+!Rͻ+͈&}]!}2* ]!}2*:*&oA"6"8":A*:*:^#V#s#r!}2A!O^!PG!Q^!IrG}ҁ]*:^#V;[!PGҁ]!}2A:A&o!PG*:^#V!wN^#VG}p`*:^#V!"*>!yN^#VG!*<*>+))ͻ+ͻ+ k@&}"^*>#">]+^!">*>!yN^#VͥGG^!}2AX^*:*:^#V#s#rm`!">*:^#V;[}2@*>!yN^#VG:@&o!PG}^!*>+)^#V!ͥG^!*+)^#V+))ͻ+ͻ+ k/&^!}2@^*>#">^*>#">p^*>!yN^#VͥG_!}2A,_*:*:^#V#s#rm`!*<*8+))ͻ+ͻ+ k@&!*<*6+))ͻ+ͻ+ k@&}o*:^#V;[!PG}қ_!}2Aì_*:*:^#V#s#rm`!*<*8+))ͻ+ͻ+ k/&*:^#V;[!PG}_*:*:^#V#s#r`!}2Am`*:^#V;[!PG(`!}2A9`*:*:^#V#s#rm`zCC]m`m`m`m`m``m`m`[^m`m`m`/_m`m`m`m`m`_m`Á]!}2B!N!3N!@H!N!^!YrG!N!^!NrG}o!N!^!!rG}`!}2B/a!UVG`PLEASE ANSWER YES OR NOGrH!G)JID!UVGa? GrH!N!s#r:B&o!PG҇`!"!8ca!}2D!}2(Åa!"G!N:N&o}2D:N&o}2(:D&o!!+"P#6A"*P#"P*+"|a!~*P! sèa!N!3N!@H[!N^#V!ͥG]b!KG!~!lEVD!~!UVGGrHID!K!89b!N!s#rZb!N!N^#V#s#r!N!N^#Vs#rrb!~!UG!lEVD!~!^!?rGқb!N!~!@H4!~!^!?ͺGa!N!~!@H!~!UVGGrHID!* ++"T#6A"*T#"T*+"|c!UVG! G)Jb!UVG!^G)JID!O5c!N.A"VA!NScXFIL#!I!NvcENTER FILE NAME: !H*V!rGҏc[!Nͥc !H!"X*X!G!~*V^! ͺG}d!N*X!~*V^s*V#"V*X#"XòcA"ZA!d #!I!"\!~* ^!"rG!~* ^!'rG}ad* #" * !G*\!G}o!~* ^!0͉G}o!~* ^!ZG}d!*\+!~* ^s* #" *\#"\ad!~* ^!"rG!~* ^!'rG}e* #" * !G_e!~* ^! ͺG!~* ^!,ͺG}_e!OXe08!H!Oie00jAe*Z!s#r*Z^#V!yN^#VG!!O*Z^#V+!tJ͡}e*Z*Z^#V#s#r|e!yN^#V"!wN^#V"!OeAUTOjAҙf[! }2f:f&o!,ͺGf[}2ff! }2f:f&o!,ͺGAf[}2f$f!" !"!-!PGҏf!~* [s!~* ^! ͺGҌf* #" Gf!"GVD!" !"d!"b*b!ZG!Of00jA}o* !G}o!~* ^! ͺG}g!~* ^!,rG#g!*b+)!s#rg!`[*`!yN^#VGPg!OFg38!Hsg*`!N^#VͥGsg!Olg15!H!O}g00jAg!O*`+!tJ!!I!yN!yN^#V#s#r!*b+)*`s#r* #" *b#"bëf!Og00jA h*b!ZG h!*b+)!s#r!Oh00~A*h!yN*s#rA"hA*hͻ+ͻ+!"!-^h! }2vfh[}2v:v&o! rG!"!-!PG}o:v&o!,rG}Ҷh*hͻ+ kͻ+em:v&o! rG!"!-!PG}h[}2vöh:v&o!+rG:v&o!-rG}o:v&o!0͉G:v&o!9G}o}o:v&o!.rG}m:v&o!-rGviͻ+[+ͻ+ n[}2vÞiͻ+ͻ+ n:v&o!+rGҞi[}2v:v&o!0͉G:v&o!9G}j*h! *hͻ+ͻ+ Ͷ&:v&oͻ+Ͱ&ͻ+!"!-!PGj[}2vj! }2vÞi:v&o!.rGLj!"!-!PGLj[}2v:v&o!0͉G:v&o!9G}j*h! *hͻ+ͻ+ Ͷ&:v&oͻ+Ͱ&ͻ+!"!-!PGҿj[}2vj! }2v! ͻ+nͻ+ Ͷ&ͻ+ nLjͻ+nͻ+@&k*h*hͻ+ͻ+n͹&ͻ+:v&o!ErG:v&o!erG}m[}2v:v&o!+rG]kͻ+ͻ+ nnkͻ+[+ͻ+ n[}2v!"t:v&o!0͉G:v&o!9G}k! *ttJ:v&o"t!"!-!PGk[}2vk! }2v|k*hͻ+ͻ+[+/&*t!rG}"l*hͻ+ kͻ+mͻ+ͻ+ j*t!G҇l!*t+"r#6A"*r#"r*+"|ʇlͻ+jͻ+Ͷ&ͻ+ jZlͻ+nͻ+/&l*t!ͥGҾl*hͻ+<ͻ+l*h*hͻ+ͻ+jͶ&ͻ+m*t!ͥGl*hͻ+ͻ+m*h*hͻ+ͻ+j͹&ͻ+em:v&o!,rG!"!-!PG}Tm*hͻ+ kͻ+em!O^m08!H*hͻ+ͻ+ k/&҆m!O!s!"~!"!8}/o*~!N^#VG}o!Oͻm00jA!Om90͇A}o}p!"x*~#"~*x!ZG!*x+)^#V!ͥG}o!"!8}/o}p!*x+)^#V!rGWo[}2:&o!"rGҪn! }2:&o!"ͺG!"!8}/o}o!"!-}/o}ҟn[}2\n[}2To:&o!'rGo! }2:&o!'ͺG!"!8}/o}o!"!-}/o}o[}2n[}2To:&o!,ͺG!"!-}/o}o!"!8}/o}To[}2o{o!*~!*x+)^#V+))[*x#"x!"!-:(&o!,ͺG}ҭo!"GVD! }2(*x!ZGo!*x+)^#V!ͥGo!"!8o!Oo08!HmÍm!O p08jAp*~+"~*~!wN^#VͥG9p!wN*~s#r*~!UVG!!͊D^p CASES READGrHID!"!8}/o!wN^#V!N^#V͉G}p!UVG;p#NO ROOM FOR ADDITIONAL DATA ON FILEGrHID!!@+"|#6A"*|#"|*+"| q!Q*|+!Usp!"|!O!s*|!wN^#VG!O^!PG}үq!!yN^#V+"z#6A"*z#"z*+"|ʥq!*|*z+))ͻ+ͻ+ k/&Ңq!O!s\q*|#"|q!"!!|2!}2!~!^! rGr!UVGr ENTER FILE NAME WITH EXTENSION: GrH![r![!N!^!!rG@r!}2Gr!}2:&o!PG's!"!!NF5!"!0(A!rGҌr!}2Ór!}2!"!!2:&o!PGr!UVGr#FILE UNFOUND, TRY AGAIN OR TYPE "!"GrHID![:&o!PG!N!^!!rG}$s!}2Gr:&o!PGҪt!NFsRFMT#!I!NmsENTER RECORD FORMAT: !H!N!UVGGrH[!" !"!!NF5!"!0[!O͵s00jALt[!Os00~AIt!Os!N.!UVG t#DO YOU WISH TO ACCEPT DATA AS READ?GrHID[!N!NC6DCjAIt!wN*s#r!yN*s#rWt* ++" [!wN^#V!N^#VrG!yN^#V!N^#VrG}Ҫt!UVGͤtERR 36: DATA SET IS FULLGrH!!+"#6A"*#"*+"|t!~*! st!~!N!Hͻ[!N!^èu[ýu!Q^! rG1u!Q!Is!Q^!PrGMu!Q!Ls!Q^tupvÑucu41!Q^!N.ÑuzCC Wu]u]u]u]u]uWu]u]uWu]uýu!O͞u99!HýuzCRuuuuuuu!Ou00~Au!Ou!N.! }2(!/Nͻ+ͻ+@&!!Q^#V#+))ͻ+!/Nͻ+@&}2v'v01+v!F.!O!O͡WvIv03Mv!N.Zv[svw2wy3z|P}A"A*!s#r!N! ^#V^!0͉G!N! ^#V^!9G}w*! *^#VtJ!N! ^#V^s#r! ! ^#V#s#rÉvA}2A!C!C:&o6DC! HAͻ+ A!Fw! Hͻ+ͻ+ k/&҈w!bv^#VH|w -10E+17GrHHsyͻ+d+ͻ+Pw&w!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+/&w!bv^#VHw 0.00000GrHHsyͻ+d+ͻ+}f&8x!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+@w&qx!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+ w&Ҫx!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+w&x!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+w&y!bv^#VHͻ+! !ͦHsyͻ+d+ͻ+w&Uy!bv^#VHͻ+! !ͦHsy!bv^#VHͻ+! !ͦH!! +"#6A"*#"*+"|y!*^! ͺGy!"G!*^G)JÎy!O^!PGy!dL!!"!!NF5!"!(A!rG2z'z05!N!C.!"!!yN^#V+"#6A"*#"*+"|ʎz!*+)^#V!ͥGҋz*#"Wz!O^!PGz!"!!![!R!s#r*!wN^#VGz!R!R^#V#s#r!!![z {!R!wN^#Vs#r!"G*G͊D!,G)J!R^#VG͊D(A!ͺGQ{F{13!N!C.!!yN^#V+"#6A"Ž*#"*Ž+"Ž| |!*+)^#V!ͥG |!"G!,G)J!"G)J!O!*+)^#V+!tJ!G͕H!"G)J(A!ͺG |{13!N!C.o{!"GID!"!!![*!wN^#VG}!"!!yN^#V+"#6A"Ď*#"*Ď+"Ď|}!*+)^#V!ͥG|*!ͥGҰ|!"G!,G)J*#"!*!*+)^#V+))ͻ+dv(A!ͺG||13!N!C.c|!"GID!!![-|!"!!N2!N^#V!rGO}D}13!N!N.!}2!N! ^#V^! rGҲ}!UVG͝}ENTER FILE NAME WITH EXTENSION:GrHID! !s#r! ^#V[!"!!NF5!"!0(A!rG}!}2}!}2!"!!2:&o!PG[~!UVGR~0FILE ALREADY EXISTS, DO YOU WISH TO REPLACE IT? GrH[!N!^!YͺG:&o!PG}Җ~!O͏~33!H!O͠~00jA!Nͳ~VSEL#!I!N~WHICH VARIABLES? !H!N!UVGGrH! !s#r!O 00jA!NWRIT#!I!N>INCLUDE NAMES? !H!UVGw'DO YOU WISH TO INCLUDE VARIABLE NAMES? GrH[!N!^!!rGҫ!O͡33!Hgv!N!^!YrGjvmv`\A"ȎA!ʎ! #!I!"Ԏ! ^#V"Ҏ!N*Ҏ^![rG**Ҏ#"Ҏ*Ҏ!@G*Ԏ! G}o!N*Ҏ^!0͉G}o!N*Ҏ^!ZG}ҥ!ʎ*Ԏ+!N*Ҏ^s*Ҏ#"Ҏ*Ԏ#"Ԏ*!N*Ҏ^!]rGÀ*Ҏ#"Ҏ!"֎*֎!yN^#VG!O*֎+!tJ!ʎ͡}*֎#"֎ɀ!O*֎+!tJ!ʎ͡G!O109!H*Ȏ!s#r_*Ȏ*֎s#r! *Ҏs#rA"؎A!N! ^#V^![rGҗ! ! ^#V#s#r! ^#V"ڎ!N! ^#V^!0͉G!N! ^#V^!9G}'*؎^v*؎^#V!G*؎^#V!yN^#VͥG}$!O07!H! *ڎs#r.*؎!N! ^#V^!]rG[! ! ^#V#s#r!,}2!!@+"#6A"*#"*+"|ʨ!*+)!s#r~!"!"*!@G!Oɂ00jA}o! ^#V!@G}o:&o! ͺG}!N! ^#V^!*rG}}o}yʸھ!!}yʸھø}ʾó}ʾ̆"fHq*@LSA Ć@LEA ކ@GTA @GEA Ն@EQA }GETVNUM GETVNAM REWRIT GETVLIS OUTVARS mvOUTNAMS jvOPENWRT gvWNUM dvPUTCH avGETNUM ^vEOLN -LWRITE pv@NEA @RCH OVLB [EACHCMD [LREAD [DOREAD [GETSNUM [GETFMT [GETNAME [GETXNAM [SHOWERR [GETINPL [BLANKIN [GETCHAR [ASK [GETNEXT [SELECTI [GETMISS [