added arithr

This commit is contained in:
zanostro 2025-11-15 11:36:32 +01:00
parent 312c953151
commit 39aed69969

59
ass1/arithr.asm Normal file
View file

@ -0,0 +1,59 @@
.code
arithr START 0
LDA x ; A = x
LDB y ; B = y
RMO A,S ; S = x
RMO B,T ; T = y
. sum = x + y
RMO S,A ; A = x
ADDR T,A ; A = x + y
STA sum
. diff = x - y
RMO S,A ; A = x
SUBR T,A ; A = x - y
STA diff
. prod = x * y
RMO S,A ; A = x
RMO T,B ; B = y
MULR B,A ; A = x * y
STA prod
. quot = x / y
RMO S,A ; A = x
RMO T,B ; B = y
DIVR B,A ; A = x / y
STA quot
. mod = x % y = x - (x / y)*y
RMO S,A
RMO T,B
DIVR B,A ; A = q = x/y
RMO A,L ; L = q (shrani)
RMO T,A ; A = y
RMO L,B ; B = q
MULR B,A ; A = y*q = produkt
RMO S,B ; B = x
SUBR A,B ; B = x - (y*q)
STB mod
HALT J HALT
.data
x WORD 5
y WORD 2
sum RESW 1
diff RESW 1
prod RESW 1
quot RESW 1
mod RESW 1
END arithr