' +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- ( q Ԡ@跻~!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`z#?     ԠԲ'|::790,255:6:X039:0,39X::1:C$"AMORTI-":V3:H3:50000:C$"ZATION":V14:H5:50000:C$"SCHEDULER":V25:H1:50000223:1:"COPYRIGHT 1983 BY GENERAL MASTERS CORP.":(4);"RUN AMORT2"Pò*** CHAR PLOT ***ZíCP%50500 dÆCP%(45,5):  ŁQ1(C$):C%((C$,Q,1))45:X1CP%(C%,0):PCP%(C%,X):Y06:(P2)P2čHX,VY{ lP(P2):::HHCP%(C%,0)1::)à 3,127,65,127:' Ã3,127,9,15:2 Ã1,0:H à 4,127,9,31,96:[ Ã3,79,73,121:l Ã3,1,127,1: à 3,63,64,63: Ã1,0: Ã1,0: Ã1,0: à 5,1,2,124,2,1: à 3,81,73,69: rāY045:CP%(Y,0):X1CP%(Y,0):CP%(Y,X)::V D8,17,18,124:# Ã4,127,73,73,54:6 Ã3,127,65,65:I Ã3,127,65,62:\ Ã3,127,73,65:h à 1,0:| Ã3,127,65,121: Ã3,127,8,127: Ã3,65,127,65: à 1,0: à 1,0: à 3,127,64,64: Ã5,127,2,14,2,127: Ã4,127,4,8,127: CP%1: 2,8,8: gà 1,0:) hà 1,0:D nCP%1:3,127,65,127:W pÃ3,66,127,64:b qÃ1,0:w rÃ4,33,69,75,49: sÃ1,0: tÃ1,0: uÃ1,0: vÃ1,0: wÃ4,54,73,73,54: xà 4,15,9,9,127: zà 1,0, 1,0, 1,0, 1,0, 1,0, 1,0, 1,0:5,124,1000 (#%*#RP%0::32000:34898:02#34000=<#34800:KA#CX%2ı{F#M((YR365)12):TM12:NFF12:9050:9060Z#B0H(W(WN)M)N:I(WN)M:JDH:KPI:LWN:_#d#B3VC:9080n#VJKx#20000:V19020 #9800:CV:B$"0"C$"9"A$A$C$:8510:4!PC$PC$S$:S$""D !A$""8500p"!(A$)256PC$PC$((A$)):A$"":8500*!MG$"ASCII CODE NOT VALID":85404!X218530>!:8480R!QTMG$"MISSING QUOTE"\!MG$""İ31000:5:10:SU$:8400f!32000:8"D";Q$ VT%6:HT%10:6:10::20);:10:MX%20:NQ%1:4000:NQ%0:SU$IN$:(SU$)20MG$"ONLY 20 CHARACTERS ALLOWED":8540 SU$""İ32000:8000 PC$"":A$"":S$"":QT0:X120:C$(SU$,X,1):C$Q$QTQT:8470: !QTS$S$C$:8510:!C"ENCLOSE CHARACTERS IN QUOTES OR SPECIFY":"THE ASCII VALUE OF A CHARACTER AS A":"DECIMAL NUMBER FROM 1 TO 255. JOIN" "INDIVIDUAL STRINGS AND ASCII VALUES WITH";:"A + (PLUS SIGN)."::5:"EXAMPLE FOR ";Q$;"ESCAPE-D";Q$;" SEQUENCE:"::18:"27+";Q$;6000:IN$"Y"LF%1:LF$(10):8190DIN$"N"LF%0:LF$"":8190RG$:815020:3:"IS SPECIAL INITIALIZATION REQUIRED? ";:36000:IN$"N"SU$""::32000:8000 IN$"Y"ĺG$:8190v :32000:w 4:8:"ENTER PRINTER CONTROL DATA":12:TER PRINTER SLOT# ";:36000:X%1X%7MG$"PRINTER SLOT# MUST BE 1 TO 7":31000:8080aPR%X%20:5:"IS FORM FEED SUPPORTED? ";:36000:IN$"Y"FF%1:8150IN$"N"FF%0:8150G$:8110$20:5:"IS AN EXTRA LINE FEED REQUIRED? ";:3D."-rLF%ĺ"NO EXTRA LINE FEED REQUIRED."gt14:5:SU$""ĺ"NO SPECIAL INITIALIZATION REQUIRED."yu(SU$)14Ė1vSU$""ĺ"PRINTER INITIALIZATION=";SU$|16:5:"IS THIS CORRECT? ";:36000:IN$"Y"ıIN$"N"ĺG$:8060V20:5:"ENX:5285 QL%SL%:!@ZE:32000:8:5:PR%0ĺ"PRINTER IS IN SLOT ";PR%;"."OPR%0ĺ"NO PRINTER ATTACHED":8060T10:5:FF%ĺ"FORM FEED IS SUPPORTED."^FF%ĺ"FORM FEED IS NOT SUPPORTED."h12:5:LF%ĺ"EXTRA LINE FEED REQUIRE0@I14:(S5)S5(I)(S7)S7(I)T%((S49152)256)I:I99`(I:I5T%((S49152)256)5<:X17:T%(X)1T%(X)55240d:PR%0:5250:xPR%X:zFF%0:T%(X)4FF%1:PL%(43626):SL%PL%:X17:T%(X)1XPL%SL%1 "  S5(1)3:S5(2)24:S5(3)56:S5(4)72:S7(1)60:S7(2)56:S7(3)24:S7(4)72:C149408:C750944:SC1C7256:K02:CS(K)0:I02558:CS(K)CS(K)(SI)::CS(0)CS(1)CS(1)CS(2)CS(2)256CS(0)256CS(1)256T%((S49152)256)0:518IN$(34)IN$"'"$ IN$(8)40806 IN$" "4020U (I$)MX%I$I$IN$:4110d G$;:4020 (I$)1ĺIN$;" ";IN$;:4010 I$""4100 BK%BS%1:4120 4020 I$(I$,(I$)1):IN$;" "; IN$;:4020 IN$I$:TS%CX%2CX%07:Y02:P%(X,Y):::5 *** SIMULATE INPUT ***c I$"":CX%0:BS%0:VT%(37)1:HT%(36)1 IN$:I$""Ģ23:1::(SP$,39):VT%:HT%: IN$(21)4020 IN$(27)CX%1:4120 IN$(3)CX%2:4120 IN$(13)ĺ:4120 NQ%72:797,152:798,72:799,96:Z$(7),P%(7,2),S%(4):SP$" ":DH$"--------------------------------------------------------": 8,4,22 1 8,6,18: 10,8,24: 3,10,23,3,10,35: 3,12,23,3,12,35 ^ 10,14,19:X3000: MC%0:37000:Z ::32000:MC%1:M%0:31000:37000:M%8000,9000,30000:206v *** INITIALIZATION *** MOD(A)((AB(AB))B.05)(AB):D$(4):G$(7):Q$(34):CL%1:790,104:791,168:792,104:793,166:794,223:795,154 796,%TS%(790)255ė:'W1:18cDTN(CP(WN)M)(W(WN)M):DDT.001NNDDT:5i TT20AJ%:VIN:9700:TT15:VPR:9700:TT15:VBA:9700:LF$:LC%LC%1:T$"AMORTIZATION SCHEDULER":T1$T$:T1%(40(T1$))2:TS%İ5000 #               TE MUST BE .005 TO 1000":34790&FD0:Z$(1)""S%(1)1:D(Z$(1)):D.001D1E6MG$"PAYMENT AMOUNT MUST BE .001 TO 1000000":34790&IC0:Z$(2)""S%(2)1:C(Z$(2)):C1C1E6MG$"LOAN AMOUNT MUST BE 1 TO 1000000":34790G'JP0:Z$(7)""P(634830%;_%@IN$""Z$(F)IN$:(IN$)MX%ĢP%(F,1):P%(F,2)(IN$):(SP$,MX%(IN$));%AZ$(F)""ĭZ$(F)(SP$,(Z$(F)))Z$(F)""%BCX%234898%CCX%34896&ES0:Z$(0)""S%(0)1:S(Z$(0)):FFS100:S.005S1000MG$"INTEREST RA24:1:(SP$,39);:YX1:#$B$** DISPLAY AGENDA DATA **$:X07:P%(X,1):P%(X,2):(Z$(X)(SP$,40),P%(X,0))::$懰31000:$$:BK%1$F07$P%(F,1):P%(F,2):MX%P%(F,0):4000:CX%2ı$"BS%34875$,F0FF1% WEEKS ";::(SP$,3);::" DAYS ";::(SP$,3):::" BALLOON PAYMENT ";::(SP$,10):::20:1:"ENTER AT LEAST 3 OF ITEMS MARKED WITH *.";:"THE REMAINING ITEMS WILL BE CALCULATED."$"PRESS ";::"ESC";::" WHEN ENTRIES ARE COMPLETE.":,0))::&"Є** DISPLAY RCD FORMAT **"ڄ4:"* INTEREST RATE IN % ";::(SP$,8):::"* PAYMENT AMOUNT ";::(SP$,8):::"* TOTAL AMOUNT OF LOAN ";::(SP$,10):::"* TERM OF LOAN: YEARS ";::(SP$,3);::" MONTHS ";::(SP$,3)::#" ODE ";::(SP$,10):!$:"BIRTHDATE ";::8);::" ANNIVERSARY ";::(SP$,8);::40):"COMMENTS ";::31);::20:12:"PHONE ";::(SP$,12)::24:1:(SP$,39);:!*** DISPLAY DATA ***":X07:P%(X,1):P%(X,2):(Z$(C%,X)(SP$,40),P%(XRT ERR MSG *** yMG$""ı= y:23:1:G$;MG$;:MG$""::W }*** CLEAR SCREEN *** }1:1::T1%);T1$;T1%1);" "::1: 耲*** DISPLAY RCD FORMAT!3:"NAME ";::(SP$,35)::"ADDRESS ";::(SP$,32)::"CITY/STATE ";::(SP$,29)::"ZIP C.XLC%166:" ";LF$:/(SP$,17);"AMORTIZATION SCHEDULE";LF$:" ";LF$:"PAYMENT NO. INTEREST PRINCIPLE BALANCE";LF$:DH$;LF$:LC%4: N*NV1MG$"UNABLE TO COMPUTE AN ANSWER"4N31000:0u5u:TS%ĿDu y*** PKK23ND):(V$)KK2V$V$(".00",KK(V$)2)A"&RP%ND0:q$&(SP$X$,TT);:ND0:V((V.005)100)100:wH&R&V((V.005)100)100:*+D$"PR#"PR%:PC$""ĺPC$;+LC%99:12000:..FF%ĺ(12);:12050.LC%6612050PIN0:PRBA:BA0:"BALLOON";:AJ%1:9:EEIN:T4T4PR:9540R%FF%ĺ(12):9650m%XLC%166:" ";LF$:}%D$"PR#0":%%V1E8V$"*.**":KK2:9750%V.005V$".00":KKW:9750&V$(V.005):KKW(V$):(V$,KK,W)"."Ă0&X$(V$,4:"CUMULATIVE";:INE:PRT4:9:LC%LC%1:DH$;LF$:AJ%0:UU19610RN%BBM9600]P%9559~Q%X9%(16384):X9%1279556R%16368,0:38000:X9%1559610T%38000:9560W%790:X%SB%SB%1:SB%29480b%12000:l%SB%0:9480<%UUW:40:BA0:BB0:IN0:XX0:BAC:ZZAA%UUWZZ:INNBA:PRDIN:BABAPR:BBBBW:VBB:NDW:TT6:9700:ND0:9:ZZIN:AAPR:BBM95300%:ZZ12:%AJ%3:LC%LC%1:DH$;LF$:XXXX1:"YEAR";:TT5:ND1:VXX:9700:INZ:PRA:9:EEZ:T4T4A:Z0:A0CD%AJ%O PRINTER FOUND":31000:9400$22:868:1:"FIRST SUBTOTAL AFTER PAYMENT NUMBER? ";:4000::AA(IN$):AA0AA12AA12:9436$AA0ĺG$:9432$RP%1:SB%0:22:868:1:"PRESS ";::"ESC";::" TO TERMINATE PRINTING":11000:"$Z0:A0:E0:T00:16:3::"NUMBER OF PAYMENTS ";::5);:22:M::VDMPC:9700:18:" TOTAL INTEREST ";::10):18:X$::20:868$21:868$22:868:1:"PRINT AN AMORTIZATION SCHEDULE? (Y/N) ";:36000:IN$"N"ı$IN$"Y"ĺG$:9400$PR%0MG$"N9020$B0VFF100:93006"$MDPCVW:9300c,$N(((DMP)C)(WT)W)12:5:V100N12yT$20000:V19220^$FF0İ9800:FFVc$B0VFF100h$B0VFF:9700:Z$(0)X$zr$VD:9700:Z$(1)X$:VC:9700:Z$(2)X$:VP:9700:Z$(7)X$:342WVD:9120"#V((CK)H.005)8#20000:V19020V#9800:DV:B2VM:9160#V(((NCD)(NPD)))(L):V(V):MV#20000:V19020#B0VP:9230#9050:V(CJ)I:B4V0VW:9230#V0V0$9800:PV$20000:V139000 -Ӕ-XS-]790:216,0::D$:23:1:(222)0ğ:G$"DISK FULL";::39100-lG$;"ERROR=";(222);" AT LINE ";(218)(219)256;-" PRESS ";::"RETURN";::36000:D$"CLOSE":3-M%(M%)X1,ȑ37400,摲3,XX1:X0XM%(M%)9,^,"37500:VT%:HT%::X$;::37210d,|,X$M$(X,M%):M%1X037525,VT%24:X1HT%1,X2HT%8,X3HT%26,X4HT%36,,HT%(40(X$))2:VT%6(X3):,p-z37500:VT%:HT%:X$;::+P&+QX12+Z37280T+_X9%(16384):X9%12737210+d16368,0:M1%X9%128:38000:M1%8M1%21İ37500:VT%:HT%:X$;+xM1%2137300+M1%837350+M1%13M%X:32000:+37210+790:+ ,XX1:XPRINTER SETUP":M$(2,0)"AMORTIZATION SCHEDULES":M$(3,0)"QUIT":F*쐲W*MC%237200*1:1:X0:37500:T1$X$:T1%HT%::HT%);X$;HT%):24:1:M%1Ģ12:37115*:"ARROWS";::" = SELECT; ";::"RETURN";::" = EXECUTE";+:X1M%(M%):3)S%(3)B2))k)VT%(37)1:HT%(36)1:IN$:23:1:(SP$,39):VT%:HT%:IN$(31)ĺIN$;)X%(IN$):A$:)*** MENU CONTROL *** )MC%037100)MX%0:)M%(MX%):)M%(0)3:)M$(5,MX%):@*M$(0,0)T$:M$(1,0)"0?(M35000:XMG$"INSUFFICIENT DATA FOR AMORTIZATION":34790E(OR(P:34820{(RF07:Z$(F)""::X04:S%(X)0::((Y0:X03:S%(X)YX99:35040(ֈS%(X)Y1(:X9X1:(X0:B4:S%(0)B0(툭S%(1)B1)S%(2)BZ$(7)):P.01P1E6MG$"BALLOON PAYMENT MUST BE .01 TO 1000000":34790(KYR(Z$(3)):YR(YR(Z$(4))12)365:YRYR(Z$(5))7:YRYR(Z$(6)):Z$(3)""Z$(4)""Z$(5)""Z$(6)""S%(3)1:YR36512MG$"TERM OF LOAN MUST BE AT LEAST ONE MONTH":3479