<=BRPRICAMOUNTRADTADPAMISRATFINAREPAPAYMENEATIM  CAR FINANCER BY ELAINE A. PATTERSON (c) 1986, ANTIC PUBLISHING06-@$F:B2y,"@06-8 A0@8@@K:COST OF AUTO| +@AAF4AF:A,FA @@XAA8jA@0|AR@#^ A0-@@>(@THIS PROGRAM WILL^(@ TAKE INTO ACCOUNT(a!(@ ALL VARIABLESA(@ WHEN BUYING A CARa(@ TO DETERMINE YOUR-v#(@ monthly payments5-@@N(@ WHAT IS THEv(@ >:AY,2 @P6-<0-@@&(@$0 AF"@x@0O TRADEP(@>:A%,+-@@K(@WILL YOU TRADE-IN?]-@@p(@(Y/N)w(} AZ%"@x6-% A0dL-@7(@A AH(}Ln\-@@&(@$0 A<"@xR(@>:A%,\ Ax 6-& TAXm(@>:A%,+-@@D(@ WHAT IS THEm(@ >:AY,b-@@4(@ENTER 4 FOR 4% orF-@@b(@6.75 FOR 6.75%E AP(}*-@@ ;(@%E A"@xA006-'A06-P:+%$,$A,'ADOWN PAYMENTx(@>:A%,+-@@A(@HOW MUCHS-@@x(@ >:AY,Y A(}*-@@ ;(@$E AY"@xAMISC. EXPENSESu(@>:A%,+-@@H(@TAG, TITLE, ANDZ-@@u(@ MISCELLANEOUS6-@@6(@>:AY,Y A(}*-@@;(@$E AY"@xA 6-%&FINANCE RATE{(@>:A%,+-@@D(@ WHAT IS THEV-@@{(@ finance rate>:@1,-@@3(@ENTER 19 FOR 19%E-@ @U(@ORg-@@(@ 9.9 FOR 9.9%E AP(}*-@@;(@%E A"@xA06-'ANUMBER OF MONTHSS(@>:A%,+-@@S(@HOW MANY >:AY,"" A(}" B,6-@@,(@ MONTHS6 A6"@xA?SOURCE OF LOAN@y(@>:A%,+-@@S(@WILL THIS LOAN BE FROM A:e-@@y(@1 bankJc-@@ 3(@2 car finance coE-@@c(@(GMAC,FORD,ETC.)TK-@A(@>:AY,K A ^A`AgBANK METHODh66-$$'@66-P:$A%?P,'Ar4 6-%6-'46-P:$A%?P,'A| ACAR FINANCE CO. METHODR6-+%+$$'@,,'+6-&@016-R6-P:$A%?P,'A#-@#@w>6-$$+@'@,>6-P:$A%?P,'A 6-%& ( Ǡ4 @@*!6@@ 6-*6-$&4 A 6@@6-&?P::.5'S CAN BE CHANGED TO .75 IF THAT WOULD SPEED IT UP!@@6-%?P 6- AOUTPUT CHOICEc(@>:A%,+-@@H(@DO YOU WANT THEc(@ RESULTS ON:W-@@.(@ 1 or@-@@W(@ 2 A-@7(@WHAT IS YOUR CHOICE?A A AA DISPLAY RESULTS > + A0&(PRICE: $>(TRADE-IN VALUE: $*6 ( TAX RATE: $A%6(DOWN PAYMENT: $4^$(FINANCE RATE: $A%=(AMOUNT FINANCED: $L(MONTHS: ^( INTEREST: $>@(TOTAL TO REPAY: $%6(MONTHLY PAYMENT: $@ A0PRINT RESULTSK + A0$(PRINTING33PRICE: $K3TRADE-IN VALUE: $6 3 TAX RATE: $A%63DOWN PAYMENT: $L$3FINANCE RATE: $A%=3AMOUNT FINANCED: $L3MONTHS: H3 INTEREST: $/3TOTAL TO REPAY: $%H3MONTHLY PAYMENT: $ A0X-@@3(@IS THIS CORRECT?E-@@X(@(Y/N)))@&"@)"@x)$ AF-@@)( ONE MORE TIME;-@@F( QUIT/-@@ /( A $"@@0. +<)@6-&@H< @)!@A $ DISABLE BREAK =@w+@A=B7tA $D1:CARFINAN.BAS