Poskus hornerjevega algoritma s subrutino, ma pomoje neki ne dela
This commit is contained in:
parent
0d6f4cf70b
commit
a363fd8403
4 changed files with 139 additions and 0 deletions
54
ass1/Polinom/poly_sub.asm
Normal file
54
ass1/Polinom/poly_sub.asm
Normal file
|
|
@ -0,0 +1,54 @@
|
|||
. Racunanje polinoma s subrutino ki vsebuje loop
|
||||
ps START 0
|
||||
LDX #0 . X je idx za tocke
|
||||
LDL #3
|
||||
LDF len
|
||||
outer_loop
|
||||
LDT in, X . V T je trenutno obravnavana tocka
|
||||
LDA a4 . V A bomo računali z vmesnimi rezultati
|
||||
STA temp . V temp vmesni rezultati
|
||||
LDB #0 . B bo idx za koeficiente
|
||||
LDS a3 . Z S se bomo pomikali po koeficientih
|
||||
|
||||
inner_loop
|
||||
LDA temp
|
||||
MULR T, A
|
||||
SUBR B, S
|
||||
ADDR S, A . V prvem loopu je B=0, pol B=3, pol B=6 itd
|
||||
STA temp
|
||||
|
||||
ADDR L, B
|
||||
COMPR B, F
|
||||
JLT inner_loop
|
||||
|
||||
STA poly, X
|
||||
ADDR L, X
|
||||
COMPR X, F
|
||||
JLT outer_loop
|
||||
|
||||
RSUB
|
||||
|
||||
halt J halt
|
||||
END ps
|
||||
|
||||
. Tocke
|
||||
in WORD 1
|
||||
WORD 2
|
||||
WORD 3
|
||||
WORD 4
|
||||
WORD 5
|
||||
|
||||
lastin EQU *
|
||||
len EQU lastin - in . Stevilo tock v bajtih
|
||||
|
||||
. Rezultat
|
||||
poly RESW 5
|
||||
temp RESW 1
|
||||
|
||||
|
||||
. Koeficienti
|
||||
a0 WORD 5
|
||||
a1 WORD 4
|
||||
a2 WORD 3
|
||||
a3 WORD 2
|
||||
a4 WORD 1
|
||||
Loading…
Add table
Add a link
Reference in a new issue