' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmxӜ ( Ҡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`(0):DA$(4)DA$(1):DA$(5)DA$(2):Z0:I0:J6:18002:D%1:DS0r1/18050:YX(.5Y31):18010:DSDS1:D%112215x1/1/DM$"SL"MD11/DM$"SD"MD21/DM$"DB"MD31/DM$"AC"MD410DM$"MA"MD51 0NN0:1H0NDSTE0:HO0:12612212660:12700:N:N125:M06:I(N,M)I(N,M)O(N,M):M:N:0/ID$I$(0,0,K):TS$I$(0,1,K):DL(I$(0,2,K)):CB(I$(0,3,K)):SV(I$(0,4,K)):AD(I$(0,5,K)):DS$I$(0,6,K):DR$I$(0,7,K):DM$I$(0,8,K):DB(I$(0,9,K)):AS$I$(0,10,K):NN0=1/18030:DA$(3)DA$0,J0,K))Y):EY(N)RD((I$(1,J0,K))Y):I/.RIR4((I$(1,J0,K))1200):g/.T$"D.":19100:F212000/.O(0,3)0:N125:M06:I(N,M)0:O(N,M)0:M:N:K1N%:12140:K:12800:2000<0l/12205:MD1:N125:12380:EY(N)O(N,1):N:12270:N125:12360::18002E..I1:JJ0I01:Z1:18002:18050:LL12ZXY31:MMMMLL:Z..11990:DUPS(L)t..RI0M0RD(P0DU):..M0RD(P0RI((1(1RI)(DU))1)):..L12((I$(I,J,K),2))((I$(I,J,K),4,2))((I$(I,J,K),2))31:(/.J0J01:EX(N)RD((I$(RF(N)I(N,4))PA(N);-L.RP(N)0(YO0N1)I(N,8)0:11855-M.I(N,8)(I(N,6)I(N,4))RP(N):I(N,8)100(((1I(N,8))(1(N1YO12)))1)-O.N:-.I1:J10-.JJ2:P0(I$(I,J,K))J2411976-.RIR4((I$(I,J1,K))1200):11986:..I1:JJ01:Z0.N1NT%:I(N,0)I(N,0)D(N):I(N,1)I(N,1)S(N):I(N,2)I(N,2)P(N):I(N,3)I(N,3)AX(N):I(N,4)I(N,4)CM(N):I(N,5)I(N,5)PV(N):I(N,6)I(N,6)FV(N)::-J.N1NT%:RP(N)RP(N)RP(N1):RF(N)RF(N)RF(N1):PA(N)PA(N)PA(N1):I(N,7)0:PA(N)0I(N,7)1200(΍(13)(4):D$"BLOADHDR"D$"BLOADCAT"D$"RUNCF"U10:110{ d:10:"INSERT YOUR CREATIVE FINANCING PROGRAM DISK IN DRIVE #1, THEN PRESS ANY KEY TO CONTINUE.":K$::10 n12:"CREATIVE FINANCING":12:14:"BY HOWARDSOFT":14:14:"IS NOW LOADING":18:8:"PLEASE WAIT FOR COMPLETION.":33- rD$ERASED. IS THIS O.K.?";:K$:K$:K$"Y"5~ (4)"INITHELLO"::10:"DO YOU WANT TO PREPARE ANOTHER DISK?";:K$:K$"Y"25 !:10:"INSERT YOUR CREATIVE FINANCING PROGRAM DISK IN DRIVE #1, THEN PRESS ANY KEY TO CONTINUE.":K$::10 ZFL0ė: YOU CHOOSE? ";( K$:K$:K$(49)90: K$(50)15C FL1+ :10:"PLACE A BLANK DISK IN DISK DRIVE #1,":"THEN PRESS ANY KEY TO PREPARE THE DISK":"FOR USE AS A STORAGE (DATA) DISK.":::"WARNING!";::" THE DISK IN DRIVE #1 WILL":"NOW BE ."D$(13)(4):D$"MAXFILES1" :::" CREATIVE FINANCING BY HOWARDSOFT COPYRIGHT 1981 BY J. E. HOWARD ":10:34,3::"YOU NOW HAVE TWO OPTIONS:":" 1. START CREATIVE FINANCING PROGRAM":" 2. PREPARE A NEW STORAGE DISK":"WHICH DO   K0:6)K". "LA$(Z%(I%)1K):::I0:28005:30075:q`ˆ34,2::(1((40(LA$(Z%)))2))::LA$(Z%):34,3:9::=$::_LB$"READY TO TRY AGAIN?":30035:KY$"Y"ĺ:27000@_ y_20:LB$"READY TO TRY AGAIN?":30035:KY$"Y"32660_ZZ10ZZ0:2000_:200_** MENU ROUTINES **4`Z%Z%(I%)1:35010::"YOU HAVE "K0" "LA$(Z%(I%)1)" OPTIONS":::K1INSERTION!":32520A^~"/DISK FULL! INSERT ANOTHER DISK.":32520]^~"/FILE LOCKED!":32520^~768:211:" / CHECK DISK INSERTION!":32400:32300_~:(7)"INSERT PROGRAM DISK IN DRIVE #1":"AND CLOSE DRIVE DOOR!"::"PRESS ANY KEY TO CONTINUE.":KY8:*]~768:XZ(222):32400:FF1F21:t]~211:XZ32455,32455,32455,32460,32462,32462,32455,32464,32466,32468]~"OR CODE=";XZ:32520]~"/DISK IS WRITE PROTECTED!":32520]~"/NO SUCH FILE ON DISK!":28005:32520^~"/CHECK FOR PROPER DISK RACTER PAIR: "T$:10:34,6:24::" PRESS ANY KEY TO SEE MORE, ESC TO EXIT ";::35,22:7:E$"CATALOG"SS$:35,24:958:34,3:216,0::\~** ERROR HANDLING **\~216,0:E$CL$:\~FZ9ĺ\~216,0:D$CL$:F21Č998:998]~998:998:998:95$,1)(46)G$(J)(G$(J),(G$(J))2)<[~G$(J)(G$(J),25):n[,~J3T$"S.":J26J30T$"H.":J31T$"A."z[.~32480[1~LB$"SEE DISK'S LIBRARY FIRST":30015:KY$"Y"32400\6~::"WARNING:"::"USE ONLY A FILE NAME THAT IS PRECEDED":"BY THE CHA:22000:SS$",S"(48(I$(I,0,0)))(SS$,3):MA1:NA2:I$(I,0,0)(48)(SS$,1):22000:SS$(SS$,5)(48(I$(I,0,0))):Z}LB$"READS FROM":FG0LB$"WRITES TO"Z}::"STANDBY";::" WHILE COMPUTER "LB$" DISK!"::$[~LE$(G$(J),2):(G$(J))2(LE70:JOJ:IOI:KOK:I$(1,0,0)G$(J):I1:J0:K0:Z%Z%(8):I%0Z%Z%1Yk}22000:JJO:G$(J)I$(1,0,0):32270:32145:IIO:KKO:JJO:F12ıY}30000:KY$"Y"ĺ:Y}32300:AX0:KY$"Y"İ26970Y}ZZ0:32105xZ}MA0:NA7:J0:I$(I,0,0)(48)(SS$,3,1)68:FG3ĺ(7);XD{-X|** DISK ACCESS **:X}FD0ıX}FG3F1FG:LB$"STORE NEW ENTRIES ON DISK":30015:KY$"Y"FG1:J1:32050:FD1:FGF1X }X2}Z0%Z%:F0FG:FG2:32100:FGF0:Z%Z0%:27000:31500:Xd}F12ıXe}ZZ0:I%1ė:10DYi}322Y$(59)WmyKY$;)WnyL$L$KY$::31010CWwyK176KY$"1":31085NW|y31070gWy:K046L$(L$,25)vWyLE(L$):W {(112)(110)3ıW{31550:LL(0):31555W>{FG3ğ:(7)"STANDBY: COMPUTER IS PAUSING TO REFRESH"(7);::W?{XC{36,0:8          ;yL$(L$,LE1):KY$;:31010-VEyK11331105RVFyK046K132Ğ:(64K1);:31086dVJyK06331095yVOyK189L$Y$::VTyK178K132L$N$::VYyK14731085V^y(7);:31010VhyK045K041K046K082K05831050WiyK046(K144K158)KKY$(13)ıUlu30055\U{uLB$"WHICH OPTION DO YOU WANT?":30030:(KY$)1(KY$)K030075bU|uxUy** DATA ENTRY **UyK061UyL$""U"yKY$:K1(KY$):K144K15831085U'yK13131080U,yK1831045U1yLE(L$):LE1ĺKY$;U6yLE231005VY$"Y"KY$"N"KY$" "ı#TXu30035UTYu:LA$(20);:30031:KY$"Y"KY$"N"KY$" "ınTZuKY$(13)KY$"N":yT[u30041T]uLB$"PRESS SPACE TO CONTINUE, / TO ESCAPE.":30030:KY$(32)KY$(47)ıTbu30045 Ugu:LB$"PRESS RETURN TO CONTINUE.":30030:Z%(2)I0I1:28005"Sgm31555:>S/u** KEYBOARD UTILITY **cS0uLB$"CHANGE ANY OF THESE":30015S?uLC$"WANT TO ":LB$LC$LB$"?":30035SIuLB$"PRESS ANY KEY TO CONTINUE"SNuFG3Ğ:(7);(LB$,39);SPu:16368,0:KY$:36,0:868:TSu30030:K27280RjI$(I,J,K)"RjJ:32410FRjFG0ĄEX(N),EY(N),EZ(N):27297uRjRD(EX(N)):RD(EY(N)):RD(EZ(N)):27297RjFG0ĄD(N),S(N),P(N):27297RjRD(D(N)):RD(S(N)):RD(P(N))Rj:32410Sem31550:J035:K010:I$(I,J,K)""::J:31555:Z%J,K)):27215QLjI(J,K)(QOj:K:32410]QTjI0IU:K0KU:J1135:FG1ĺI$(I,J,K):27225lQVjI$(I,J,K)QYjJ:K:I:32410QrjJ00:J15:27275Q|jJ03:J125:FG127275Q}jJ325:26300:27280QjJ00:J113:27275RjJJ0J1:FG1ĺI$(I,J,K):)::J:I%2I0I1:27070&Pi32410QPiD$"OPEN"T$G$(J)",L36"SS$:FZ1227120PiN124:D$KY$T$G$(J)",R"(24NNN):FZ1127290Pi27295PiN1YU:D$KY$T$G$(J)",R"(NNN):EX(N),EY(N),EZ(N):27297P@jFG027220 QJjK0KU:J125:FG1ĺRD(I(00jOiD$"OPEN"T$G$(J)SS$:D$KY$T$G$(J):FZ4I0:(FZ4)27220,27210,27200,27250,27260,27270,27290,27295~OiI0:FG027070OiI%0I0:J06:27063OiJ035OiK010:I$(I,J,K)::J:I%2I0I1:27062Oi32410PiJ035:K010:I$(I,J,K7NQiLE9Č998:LE49Č998:LE89Č998:LE129Č998CNUi958:RNZiZZ21ė:nN_iZ1ZZ:998::958:Nwi** FG=0 FOR DISK READ, 1 FOR DISK WRITE **NxiF20:J1:32150:32450NiKY$"WRITE":FG0KY$"READ":E$"UNLOCK"T$G$(J)SS$OiFZ10271L$"N"L$"E"22090%MPVL$"A":22090@MTVFG2ĺPS(38LE));:VMUVXX15:PC70XX8zMVVXXPS(XXLE):(ST$ST$,XX);:MWI$(I,J,K)""MWKY$:KY$(13)ıMWI$(I,J,K)I$(I,J,K)KY$:22510MR]MPiZ%Z%1:ZZZZ1:998:998:LE%7Č998:ZZZZ11VLB$"WITH A VALID DATE:":22066KL2V998:958:(7)"RETYPE "LB$;:22022vL6VL$(L$,1):L$"O"L$"C"L$"E"22090L;VL$"E":22090L@VL$"AM"L$"IO"L$"GP"L$"RR"L$"VR"L$"RA"L$"CO"22090LEVL$"MA"LJVI$(I,J,K)L$:22000MOVL$(L$,1):Z(K$VZ1900Z:Y31Y1X12X122065KK%VY30(X4X6X9X11)22065`K&VX2Y2922059wK'VZ4(Z4)22057K(V(Z400(Z400)Y100(Y100))22058K)VY2822065K*VY2922065K+V26960:22090K,VLB$"IN DATE FORM XX/XX/XX:":22066!L1),2)"E)"22070/JV(LA$(Z%1),1)"T"22080NJV(LA$(Z%1),2)"N)"22095yJVL$"SL"L$"SD"L$"DB"L$"AC"22090JV22085J!V(L$)8(L$,3,1)"/"(L$,6,1)"/"22060J"VK08322059K#VX((L$,2)):Y((L$,4,2)):Z((L$,2)):Z51Z10022049IV26960:K03722040GI VL(L$):K036LRD(L):21052:22090IVK037L(L200(L200))2:L(L200(L200))2:LR4(L):21054:22090IVK035LMM(L):21050IV22090IVK046K063K05822090IVK08222050JVL$(L$,2):(LA$(Z%:31500:AX022010:HU(ZZ16(ZZ16))0FG3İ30025:kHULE7ZZZZ:(ZZ17(ZZ17))0FG3İ30025qHU}HUFG2ıHULE%(I$(I,J,K))::"RETYPE ENTRY (RETURN IF O.K.):";:HV31005:(L$)0K113L$I$(I,J,K):998:958:IVK082K083(LA$(Z%),1)):FG122004-GUK046İ22500:>GUI$(I,J,K):gGULE(I$(I,J,K)):LE7FG2ĺ:ZZZZ1GULE2(K062K035)I$(I,J,K)"YES":LE3:K063I$(I,J,K)"01":LE2:K035I$(I,J,K)"12/30/81":LE8:FG2ĺ:ZZZZ1HU22100:I$(I,J,K):ZZZZ1)48)LB$:XY(XY10):XZXWLB$(46)LB$:XZXZ1HFZRXW2XY021088F]R(XZ3XZ7)(XX1000000000XX100000000)AZ0LB$","LB$:XZXZ1F`RXY0XZXZ1:21079FcRXX10ıFfRXZXZ1:XX0LB$(45)LB$:FiRLB$(48)LB$:GU21000:K0(4:21056E?R21060(E@R(L$)0L$"00".EARUEDRL$((L.5)):(L$)2L$(48)L$[EERzEFRXX(100L.5):XW2:21068EHRXX(10000L.5):XW4:21068ELRXZ1:LB$"":XY(XX):AZ1:21076:AZ0:L$LB$:ETRXY0LB$" ":XZ2:2FWRLB$(XY10(XY102PLPZPTİ23970ODQPLPL1:23890:PLPL1:S$C$Z$;::LB$::23890:ZZZZ2:kDRFG2Z%Z%(I%)Z%Z%1D RZ%Z%1:(LA$(Z%))31LB$LA$(Z%):20950:21002D RPLPL1:23890:PLPL1:FG3ĺST$;DRZ$LA$(Z%);:D:R21060DR2106ԠԠ͠Ԡ͠ԠٍàԠà̠Ԡ̠ԍçΠͧŠؠͧŠ٠РΠؠ΍çΠçΠԠԠŠŠōàҭؠͧŠ֠Ơ֠Ơ֧ԍԠ٠ҭϭɮ٠ɭҭҮΠΠٮ̠ɭҭҍΠԠŨҩԠ̠ΠҭؠԠ֠ƠԠ֠ƠԠҠƠҠƍԠԠŠԠà٠ΠΠŮӠΠŮԠΠŨԩȠčҭؠӍ͠ԠŨ̠֩ΠԩȠčРԨ֩͠ԠЧӠ̠֩ԮӠƠ΍̠ҭϭɮ̠ɭҭҠŠخ̠ӮçΠӮԠӠŮҭؠȠ׍ŠӍӠӠŮǠӮΠŮԠٍŭؠӮؠԍР֧Ԩ̩Р٠ōǠŮǠŮԠЯîԠ٠ō̠Ӎ̠̠̍ή̠ӍԠ̠ŮŭؠȠ׮̠Ӡō̠Ӯ   (D$(0),2):DA$(1)(D$(0),4,2):DA$(2)(D$(0),2):18050:ZPZ:YP(.5XY31):lC@VJFG1:19045}@`JFG0:N1:19045:F21NUN:NNU24:D(N)0:S(N)0:P(N)0:@aJ@eJT$"L+":FZ12:27000@jJT$"L-":FZ13:FG0:N1:27000:F21NUN:NNUYU:EX(N)0:EY(N)0:EZ(N)0:@kJBAJ19120:FG(I$(I,J,K),2))51VV1000000$?FO?F18095:U0:18090:VUĺ:22065:18154o?FL$I$(I,J,K):(L$)818160?FDA$(0)(L$,2):DA$(1)(L$,4,2):DA$(2)(L$,2):(DA$(2))51DA$(2)"1"DA$(2)?FYY23D%1?F18080:@8JFZ7:FG1:T$(T$,1)"/":27Y$KY$(47)L$:LY:21055:KY$KY$(47)L$:b>FJ02:L$DA$(J):DA$(J)DA$(J3):DA$(J3)L$::>FU0:18090:VU:U3:18090:VUD%1>F>FU(DA$(U2)DA$(U)DA$(U1)):?FV((I$(I,J,K),4,2))100((I$(I,J,K),2))10000((I$(I,J,K),2)):(1060:DA$(2)L$=FV=FZ(DA$(5))(DA$(2)):X(DA$(3))(DA$(0)):X0XX12:ZZ1|=FY(DA$(4))(DA$(1)):Y018055=FYY31:K0(DA$(3)):K05K07K010K012YY1=FK03YY2=FXX1:X0XX12:ZZ1->FLZ:21055:KY$L$:LX:21055:KA$(3Z2)"1"DA$(3Z2)0QPLPL1:23890:PLPL1:S$C$Z$;::LB$::23890:ZZZZ2:Z0RFG2Z%Z%(I%)Z%Z%10 RZ%Z%1:(LA$(Z%))31LB$LA$(Z%):20950:210020 RPLPL1:23890:PLPL1:FG3ĺST$;0RZ$LA$(Z%);:0:R210600R21064:210561?R210)(D$(0),4,2):DA$(2)(D$(0),2):18050:ZPZ:YP(.5XY31):[/D~"OR CODE=";XZ:32520fD~"/DISK IS WRITE PROTECTED!":32520D~"/NO SUCH FILE ON DISK!":28005:32520D~"/CHECK FOR PROPER DISK INSERTION!":32520D~"/DISK FULL! INSERT ANOTHER DISK.":32520 E~"/FILE LO35,22:7:E$"CATALOG"SS$:35,24:958:34,3:216,0::QC~** ERROR HANDLING **eC~216,0:E$CL$:qC~FZ9ĺC~216,0:D$CL$:F21Č998:998C~998:998:998:958:C~768:XZ(222):32400:FF1F21:$D~211:XZ32455,32455,32455,3246026J30T$"H.":J31T$"A."*B.~32480dB1~LB$"SEE DISK'S LIBRARY FIRST":30015:KY$"Y"324007C6~::"WARNING:"::"USE ONLY A FILE NAME THAT IS PRECEDED":"BY THE CHARACTER PAIR: "T$:10:34,6:24::" PRESS ANY KEY TO SEE MORE, ESC TO EXIT ";::22000:SS$(SS$,5)(48(I$(I,0,0))):SA}LB$"READS FROM":FG0LB$"WRITES TO"A}::"STANDBY";::" WHILE COMPUTER "LB$" DISK!"::A~LE$(G$(J),2):(G$(J))2(LE$,1)(46)G$(J)(G$(J),(G$(J))2)A~G$(J)(G$(J),25):B,~J3T$"S.":JJJO:G$(J)I$(1,0,0):32270:32145:IIO:KKO:JJO:F12ıR@}30000:KY$"Y"ĺ:s@}32300:AX0:KY$"Y"İ26970@}ZZ0:32105(A}MA0:NA7:J0:I$(I,0,0)(48)(SS$,3,1):22000:SS$",S"(48(I$(I,0,0)))(SS$,3):MA1:NA2:I$(I,0,0)(48)(SS$,1):STORE NEW ENTRIES ON DISK":30015:KY$"Y"FG1:J1:32050:FD1:FGF1K? }?2}Z0%Z%:F0FG:FG2:32100:FGF0:Z%Z0%:27000:31500:?d}F12ı?e}ZZ0:I%1ė:10?i}32270:JOJ:IOI:KOK:I$(1,0,0)G$(J):I1:J0:K0:Z%Z%(8):I%0Z%Z%19@k}22000:>y:K046L$(L$,25)&>yLE(L$):=> {(112)(110)3ıW>{31550:LL(0):31555>>{FG3ğ:(7)"STANDBY: COMPUTER IS PAUSING TO REFRESH"(7);::>?{>C{36,0:868:FG3ĺ(7);>D{>|** DISK ACCESS **>}FD0ıE?}FG3F1FG:LB$"86=JyK06331095)=OyK189L$Y$::D=TyK178K132L$N$::U=YyK14731085g=^y(7);:31010=hyK045K041K046K082K05831050=iyK046(K144K158)KY$(59)=myKY$;=nyL$L$KY$::31010=wyK176KY$"1":31085=|y31070Y$)K030075<|u(<y** DATA ENTRY **2<yK061<<yL$""b<"yKY$:K1(KY$):K144K15831085s<'yK13131080<,yK1831045<1yLE(L$):LE1ĺKY$;<6yLE231005<;yL$(L$,LE1):KY$;:31010R21064:21056+?R21060+@R(L$)0L$"00"+AR,DRL$((L.5)):(L$)2L$(42500:K:I%I0%:T$T0$::12:" STANDBY FOR COMPLETION OF ANALYSIS.":22:34,20:~*dK18030:Z1:18002:Z0:18080:VU19330*xKZZ1:D%1:18010:D%019320*K*QFG2PLPZPTİ23970*QPLPL1:23890:PLPL1:S$C$Z$;::LB$::23890:ZZZZ2:)JZ%Z%(7)1I%:35010:FG0:I0:FZ0:J1:T0$T$:T$"G.":I0%I%:I%1:32050:G$(0)I$(0,0,0):NT%(I$(0,2,0)):P0(I$(0,3,0)):J02:D$(J)I$(0,J4,0):SH(J)(I$(0,8J,0))::I0:K0:J4:18000R*J18050:ZOZ:YO(X):J5:18000:18050:ZSZ:YS(X):K15:(2)(L$,2):(DA$(2))51DA$(2)"1"DA$(2);(FYY23D%1H(F18080:n(8JFZ7:FG1:T$(T$,1)"/":27000:(QJT$"L-":FZ11:27000(eJT$"L+":FZ12:27000(J19120(JFG0:I0:FZ0:J1:F14:32050:F10:N%(I$(0,0,0)):N%1F21F21:(JF20:(DA$(U2)DA$(U)DA$(U1)):'FV((I$(I,J,K),4,2))100((I$(I,J,K),2))10000((I$(I,J,K),2)):((I$(I,J,K),2))51VV1000000'F'F18095:U0:18090:VUĺ:22065:18154'FL$I$(I,J,K):(L$)818160+(FDA$(0)(L$,2):DA$(1)(L$,4,2):DA$05K07K010K012YY1*&FK03YY2F&FXX1:X0XX12:ZZ1&FLZ:21055:KY$L$:LX:21055:KY$KY$(47)L$:LY:21055:KY$KY$(47)L$:&FJ02:L$DA$(J):DA$(J)DA$(J3):DA$(J3)L$::&FU0:18090:VU:U3:18090:VUD%1&F'FUбӍӍӍӍӍӍӍӍӍύύύύύӍ ōŰӍӍӍӍӍύӍӍӍӍӍӍӍӍӍ  xFD%018047I%}FL1(DA$(0)):21060:DA$(0)L$:L12DA$(0)"01":18047T%~F18049w%FL1(DA$(2)):21060:DA$(2)L$}%F%FZ(DA$(5))(DA$(2)):X(DA$(3))(DA$(0)):X0XX12:ZZ1%FY(DA$(4))(DA$(1)):Y018055&FYY31:K0(DA$(3)):KRFDA$(3Z)(I$(I,JZ,K),2):DA$(3Z1)(I$(I,JZ,K),4,2):DA$(3Z2)(I$(I,JZ,K),2):(DA$(3Z2))51DA$(3Z2)"1"DA$(3Z2)$VF$ZF18040:18080:$nFDA$(2)(D$(1),2):(DA$(2))51DA$(2)"1"DA$(2)$oFDA$(1)(D$(1),4,2):DA$(0)(D$(1),2): %51Q9Q9100`#dBZZQ9Q8:YY((BB$,2))((AA$,2)):YY0YY12((AA$,2))((BB$,2)):ZZZZ1#jBXX((BB$,4,2))((AA$,4,2)):XX0XX31((AA$,4,2))((BB$,4,2))#nB#PFI%2I1J3:Z0:18002:I0:J6:Z1:18002:I1:#QFZ01:18002::$F2)L"BO(N,3)O(N1,3)O(N,1)AY(RR(T(N,4))(YE12)):AYAYRR(T(N,4)):c"BMD3YEYF:16930" BYE6:N1(ZF)YEYF2""BO(N,4)O(N1,4)RR(T(N,5))O(N,1)(RR(T(N,5))(YE12)):"\B"^BQ8((AA$,2)):Q9((BB$,2)):Q851Q8Q8100 #bBQ9N,0)RD(HO)!A!A3!AI$(0,3,K)"E"TX(N)0S!AI$(0,3,K)"O"TX(N)T(N,2)s!AI$(0,3,K)"C"TX(N)T(N,3)!AO(N,1)RD((100TX(N))O(N,0)100):!A!AO(N,2)RD(O(N1,2)O(N,1)):!AMD3YE11.5YF:16910"AYE6:N1(ZF)YE11.75(YVZZ:YVYY:SK1ī16858K ANYZQ12YQZQ12YQZV12YVNYZQ12YQ:SK1 ANYZV12YVZQ12YQZV12YVPP0NYZV12YV:SK1 ANYZV12YVZQ12YQZV12YVNYZV121YV:SK1 ANYYFHOTENYHO:16820 AHOHOYFTE:NYNYYF:16864 !AO(ԠӍϠŠƠŠŠӠĮҠŠΠΠӠĬԠĠŠӬĠŬŠӠƠĠ٠Ġ®ԩĠӠƍҠĠҍΠѮԍٍĠ®ԍ̠Ӎ̠ҍĠ٠ҠǠŠǢ٠Ԭ̠Ҡ٠ǠAAHOTENY$ASK7ī16864>AHIHI2:HI35ī16866ATE(I$(0,HI,K)):AA$I$(0,HI1,K):BB$I$(0,HI1,K):16988:NYZZ12YY:AA$I$(0,HI1,K):BB$TX$:16988:YFYY:AA$I$(0,HI1,K):BB$LP$ A16988:ZQZZ:YQYY:AA$I$(0,HI1,K):BB$SD$:16988:Z12YVZQ12YQZV12YVNYZV12YV1:SK7FATE(I$(0,11,K)):HI11cANZFNN1:HO0:16864tANN0ī16802ANYYFHOTE(NY1):16820AHO(YF1)TE:NYNYYF:16864AASK7HO0:16864ANY12ī16814AHOTE12:NYNY12:16864,K):BB$I$(0,12,K):16988:NYZZ12YY:AA$I$(0,1,K):BB$LP$:16988:ZQZZ:YQYY:AA$I$(0,1,K):BB$SD$A16988:ZVZZ:YVYY:SK7ī16788ANYZQ12YQZQ12YQZV12YVNYZQ12YQ:SK7ANYZV12YVZQ12YQZV12YVPP0NYZV12YV:SK7+ANYZVjANNZQZQ12YQZV12YVYU12YFHOTEYU:SK1:16864UlAPP0YX0NNZVYXYX1nANNZVZQ12YQZV12YVYX12YFHOTEYX:SK1:16864pANNZVZQ12YQZV12YVYX12YFHOTEYX:SK1:16864rA16864tAvAN1ī16792dxASK0:AA$I$(0,116864VANNZQ1HO0:168640XANN0ī16740ZATE(I$(0,7,K)):HOTE(YF1):ZQ0ZQ12YQZV12YVHOTE(YQ1):SK1:16864`AZV0HOTEYV:SK1bA16864dATE(I$(0,NN11,K)):HOTE12:NNZQZQ12YQZV12YVYU12YFHOYUTE:SK1:16864812YFSK1:HIYU-@APP0YX0NNZVYXYX1^BANNZVZQ12YQZV12YVYX12YFSK1:HIYXDANNZVZQ12YQZV12YVYX12YFSK1:HIYXFAI1HI:TE(I$(0,7,K))(1(I$(0,8,K))100)(NY12):HOHOTE:NYNY1:I:16864RATANZFNN1:HO0:     z#??  ȮҲ Ҳ Ưı  ϯŰĮҲɮҲŮҲƯҲүҲӮҲ  ӮŰүŰ ̮Ҳ ŮŰ ϮŰɯŰ ůŰ ̭Ű̯Ű ƯŰ! įŰ"ӮǰȮǰ Ӱ ǮŰ̮Ű ĮŰ ɮŰ ɠAǮҲ ̫Ű ҠƠ\ ΠZ Ҡ!Ԡ"Ӡ  ӯԠCZ0:J4:18002:Z1:J5:18002:D%1:18080:D%1D$(0)D$(2)ı:(7)"INVALID DATES! PURCHASE DATE MUST PRE- CEED SALE DATE. PLEASE RETYPE ENTRIES."::30025T$"G."T$"G.":AX1:28000:FG2:5850AX0:5852 FG2AX1:31500:300$(0)SS$:FG3500N!AX1FG3ė:"THE FOLLOWING DATA MUST BE CORRECT IN ORDER TO CONTINUE. IF THEY AREN'T, YOU ";::"MUST";::" 'REVIEW/CHANGE GENERAL INFO'"I0:K0:Z0%Z%(1):J00:J16:MN1:NM25:9550:9000:5900:KY$"Y"5857NK1:Z0%Z%(1)8:9400:K0:Z0%Z%(1)9:J08:J110:9551:5900:KY$"Y"5140K25:Z0%Z%(1)10K:9400:K:Z%Z%(1):FG2AX1:31500:30004:KY$"Y"AX1:5130K32005I%2:J110:T$"L.":5975:I%3:J18:T$"D.":5975:I%4:5950:I%5:5950:SS F10:FG2:500'<:21000:(58)::q*FG--0=DOS READ; 1=DOS WRITE; 2=DATA ENTRY; 3=PRINTOUT; 4=VIDEO OUT.FZ0:AX1:FGF1:SS$SS$(0):40000:Z$"":23600:KU0:I%1:AX1:23785:KY$"Y"5120FG3İ58505300T$"G.":28000 5850:F14PC(PO$(15))? K0:J32:20500:24710:PO$(2)Y$3040h G$(25)LA$(1)" ("LA$(2)")......": SS$SS$(0):Z%0:I%0:FZ0:FG0:J1:T$"G.":27000:F21Č211:"/NO SUCH FILE AS "T$G$(1):F10:FG2::30025:500 9000:23000:F14İ30025&A$(22)"PRINTING FORMATS":24500:I%0:F14:J3032:Z%J15:3900:SS$SS$(J29):32105:SS$(J29)SS$:J:Z%21:LA$(22)"DATA TO BE ANALYZED ...........":3900:J1:SS$SS$(0):32105:F12:SS$(0)SS$:5900:KY$"Y"3020 23700:K0:J30:40000:20500:24700E CURRENT ENTRY BY PUSHING RETURNKEY; DISAPPROVE BY TYPING NEW ENTRY.":23:FG2::30025:F12:5000w ZZ10:32650 :10:"(STANDBY WHILE ANALYSIS MODULE IS READ":"FROM THE DISKETTE.)":E$"RUNAN,D1" FG2:PL0:AX1:F12:24000:AX1 Z%22:L1000,2000,3000,32507: PG0::C$(32)(13)::10::"INSTRUCTIONS:":::"SPECIFICATIONS FOR YOUR INVESTMENT MUSTNOW BE ENTERED. YOU MUST EITHER APPROVEOR DISAPPROVE EACH ENTRY IN ANSWER TOTHE COMMAND 'RETYPE ENTRY (RETURN=O.K.)'";d "APPROV$C$:E$C$D$:CL$"CLOSE":LA$(121),G$(35),P$(5),PO$(17),LB$(67),I$(1,35,10)R 32350:G$(1)"EXAMPLE0"::G$(30)"SETTING0":G$(31)"HEADING0":G$(32)"CHOICES0":G$(26)G$(31):PO$(15)"40" I%6:K04:FG2:F10:35000:Z%Z%(6)1(KY$):35010:(KY$)(MNX))2:MM(X)(MX(MN(X))) Z%(0)22:Z%(1)37:Z%(2)54:Z%(3)78:Z%(4)92:Z%(5)97:Z%(6)102:Z%(7)108:Z%(8)116:Z%(9)121:D$(4):C$(13):S$(32):SS$",S6,D1":SS$(0)SS$:SS$(1)SS$:SS$(2)SS$:SS$(3)SS$:Y$"YES":N$"NO":ST$" "L C$SZPd*CREATIVE FINANCING.....COPYRIGHT 1981 BY J.E.HOWARD.ALL RIGHTS RESERVED. nRD(X)(100X.5)100:R4(X)(10000X.5)10000:RR(X)1X100:RT(X)100(X1):PS(X)(1X(1X))2:R1(X)(10X.5)10:MN(X)(XNM(NMX))2:MX(X)(MNX                         2000:J:J1:18000:YY1:J04I$(I,4,K)Y$E0%I$(I,6,K)"YES"9530i2%L$I$(0,1,K):I%2L$I$(1,3,K)5%18155:YY3:18100:J8:Z%Z%(0)9:22000:9800:%I$(I,5,K)"YES"9610D%9710N%ZZ0O%Z%Z0%:JJ0J1:22000:J:I%4ı P%5900:KY$,0))0G$(1)I$(0,1,0))#R$9440:J05:I%2I$(0,1,K)D$(0):I$(0,2,K)D$(2)^$9500:y$Z%Z0%:I%2I1:9455$FG2İ23889$:21000::Z0%Z%1:(58):ZZZZ1$ZJZ%(0)11:(LA$(Z%),1)(37)ZJZJ2$*%Z%Z%(0)1J0:JJ06:2^I0:40000:ZZ0:9450:Z%Z%(0):5939:N%08040=`K1N%gd20900:J00:9500:5900:KY$"Y"8036ngKhZ%Z0%:30004:KY$"Y"AX1:8030m32005:(#NT%(I$(0,2,0)):G$(0)I$(0,0,0):D$(0)I$(0,4,0):D$(1)I$(0,5,0):D$(2)I$(0,6,0):(I$(0,1A$(5):L(DA$(2))(I$(0,2,K)):21060:DA$(5)L$:ZJZ%(0)11:YYJ10:9850:Z@I%58010ET$"I.":II1T$"C.":II2T$"W."F8020JT$"E.":II1T$"O.":II2T$"N."TZ%Z%(I%)II:Z0%Z%:23786:KY$"Y"ıY28000:FGF1:F21F20:1I$(0,8,K)"MA"ıvZ0:J6:18002:DA$(3)(D$(1),2):DA$(4)(D$(1),4,2):DA$(5)(D$(1),2):Z1:18003:U0:18090:VU:U3:18090:J11wUVUU10000:I$(0,J,K)"0":JJ1:7031KxLJ11(DA$(5)):21060:DA$(5)L$:DA$(0)DA$(3):DA$(1)DA$(4):DA$(2)D:Z%Z%2:21999:J33(I$(I,J,K))10ı16062CJJ1:Z%Z%1k(I$(1,3,K))8I$(1,3,K)I$(0,6,K)x21999:NM372:MN360:(I$(1,6,K))0I$(1,6,K)"365"21999:NM100:MN1:XI$(0,8,K)"DB"Z%Z%(3)11:J9:22000:J10:22000:l050!6090:Z0%Z%(1)9:9400:MI$(0,10,K)"RR"I$(0,10,K)"VR"6060uI$(0,10,K)"RR"İ21999:6091:6056609018000:YY1:ZJZ%(0)13:9710:6090:21999:21999:I$(1,5,K)"YES"İ6095Z%Z%(2)20:J11:22000:21999'219991,1,K)21999:60912I$(0,10,K)"MA"60406090:ZJZ%(0)11:LB$"PRINCIPAL PAYMENTS:":I00:6038:LB$"INTEREST PAYMENTS:":I01:6038:20950:J1:L$D$(1):18157:I0:J6:Z1:18002:YY1:II0:9850:I$(0,10,K)"GP"I$(0,10,K)"RA"6NOT MATURE BEFORE IT STARTS!":(7);" RE-ENTER APPROPRIATE DATES: ";(7):::Z0%Z%(2)8:J06:J17:I0:9551:Z%Z%(2)14:6010I$(0,10,K)"AM"6025I$(0,10,K)"IO"ī60906030(I$(1,2,K))(I$(1,1,K))(I$(1,2,K))8I$(1,2,K)I$("m(I$(0,8,K))2I$(0,8,K)"AC",n5993KpZ%Z%(2)13:I1:J0:22000zI0:J6:18000:I1:J1:18050:I$(1,1,K)KY$:A0AX:AX1:22000:AXA0:(I$(1,1,K))9(I$(1,1,K),1)"-"(I$(1,1,K),4,1)"-"(I$(1,1,K),7,1)"-"6020::(7);"LOAN CAN0e32005:3f(I$(0,10,K))2I$(0,10,K)"AM"Ug(I$(0,8,K))1I$(0,8,K)"O"wh(I$(0,9,K))1I$(0,9,K)"E"i(I$(0,6,K))8I$(0,6,K)D$(0):I%2I$(0,7,K)D$(2)j5984k(I$(0,1,K))1I$(0,1,K)"O"l(I$(0,7,K))1I$(0,7,K)"A"5MW23785:KY$"Y"ı6Y28000:F21F20:V\I0:40000:5939:N%05988z^K1N%:AX1:I%5984,5990,5995`I0:Z0%Z%(I%)2:J1142I%:NM100:MN1:5932:I%16000,7000:5900:KY$"Y"5984bK:dZ%Z%(I%):30004:KY$"Y"AX1:59800:KY$"Y"AX0:26970:ZZ0::8KY$"N":FG2ĺ:ZZ0>V,20900:J00:9551:{3J0:K0:A0AX:AX0:5940:AXA0:4NM10:MN0:22000:N%(I$(I,J,K)):MN1:>23785:KY$"Y"ıCII13:8000:II:40000:Z%Z%(I%):30004:KY$"Y"AX1:5950 /V(LA$(Z%1),2)"N)"22095K/VL$"SL"L$"SD"L$"DB"L$"AC"22090V/V22085/!V(L$)8(L$,3,1)"/"(L$,6,1)"/"22060/"VK08322059/#VX((L$,2)):Y((L$,4,2)):Z((L$,2)):Z51Z100Z/$VZ1900Z:Y31Y1X12X1220650%V36LRD(L):21052:22090e.VK037L(L200(L200))2:L(L200(L200))2:LR4(L):21054:22090.VK035LMM(L):21050.V22090.VK046K063K05822090.VK08222050.VL$(L$,2):(LA$(Z%1),2)"E)"22070/V(LA$(Z%1),1)"T"2208G3İ30025:=-ULE7ZZZZ:(ZZ17(ZZ17))0FG3İ30025C-UO-UFG2ı-ULE%(I$(I,J,K))::"RETYPE ENTRY (RETURN IF O.K.):";:-V31005:(L$)0K113L$I$(I,J,K):998:958:-VK082K08322049-V26960:K03722040. VL(L$):K06İ22500:,UI$(I,J,K):D,ULE(I$(I,J,K)):LE7FG2ĺ:ZZZZ1,ULE2(K062K035)I$(I,J,K)"YES":LE3:K063I$(I,J,K)"01":LE2:K035I$(I,J,K)"12/30/81":LE8:FG2ĺ:ZZZZ1,U22100:ZZZZ1:31500:AX022010 -U(ZZ16(ZZ16))0F6ı,+RLB$(LB$,(LB$)7)(44)(LB$,7):F+R(L)1000L$(L):m+RXX(.5L(10XW)):XX0L$" ":+R(XX)10XWL$(XX(10XW)):+RL$(XX):L$(L$,(L$)XW)(46)(L$,XW):+UJJ1+U21000:K0((LA$(Z%),1)):FG122004 ,UK0421200*HRXW4:21200>*lRXX(100L.5):(XX)10000021150]*vR(XX)100LB$(XX100):*RLB$(XX):LB$(LB$,(LB$)2)(46)(LB$,2):*RXX(L.5):LB$(XX):XX1E7XX1E8ı*R(XX)1000ı+RLB$(LB$,(LB$)3)(44)(LB$,3):(XX)1E%Z%1;) RZ%Z%1:(LA$(Z%))31LB$LA$(Z%):20950:21002b) RPLPL1:23890:PLPL1:FG3ĺST$;t)RZ$LA$(Z%);:):R21060)R21064:21056)?R21060)@R(L$)0L$"00")AR)DRL$((L.5)):(L$)2L$(48)L$)ER*FRXW2:SS$(2PFZ0:M(]FG2:PL0:AX1::J30:I0:K0:24400:KY$"Y"24010e>]J05:I$(0,J,0)P$(J):s>]AX1:FG2>]Z%16:24500:Z%10:NM132:J03:22000:J:NM7:J4:22000:J04:P(J)(I$(0,J,0)):3?]Z%21:LA$(Z%1)"-INITIALIZING CHARACTERS.....23970 =f]!=p](16384)128ıV=z]16368,0:(16384)27İ23120:PGP0:54915:500=](16384)32L$LB$:30025:LB$L$:=]=]PL0ı=]FG4ĺ::UUPC1:23980:::PL0:=]PO$(1)N$PLPL1=]23920:(12):PL0:=]23960:23760>]]FG3İ239003< ]23889:PR1İ23889:23889:23889U<]Z$;"SPECS FOR ";:FG323850r<]LE(LB$):LEPC723850< ](LB$,PC10):23890:LB$" "(LB$,LEPC10)<*](LB$,23);":":23890<4]23889JaPLPL1:25045:24NNT%12ıPJa23890:25037JaI0:J11JU10:KKAKB:25900:K:LB$(0):23890:18020:LB$(0)LB$:J:31500:KBKUıJaPLNT%5PTİ23970JaKAKB1:KBKAKC:KBKUKBKUJb25925:250305KcIU1KBKAKC:KBKUKBKU:KCKBKA7IaD%0İ25910:F21ıHIaD%0İ25915Ia(ST$,9)(LB$(Z%),110KA,10(KC1)):"DATE "(LB$(Z%1),110KA,10(KC1)):23890:23890:D%0JUNT%:25045IaN0IaJU24:NN1:24NNT%12JUNT%1224(N1)JaFG03)):,HvaJJ0J1:J4Z%(JJ2)1:24960:J:QHaZ%21:LA$(22)LA$(J4)S$LA$(J3)HaLA$(22)LA$(22)("................?",31(LA$(22))):22000:HaLB$"SAVE "LA$(J14)" ON DISK":30015:KY$"Y"İ20510:FG2HaIaIU0:PZNT%7:KC(PC10)2:KA0:4900::G`J013:PO$(J)I$(0,J,0)::PO$(17)I$(0,17,0):aG`LB$"? - ";:PO(J)1ĺ"YES":24840kG`"NO"}GaJJ1:AX1ıGaLA$LB$:30010:KY$"Y"ıGaJJ1:PO(J)1PO(J):998:868:LB$LA$:24820HDaPM(P$(0)):PC(P$(1)):PT(P$(2)):PP(P$(9)S$(LA$(J14),16):30015:KY$"Y"24415IFZ_:J2924100,24200,24300F__LB$"START WITH OLD DISK FILE":30015:KY$"Y"ıFd_AX1:20500:KY$"Y":F_:ZZ2:LB$"CURRENT "(LA$(Z%),16)" ARE:":20950:MN0:I0:K0:G|`J05:P$(J)I$(0,J,0)::2(22)LA$(Z%(7)3)" (ANNUAL)":J10:24965:Z%21:LA$(22)LA$(Z%(7)3)" (MONTHLY)":J17:24965:J34:J1113:J4Z%(7)J7:24960:J:5900:KY$"Y"24230E^J32:24975:24710E^I$(0,2,0)Y$ıE^G$(25)LA$(1)" ("LA$(2)")......":+FP_:10:LB$LA$(1N1:NM25:Z%21:I0:J0:K0:LA$(22)"MAXIMUM # YEARS TO BE PRINTED.#":22000:Z%21:LA$(22)"START EA. TABLE AT TOP OF PAGE?":21999:Z%21:LA$(22)"PRINT TABLES IN REPORT FORMAT?":21999:J03:J17:J22:J39:24950E^J38:J89:J4J2:24960:J:Z%21:LA$4,K)" (PREPARED BY "I$(I,14,K)")":LB$(0)"PAGE HEADING ":J25:L0:20540:AX0:5900:KY$"Y"24150Cj^PG0:J31:24975:G$(25)I$(0,25,0)::C^J32:24400:KY$"Y"24210C^J013:I$(0,J,0)PO$(J)::I$(0,17,0)PO$(17)C^AX1:FG2:Z%18:24500D^MEACH PAGE.":22:30025:AX1:PM0Z$"":YY1PM:Z$Z$" ":MBG^Z%17:24500BL^I$(0,4,0)G$(0):LB$(0)"TITLE LINE #":J319:LJ2:20540:J:AX1:5900:KY$"Y"24140eCV^:LB$(0)"BOTTOM LINE #":J2024:LJ19:20540:J:I$(I,25,K)LA$(8)" OF "I$(I,.":"YOU MAY NOW MODIFY THE TITLE PAGE":"AT WILL. 17 LINES ARE CENTERED ON":"THE MIDDLE SECTION OF THE PAGE, AND":"5 LINES ARE CENTERED AT THE BOTTOM.":"YOU MAY CHANGE ANY OF THESE LINES."{PR1ğ:(7)"STANDBY: COMPUTER IS PAUSING TO REFRESH"(7);::X?{XC{36,0:868:FG3ĺ(7);XD{Xp{:24::1)LB$;:35,23:10:::Yz{(64K1);:31086#WJyK063310958WOyK189L$Y$::SWTyK178K132L$N$::dWYyK14731085vW^y(7);:31010WhyK045K041K046K082K05831050WiyK046(K144K158)KY$(59)WmyKY$;WnyL$L$KY$::31010XwyK176KY$"1":310WHICH OPTION DO YOU WANT?":30030:(KY$)1(KY$)K030075AV|uKVyL$""qV"yKY$:K1(KY$):K144K15831085V'yK13131080V,yK1831045V1yLE(L$):LE1ĺKY$;V6yLE231005V;yL$(L$,LE1):KY$;:31010VEyK11331105WFyK046K132Ğ:354UYu:LA$(20);:30031:KY$"Y"KY$"N"KY$" "ıMUZuKY$(13)KY$"N":XU[u30041U]uLB$"PRESS SPACE TO CONTINUE, / TO ESCAPE.":30030:KY$(32)KY$(47)ıUbu30045Ugu:LB$"PRESS RETURN TO CONTINUE.":30030:KY$(13)ıUlu30055;V{uLB$"LB$S$LA$(Z%1)::31500::10:30015BT:uLB$"CHANGE THIS ENTRY"lT?uLC$"WANT TO ":LB$LC$LB$"?":30035TIuLB$"PRESS ANY KEY TO CONTINUE"TNuFG3Ğ:(7);(LB$,39);TPu:16368,0:KY$:36,0:868:TSu30030:KY$"Y"KY$"N"KY$" "ıUXu3001:32050:FGF1:^Sem31550:J035:K010:I$(I,J,K)""::J:31555:Z%Z%(2)I0I1:28005rSgm31555:31500:S0uLB$"CHANGE ANY OF THESE":30015S2uZZ0:FG2AX0KY$"Y":S3uLB$LA$(19):30006S4uLB$LA$(21):30006S6uFG2KY$N$:&T7uLB$00:J113:272755RjJJ0J1:FG1ĺI$(I,J,K):27280DRjI$(I,J,K)YRjJ:FZ1032410vRjFG1ĺI$(I,17,K):32410RjI$(I,17,K):32410R`mAX0ıRbmF1FG:I0:FZ0:J1:LB$"START WITH NUMBERS IN OLD FILE"::FG3İ30015:KY$"Y"28005ScmFG0:AX34:D$KY$T$G$(1)",R"(24(N1)J10):I$(0,J,0),I$(0,J,1),I$(0,J,2)::PLPL1:J1:32410Q@jI0IU:K0KU:J1135:FG0ĄI$(I,J,K):27220QJjI$(I,J,K)QTjJ:K:I:32410QrjJ00:J15:27275Q|jJ03:J125:FG127275Q}jJ325:26300:27280RjJ27200,27250,27260,27270,PiI0:FG027070HPiI%0I0:J06:27063TPiJ035PiK010:I$(I,J,K)::J:Z%Z%(2)I0I1:27062Pi32410PiJ035:K010:I$(I,J,K)::J:Z%Z%(2)I0I1:27070Pi32410XQiD$"OPEN"T$G$(J)",L36"SS$:J11V{uLB$"WHICH OPTION DO YOU WANT?":30030:(KY$)1(KY$)K030075IV|uSVyL$""yV"yKY$:K1(KY$):K144K15831085V'yK13131080V,yK1831045V1yLE(L$):LE1ĺKY$;V6yLE231005V;yL$(L$,LE1):KY$;:31010VEyK11331105WFyK046 UXu30035{FG3ğ:(7)"STANDBY: COMPUTER IS PAUSING TO REFRESH"(7);::W?{XC{36,0:868L$(L$,LE1):KY$;:31010+VEyK11331105PVFyK046K132Ğ:(64K1);:31086bVJyK06331095wVOyK189L$Y$::VTyK178K132L$N$::VYyK14731085V^y(7);:31010VhyK045K041K046K082K05831050WiyK046(K144K158)KY$Y$(13)ıUlu30055ZU{uLB$"WHICH OPTION DO YOU WANT?":30030:(KY$)1(KY$)K030075`U|uvUy** DATA ENTRY **UyK061UyL$""U"yKY$:K1(KY$):K144K15831085U'yK13131080U,yK1831045U1yLE(L$):LE1ĺKY$;U6yLE231005V;y ӍҲӍύō͍   1:J2:11985:#&+M0RD(P0RI):)&+;&+I0:J12:I02&+MMMN:J011:RI(I$(0,11,K)):11985:I1:J3:Z0:18002:11981:&+I1:J2:I01:11235&+&+11975:I1:J1:11985:&,J010ZF:'$,EX(N)RD(EZ(N1)RI):EY(N)M0EX(N):EZ(N)EZ(N1),3,K))%+EZ(N)011170>%+EY(N)EY(N)EZ(N):EZ(N)0:11175V%+NM(LP.99)11165%+N:19010:19040:N124:D(N)D(N)SGEX(N):S(N)S(N)SGEY(N):P(N)P(N)SGEZ(N)::19030:NNNN1:NN13NMNT%12(EZ(24)0NMMN)ı%+EZ(0)EZ(24):11125&+INM(LP.99)NMNT%12111460$+EZ(N)EZ(N1)K$+EX(N)0:EY(N)0:11175$+NMMN1ZL0YL0EX(N)(I$(0,3,K)):EY(N)0:EZ(N)(I$(0,2,K)):11160%+MD11300,11350,11400,11450,11500,11550,11600,11650:NMMN1MN12(ZPZL)YPYLEX(N)EX(N)(I$(01240,11250,11260,11270:NM0:MN12ZPYP:NN0:EZ(0)(I$(0,2,K))`#u+N124:NMNM1:NMMN11140#z+NM112(ZPZL)YPYLEZ(N)0:11145#+NM112(ZPZL)YPYLEZ(N)EZ(N1)(1RI):11145#+EZ(N)(I$(0,2,K)):EX(N)(I$(0,3,K)):EY(N)0:11170$+ OPTIONS":::K1K0:6)K". "LA$(Z%(I%)1K):::I0:28005:30075:`ˆ34,2::(1((40(LA$(Z%)))2))::LA$(Z%):34,3:9::LA$(Z%(I%)1K):::I0:28005:30075:`ˆ34,2::(1((40(LA$(Z%)))2))::LA$(Z%):34,3:9::"(ERTION!":32400:32300M_LB$"READY TO TRY AGAIN?":30035:KY$"Y"ĺ:27000S_ _20:LB$"READY TO TRY AGAIN?":30035:KY$"Y"32660_ZZ10ZZ0:2000_:200_** MENU ROUTINES **G`Z%Z%(I%)1:35010::"YOU HAVE "K0" "LA$(Z%(I%)1)"VE "K0" "LA$(Z%(I%)1)" OPTIONS":::K1K0:6)K". "LA$(Z%(I%)1K):::I0:28005:30075:^ˆ34,2::(1((40(LA$(Z%)))2))::LA$(Z%):34,3:9::$(Z%)))2))::LA$(Z%):34,3:9::Һ"/FILE LOCKED!":32520_~768:211:" / CHECK DISK INS660]ZZ10ZZ0:2000%]:200>]** MENU ROUTINES **]Z%Z%(I%)1:35010::"YOU HAVE "K0" "LA$(Z%(I%)1)" OPTIONS":::K1K0:6)K". "LA$(Z%(I%)1K):::I0:28005:30075:]ˆ34,2::(1((40(LA$(Z%)))2))::LA$(Z%):34,3:9::~K DISK INSERTION!":32400:32300\~:(7)"INSERT PROGRAM DISK IN DRIVE #1":"AND CLOSE DRIVE DOOR!"::"PRESS ANY KEY TO CONTINUE.":KY$:\LB$"READY TO TRY AGAIN?":30035:KY$"Y"ĺ:27000\ ]20:LB$"READY TO TRY AGAIN?":30035:KY$"Y"32٠ӍύӍӍӍ  SERTION!":32520?^~"/DISK FULL! INSERT ANOTHER DISK.":32520[^~"/FILE LOCKED!":32520^~768:211:" / CHECK DISK INSERTION!":32400:32300_~:(7)"INSERT PROGRAM DISK IN DRIVE #1":"AND CLOSE DRIVE DOOR!"::"PRESS ANY KEY TO CONTINUE.":KY$:Ҳύ΍Í űŲųŴŵύύύύύύύύύύӍӍӍӍӍӍӍӍӍӍ       10980:AY(I$(0,J10,9))PL((I$(1,J10,3))):I$(1,J10,6)(RD(100(AY1))):I01:K07:10980(I$(1,J10,9)(((I$(1,J10,5))(I$(1,J10,7)))2):J:I$(1,11,8)"0":J2NT%:I$(1,J10,8)(RD(100(((I$(1,J10,0))(I$(1,J9,0)))PL((I$(0,J9,9)))))I(N,2)AY(RR(T(N,4))(K112)):K16:AYAY(RR(T(N,4))(K16))::J1NT%:I$(1,J10,2)(RD(AX(J)I(J,2))):I$(1,J10,3)((I$(1,J10,1))(I$(1,J10,2))):^x(J1NT%:AY(I$(1,J10,0))PL((I$(1,J10,1))):I$(1,J10,4)(RD(100(AY1))):I01:K05::AY1:T$"W/":10940:NN0:YU1:J1NT%:I$(1,J10,1)(AX(J)P0P(1))::10960:KU3:K13:AY1:T$"I/":10940:T$"C/":10940:AY1:T$"E/":10940:T$"O/":10940:KU5:K15:T$"L/":10940d(KU2:T$"D/":10910:AY1:K1YO2:I(0,2)0:N1NT%:I(N,2)I(N1,2)AY1:10940:T$"O/":10940:T$"L/":K16:KU6:10940:T$"D/":KU2:10910F(I(0,2)0:J1NT%:I(J,2)RD(I(J1,2)RR(T(J,5)))I(J,2):I$(0,J10,10)(AX(J)I(J,2)):I$(1,J10,0)((I$(0,J10,9))(I$(0,J10,10))):P(10960:KU3:K13:AY1:T$"N/":10940:J1NT%:K13:J1K12(I$(0,J10,7)((I$(0,J10,7))RD((I$(0,J10,6))T(J,K1)100)):I$(0,J10,8)((I$(0,J10,6))(I$(0,J10,7))):I$(0,J10,9)((I$(0,J10,4))(I$(0,J10,7))):H<(10960:KU4:K14:AY1:T$"I/":10940:T$"C/":10940:T$"E/":":10920:K02:K12:10900:AYP0:I(0,2)0:J1NT%:I$(0,J10,4)(RD(T(J,1)(1SH(0)100)I(J,2)I(J,4))):AYAYI(J1,2)I(J,2)'I$(0,J10,5)(AY) (I$(0,J10,6)(RD(((I$(0,J10,4))(I$(0,J10,5)))SH(1)100))::KU6:I00:K07:K16:T$"D/":10920$(1,J10,2))(I$(1,J10,3))(I$(1,J10,4))):PA(J)(I$(1,J10,0))(I$(1,J10,5))'I$(1,J10,6)(PA(J))::T$"F/":FZ5:FG1:IU1:KU7:27000:10950:J1NT%:I$(0,J10,0)(RD(T(J,1))):I$(0,J10,1)(RD(T(J,1)SH(0)100)):'I00:K03:K14:T$"L/(J,0)I(J,1)::T$"I/":AY1:10930:T$"C/":10930:T$"W/":10930:T$"E/":AY1:10930:T$"O/":10930:T$"N/":10930S'J1NT%:I$(1,J10,2)(AX(J))::T$"C/":K03:K10:KU0:10920:T$"D/":KU2:K04:K12:10920:J1NT%:I$(1,J10,5)((I$(1,J10,1))(I2)):J2NT%:I$(0,J10,6)(I(J1,2)I(J,2)):V'J1NT%:I$(0,J10,7)((I$(0,J10,4))(I$(0,J10,5))(I$(0,J10,6))):I$(1,J10,0)((I$(0,J10,3))(I$(0,J10,7)))::I01:K01:K10:T$"O/":KU0:10920s~'T$"L/":KU3:10910:J1NT%:AX(J)I(J,3)I   ٠Ġ®ԩZ(0)EZ(YU):CM(NM)RD(EZ(YU)(I$(0,5,K))100):*.N1NT%:I(N,0)I(N,0)D(N):I(N,1)I(N,1)S(N):I(N,2)I(N,2)P(N):I(N,3)I(N,3)AX(N):I(N,4)I(N,4)CM(N):I(N,5)I(N,5)PV(N):I(N,6)I(N,6)FV(N)::H+J.N1NT%:RP(N)RP(N)RP(N1):RF(N)RF(N)RF(N1)RD((EZ(N)(I$(0,5,K))100)(1TX(NM)100)):FV(NM)FV(NM)(RR(T(NM,5))(112))AX)-AZRR(T(NM,4))(N12):PV(NM)PV(NM)AXAYAZ:RF(NM)RF(NM)EX(N):PA(NM)PA(NM)EZ(N1):12(NM1)NPS((LPLD))RP(NM)RP(NM)(I$(0,2,K))AYAZ1*-:P(NM)EZ(YU):EPV(NM1):AX(NM)0:CM(NM)0:FV(NM)FV(NM1):YU1ıB(-NM211755g(-AYAYRR(T(NM1,4)):NM211755y(-AYAY(YO12)S)-N1YU:D(NM)D(NM)EX(N):S(NM)S(NM)EY(N):AXRD(EX(N)(1TX(NM)100))RD(EY(N)(1TP(NM)100)):AX(NM)AX(NM)AX:CM(NM)CM(NM)12:Y(Y)ı*'-Y12:11995:J012ZSıF'-YS0EX(N)0:EY(N)0:`'-YYS:J0J01:11995:'-NN0:NM1:YUYO:AY1:EZ(0)0:FV(0)0:PV(0)0:11750:NNYU:YU12'-NMNM1:NMNT%ı'-11750:NNNN12:117052(-19050:D(NM)0:S(NM)0:P(NM)0:PV(NM)(I$(0,J0,K)):I0:JJ01:11985:119802&,11300:K&,NM(MM.99)11515d&,J0J02:J03311515&,RI(I$(0,J0,K)):DUDULL:11986:11980&,11465&P-11975:11300:EX(N)EX(N)(I$(1,4,K)):DUDU1:&-NMMN1YYF1:11995:'-Y(NMMN2YF)I(I$(0,11,K)):11985:I1:J3:Z0:18002:11981:J%+I1:J2:I01:11235P%+l%+11975:I1:J1:11985:{%,J010ZF:%$,EX(N)RD(EZ(N1)RI):EY(N)M0EX(N):EZ(N)EZ(N1)EY(N):%V,11300%,NM(MM.99)11465%,J0J03:J03211465%&,RI99)11165$+N:19010:19040:N124:D(N)D(N)SGEX(N):S(N)S(N)SGEY(N):P(N)P(N)SGEZ(N)::19030:NNNN1:NN13NMNT%12(EZ(24)0NMMN)ı$+EZ(0)EZ(24):11125$+I1:J2:11985:$+M0RD(P0RI):$+$+I0:J12:I022%+MMMN:J011:R#+NMMN1ZL0YL0EX(N)(I$(0,3,K)):EY(N)0:EZ(N)(I$(0,2,K)):11160#+MD11300,11350,11400,11450,11500,11550,11600,11650:NMMN1MN12(ZPZL)YPYLEX(N)EX(N)(I$(0,3,K))#+EZ(N)011170#+EY(N)EY(N)EZ(N):EZ(N)0:11175 $+NM(LP.MNM1:NMMN11140="z+NM112(ZPZL)YPYLEZ(N)0:11145t"+NM112(ZPZL)YPYLEZ(N)EZ(N1)(1RI):11145"+EZ(N)(I$(0,2,K)):EX(N)(I$(0,3,K)):EY(N)0:11170"+NM(LP.99)NMNT%1211146"+EZ(N)EZ(N1)"+EX(N)0:EY(N)0:11175J   ҲύӍӍӍ L:DEDEI:I:12612%40NNDLī1254940CORD((CBSVHO)(DLNN2(Y12))):TERD(((12Y)12(CBSV)(DL2NN)DE)(Y12(CBSV)(DL1NN)DE)):COTEAS$"YES"TECO40HOTEHO:NNNN1:1261241Y12TE0:12561.51CORD(CBSVHO):TERD((12Y)1((12Y)12)(1DL)(DB100)):COTEAS$"YES"TECOA30HOTEHOw30(CBSV)HOTERD(TE(HO(CBSV))):HORD(HOTE)301261230NN1ī1252830CORD((CBSV)DLY12AD):TERD((CBSV)2(DL1)Y12AD):COTEAS$"YES"TECO40HOTE:NN2:I1D)(Y12)(DB100)AD):COTEAS$"YES"TECOB20HOTE:NN2:12489T20NNDLī1247420CORD((CBSVHO)(DLNN2(Y12))):TERD((CBHO)(1DL)(DB100)):COTEAS$"YES"TECO20NNNN1:1248620Y12TE0:12486430CORD(CBSVHO):TERD((CBHO)RD(((CBSV)DL)Y12AD):HOTE:NN2:12612=1r0NNDLī12417}1u0TERD((CBSVHO)(DLNN2(Y12))):HOTEHO:NNNN1:1261210Y12TE0:1242310TERD(CBSVHO)10HOTEHO:1261210NN1ī12453,20CORD(((CBSV)DL)(Y12)AD):TERD(CB(1DLNDSDLTE0:12612:0Q0MD12379,12495,12429,12567,12372J0T0NN112377y0V0TERD((I$(0,11,K))AD):HOTE:NN2:126120Y0TERD((I$(0,NN10,K))):HOTEHO:NNNN1:126120[00\0NDSTE0:HO0:126120^0NDSDLTE0:126120`0NN112402+1f0TEР   I$(0,5,K)Y$2650M2 T(1,K)(I$(0,7,K)):JJ2Z1:T(JJ,K)T(JJ1,K)R::Z Z0Z:Y0Y:X0X:JJ05:DA$(JJ3)DA$(JJ)::DA$(2)(D$(0),2):(DA$(2))51DA$(2)"1"DA$(2)_ DA$(1)(D$(0),4,2):DA$(0)(D$(0),2):18050:ZZ12X:T(1,K)(I$(0,7,K))(R2 J3225859  18002:U6:18090:VU:U0:D%0U3U  18090:VUJJ2:2560 T(JJ,K)(I$(0,J1,K)):JJJJ1:JJ25D%02585  JJ2:J33D%1:18010  2560  JJ25ı  JJJJ25:T(JJ,K)T(JJ1,K)::( ZZS:R1(I$(0,8,K))100:2000,12000,12000,13000,14000:12000. *2120@ 4E$"RUNCF,D1"Q H32500:2090h I$(0,6,K)Y$2600 I$(0,5,K)Y$2550 JUNT%1:JU24JU25 J1JU:T(J,K)(I$(0,10J,K))::JU25ı JJU125:T(J,K)T(JU,K):: JJ1:D%1:J10:ZLA$(3)"-SLOT NUMBER FOR DISK.........#":LA$(4)"-DRIVE NUMBER FOR DISK........#" LA$(5)"ANALYSIS"::LA$(9)"INCOME ANALYSIS":LA$(10)"EXPENSE ANALYSIS":LA$(11)"EXIT FROM ANALYSIS MODE":FG2# J1:AX1:T$"G.":I%7:K06:35000:I%3(KY$):AX1:I%1(1,36,10),DD(25),TX(35),TP(25),T(35,5),I(25,10),O(25,6) EX(25),EY(25),EZ(25),D(25),S(25),P(25):PA(25),AX(25),CM(25),PV(25),FV(25),EQ(25),RP(25),RF(25)Q G$(1)"EXAMPLE0":LA$(0)" ":LA$(1)"DISK FILING INFO":LA$(2)"-DISK FILING NAME.............."::MX(X)(MAX(MAX))2:MM(X)(MX(MN(X))):Z%(8)0:Z%(2)54:Z%(7)47 D$(4):C$(13):E$C$D$:S$(32):SS$",S6,D1":SS$(0)SS$:SS$(1)SS$:SS$(2)SS$:SS$(3)SS$:Y$"YES":N$"NO":ST$" ":CL$"CLOSE":LA$(11),G$(35),P$(5),PO$(16),LB$(67),I$H?3d*INCOME ANALYSIS---COPY. 1981 BY J.E. HOWARDnRD(X)(100X.5)100:R4(X)(10000X.5)10000:RR(X)1X100:RT(X)100(X1):PS(X)(1X(1X))2:R(X)RD(X):PL(X)(.01X(.01X))2I xR1(X)(10X.5)10:MN(X)(XNA(NAX))2       ! !!!!!!!!!"                  hhߚHH`  . .  1891       àʠ̍ӠӠȠ X8Y ` "%`# YUTE:16864B ANNZQZQ12YQZV12YVYU12YFHOTEYU:16864_"APP0YX0NNZVYXYX1$ANNZVZQ12YQZV12YVYX12YFHOTEYX:16864&ANNZVZQ12YQZV12YVYX12YFHOTEYX:16864(A16864*A,AHO0:NZFNN1:HO0:16864 ANZFNN1:HO0:168646 ANNZQ1HO0:16864GANN0ī16666ATE(I$(0,7,K)):HOTE(YF1):ZQ0ZQ12YQZV12YVHOTE(YQ1):16864AZV0HOTEYVA16864 ATETE(1(I$(0,8,K))100):HOTE12:NNZQZQ12YQZV12YVYU12YFHO4'@HOHO(1(I$(0,8,K))100):16864-@J@NZFNN1:HO0:16864c@NNZQ1HO0:16864@ZT12YT(ZPNN)12YPHO0:16864@NN0ī16644@ZT12YTZP12YPHO0:16864AHO(I$(0,11,K)):16864AHO(I$(0,11NN,K)):16864A16988:ZTZZ:YTYY:FF12YF:"@N@MD16620,16634,16648,16682,16722,16756T@q@NZFNN1:HO0:16864@NNZQ1HO0:16864@ZT12YT(ZPNN)12YPHO0:16864@NN0ī16630@ZT12YTZP12YPHO0:16864@HO(I$(0,7,K)):1686@AA$TX$:BB$SD$:16988:ZXZZ:YXYY:PPXX:AA$FP$:BB$SD$:16988:ZVZZ:YVYY:AA$TX$:BB$LP$:16988:ZUZZ@YUYY:AA$PD$:BB$FP$:16988:ZPZZ:YPYY:AA$FP$:BB$TX$:16988:YFYY:ZFZP(YPYFYO)12:AA$FP$:BB$LP$@16988:ZQZZ:YQYY:AA$PD$:BB$SD$:504Cp@I$(0,4,K)"NO"I$(0,6,K)"YES"I$(0,5,K)"YES"MD3:16504r@I$(0,4,K)"NO"I$(0,6,K)"YES"I$(0,5,K)"NO"MD4:16504t@I$(0,4,K)"NO"I$(0,6,K)"NO"I$(0,5,K)"YES"MD5:16504v@I$(0,4,K)"NO"I$(0,6,K)"NO"MD6:16504x@z@iN,0):NNZQ1ī16434<@16868:16880:16892:16920:NNNN12@N:O(1,3)O(1,3)RR(T(1,4))(.95833YO12):N1NU:M05:I(N,M)I(N,M)O(N,M):M:N:j@NN0:NY0:I$(0,4,K)"YES"I$(0,6,K)"YES"MD1:16504n@I$(0,4,K)"YES"I$(0,6,K)"NO"MD2:16K:16200:KU5:19000:cH?N1NT%1:RIT(N,4)1200:RI0I(N,5)I(N,3)(YO.512(N1))1:16226`?I(N,5)I(N,3)RI(1(1(1RI))(YO.512(N1)))b?:@@O(0,4)0:O(0,3)0:AY1:SK0:NUNT%:NU25NU25@N1NU:16608:O(N,6)O(N1,6)O(5900:T$"N.":15900:2000,>19105:F21ı7!>16004J>19100:F21ı>M125:L05:I(M,L)0:L:M:PD$D$(0):TX$D$(1):SD$D$(2):K1N%:FP$I$(0,1,K):LP$I$(0,2,K):O(0,4)0:O(0,2)0:O(0,6)0:M125:L06:O(M,L)0:::16538:16490>16400:(ZX12)):Z0126809n JJ2Z01:T(JJ,K)T(JJ1,K)R:{x T(Z02,K)T(Z01,K)(R(X012)):JJ05:DA$(JJ)DA$(JJ3)::.12100/E$"RUNAN,D1"D/32500:120002T$"I.":16000:T$"C.":15900:T$"W.":15900:20006T$"E.":16000:T$"O.":1! ! !  / /Lɭ ED B / / ]ƴS0Jȴ ȴ)  $L%Dƴɮɯʠƴ  / 0LL Ν / / ɛ LY` ɛLL / /` ` ŵB!/ANNZQ1HO0:16864(0ANN0ī16696W1ASK0:ZQ0YQZV12YVHIYQ1:SK1:167104AZV0YVZQ12YQHIYV:SK1:167106AHIYF1:167108ASK1HO0:16864:AHI12:NNZQZQ12YQZV12YVYU12YFSK1:HIYU>ANNZQZQ12YQZV12YVYUѰ΍"ΠӍΠӍŠӍŠӍԠ͠ӠōˠǠύˠǠŮԠҠҠˮŠҠҠˮ̠Ơ̮ŠύǠӮ̠ؠӮΠƠ̮΍٠ҠӍ͠ӍŠԍōӍԠӱԠҠҧήҧΠԠŮϯٯҍҧΠŮůΩҧΠĮ̯į¯ïŠƠǠŮϠҠϠ̮ٯοŠύǠŮ̠ؠӮԠҠԠŮ΍ϮƠΠӮǠŮؠӠƠҧήϯïũŠŮԠӠҠήŠŮ̠ٯοΠήӯӯӍŠҮӯӯӍŠƠԠԮϯٯҍ٠ŠŮĠ٠ŨӠ٩ҠƠӠΠҮԠԠŮРϠԠŮ̠ԠŮԠ٠Ơ̩ŠΠӮϯٯҍŠΠӮϯٯҍؠӠƠԠԮϯïũؠӠƠΠԮϯïũŮͯϯЯүүϯŠԨӠĭΩӠŠؠŮ٠ԠŠҠ֩٠ΠŠҠ֩ΠӯӍҠƠΠӮǠŮǠӮǩٯοŠŠƠήǠŠŮϯٯҍŠԠؠҠӮϯٯҍԠŠƠŮϯٯҍӠӠŮǠӠƠũŠƠçΠĮŠƠЧǠŠĮ٠ŠؠŮ̠ΠΠŠددخĠ̮ϯٯҍŠΠŠددخҠ̠͠ύŠƠԮ˭ǠŮҠƠӠϠٮ̠ŠŮŠƠƠԠԮϯٯҍŠƠԠԮϯٯҍؠӠƠӮϯïũ٠٨ӠȩٯοŠ٨Ӡȩٯο٠Įٯο̠Ԯ̠ŠƠŮԮԠҠҮҠӮŠŠϮŠӮׯōԠϠŠӠٿŠٍҠƠŠӮǠŮŠŠǠԠ٠ʮŮčŠԠȠנҭϭɠӍӍӠҠӠҠԠήĠӠҠŮĠӠҠŮ̠ӠҠŮ"" " " " " """"""