Bill (17.08.2015 19:12, просмотров: 158) ответил oleg110592 на от Леонида Ивановича табличный способ
От меня: вычисление полинома для PIC14000 :) #define _XK_ 0
#ifdef _XK_
#define POLY_COUNT 5
#else
#define POLY_COUNT 3
#endif
;
; ** Poly -- the routine to evaluate polynomial A + Bx + Cx^2 + Dx^3 + Ex^4 + Fx^5
;
Poly: movlw POLY_COUNT ; Set loop counter
movwf LCount ;
call Clr.F ; Set the summ initial value to F coefficient
movlw Poly_coeff-FPConsTbl ;
call Add.FC ;
@polyLoop: ; Evaluation loop
movlw ?Us ; Multiply the summ by the x value
call Mul.FV ;
movfw Index ; Add the current coefficient
call Add.FC ;
decfsz LCount, f ; Bump the loop counter
goto @polyLoop ; and continue if not done yet
movlw ?fVal ; Store the result
goto Put.FA ;
)