working on sicxe

This commit is contained in:
Jaka Furlan 2025-11-29 16:12:58 +01:00
parent 1b990e190c
commit d836b3955d
79 changed files with 2011 additions and 917 deletions

View file

@ -1,64 +1,64 @@
poly START 0
start LDA x
STA arg1
JSUB startSubrutine
LDA subRez
STA rez
halt J halt
END start
.subrutina za izračun tega polinoma v točki arg1
startSubrutine STA regA
STB regB
STT regT
STS regS .shranimo registre
LDA x0 .pristejemo x0 v A
LDX #3 .odmik v arrayu
LDS arg1
loop LDT x0, X .preberemo x_n
MULR S, T .izračunamo x_n * x^n
ADDR T, A .pristejemo v vsoto
LDT arg1
MULR T, S .zmožimo naslednjo potenco
LDT #3
ADDR T, X .povečamo odmik
LDT #13
COMPR T, X
JGT loop
STA subRez .shranimo rez
LDA regA .obnovimo registre
LDB regB
LDT regT
LDS regS
RSUB
.polinom
x0 WORD 5
WORD 4
WORD 3
WORD 2
WORD 1
.tocka
x WORD 2
.rezultat
rez RESW 1
.parameter subrutine
arg1 RESW 1
.rezultat subrutine
subRez RESW 1
.registri
regA RESW 1
regB RESW 1
regT RESW 1
regS RESW 1
poly START 0
start LDA x
STA arg1
JSUB startSubrutine
LDA subRez
STA rez
halt J halt
END start
.subrutina za izračun tega polinoma v točki arg1
startSubrutine STA regA
STB regB
STT regT
STS regS .shranimo registre
LDA x0 .pristejemo x0 v A
LDX #3 .odmik v arrayu
LDS arg1
loop LDT x0, X .preberemo x_n
MULR S, T .izračunamo x_n * x^n
ADDR T, A .pristejemo v vsoto
LDT arg1
MULR T, S .zmožimo naslednjo potenco
LDT #3
ADDR T, X .povečamo odmik
LDT #13
COMPR T, X
JGT loop
STA subRez .shranimo rez
LDA regA .obnovimo registre
LDB regB
LDT regT
LDS regS
RSUB
.polinom
x0 WORD 5
WORD 4
WORD 3
WORD 2
WORD 1
.tocka
x WORD 2
.rezultat
rez RESW 1
.parameter subrutine
arg1 RESW 1
.rezultat subrutine
subRez RESW 1
.registri
regA RESW 1
regB RESW 1
regT RESW 1
regS RESW 1