ˆ‰ñ(!>!SPC¤MSG¤YEAR¤HEAD¤HEAD2¤HEAD3¤FINANCE¤D¤MONEY¤MON¤AMT¤MNY¤I¤PRIN¤BAL¤LINE¤PMT¤CHRG¤ÁÎÐNUÍPMÔAMÔMONEÙIÎÂÃÑØMOÎPRIÎÚÏÍÌÉCHRÇBAÌCÐAPÒÙÒÄDOÌ€€€€€€€€€€ € € € € €€€€ !"#$%&'()*+, FINANCE›BY Philip W. Bate PhD›$$(c)1990, ANTIC PUBLISHING INC.›s@-@@KG0@@a0s@‚@(]]€;@9,;@(,‚;@,ƒ;@9,„;@9,…;@9,†;A,‡;@,2ssˆ;@,‰;@,Š;@,‹;@,Œ;@,;@,Ž;@,;@9,;@,‘;@,<N 6€. 6€7@9,. +6€7@,.€N6.ÐÒÅÓÓ §ÒÅÔÕÒΧ ÆÏÒ ÍÁÉΠÍÅÎÕF##6….MON PYMNT IN+CHGS PRINP*** MAIN MENU***›Zi6’-6“-'6”-.6‹.:6•-F6–-M6Œ.T6.[6Ž.b6.i6.d (} ((  ÍÁÉΠÍÅÎÕ n ( (± - AMOUNT OF PAYMENTx!(!(² - NUMBER OF PAYMENTS‚$($(³ - AMORTIZATION SCHEDULEŒ/(/($´ - AMORTIZATION W/ VARYING PAYMENTS–$($(µ - APPRECIATION SCHEDULE ((¶ - SAVINGS SCHEDULEª'( ((  ÃÈÏÏÓÅ ÏÎÅ ' A´I A0I’&@HAA@AA ApA 0¾***PAYMENT AMOUNT***›È (} A A Ò[K6—-P:˜$™$+@'+@&+@%™,#+6•,,,$A%?P,'AQ6–-—[ A`ÜL( ((ÐÁÙÍÅÎÔÓ ÁÒÅ $‹!(4( ÉÎÔÅÒÅÓÔ ÉÓ $>6—-–$•&˜H A`L(‹æ#-@@(# Að *** NUMBER OF PAYMENTS ***›ú (} A A0336•-P:6+K:@&˜'–$™,,'K:™%@,%?™™,T( (&(ÎÕÍÂÅÒ ÏÆ ÐÁÙÍÅÎÔÓ ÉÓ •)(<( ÉÎÔÅÒÅÓÔ ÉÓ $F6—-–$•&˜P A`T(‹#-@@(# A"##*** AMORTIZATION SCHEDULE ***›,X (}X(JThis schedule is automatic given the data required below, and will print6? Ap A ! A0+ Ap5 A? A€@'6š-6›-'6œ-J-ž•%ž&@TM(6—-P:+˜$™,$A%?P,'A2 A`86Œ.‹C6—-–&A:Œ,M A`^* 6.‹6Ÿ-A:,6—-˜&Ÿ$ A0*6Ž.‹h 6š-š%–6›-›%A:Œ,6œ-œ%Ÿr| 6.€ 67@<@,.‰767@<@,.N67@<@,.Œe67@ <@&,.|67@0<@9,.Ž|(”"@€ A†?'6˜-P:A:Ž,$A%?P,'A56ž-ž%@? A€R06 -P:˜$+@%™,$A%?P,'A6– <6—- F A`L6.‹R6–- š$$P:ž'@,"ž'@A0¤ @€ ®?('(‚ INTEREST=› PRIN=œ36›-?6œ-¸”"@€ AÂ;6ž-@ A€-6‚.=:A:‚,%@,;6-%@Ì A@ A€Ö A@àK6ƒ7@<@,.‚K6ƒ7@<@),. AMORTIZATION - BALANCE= ê116„.'MON PYMNT INTRST PRIN BALANCEô”"@€ Apþ (} ((ƒ˜((„$&&*** AMORTIZATION VARYING PMTS***›p (}p(bThis program is very flexible as it allows for differing payments and also for various charges.nn(fIt isn't necessary to enter a zero if no payment or charge is to be assessed.Simply press the RETURN.&W(9(-INPUT STARTING YEAR (PRESS 'RETURN' FOR 1990)=‚LB:‚,"W6‚.19900+ A Ap! A+ Ap:7 A6š-¡6›-+6¢-76£-@D5 –˜6‘.***6.***%6—-˜&–/ A`56Ž.‹NW*6¤-+P:+˜$™,$A%?P,'A,26—-¤%¥< A`B6‘.‹M6—-–&A:‘,W A`X. 6.‹6Ÿ-A:,–"(6Ÿ-6A:‘,.6.b 6—-˜&Ÿ A06Ž.‹l 6š-š%Ÿ6›-›%¤6¢-¢%¥v67@<@8,.€167@<@,.‰H67@<@,._67@<@,.‘v67@ <@&,.67@)<@8,.Ž€*-@£( ”"@€* AŠA:Ž, A`”A:Ž,"Až?'6˜-P:A:Ž,$A%?P,'A56ž-ž%@? A€¨V46 -P:+˜$+@%™,%¥,$A%?P,'A:– @6—- J A`P6.‹V6–- ²$$P:ž'@,"ž'@A¼1 A6£-£%@'6Ÿ-1 A€ÆD( (-(‚ INTEREST=› CHARGES=¢D(PRINCIPAL PAID= šÐ”"@€ AÚ A:Ž,¡ A@ @€ä-6ž-@ A€-6‚.=:A:‚,%@,î A@ Apø ApJ6ƒ7@<@,.‚J6ƒ7@<@),. AMORTIZATION - BALANCE= 116„.'MON PYMNT IN/CHRG PRIN BALANCE”"@€ A`  (} ((ƒ˜((„$*_-@@"(( ÅÎÔÅÒ ÐÁÙÍÅÎÔ,;B:,"G6–-U6. - _ A04% 6—-A:, A`6.‹%6–-A:,>K-@"@""(ÃÈÁÒÇÅÓ&‘5B:‘,"A6¥-K APH 6¥-A:‘,R-@@"(€$\0(&( ÌÏÁΠÏÖÅÒÐÁÉÄ ÂÙº O:A:Ž,,0 Af*** APPRECIATION ***›p (} A APz666¦-P:˜$+@%™,#+§$•,$A%?P,'A„.( (.(YOUR INVESTMENT WILL BE WORTH ¦Ž:-@@"(&)@“:“"AU@€˜ @€¢*** SAVINGS SCHEDULE ***›¬; (} A A0' A`1 Ap; A¶+6š-6›-+6™-¨'+A,À ApÊ6©-ž%•$@-ž©ÔX(6—-P:+˜$™,$A%?P,'A2 A`86Œ.‹>6ª-—J—"X6Œ. 0.00Þ& 6—-˜%ª%– A06Ž.‹&6˜-A:Ž,è2( ž Œ Ž(”"@€2 AòF6ž-ž%@6š-š%A:Œ,$6›-›%–0ž"@<6ž-@F A@ü: "© ((ÅÎÄ ÏÆ ÐÒÏÇÒÁÍ#(0)@“: @€ v(&( INTEREST=š PAYMENTS=›2”"@€f(@>:@, INTEREST=š PAYMENTS=›vPRINTS TOTALS› A@ Ap $ Ap A0.N (} (5($MONTH PAYMENT INTEREST AMOUNT8(D”"@€N A€8$B*** PAUSE ROUTINES ***›L$)@’$’"AUAV’"AU@€`!!’ @H)’!@‰A j$t[-@@"(:(  ÐÒÅÓÓ ÁÎÙ ËÅÙ ÔÏ ÃÏÎÔÉÎÕÅ G)@“[“"AUA@~“"AU@€ˆ$’***INPUTS***›œ] (} (?(-INPUT STARTING YEAR (PRESS 'RETURN' FOR 1990)C‚RB:‚,"]6‚.1990¦''A:‚,!A P)A:‚, ApA °@('(ENTER STARTING MONEY AMOUNT1 A76ˆ.‹@6˜-A:ˆ,º4((ENTER INTEREST RATE#¨16™-¨'A4$Ä+($(ENTER NUMBER OF PAYMENTS(•+$Î!(!(ENTER MONTHLY PAYMENTØ A@6.‹6–-A:,$âE(/(#ENTER # OF COMPOUNDING PERIODS/YEAR3§E6™-¨'+A$§,ì-(&(HOW MANY YEARS TO COMPOUND*•-$ö+('(ENTER STARTING MONTH (1-12)+ž* 6‡.=:ž,*ž @)ž!@A  + 6‰. (6‰7@&B:‡,<@,.‡+$7(( ÈÁÒÄÃÏÐ٠ٯΠ# A7’@‰AP*** PRINTER SUBROUTINE***›(; (} (.(ÉÆ ÐÒÉÎÔÅÒ ÉÓ ÒÅÁÄÙ ÐÒÅÓÓ §Ð§;)@”2”@€A <{@-@@P{(@>:@',@>:@',l>:@,>:@',Q>:@U,FU$UABOVE SETS PRINTER TO DEFAULT, SETS LEFT MARGIN AT 15 AND RIGHT MARGIN AT 55›PH$(@>:@,>:@,HTHIS LINE JUST ADDS TWO 'RETURNS'›Z^5(@ƒ˜>:@,>:@,„>:@,8$^THIS ADDS THE HEADINGS WITH RETURNS›dMJ(@>:@,MONTHPAYMENTINTERESTAMOUNT>:@,M$nj(@žŒŽ$jTHESE TWO LINES PRINT THE HEADING,'RETURNS',& EACH LINE OF THE SAVINGS PROGRAM›x(@$‚v8(@>:@,‚ INTEREST=› PRIN=šQ(@ CHARGES= ¢T$vPRINTS TOTALS AT BOTTOM OF PAGE›Œ*** ERROR ROUTINE ***›–M (} (+(INPUT MISTAKE - START OVER?¤-@AC ¤M @€ ***CONVERT ROUTINE ***›ª—´.6Š.=:P:—$A,,.B:Š,!@A0¾(—"6‹. 0.00( A€È 6«-B:Š,6¬-P:—,ÒL6‹. 0.0056‹7@<@,.Š7«&@<«,LP:—,"A€Ü)6‹7@&«<@,.=:¬,) A€æ*** CONVERT LARGE ***›ð—ú6Š.=:P:—$A,,*—" 6‹. 0.00* A€ 6«-B:Š,6¬-P:—,k6‹. 0.0086‹7@ <@,.Š7«&@<«,GP:—,"a6‹7@<@,.0.k A€"6‹7@&«<@,.=:¬,,$€D1:FINANCE.BAS