IMD 1.15: 15/05/2007 8:55:40 fog hak 014         -FOG/HAK014ACCOUNT BQS>AUTOST COMBANK BQS^DISK DOC+FINANCE2BQS5"#$%FINANCE3BQS7&'()INCOME BQS STAR BQSSTAR DOC. !CRCKLISTCRC*v BANK.BASe  "!$#&%(')+*-,.0/123457689;:o=<>?@BACDEGFIHJKLMONPQRUSVTXWY[Z\]_^`bcad[bgkfr{rV\sBajо8yh ς*a kvHia_ExQƍjMkfg5Ph  mlZdptl?yI.[U9KDQfW1[B?/i,]%5d4sRk~kb9]{3%E=9]]-5n޳C, k[9}P_s͜.Ek[n:,(:f^%EYT'ʺdGf^%EyP˺dGf?kk2 MNAGjlXg:cT{ԭٷW^.3>sC:w#Wf^cz%/]>s/gf{xw۫tL/=lrY].3>sM. ege3:pkrYxٷW۫k]o1\f|$I:6\. 9oIkva?QLxq^rX8%G*]ovj\G0§Cb74ܚi7a*p=|qwR/ai>7/N^-[A]8 Od 9  2_B kt26[n:,}'/Şa_q%ѲLaދ1,Cp {Ú g`) {Úς?g_AKa͞NƆ5Qj`9 sL랛|:{y{ia$Qj`9R1=ǽ4ްf^*WԔa͞NƆ5;%J/I'ٕfO?gd{Lhwek*?zeaꪒd3/ߕ鯩/۩N~k?l7 lfͼLK2a36ۛج/{y\s5& D%@cӚkݾ C0~; H3G65e3k~a2ߍ23݈uLWf0*T{8^o_`; HT#۩T~`p`o,|._]f|sksv*\^ Ҋf^\oґ#5os_+۩T~`㰽ĭٷW6 H*(۫kD}oґ;͋v2w_|7CS.3>sLekpKT:^\?_qïٷW۫U5* zqeN~xdwGukU*}{23צg.u6בNß[o1\v372]vۿscj:J f^czg.E]}\Ԏ۩T~`skU@:.|F鲫CS;w#f^czgJ]}mËv귓5* e>s;t,=^L֢eNwr3]8=7Ǎ^o_gulX`7Ϸn|3wkU@:rw.k~e{O~`c^5]vϫ6 Y+lґ{{IBkU@:regN/,z\aӐB`9 _?I9 ~t=,s f^#w.k~e{|2lT%ˌϜ$0R,z~k]  ]_? X=9Q7*<kx{p 8~ڃ5*&5AYAփ&PشfH07]o4j(Jxˇ=gxY z k)xrQ(jk}8;M&럇=~Gh>Ř@(Vd&ذfO%1S 4YQf Y0TE"Y0ïم`Y0}{eQ4r1&Y0w~@SZ R4IiASZ*D= k~1}{gT*?0qQu~`8oa޷W۫=X('/)/N5%\΂Þr3b̆5{+hJ+*B#X p5*x{x{p~kb.qW_oW`MP\@kBaMwJ %ش}{p; H3{ E `8h ^>f^c? _5Aq5 MLD{5h_U6f[[nW/k%EYT8;͚}{}QCQ,^>^.=J(lXMiœb5@(V\8;ai2q5 M,r"Pji aX go_Qxlr;ͦ5* /)ʢai`MP\s; fڃ5 zB5C{/YjMkٷWyƯٷWuc; KASZh<`8Ґq,5* _U6!0"Nx,i{{]~; fiHv*8l&S ~^|aI$Z8;MRq(8;Pr9 {a2鯠)xrb55{S)x%QLxIQLx %T*ulXU* %* k~kb.qWZ%&kw; ܿs#]f|݈ߕ. > _W4#/~N{F~'S,v k[n:,(:fQN^REþӬC"Pai&J6* NUvY* kC&(W/P{f^0ܚ}{}{p5>8;?lh4I5rTCQ,^>^.=J(ˠ)þs; f0*T&! H_(۩T~`0ptn; 8^\5Aq;fڃ5\3U5* s_ _}MGegN tYxf00{_}I*o-Zw\s\_(lY&8;ٴ}{p˖ՠ)x2%\΂r3*B#d6_ASZd%r / /jk=Xs5sxrb555Z]}5{SL:(m& (8;Jx`nP a߹f?k}{p fڃ5\37(}{p H3}o{ _-5n޳C,E9yIQ/Nf^(Gna{5 ]f|$ @JWoZkgIC^ E\⠾fiHv*83; 4fq۷W۫L۫krznj~aI$Z8;MRq5rTCQ,^>^.=J(lXɭ"8B.OДVFk1>xf5O5u) 4SR' 8fÚo1/7_/./T~\ݘ k Ht_/, kv^rܟ{y  JǷ-s9qw5s9Q7/5!X۫U5 f.' ?C&(_}I*o-Zrf^!f^#۩T~`c_vkb:Gۿ. > _oR3ni|v*0,|lo:nԠ)x2%}{p; d~; fޫA{IC0o-Zr暹APDwE 6f^\oYSQN'+-,|[@>[IPPNfaG; /9K ǽHU5{7 qn|ύo-ZF/Þ?n$7?n_Hn|k27Bg^|aw{{n||{Ʒ-s#}͎xawwsўƷ-s#}-s#kFU@:rw.k~e{O~`c^1,a5@BQ/N*A8W0ϭٷWAДV^.=J(lXɭ"8B.OqhG1%^*kG1%PRYI5]vϫ6 Y+lґ{{IBkU@:egN/g`5<_4. 9WW4P!X΂O!@R΂x`9 ïٷWȝ _9+3~I23'Ih. ^Z8bWx!XLJ`Mpp|k27B7*<k W/P{f^\PĿ&<9(zjπFa޷W۫L۫c65Z]}|k27/5*YPNU2! C&(ٰf۫tyv*8:?0uU*jҊMi[?~ @{)`Ʒ-s-s9qw5s!X*T&!x/P{f[]k*pӡgA@QY 5 fn7Q۫kU@:\p{s#D}^<;Þ?n$Gh>Ř@(VPOHZa͞ cͧhX p*B#>"8"+V B'X{n*B#>I[E(p!`9.ܚkU@^R4/TCQ,^>^.=J(lXMiœ[E(p\B /UH )gkU@^REþŘ@#`x|炿W~_S$t$4)]^fFkqĮ'! }aik[5\37B MDB|L9Z`ӚkU@kU@::]=h~;!23D^Fmc,,~; HGrF\egN ߼!«Ƿh-5{č{_`nָUC{{ς/kvU{5(:E9y f?k}{_qY0|3\{PٰfO Ҋ'P(V\{L\o򒃲~=ؼۭ}{p fڃ5̍~5!X\Zw\s\c]/61Ί,|qwi5* 5* yk*=51Gۿ. > _oґ:L |_?|nk*=AYTf(}Y$Y? OB=h-vE}w5{MC:J?|NBFДV5s#^ @{BeB=۫4>syv*8:?0uY _eMiPr9 {a2鯠)xrb55{ qV I*B#۫tu~^Sխ7۫tĭkU@:_`w)]^faG; /9K ǽHU5{r{s5{k ?hk, o-Zkz[]k*pӡgA@QY 5r,_F.`5*`^#۩T~` %}qq]0U2(߾qR(U}hwuY5* 5Sᖎ//_  |/MfLm7ݛ95aiI1F.g,~; HG^Gw~N9U\egN-FE)]^=i \?5S'5SEx`ÚoR3n_^GQ^©^?5#ibLY?53H¦! r fk'x`MC `5{_C8Uԉk5* yNѝuT{4 z / /Þe%e6_ɭ"8B.۫(}1F΂Y0 kU*j\3 qVd//N6f^\W4#۩T~`p`$tjMi[-7ݫA@QY 5r,_f^|aI$Z8;MRq(8;Pr9 {a2/ASZV !jk'~k]]_? X7*<kx{p 8~ڃ5* /)ʢaibLY0? _5Aq; 8^\@k&Y^ \W4#۩T~`p`$tjMi[-5n޳C,E9yIQ/N#c,`5{ASZTҊailXU@9J?? Gc6}@SZ00[9Uu}>!n _kC&(,U@9rQu~`8o_oW/P{kT~kbNUQ_oٷWΏ;ߣI 9IB3ek[kGY|#kg8;?/NTZ#kSU۫tdy{W^Ru(]f|$:2nTe 5{_C_W۫=X('/)Ҋ (r / /Þe%e6_ɭ"8B.5۫kU@9J?^,4o; H3GSa{ϕQJWCQ¯ٷWi|==yJtYxkU@9rR(«Y0}{g}o'?d*?z$'«{_ȏT*?01R+«akU@j-9r{{8U,p_C8UJa޷W tW#Qu(/ԪwGk翆p~D=6 )TBQ¯$XaӐBk翆p~V4P!X΂ V4ak翆p~vV4d9~^=6 *B# 4&XaӐE!*t T9x`NU}w^N*u=9U55Z9UE}; f^#/R2BdシtV f^f*̑=ᏒR,|e:{//(V\ȏ틋}tYxu1&ЬٷW5lܷWTQIteܨ(«6 !k翆pY俆pPx`ÚoR3n_^GQ^ҩU\ {+lR_?53H¦! A% $iHBɼ:&ˌϜ$0R,z~k]]_? X=}D}^,`>q"}ai[}D}; KþS E /`xgx /+X/a͞4OnrQf^#Sog8p/Ώ;lR/ ]f|$ @JWoZkgKX|FE=/ϋþ$lXf|k}D}~k29UïiÞ ir3!{+lUGiL¦!b55{_C8?ibLY?5SN!*5lfk :\5*}{h':k*=.3>sf7oH55Z#vu}^,`>`i OܨHa8^o_`5* /)Ҋ (rEo ƏW۫U*o>"Rg; xů!n ۫U*x{p kU5* N/]^ Ҋf^#۩T~`㰽J(«(۫4>s<%R,Z 5* 9])Ie,~; H3GËv귓2ReՇ=ïٷWi|v*ʏ^)ٕeg5* 5Sg=  L])!gt^^:uXoR3ni|GIc)]>s2콗N]_`5&e+B'_lB9+`ش#vuPĄ0`Y$7/hG1%yaḗt; 8.`>0q FORq^|a5r{ OB5{7t{ 5{Ex`FA=/P{f^#om_\^tˌ GOTO 13100 if left$(res$,1)="Y" then 13075 goto 13050 13075 INPUT " CHECK NUMBER?";CHECK.NO INPUT " DATE OF CHECK?";line CHECK.DATE$ 13100 IF LEN(CHECK.DATE$) EQ 0 THEN CHECK.DATE$=DATE$ BALANCE=BALANCE-PAYMENT \B3pY123tYx֢]]_s5\3QO/6E9y 6f^!f^#UgU5ZV= :8b(_eQ4r1&,^ïf^oW۫4>sL&ͯ=L^Uyˌ\~; 8^oW۫L[:W` /_^^:ubLYoٷWvINCOME.BASj  "!$#%&(')o+*,.-/1023456798:<;=>?@ABDCEFHG^?:}7өY0}{zhLïٷW۫U5Y0`5* _uunʝ1,~D]۫4>sL'?Hߍ8]sqMC gkY09=g`ϳ`s{WiU֢e﮹fW,5*KPu={ڍg`<_|q9 ܚ=!Wo%gIKJLMNOPQRSTUVWXYZ\[]^`_abdcefghi_8tSGЇh 0@\zQ6&_) 7vflQ}kC Ht͞}T)$!5bU ^r /Jk 9 ~!x*E(`xYKʃR隽X :@G(|n<ؤX{A9Q:fÚZLE}ͮXhG1%BK΂Dt^T wb^V,5*zY~t=&[sD] MU6fo^ k[nrYB3e5߫಄(gn5ovE=N.}~+t^gz0t` ѹ5?S]Qvǚ1L'vG:ݚovE=N.u5?bvN>T,mC,eeC[1>Cb6d)A~RV1>5\s/J@*evw>ZG\7!k~n?5w 9`ؑ5\{/J@[bܵ#wvN\8fk?iO xk'/&nl^ z8bf?kkU*j\3Qw`U{5(:a}{LEuˎNvtkU@^2QT.;:ѭ`kU*`_sk yK*go_Q\RyI4s8\k&_{ 5{Ex`FA=/P{f^#om_\^tˌS6ڼ.',ue &^r^5"5?̟&۶0 \55lmȧ7yy}_o'vrk~|ېOoN^\{]:-OD~Zir:LnS8EMd5l<\е\u}E8v9 L&)&r]Ț6y\.Țk  ~7@i^ךO Lpu"k~x`q_Aךkr_+±nQ8EMd5?>m'&/5+j?"k'Q?MK0?)j"%eJ5|%\qTaNQ._d͏w wW~E Gd5rD4}]irv8SԴy"k~x`rQ隯\WcǑ&)KY݆|"o7ncM!KF9`N'ʾ%e3Qb:*o)uiU(F/STwDq{W۟Dt׵%*n(nT\w Pp/T{)J߄{]ozzr]{xk~BuI|TFI9xJp7#ѽ^ךk:uI^7U~gȚB6 "87e\Z6-O{[#>]J#k] lQ}x?C h5¡$G[/5g̮lR'l"D ̲Q5VGJH0}%OI$m^pITMz!3p1k AY+I0lTMzDդ;Tڦ%OI$Mdqch^ͮlR',U^IǤ·JҲI],>&uY ܚBP&uVEM* rcz&uѫ%YSwk A|P٤N~S~U() qw7`ǭ)ncM!wrBlR˥I]7aG-)QɓTݚB6*toR.:.oQv7pߍć 9 ]Z6cǤ.w7K哔[S݆P.M2r1ݍ-&lT5 >m UߤKI]nl\.?pqk A|ېХe:1+~%%ŭ)KpI>T,mC!,}YB-e1g)A_[S!f$*U!K|R,R*U!K|R,D5;'P Y2Ƈ 瓲e A>䷔Š ,}YnM!f;Cb6dObЗ%TAY YbЗ\sM:uI^7U~gȚB6nF%[S"DK&uIzo2ppǼd1k A|nnCNBMʥI]Sݭ)nCNBMrcRdD0Fդwk A|ېХe8K^lWć 9 ]Z6u1%#Y%nM!wrBlRW" >&u\Z6rcRnT㹴lRǤI.-1k A|Xн^ć 9 ri٤n[U()w1STw˚BǍ`: ܊ qXScM!w* Uoʏʾ%e#8 5 >m)nCNBM`1{m UҲI\mt˽ت=InF%`I_vk A|ېХe:V.}L6^ʇtYu6*ylTMzć 9 ]Z6ȥIFܫQ#ejk{Gć 9 ]Z6K'O݄Jć 9 ]Z6+>&uEƚBǍ Ӊqf:4*no:u)E}7JlgTwtT\S(Q^DF"?u)Eʾ%^DMMOM\[ZAr/T&t&ޛE&Q[ By]o)QR65 >m)ōH\G*n*tv޷\nć 8k慓u&pol)w*y[S݆P.-uǤt{`Ip!'TK&uq,>&uت=I ?nM!wrBlRGrcR=}KGb+JܚB6*ti٤D@.}L=카lRǤݨsi٤ȥI]ɓT]Z6rcp&uI|ې M:6^QeߍrK:E}7Jɽ)a~ܸ]Q5 >m)a~ܸݾ1.nC8ΚydE^k5ܼ./{m^[݆o8|nc͏wrRדe˥1RǤ#v؇tK~:)pi݆lTMz%Q/d'|NCW$p>5p Mɚt wqLz5)f֤$>m)nCe: `,t{ć 9 +\WďHl  1okvE=nC:쿭 imMǚB 5;Q?M8p "d{]k A|PQ wk A|ېت=I/ejҗroR$ՓeȥǼvć5lEhZS+>\3J=%{U{^0Fդ/7*WEh_tM!(|9p L&)&r]ȚBD{˔p6&BF*݅J )yy5Jڞ1BxO*nkgoM!&BPܨ\.!{Jyy5 v#*?"k AWd5 y/J@ E]15KLJ5?>m7٢6,ut8-}[݆ߣ~ ul1Nu8sr5<ܚ6?*08j8hԏahԏcp*nIl̲Q5B[7Izo2ppc^2p5Jk Aqr\65>űkM!&=lev\L"YShݥQ?MwCN* n]0FդϽ[N6]k  o3ШZShōUp AS"362BКBzxcG=p>k Q .t]B~{O*n{k .:Ie!8w7~?$ej+K`r/fclw pP8NCW$k~]tw ix i0oF4[p_.6T w[.N6X^k} Sncȶk?kO6~;+K`I$EU pnͯ3暄^68| ֬nC8ΚIɈt詀Ot׵ttNC^tdcNC^tdKZ8[ !+i֌Ͻ.%_zyy5]F*munCnrB_ LOeakk)QYS%kI.䷼DO?x,U~5 >mÇ5 >mI}I< f٨62roR'-#q wk AQȁsV`0--{KXVKyY_Zƚ m.v~i !߅Sɚ_6XrAkI+p!\͚p"ך68kk~}hk~k暄Ŀ.nCYSrBVzOz(Iq/[ć ߤppć 9 f٨-E&u@B[=ImQ\zKn1k A|ې`IZN5E'&/F^Tu^r7ߤNY6&j soRnYp܍<=leɚB̲Q5wF^\)yy))uj/'u6*ylTMz%pLf٨fM!zxTݵo 5La2psk Aqr\$JuGF^fM!&|"o=le)YSb7#=}K\ {J-*Wx[xB6T/ wypu&^TSn̲Q5鵽[#o˚k AvךB6T~ƚB6$ejk{G!Z\ m$E8r1/Ǭ)uj/',U^Iej3I7*WEh_tM!\>iڼ5ItS(&r]ȚBD{˔7vךBPMzmg͚BPMz+͚B>l f٨k)nCE7>m)nCN*W>l˪Q#ej 7(G.=%5I9w+0upu"k A\>7y !p!'t(K`roRjr1/k~t]k~|XίQ?M^ךBP7r̲Q5TK{Y6&=Dk Aqr\Jf٨LdM!(.רM{#yyrEЊ"t*Dg=leZ],U^OlTMz&oEEH 'ޚBPMzU$hs ̲Q50Fդ7> &S}ޙd1o[ShQ杩>L#N5VƮzx#`2gM!n/B:v%xk [d[oMe٢6e[oMNCp "Ѩ&B_ךKK^F^FS"6J  nR}F*mu)UzݤWw^/JI\9c|os/}k AFT~Dzɚk *J@:m:ZsM!w*jnSO-q.5 >mIO?^7nF%ߤHȯO{[G.=%6Ie`IZx ̲Q5$Z^\'ܭar;)j"%)yy̲Q5$JɚBP86OM^)p:I&B~wr;`I/unvQoԑGG$0IQDBPk\DդW'#KYS"A׵Tu^kzB$>mIݲݲe=ndɥI]g,uȥǼplvE=nC:8|XS 7}ac:MǚBPFMo:lޤCO~ǿ5 oޤc8i"׵'AkzuK7S6oҡK5 [xӰp "C~}ZS"t*Dg=le*nҫZ&qEj^`I$f٨fM!TV{9 .IF݄J`R$] u(lvԡY݆mdTD9r/ԡY݆$)yWS1roRי׆_:p1k~wCN*yJ"`r/Qf:6;4꧉:6;\Pج)uj/'u6*y$O"BOkM!TV{9 f٨J%̽,UI5rD4i' Lpu"k Agya#/S^S]kz.Rܨ\PBPM5 >m7:I&B~wr;`I/DKk\U^ ?RETEɽvq̚\4x|܎c:T@O|܎cv̚B8'7}JxKɓk A|ېeQ=b#{\Z6e5 N6]ךB6nlw kOSQdE^/Ttdۿ;`Ш# gC7LU[J_S"/T*yO#8rd=le؍)٢6wGsNBIQDBԑǥǬ)ncM!&nW4\lTM7̲Q5ͻzxTw0ހyS杩>LTu~MBϥ 6nYnYݲHL2ߤ3Մ:c^8S6Lg[Q!>mݾ1cM!K7S6oҡrSID\КB P 7oұs[F4ZS 7;Q?M~Ӕ )EO:F5E'&/F^fM!(nTĿP=%w}mYS62;a#/5JɋYSb7#=}K\ГDO NlTMzyy5p6p!'Lf٨62K: =ImQ܎c8|X.H|ېت=I/ejҫt'L."\ڠ5 uwrN>~;ܫ!qoRKݣC.=s7~?D}62k A7@ݥQ?Mt)UzݤRld Mȼ)uiD}62z* OnRYU̲Q5͚BPF4g#zUIM*7LYS҈ldT@?Ie8'쳦ԥM詀@?IeWnGd1k A7@F4ݍvDM:cYC.==e+tuƚBP8 o:4xhz=e&;ũ$"t)`p~&;8i"ZS.hMBO@Ie`IZx ̲Q5$ZS*DsSp \/=pF>7y625 a#/Y6&=D)YS{(#a#/SVID_ךBPܨ\PBPM5 >m7 5 }jٖ pZ5mi"׵&]Bqr\$Jpć 9T=nM m)[?ۚ5 im͛tQ?MI7c7#=}K$K^7*nI0FդWIƭ)QYS%kT>\sMBBU  nć 8k&=Y3k A|ېJ`roRj.=ovE=nC:8|XS݆p5`M㬙5p~?3t)ui{M:T@nSIQu|7omB P8ڏKlo8i',BBk A7@( \-Ǎ~-Ǎ~hkO6$ej+?G޷4=}Kl9K,5˥ǤN2Ƈb|>q{5?>mnc/m5\\g[8fq̚_6ڼ.Кߨ&]ncLSknCE7k~|ېS2pwc m'Q?MݵtS(&r]Ț_86OM^)p5? !q5)pd/'!EmmQ\&%)QMzm㭹Tu^3fM!&ʕfM!&BU/YsMB{]UzݤWݍ[sM!&zϬ)yO_5$t*{{Up/YsM!\>i"t'62/0Fդ,U޼7Ly+ޚ*7}ޙd1oPج)yO_5 w?nCI<%m"KYƚ_8}}V5?Tokm[8M 5lE.Tw~F0iO=]k~|[|Tb6͒1>1>DKCR,Cxk~- om0Ɵm1&w5޷go9`OϚt} S55?>mnCnrR LR&uY kKIdm|%9`kcښkI_TS"a#/#nȋ}7y\S:-OD~H|r]k A^7y{yejҿaIo}Lop>La2p7u(lzɚ$>w?nCIdV[f-p.=f͏wk~}hk&.yO>*Wwg5JI\lTM7̲Q5ހygǼoY6&~|Xƚ_8cښk&mr]m1&]n1k~k@k~~v1mOLJ ߬nCNpB=8)lߍ.M,uL8rin11k~wך6nNѨ͋Zimpu"k~\>7y !8(|NCW$k~\>w8K1oq̻1o[7u(lފJ۞?okm)oc϶q:6> &S}ޙd1k AWd5\s/J@*_W8n]vܸ8;XJ@ooOhvܸ)(OPi5?DK5?bLn1܎cuF0rcڞZs͏w*jY݆7OY.M,uL8rin11k~5?>m'Q?MݵTaNQ._d/v旍ȅJnrcڞϨ&1iM@ך6-b^ڞ?,uvΏyۚmy+ޚ*m{7u(l6wcޖ6n sN~6tjQ5?T*??h)ocMt} S55?>mnCnrgbe_.M,:ڊKn1ogk~|Xƚ_8cښkI.T'&/8SX8EySآ6޶( >`iy+ޚ*5ۊ-v͚_6"*]mi{jk?~4꧉5?>mh-[N>T*e1hfOY %KR)Ad!K5޷EmO۶q;ޚgxS}7`ngMv)pȚ6pC HGZG#-\ ^{pWoj TFlDqyX;6]tcr;ys;bdž];65? QikӶq̛ѱwD6[4꧉m͎sI#-ۼ_(F"\Yi[8mimluRwn:m1Ǽkucr;騸~Xpu?vtcr;yvtQv  N Q7o 7nM:vF4QٹjBn͏mwwEm͛G[yۑڱwD6K~p!'ֶm 89N8cښ_6X"ךk"_nc8msi[8~XmlwiO6ڶC\8 gC[sMr ©qy 6q&5(lvԝN 7nM6@׎5Ƙvך_ncLSرƎ &uK)lm۶~?߶m];61.Ys/m57/ڠw>m7ZYuˢnl\z̚68|55p>5ܼ讏w>m7ZOIeEۻ>򶈦'LJ 68E Gd\>iڼh\  N[qj7nКk.nCNz(~Ĵ1ܵ5N6X*]Dwq?>mpmtvƎ IGfǚnpueE6M6/&M67ټ6d}B[͋M6/oyѽM6&I6 rcڞ6ƴ=^kMr}1mOrcڞJ_ɚd6ƴ=mi{*}$ݗ.1I6/_ncLSƘW&ټƘv1mOךd}1mOrcڞJ_ɚdrcڞ6ƴ=^kmi{jTJ$p!'=?bSG4w8E G(]Dw~|nCNz(~n۶k8)j?"p>5l1r;Y_Z6mi{j͏w*jY݆X]F }7Jߤ1RǤ#v7`Zƚ6䤧Tؿ.K}ѿ3n͏wr ڥǤnߤΏ)ƭnCNz8AV[mKmi{jTʥ[6;vcC֦F46ƴ=mi{*%k͋|1mOrcڞJ_$6ƴ=mi{*ml/1YrcڞJIŻƘhw^M1RGx`M& & l^d& Лl$mi:f}mq"ךdDƘfcv-1l_kMmi:f9N6XdZl^ƘfcvnO:?Xf5?>mIO'jk:`.Mh`c=Ÿ5?>mIO'jk:0&u~4=\z̚6T <O5Ap?>mis^ݍ9Rѿ̚6㬙kRgͬ{iOК пsć 9N ',Ak~7@2;N~@l{Өp>5Tu{tΟۘdE65&hmi:fF}',II6A/1Yꘝ;1l_kM,uvCncnMI}}hkI/J@_8ao Zs/,tuѱLJ mˉG8 .Ǯ"Y 7;iOm.v5p~sӨ&]k~7@f4ɶwwdۿF43nCNx#8)xre" B6rQ?M B0?߶m}`r;)j"%u/˧7 ׹܎C;p͚_Q뚟m1&]n!f/{ 6ƴ=6Q?MSu Dh͏wrJo܎{Y DPk^9|nÇ 9m±m۶qp>5pl9ǹ*_քhuc|b|>oRj.=&u<&uKyYt]kJp(ۖ}t1v6T~wk~8f͏wrRדe˥cr3ȥǬݍ9)yדe&RQn1k~7@Ө܎cvu>bLn1܎cPi#Ę.1Y5srmqi`RǸfn9 L2`=%˧WiB9m[NQ._k~\>/]ؿ}vb޹knjuvb:Ԩ܎Cj/l1r;1k~\t(1)?~4꧉wrbmp ܊vTؿ.rin1xk~_Q+'m(1G0iOS)_}]a:vvbnrcڞڍa  rӨSؿ+_'8f͏w})_'u;8\WWؿjxwSkLa68|[~ P(D+|6'Q?M a4SDKY K8A8;V8_csD8/(𾍷- oüފJmͶm1Ǽ Q E]@k~|PQ wk~|ېJHBߤHh'-ÑKy8f͏wk~|oR~D ?6u5K6N8?db8p!'=0@E[~6N8C\ LJ 9! L3j?0fø5?>mݍ9]%OI$&Rۑm:f͏wk~7@hOEwEOpCawokϥQ?M ~muFŸq[_Bk~7@1mOmgۘF4Zx0l7`Xz&p 5#LJ5?>mh-[N5=`i] m fC[1>{8=`ؚk_-v8f/{m^ho.15sݵwtZ.F4.O Lpu"k~\>7y u"k~gya#/S^]k~4'a#/㪏=leɚB+nT]TyY(tfc:tR¦M:\Ҩxk AWu^r7+k^`IY6&yQo0T&y+ޚB ހyS杩>L#N5VƮzx#`2gM.\ח<~=le=%b&g͏wk~^7W &!8(| !+5pl.;޷EmO[PVm1&7u(lP PncLS[6Q?Mt <Ɵ5_  !_+j?"k~|X݆ݲ[S:roR'DKcRgm|%ۚ-v8f/{m^ho.15rD4 DwanWKƚ5?^_8D6굘=EКk]g[8fq̚_6ڼ.Кߨ&]ncLSk~|PQ͚6T%-*WKJ`o\41Yq܎cc\ (FO/5]k~7@hO+a4SDKY K8A8;V8_csD8/(𾍷- oü4۶mQ8EMd5pl.țSk~wךS^5)pd5pl.;Y꘷8]-p~̛:6o[CmO5ۊ޷g[8fgs;Y_Bk~7@1mOmgۘF4mnk1;4j)oC[C336\ss\_;`C8k~E Gd͏wk~|[2ފJmͶm1ǼCa7`ngͯp 5#LJ5?>mh-[N5=`ihUc|h+s/怭+= (F L7`nNѨWwnQ8EMd5pl.țSk~NCj`Sɚ_86ONCbxۢ6xk~l+۶q̛:6k~6\ ђ fC[1>{8m͏wk6fWx0J*<V P~j.i gC[OmX?F4mnri6b~jrpl9lQ}'W:roR,ђcR'c|h+s/ǼSv5p>5pl9lQ}'Ɵ7b_\zLϽvOm5\˽P%nsgͯp 5#LJ5?>mh-[N5u[#TϽ <+=% Qz-&gۖ} i|" {]impu"k~\>7y !5? !߽j`Sɚk~\>w8K1oq̻1o[7u(lފJ۞?okm)oc(1arӨMr  8?f6F4??O-mxk~Tƿ_Rxƚk~ S55?>mnCnrgʜڰBڊ܋35?>m3+||ې1mCL4w8NQdJO]Dp݆P Lܵ8E G+=뚯 ׏w>mIŏmV4w5#؇\ЅJp(i=INGS ACCOUNT BALANCE"+e$+" $$######.##";BALANCE PRINT USING s$+" DATE OF LAST TRANSACTION"+e$+" &";LAST.DATE$ CLOSE 1 27099 RETURN 28000 REM EDIT A RECORD print cls$ print " EDITING RECORDS "+s$+"* ENTRY DATE: "+e$;date$ 28vZsn~I͋&R(p~̚0oLJ 9[V #6ɥeXVKyd/zuncȶװF4qA*]{hOS8cwtZ.W~\k~?MΟ;p6/_5pl.oNCnC>q8K?Ln1Q7oci=)p]85?>m'Sk~025 print " EDIT PAY STUB OR DEPOSIT RECORD? "+s$+"(p/d) "+e$;:RES$=ucase$(chr$(conchar%)) print IF RES$ EQ "X" THEN 28099 IF LEFT$(RES$,1) NE "P" AND LEFT$(RES$,1) NE "D" THEN \ print ovl$;:GOTO 28025 IF LEFT$(RES$,1) EQE G5p>5\6j5݆Yuˢnl3wZ&h ZLJ5?>mh-[N5=`ihUc|h+s/怭+= (F L7hOS8cwtZ.W~\k~?MΟ;p6/_5pl.oNCnC>q8K?Ln1Q7oci=)p]85?>m'Sk~ "D" THEN 28500 INPUT " PAY STUB CODE? ";CODE$ PRINT GOSUB 23500 REM SEARCH ROUTINE IF FAIL EQ YES THEN 28099 GOSUB 30000 REM READ RECORD GOSUB 31500 REM PRINT RECORD PRINT 28050 gosub 3400K BALANCE print cls$ print " BANK BALANCES "+s$+"* ENTRY DATE: "+e$;date$ GOSUB 29000 IF ANS EQ EXIT THEN 27099 if end # 1 then 4080 OPEN "B:BANK$ACC.DAT" RECL 50 AS 1 READ # 1,2;BALANCE,LAST.DATE$ PRINTv STAR.BASX  !#"$&%'()*+,.-/02143o56789:<;=>?@ABCDEFGH USING s$+" AS OF"+e$+" &";DATE$ PRINT USING s$+" CHECKING ACCOUNT BALANCE"+e$+" $$######.##";BALANCE PRINT USING s$+" DATE OF LAST TRANSACTION"+e$+" &";LAST.DATE$ PRINT READ # 1,3;BALANCE,LAST.DATE$ PRINT USING s$+" SAVIKJLMNPOQRSTWUVMM""LjI5{Za"@Ռ{heMhsssObSC DIĵo@{"XJ3 0iF05f@HH-ZfBH5{= E67=  dhQkܳs~LͩmIZ~ alv0I6'n/ ~$qO+罧ix&f{Zalvati Iم1z }{@+evM| ]+@ݍϟYh9fn}C#A{y[EݍϟYh9fJ7>|;20X|03b]vOSXhםSY\h /;i xލҹ`/$Ne!!8L "/1i*AI1dn=Ma`/$Ne1ݶ{ٚ²Ne6D@Y*b{+jUܹI{I7ֆ~z=*KV% XWԪDQ=ソ),sz'Ne*Eyyd< I% t c33Xsn1Fo$>Χ=4v}]&q:C#aw7egbgsz{F?{iU9D _Q~_Q~_QsOKFƙn=a0I6':FWӤ!ѩUE=FZ(A|QEL-),.K0Od+jU%ɰy0KZsskC#ȝo2鶥WԪKh; Lե h ܂K=b` i-Pu* "ae=Ma`/߻_:lE{D֩,?!$z޿?!$zIy6^%=V%0I69al~ѹ),lE{|iUU(ܓ=ソV% XWԪDQeL:ԈwOCoYOO)CtӤ:8΂mNe6DWԪ4L]k`',8vG;a߾E4Ҷ`/i -Pu* "ae=Ma`/߻_:lE{D֩,?!$z޿?!$zIy6^%=V%0I69al~ѹ),lE{EM READ RECORD FROM DISK if end # 1 then 18100 READ # 1,RECORD; \ R$(1),R$(2),R$(3),R(1),R(2),R(3),R(4),R(5),R(6),R(7),R(8), \ R(9),R(10),R(11),R(12),R(13),R(14),R(15),R(16),R(17), \ R(18),R(19),R(20),R(21),R(22),R(23) RETURN D֩,sOSX?!$zS !3T͵^Q^QGy,{+jU(wiu*!$z{O{EʒGOd+е Xa܍}>a9K?ܹ'M-Ƌ{r@ Կdm~@k~yOSX.Ƌnx'u*u*!$zש̆y&xǗZ $II7G瞦\}YOzOZI|Og6^Y2B{+jU|O 30100 REM READ DEPOSIT RECORD if end # 1 then 18100 READ # 1,RECORD;ACC$,ACCOUNT$,AMOUNT,DATE.DEP$ RETURN 30500 REM READ RECORD FROM CRT RESTORE PRINT " NO DECIMALS PLEASE " PRINT FOR INDEXA=1 TO STRING.FIELDS " {גӤTX=Ѥ_X֏Gj%,M=4eY:Ne15[=S1>4)$>Χ`/S !=m(|V}BHZZZZZZ ʣtcsG<5?yʣt-SOƏVVVVVn Ρӆ~%]ۖx READ H$ PRINT H$; INPUT R$(INDEXA) NEXT INDEXA FOR INDEXA=STRING.FIELDS+1 TO NUMERIC.FIELDS+STRING.FIELDS READ H$ PRINT H$; INPUT R(INDEXA-STRING.FIELDS) NEXT   INDEXA RETURN FOR INDEXA=1 TO NUMERIC.FIELDS R(INDEXA)=R(INDEXA)/100 NEXT INDEXA RETURN 31000 REM WRITE RECORD TO DISK REM THIS ROUTINE MUST BE ADAPTED TO YOUR FIELD SCHEME if end # 1 then 19100 PRINT # y.net=r(11-sf)-r(5-sf)-r(6-sf)-r(13-sf)-r(15-sf)-r(16-sf)-r(17-sf)-r(18-sf)-\ r(19-sf)-r(21-sf)-r(22-sf)-r(23-sf)-r(24-sf)-r(25-sf) trip=no if try.net<>r(26-sf) then trip=yes:print bell$+s$+" WARNING!"+e$+" FIELD DATA IS INCONSISTENT." return 1,RECORD; \ R$(1),R$(2),R$(3),R(1),R(2),R(3),R(4),R(5),R(6),R(7),R(8), \ R(9),R(10),R(11),R(12),R(13),R(14),R(15),R(16),R(17),R(18), \ R(19),R(20),R(21),R(22),R(23) RETURN 31100 REM WRITE DEPOSIT RECORD if end # 1 then 19100  rem * password installation * 5555 print ovl$+era$ print ovl$; print s$+" BLANK DISC! "+E$+"SET UP PASSWORD."; create "b:" recl 50 as 1 print # 1,1;8," " close 1 print:print bell$ 5500 password$="" print ovl$+era$ print ovl$ PRINT # 1,RECORD;ACC$,ACCOUNT$,AMOUNT,DATE.DEP$ RETURN 31500 REM WRITE RECORD TO CRT tot.ded=r(11-string.fields)-r(26-string.fields) ded.per=int(tot.ded/r(11-string.fields)*1000+.5)/10 print " (field #)field name * more data in window; if end # 1 then 5555 open "b:" recl 50 as 1 read # 1,1;number,the.word$ print " ENTER OLD PASSWORD; "+s$; chk=0:atog=1 5505 number=0 if constat% then number=conchar% if number<>0 and number<>13 then password$=password$+chr$(nu #2 -->" print print h6$ print using f6$;r$(1),r$(2),r$(3) print h7$ print using f7$;r(2),r(3),r(4),r(5),r(6),r(7) print h8$ print using f7$;r(8),r(9),r(10),r(11),r(12),r(13) print h9$ print using f7$;r(14),r(15),r(16),r(17),r(18),r(19) mber): \ print s$+chr$(8)+chr$(150); if number<>13 then 5505 if password$<>the.word$ then 5020 print print ovl$+era$ print ovl$; the.word$="" print e$+" ENTER NEW PASSWORD: "+s$; 5515 number=0 if constat% then number=concha*.|g"IZD\DK *I.9*I.>w*I.|w*Iw# x9 zDO STAR$ Loading * STAR * CLUSTER * SYSTEM * $r% if number<>0 and number<>13 then the.word$=the.word$+chr$(number): \ print s$+chr$(8)+chr$(150); if number<>13 then 5515 5520 print # 1,1;number,the.word$ print e$ close 1 date$="" return 5000 rem * star enabling program * if end   # 1 then 5555 open "b:" recl 50 as 1 read # 1,1;number,the.word$ close 1 print cls$:password$="" print:print:print:print:print print s$+" * "+E$+"STAR "+S$+"* "+E$+"CLUSTER "+S$+"* "+E$+"SYSTEM "+S$+"*"+E$ print:print:print prcatio o sourc file i desire rea th chai statement fo th correc intermediat fil names Afte compilin th modifie fil i ca be given the proper name with a renaming program. INITIALIZATION Th syste i designe t int " PASSWORD? "; chk=0:atog=2 5005 number=0 if constat% then number=conchar% if number<>0 and number<>13 then password$=password$+chr$(number): \ print s$+chr$(8)+chr$(150); if number<>13 then 5005 5010 if the.word$<>password$ thru wit progra dis o driv "A an th dat dis o driv "B" Afte installin disc pres rese an the Afte th loadin title hav appeare ther wil b a request for a "password". PASSWORDS Initial Password E * STAR * CLUSTER * SYSTEM * Th presen versio o thi syste i growt ou thre othe relate financia programs It growt ha no bee systemati no balance i application apologiz fo ignorin certaiver blan data dis is give th passwor o: for a blank data disc I th prope passwor i enterre ne promp wil  characte transparen t cp/m th syste dis mus b copie b th cp/ cop utility Pi doe no recognize thei existance. Th "autost call fo "crun2.com a "do.com so "do.com" should be left on the disc. I modifi appea requestin th ne password Password ma b numbers word o eve b sentences Eac dat dis ma b assigne a individua password. Note Thi syste i secur onl agains casua snoopers Anyon堠 wit littl knowledg  v'ACCOUNT.BASk  "!#$o&%'(*),+-./0124356879:<;=?>@ABCDEFGBTy*^U|^m$ kU P!eĆPC!@zྫྷf b(SoD^đ<}Y9iLe&qHfeĆ B!Sz=Op_VN S@U P!!C <}Q'/*Ez=raFy ʉ EYϸS Fy<}rb;E3npHIJKLNMPORQSTUVWXYZ[\^]_`acbdfegihjgvK{_@)b^{=Dh6t^)JR$W=!f4@*3_9@eRpfz(];+*_vKj(<{=sf%o3Jó{x`ΌҵRdm $^OS-x28?$Nm ^g 3z|=dgb^{=<{C=r;z_Og:M^DvDs*իDEd+b *>/Ԑ*^Bm#i_[/TUy!U1B8|?ժ!By8"{}EI4Gd/*8?#aJ<^Qw#z=<=ݖ*[zy8"{-U^Gdx i79-]^Wy"M^&I8f&!4 )Y5CjRBlnpf- :MC֋8?jp[HqF,Y/ ج叚WHax&<-fyN^DWЋxd!`q 2W:M^DOp_:M^Drb I"& f!iྫྷبbbZ oD`{^&B/"[9Q YJ<^& ʉ*^ƪPBpiྫྷبbVZĆX4W:MܗU P,BŶaTNeF/G7$2^"|03:M1gV_/Y5ސx8ijpV%7|UV\78UV6,H\`g/w4zuM1f7cUV6𯍙øXZ,hP:M &3<32aLUV60}܂zu}0c-q4YgL3Gk1UY٬ߌ3zu=m<}Q'/ӼPNY`4V{=Op_T !ó_kyxOp_yyeHϘ~   zྨ5Bk`0ī/~[)ٯ^gG;IJM-h^zx Z.fۯ^}Ho>w7t~z=D%a,X:g" H#, @[T`}(. G%um%otp.]ٛ]);3J_W9//^ç/~QJhd<$!WQ-*>/h!Id×!#=zulF/Է*>/g\F#ի<}Y9Q Ų*>/\F#իDEd+'6x EEd3hp#}g28D^& ʉ*^(Uyf%o[lf.K4zʉ*^ŪPY06$zu'/+'6xbU|^(g{"^& ʉ*^(V?KZ8#oıiྫྷبb;Dá%xnQJhd<);k׫CK>׳^y=!;6:}w ; ޗ QJhd<0;// \x[_> 苇UT,*j F*^{u;->l֟" 7^X<ЫӤܟ2䱽,P.;7Ƣ"23yfܫӴjXb QFҐV  BR {u'/+YT -C6"R2"D+rN\xpDw#CW xi+o蝿A zu$xXEQ/<}:M a{#"/Hqy:M ˈ eFڈ >^[_xiBˆ >Bz&3ŔL1}zWyg)3ŔEcWgnϳW _X1ytګt2r ={m[1ytګDEdCWrvzz{i CV_v<{u@`- #$W%xnB^ۭiGttګ<}⵼۽[!^~>w:L1gvK{_RTn}WIYHq"W g),CϳM1e4͓wL1:M}^& Weyk䝧'/8@k=^{zv0"GAö_dm ۆ$-P6 IQg#aа+ٯiz0%bu^hjOp_'bJ'^gbyzu'/PNYR`gOyɪW xrbC? U,iAyC"/BZ[ eM8oDvb#,o7877,,%oqt!Ǒ$篊{uP6ބ|!IdHىbaS % .׆88rbkW:MVxlmHB3*>/$X/2X8ix (6t6l4W)kx`S*>ib^& ͩWNeeo_dmCȃ UмP!N0z ΟjU(];izuZtlTij ^C٫Ӥ!)=ZMlmHyi?^#4HLӫӄ/MY)={|4Kߞ ={ mŧtk$Wi""3f[WЋȖEYqI"gWi{i?KZ4wHb{(Z_[ۆ${u;$W xrDs*ի<}Y_Xۆ$tcUмP!"78bdF9xiBVL&iE78+x $^({ CbUмPovUsr <{=Op_9n:n}F#àa^- <}$ѼO @g ý2 ٯki 4i n rbC? U,iAyC"/BL %Eޫ<}9Bys*ի<}Yxې$ːq*h^'_d=O?{<]4CWЫDEdK"LBxې$g~*h^(/0,G79Y f]{u!I4!݄ߐn^ER!Id Qxې$2i(Ѹ~ib:M Οi:Bz'=[/[ WЋȆx-d7X{u^&ENq$gq!{ xې$rNq$*vNf4Op_V66$l!ř_SȥH 4Op_E8x2 pjKi?4 3XGː I" ^&IЫDG٫<}9B9xiྫྷlmHeH8W4/T/qZ;'3J{uAHۆ$-8( I"i:B*L1:MaW_s٫ӄ/, #$WI⵼ߐn4Op_hNzu'/+{ xې$xmUмP!YϸSk:MŠI$ggK^g/1 Z^xYh̜Ūy/b^-A:6ۡyzz=s.tN׵<{uAHۆ$-8( I"i:B*L1:MoH7amHy,P4s~0(=> ڗl=^#^2^&B/"^&B/"{ xN i!݄oH7ګS?B:L1Nq!!Idۆ$9ÿ0yt)V^&B/"[qdV!I26$e<7/778^^:~9zysS3x(QQƣq#^`}sl=_a:[On^:yftt3K{_R$]rzuƬ=> 4HL4MN o|ЋȆ|ݫDE^#4HLt{^MN6BګӤum=óG;^z"2Ge;^W 4/,]D]޽ Gҗ.E"O=>eDc9Gd~_35 z=Op_VNiv{s%}*vxv%okyߐnyi:B*}:M^Dvw"S liXđDq (rFzu^&ENqz7g\F^&IW xrDs*EHcFyQvޫ<}YYđh4_UмP!NE3npVɌҵs*իӴBV66$l!ř_GQdmHy,Pkن_X1yt@eemC8XItwt0>~0m_=> vczw^KWD蝿Kw)zrlD]Dtڗl-xب^VI,cp*E^ k(<- kkzY^~0z=Op_9nzVJvڗl <}Yxې$f!I4-T"$޽zx+{umm=xګӤtۆ$kNӳx-gi \D GAö_dxy4AbzwIǍߐnzuliXđY I"*mCȼWЋȖE慲xHߪy8$cDx{u9KtjFxHcFNm ^z4-HوeĿQ3/rk = 1ޣAޣAx  ѨqǑjEޣAx_[َ8[4/ԛϕbI =|b(VdRpޣA!s Rd=aG iྫྷlĿfxMnz;vNpDw#C <}4=;ñիӴ<[ rzuorOSAHnpF,x&EȤ޽&wrܫS?BymLm ұQ]ϳW xi \ #$޽R[Uޙbzu9n:2|H^~>wNeexiX4/ԛݱY%EwDVz(|Q'^"FJ%Ei \[aEY#$޽R}CNS0"KfcFy](];/(];_ Q:MGh^CӫӴ4s&syy}Ռ]ϳW)3ii^^_a5|k)ګ@'um=CBV\ ):"o ԫӴBVv7byMnE& 7{][q/>_xMp:MLwwlD(];[_hdXk %oCϳW 34zҰ#Z9oD Tۆ$yN")[8$Xf.QE(ѸߐnصW 3zKDzQv^n^9G%tt3 ޗlֵ՗l-L1ѥ+"{c#%zoF>fʭr4x_2^^_EuWg9KOx-e3b1t~z=sfK^yzn/=KϘгC0gv{ KϘt3 ޗlhdcF^dm'@<{U =}~N")[ ߍ(2)w778ޫ==:MܗF? T+r ^& "mg;Ȫyތ}KI GK;i n XI;zyNS0=a|{4 1ޣAޫ#,f/2x4n߫DEdK"LB9Qx y9$QC #,߫<}Y LԂ iŪxeU5zT:SԌ23xT04sMGc ӑzt3S3+ӥ!W'aJ#àaW ^*/<{]yZ|oH7:MGh^ϳWЋΘn=_^&B/"[qd9$QC Qƣ^&B/"4m#4|:MgI^&Ib&㞭&,n_W'Czi!ќ <}4Op_VvF  & *h^'_d=oU(];Op_6ܗBFehGŪyޑc/b^NplD=PzQ'^a)aWdz=~BOpIz=~OyXX~vڔ3 թmCᓊ I"WrzuhDW I"a^emH9 :ÿ^")[orgQ<ܻ! WexyoCOAbzw^&B/"4Op_y›pn!Id[_8$ b(9ż6\Y|97U^& WЋȖEdmH I"rFƍˍ Οx{4ˍ Ο4zx[>ܗ e28#3D*h^7cdz|Y;'Sx8"{;YEz=<;ñId!ʎ8bE&=:M le8D6byMnE(Ѹ~N")[or-8(#,߫ӴBVvlEE&F{uG_?  Ο?iBtګӤ?n Z^oH7:MGh^C4lo7^&B/"⵼ߐnWi{i?KZ4wH^y:M% mCիӴ<[ vګ̙]4/Qdxy4s~veK^;^z=ޖu=zྫྷ l8~C^f-Ԩzep ^f-4s v#|гWЋVyf-(2kܫӴZg3 /IoD:M ˬnuERvFƍ{uY5-AHLCi?4 :Mܗ#$S'^& ȿY06$l7[4/Tz ߪ9QvNz]m'/+{"oDvFf~fɿbUмPovUs2U## _T Wi蝿^geV3+i L.~vWX K^ϳW%x^mhzzlmHB3xې$X^&D|aóG;ńE#>)*i7͎h;^?aW@)/94VVi>^&V$C W%S̱qq)89$cj x4r 4,yPlF4/ԑUBzxې$xxrb j*v^,oH7eF4/[J$npeF4/\b?KZ8#oı!@Ed+'6yQ 5dUABbFҐV * *D;@Ed*{m)xrb %Wyg$ #4HL3Ŕ3Ŕۭg))܆)>~z8)>Yn;SLzSn,g!1@E^{u#*>ep~'S[;{)/_3q忘x&S ,,%=E1f N11^Ƙ9 <^0}܂4a9$C Nc 8`!`!rI0 ! WI6i^(#qy7) nYl87Gn~3vO틬Dqn=yX9pI09$C N08$ci>9$ciC1 4_HC(T45Kn}5C_Re?jW>)ЋȎhNh^ܗ!Ioi#-z.I Gk#z=sv{fa鹗/~x$y2_ED*h^7cdz|Y;'S[tlTC<}z|=~Jys/nK7fӾdz9__Rz˥MY/~4! +&3|sବ6rz^{uǍ!^+Y iZDc)geo7^#4HLgq  =[/;#7 WЋȆx-d7biFh^{ule7@Ò&͎bUмPovUsrN$ۡy:u>X <}4-,c1ڟr#ګt =^jENq'аdS#)/;$MWyz8D:MǑ$rXcϼzule8$| KMz;v{u 1]Ӊ}g4iBڣ/q$˟Ogn~#aL~yQ45!}3ń49G Ø3b }[OS4zҰ#qU~HaxUo3wirMN6Bk}Z,ikL1?nB/"I񷅵l&,1{=Op_hxho kLYbڪyB/qZ;'3J{uAfxiZXbg?8ÿp{=~:M leφlGorqdmH9y8DiZ!e+{6g8DvFp q4oDbE8${mӋ leφ 7n>%&ܻiZX}npާ3 78q npi{u1#Ib8Dgky4! +&\mବ6244CWMN6H%7(VdRpPyN[}KV/n=CC{u 1=SLN$ۭtbq n߫Ӵȟg 34W ӭg[X ^#4HLtMEd!xcUޙbb=!H v^'7K O4m#4|[P%-zmB& Abj$Eq$ާ3 W٫ӄզzu!IdV%U{}48DocGȽ:MGhn]t=[/;#7 WI&3Gx{ulr#,_8D.3J>fiC !kN Z^oH7WaHٟOgnγW oA4mC<d9npV =:M啬t34M팬t3:uqcײ Yթ/,oܟ5/gӫLgeT9:#ۭ^&)g!4zȃMYb^&^F?4m#4|[?KZ׶3XOa!/%f {=Op_Vv 4,ٟ2E3vFnAnN1k#,_!?i""!^˭d&aǑ$r^&B/"⵼ߐn:<^CgI^3X8,-C<}9By Hg{ *h^'_d=O*vNf4zb񷅵l#f>V fw~Y;'4Abgc1իӴޟ_>CC^{u3Ĵ*h^?ժ9QvޫӴBV%7(VdRpPyN[}KV/ܖw4Ab =O'Hʋ:M ,{/ܖw4AbLqtӫӴ4zҰ#ӼP6g&-#b24!Eo3^#4HLWy:]Oa$FR^- YҢ6L1?8| Kzu{/BVl8Ύ#f>QȤG*WiF^HrE#ãG/i;+իtvbzu97dmy缳W _X1CgexګӤ?n Z^oH7CN {uܫBoH73ԏ 1z&NqMN}aG[wUn>{ǑƢ^5_<}9By ʎc82v 4, *h^鋬gVɌҵ^&7x7.H{-X`mH9UAB#hg*vN?plD=PzzzuG[ח?{M9ÿMݫӴ<[ ߐn­9?;Ê%o?ܽ:M oH7}:ÿpz^ERqI"| KbEq$  ܫӴBVv?cFqφx+26${uAHnpn>%&ܻiZX}npާ3 78q npW o>+/^&D|aŤ2Fƃ^&qcײ GXl%[ &UABcUs2Uc#%zxGd׫իӴ[e۫DEdCWP:M kmjEgq!{ulec1Z6mCV fw6x/b^#4HLCtbql,_zzuS^3 :M X =gӫSྫྷ 782p qŪQV/ܞw4-,>+//oE(cxYxy}Y|F9ÿ^:ep~'SPFn;^geުQ/ܞ=^ER i""rN$ۭtbq n߫Ӵȟg yghhN$[Di?nqc7^{u 1ݺBi?nB/"[ WЋȽcUޙbz=Op_V{yޑc˪9mH;"{;YZNNl?MӫS(Q8G#I^&)g!4zWЋȦy`"yN1>"S liXđc (rFzuܫӴ>~Z,ik[b܄^D6 f<}9By fb!L%G*h^7r 9 ^&?n>^aW_s٫ӄ/T&r9޶q%kN1ky%! :M,t猬t3:#4HLy:?nqc7^2#Idq$rzu |w7X3 ?^SCi""| K  ҍf!I4Wi{i:B= =yЋȽ:M^D4,,('memHqI"i""rN _!8#3D*h^7c˪9W X <}4-,c1_xDE={i2۽:M^Di?KZ]=#m0^&8$ |4%-zm]i㞭t㌼k ƌ~ K_Op;A`w8,}=r<$c`}/3vƱ置w\+d=SL1g'/+=$!`'1|w;Ď݌Urpf06,,%x<}YvzKwK䇿Wwe|xr,-='wU~ޭ*蝿## _^&,pWiayYxy}Q/CN2?go%3 c1iZXaEY9ÿ0CS^rN2wϒ'^&B/"[aV m,{uPFnk[X ,nAn`0ī/~{gN1kY l9:MWYwU**wUWY?o[e<xr,-='Wy{=_置^ۯ^[_'/By ˱tp|N~ޫWyWy_:U~kez^ܗcn>_^_nϻ*_5f2cg^&Es hNྨxOp_ZtlT<}zx+{L1`; }_e*[NN~~뫬kUUUޫ+U߫Wrzuuޫk諬U*w*wիӤ\ǭ?n| KM`0ī/~{gN1kY 醌!Id^q$\npWI,ik =OҍYŽܫӤ:M^Dr%G÷i""rN i/qxu ++_sNbʩ^~>w;Ś -sNbнޯ^WXz y^{m^{s/^{KϽ`:{pxk(,=}{>v{>v+,=}my yܫ@{=sv{fa鹗/~z nܗ$/h^({6bG-T eGؐ!Ǫó_F^јQ3ǍWNEd9WBSƯ^&)g/qN i/qxzGcGPBlcGP Y/hZzupޫS'"ܫS_!e"OY/hZ^:MS^D)^&EN i/qxuFRe?j^~/+ߋh>e:gN|ʸWI,ikzlo7gf4w/5"kgvM > 7}HCz('/x?%x28?{=Op_ya!2l-Uy-&0F+rȳ**lU~%k  Vep~/{=Op_'qr`0ī/~(zJe+[=B2tK CWuʗl > x  rbEhԘ0lUМ!"k1|RK2 ug`E/~?xGd^3+ӥ;6:Jim%o%|< hfa""{?/z8Op_y==UDdE?RZ[}P C0gD0Jc}г}zz=Op_'bJep~'zdfaR'/PNl_[&0FZ4' ug`E/~?xGd^3+ӥ;6:Jim%o_} 30xc;6:<}EDW=BC0;6:Jim%oC+W(}'/CWuʗl > x{=DH {(];+ٯWbW~lk堠 o programmin ca writ progra t cal thes file tha ar transparen t cp/m ENTRY DATE Th syste use th "entr date t creat an cal u th prope histor file fo expenses incom an ban files Thes fil`0ī/~(zJe+[=B2tK CWuʗl > !Bk'/GH4%| >+%D0[h>{=Op_9ó_kг}"Yx{=Op_'bJep~'zJ4 30xX^K2t38k/~xrԝD eHN 09/25/82 09.25.82 Whe th syste searche fil fo a entr dat i doe s wit numbe relativ t januar 1,1900 File therefore ca contai mixe formats. I th "Incom an Cash syste i als1y_xf#P - 4zB{=s.]`pۥሬY[}ܗ$/h^({F⨅-tQ EoH7TdjK =Oh Qw4/aIn GHoUB̙o!馅}@0E?RZ[}P C0gD0Jc}г}zz=Op_'bJep~'zdfaR' generate th da nam fro universa callende goo fo 1900-1999. SYSTEMS MENU Ther ar onl fou system activ a o now Mor wil follo soon hopefully Thes ar al men driven. Accounts Payable System   Thi syste handle bill due pai an genera expenses I als handle checks bu th check system is not complete at this time. Account shoul b chose fo norma expense a wel a credi account i yo pla t us t Checkin ha no ye bee incorporate a don't use checks. Sorry, it will come later. Income and Cash System Thi syste take ove som o th function o th "Account Receivabl System an wil b par o ne accounh dail cas reconcilliatio i th Incom an Cas System I system a i th others th defaul entr fo dat i th "entr date". Accounts Recievable System Thi syste create record o pa stub an ban saving t receivabl syste alon wit "Th Ban o Harry whe completel rewrit th whol mess. Al income shoul b entere here givin accoun number t al norma source o income hav se accoun # u fo specia an checkin deposits Eventuall thi syste wil a i stand wil b replace b complete reorganization. The Bank of Harry Thi syste i th resul o jok man year ag tha too hold, hav nee t kee trac o statistica analysi b anothe program I therefor wil as coupl o extr question whe makin entrie t thi accoun number storein the i fil calle stat.dat Us th exi optio afte thes extr question an wha eve man smal loan tha make Sinc thes ar no interes loan ɠ hav mad n provision fo interest computations. Saving hel i othe bank ca b kep i thi syste a loan t thes banks Th reaso fo doin thi i th extr answer wer the will be ignored and not stored. Daily Analysis System Thi syste wil lis dail expenses income and changes in assets. Th "Cas Reconcilliation optio compare th cas o han o th previ tha th "Cas Reconcilliatio System check thes record i attemptin t accoun fo cas flow I outsid ban transaction ar mad withou entr here the wil b kicke bac a bein an unaccountabl expens o income. ou da t th cas o han today takin int accoun al expenses income an "Ban o Harry transaction fo th "entr date" Expense pai b chec wil b ignored. MORE TO FOLLOW Agai apologiz fo th gros unbalanc o    thi system I meet som o m peculia needs wil brin i int mor genera balanc a tim goes on. Comments and suggestions would be appreciated. Woody 1123 1/2 Sutter San Diego, CA 92103 may 1982 ?[? xwah mh Yl-^r /#U?[pW~-A wB4*'ZpF8rőR}rEG7h={-ElY&lѹg{=!Z+g=-W =ށlTrZ\7؛"d"r,w\zOfHp0y-ngHp0y-ng{Tr4r~n=?|^=AzgHpEHMHFgÅ^nqa͖+`lFzgHp%fmJG|:,-\ϖ+R Z!"d E>sgHp~BAzbP#CE̖+ us8 RGzgHppicH\n^ϓ;%| gv FINANCE2.BASK o !"#$%&(')*+,.-/0123456789;:<=>?r\n\P,B͒2d~?h-W =EGpOGtħ7[@z#i͖+t(?]#|:|yrEG|:P!tS}2[8R:!2MtħCz_>[萎tȣqwv~,YOkgm΢_;Ykgm_r`\A@BECDGHIFJ :e.Ôw\!2O?[=ʏ>1\!=(Tg*4{<`yaC 槑?W`0COg'ϵC\ڍ ZϹsw^r\Fϖ;\;TJ -WH[-˵2OaC &׎L%l&Zxl-h‹K xf=}wvs(/B=[@z@#&h=PrţqﹶjuŌZ#eIhkoyw:}\ϖ+݌־N-: x7TNC‡ 7\yɿs%PYG7&wsGqrőؔ|=/ȣsϻG7&־tzxT-Wh트B7G>Pޭ}.}\A #0E?P|y>[ {[ ?ZD֞eΖ+ &HW7[8Rp}Nf >EG?[Xأtwz;[Xx)d>ϖ+݌ns=\qWC=[Z.`,y͖+`Z͒>[nqy -QHWG[8RHw|?/ȓN-W<7\[ZJ>-W):r7eZƛ-W)ZK/_N-W)rI}gߔo~-W =ށf{)f>|ylbQ~ϖ+!}(?*=ݥx䧡Ζ+G`.G7&ܩFWqPϖ+ &5,y)K^nqy 8`h,[\l&HWGݶ!r7wQa6E wH]lο99!;s-G7&wsm(cS:[8Rop"]~\q%2~SDturőEo [-W@#_xӥBGr4r~C=GҎq`G`o\q-B.5trő"|B7=/[\CWȣ͖+!E.;[ {[ ?ZD֞eΖ+ &Ef HY2[xVgw,/6%;x7g% l͸ }v劎 oz [GȱڳLrrށl7[@zgRhb"]-w>7yKs£Gkhny\{>ײo^yy7gg]#|7=/+GChE:3[xt3n^}ϵE-<6zp;z\zZ34rmtzxT~G> us̖+)lο99!Y̖+݌}ϵU ϣ8 MlHY`R)aAtlHY`Ry.dl9?>HטEӁyl-Wl*g˝ףl͸ }v劎 o7 E-ElY&lBk`Z@tuf\1Ch=ϖ+\9Dyݶ+GE? z~}\g4x>C1C~xr,W͖+h9Z-W;NGGٰk-K[\qrߧ.>O=\ϖ+fRh$ܣE:c;[|t3n -[Kp%XxgP-͖+rߧwgHpxm>Tl89yyɳ  -͖+M kӣţlX[-<]SK?fh@Ŷ+f`7Ccg k-ՙr5Z؇{HWglg˝Z"]@-w)RQ~l-ud `o-{r-Gtu 8?s \!#S̖+M kN ~p>Z1[|tٶ_rő"GxMw_m[>[8FΏJOw)p>鮼r<[xt3nﹶj1}5[8Ru-WyzkZZZyCk鯥m_+g-~-_K?/kZy~-OgZ<*G rq9-͖+ &E"ij!}rk y -f{}EHr5[@zC+r% \ϖ+9vQpa=Jdgf˝Z͖;l9}]o˄ٶG7&~iZxfnMwks8Z-W =hĿQ/tJv>tJv#E:%z1Nxl-w"=l"?NnhN劒MeletJv`o-w@#G?)nX<)ٙl͸.WhÕlh\HW7[ r7wm;-ٶm{vE+h.]r-+5[+E1C 7#^zP:%;Cðx S3Nf˝Hp`ypEl7Cw\E9v͖+r5\./=d(-w++ls-Wh0.ZxlpEtuw lB Tp6r>jS!k\"] g}ޯkZy~쿖~~1[8Fο>g[\R\n #k5t^o\QA f='-Wh-L^h̖+"]IGtuwf}Y r"]lHYxSYx,p>[S5toBd}m(ZfHp~W"]]s>gDΖ+{tlۨ{rxDZسG`-+͖+|-l}-PZykgr~_K?_K?ϋ>Zy~^_K?r nߣFW\nGtu 8ZسG`-+͖+xT}=ZxlpEtuXrxDy~쿖~~|gHpFsgk_K?۾ 89d CZyrDtuMr`G7&wsGqrőؔ|=/ȶ}\q<*6őN?Nn\燲tJv@:%lHN.7/4r!lHN. Y؛-W))٥|9 #lHN.'aAfnMkS ZEtu "wSyg=v:}mkF߯]0?w,çlZy~^ϻ-W =́G${ow\ţl͖6l;r }2Y`lJg2lbϖ+$>ZƳo7d<}=ZxlpEtuXrxDy~쿖~~|gHpFsgk_K?۾ 89d CZyΏCl͸ \[<ؔΖ+&2aAd46DZ?Oϖ+r }2Y`lJg2lbϖ+$>ZƳo7d<-W)rI}gߔo~,0#ExhaAJ-W) LbDGrɵLe)st 0[xt>l9Zx"i㎡-Wh-L^Ktul!  BCEDFGHILJKOMNFML1,*c[40MجuRi`6qJM\QlnepnQA7KoWn]=${hQ)M,?Z #-e~]Xx7 bVB sPi`[`zt w 7 L VSl-?ݺ{4Hi`?݂ |Sl-k[r7 HKiqL[Pז{4zc?݂ܣA{?݂ Ԭ((=$2xeu-=$2ouA}!Gw|G1俤uIn]`֎K*ė7 ݺkmv|U8xw|?bi`:W)>jҎrwЭ]$nt9ܿ7 ݺޱMaw|RҘ㻦@n`5ŭtKcEDMC}%ٜy(6߫ߦsY[P닺ěvԖ딸1딿i`r=,"\1Zхua7QlWM粰(hKi`"bixWzԑe~G1m뫧VrKw*'IE K_\QMsᜃ(zHgg3`G<vP:i`2O=Wπm>(2U Α3l7 LnUOA gM[zJpn ʟ (U tvfggxoXCZk{Lѭ9Voybi`_;Ű|tkΩ*J2݊v{[i`__vTFINANCE3.BASP o !#"$%&')(*+-,/.1023456879:<;>=?@A__o@4K75T__Ro@כ6P4⎏s gw||/(%zMOb?HwvN]~Va4CJU6P=Nw-!VGCQo@W@W@W@כ9/qCZP}}guj("soX뫧\]CՌyi`k ]CL۸i`]列{"  P}}ˊ\X|M[kK| pq p~b5 i`U9/y(66f1Gͧ㣥7 bs (MH{ы,EeyvC!7 ˦s%7 L^7 nB.5K!T<8{ov픿i`]vrY yq޻]X|ˋMEyoqo4.[^rߢzڛaQfps%%STJ\)ILj_N4iW`FQ)7s<1J-ҿ[}BG+FQ)7s%^bWrMZKnvqZ[A/ UpMF&/nSlSRdoPv\"[)7 ˾_8;F{){xJ pJ }J -ժۜ7 l ۇ{JB7)J|7 LQ=[T6PT΅E4⎏oy9[i`_o{(~In xW8;Jn x0Mgs^/Q\3C!ժۜ7 ˖m]X|yi`roB딿i`"SEs-_WKoqcoPE$ƤH7 K| 7 R͉u}MÁj_4hDxMÁTnsJ>qIcz%Rs%^JyJIu".iLZXN|?hsw_84(,Q픻.eS\3p m}U\JiPv݄\jj-;8&R=3.,4uҷF_n{pzNzFri8/SEh[Wcoj'ɛ-SEh{(".H @8osi8:N}\";%ɛ'&N7 O^d xe MÁ)yi8e_Wq".iLZ{0TnsZK6#6JMÁ.j_qIc#ˋ6y.,4Dw+J7 hB/Bo^-/睻{pDʷ/I>@qg8n{p`˩]U@yl\Zui8PnsE>3ЋѷQ-\כe򱜻_-Nň7  -ժۜ.Tn3oi`?Fz4{8ҿ^[i`_n@כ6P8.:4(Jx{ɮUqzmi`_޹6ps K 6P 9-+T9pbXW=p-yi`_ozNkyBix 9ת8FWJaU=女Sn7 ocoX4"< }Mr]~6W}Mr*?zUqQpΩUq؛7Pr{MÁ/e* Ԭu*> 7 ҷp}`zmђ'4z~)"i`]օjm|,'.,4/e*gߺ4JŎo]hV؛[ZU9ؿ^[I7 oM%P47 l˩V(%z (/MCDyo(6{5nSl>7 bs 7 !-.UG[q#$t+#  7 i^ V%~&~VHV7eE.,nz#Vj oͼi`iy?݊s휐ЭP4. 5㦬ȅwHVЭPGRVxkM/L\o~J͆n26R?bfn2ݒF҄\jVHV8/󦁅nz~J͆n2#} lHV8/󦁭!w~;E-:mF@H(i4/'(/Zu7[(6T)6费>K͡kměFHVJM^.,&JJoEQl.,,Y ??, [꿂\˅N40?݂ܣAݿ p/waG7נ7 bsa]x5v1Q\dL17 l ۇ{JB7)J|7 Э8<_MgC!ɋLϵL!іix%Ry ;qM![f4s_K@כ %%STJME p[40-o*%mU>FM>P]us4)JIu ypa i`_oE oxo*Ib_Y`Qln i`_ޯW2(cA yfFb꿼9nv(wΛ6P  o@כFQ)7 bs 7xIb_.䜫5~B}tD8$z\͓ Mr*?zUͅeZp؛wBŷ춾 ݊V57!*˼i`_I 9K6; Mz꿼o{i`_@H(i#m}7 l{3G@H i`_oض~a'![fkkw9;oua_)꿜޹ 7 bs 7 lM9o@6QTJMM$1^|PQln?e i`M벛KR3wa7 nB.5K!T<8{ 7 ˦i^ )F{i`]?saMQ)7 l "s4e$y(6{3OSlWm=&L!˴6.($  6{(.ބN!zJx=os![i`(6{3O$1fbX)"QlnQ\3˽ /B/BJZw JVH(MFޛy(IL"ТRFޛFqϜzxM#5gpR Nj5S6epʶfp*U); Nq28eǓ=QV)S6O28e N|40Ji`[ཙ犒|^/6ozr-k7 bs 7 l˩h9W9W¯+6J~8JCBB}(*Go*3PneMFޛy(IL"ТRFޛFqϜzxM#5gpR Nj5S6epʶfp*U); Nq28eǓ=QV)S6O28e FILE: -FOG/HAK.014 CRC = 00 00 --> FILE: ACCOUNT .BQS CRC = B2 05 --> FILE: AUTOST .COM CRC = 53 BD --> FILE: BANK .BQS CRC = 0A 7A --> FILE: DISK .DOC CRC = C9 7B --> FILE: FINANCE2.BQS CRC = 56 F6 --> FILE: FINANCE3.BQS CRC = B6 1B --> FILE: INCOME .BQS CRC = 10 AF --> FILE: STAR .BQS CRC = 13 5A --> FILE: STAR .DOC CRC = 47 82 ---------------------> SUM OF CRCS = 52 53 ally initiate STAR upon a cold start. Squeezed BASIC language .BQS files may be unsqueezed using utilities found on FOG/UTL.003, .004, and .014. Jim Woolley FOG Disk Librarian March, 1983 .003, .004, and .014. Jim Woolley FOG Disk Librarian March, 1983%  ne Group (PhOG). FINANCE2 and FINANCE3 are on this disk. FINAN1-3.DOC, which describes the system, and FINANC1A are on FOG/HAK.013. Also received from PhOG is the STAR system, described by STAR.DOC. AUTOST.COM has been provided to automatically initiate STAR upon a cold start. Squeezed BASIC language .BQS files may be unsqueezed using utilities found on FOG/UTL.003, .004, and .014. Jim Woolley FOG Disk Librarian March, 1983 .003, .004, and .014. Jim Woolley FOG Disk Librarian March, 1983 DISK.DOC FOG/HAK.014 First Osborne Group (FOG) Hackers Disk This disk contains several BASIC language business programs. Included is part of the FINANCE system received from the Phoenix Osbor&  '