600 POSITION K0,K0:? #6;"PRINCIPAL APR # PAYMENT TOTAL INT":RETURN ›2005 POSITION K0,LINE:PIC$=" .00":NU=P:GOSUB 100›3020 LINE=LINE+1:POSITION K0,LINE:? #6;"PAYOFF AMOUNT FOR ABOVE IS ";FRM$›5035 IF TEXT$(8,8)=" " THEN 5100›