48 lines
No EOL
770 B
NASM
48 lines
No EOL
770 B
NASM
poly START 0
|
|
startSubrutine LDA x0 .pristejemo x0 v A
|
|
|
|
LDB x
|
|
LDS x
|
|
LDT x1
|
|
MULR S, T
|
|
ADDR T, A .pristejemo x0 * x
|
|
|
|
LDT x2
|
|
MULR B, S .izracunamo x^2
|
|
MULR S, T
|
|
ADDR T, A
|
|
|
|
LDT x3
|
|
MULR B, S .izracunamo x^3
|
|
MULR S, T
|
|
ADDR T, A
|
|
|
|
LDT x4
|
|
MULR B, S .izracunamo x^4
|
|
MULR S, T
|
|
ADDR T, A
|
|
|
|
STA rez
|
|
|
|
halt J halt
|
|
END start
|
|
|
|
|
|
.polinom
|
|
x4 WORD 1
|
|
x3 WORD 2
|
|
x2 WORD 3
|
|
x1 WORD 4
|
|
x0 WORD 5
|
|
|
|
.tocka
|
|
x WORD 2
|
|
|
|
.rezultat
|
|
rez RESW 1
|
|
|
|
.parameter subrutine
|
|
arg1 RESW 1
|
|
|
|
.rezultat subrutine
|
|
subRez RESW 1 |