Vaja2 osnove v1
This commit is contained in:
parent
d3a493a7fd
commit
480e0e84ce
12 changed files with 277 additions and 0 deletions
40
vaja2/osnove/arithr.asm
Normal file
40
vaja2/osnove/arithr.asm
Normal file
|
|
@ -0,0 +1,40 @@
|
|||
arithr START 0
|
||||
LDS #11
|
||||
LDT #5
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
ADDR T, A
|
||||
STA sum
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
SUBR T, A
|
||||
STA diff
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
MULR T, A
|
||||
STA prod
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
DIVR T, A
|
||||
STA quot
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
LOOP SUBR T, A
|
||||
COMPR A, T
|
||||
JGT LOOP
|
||||
JEQ LOOP
|
||||
STA mod
|
||||
HALT J HALT
|
||||
END arithr
|
||||
|
||||
ZERO WORD 0
|
||||
sum RESW 1
|
||||
diff RESW 1
|
||||
prod RESW 1
|
||||
quot RESW 1
|
||||
mod RESW 1
|
||||
Loading…
Add table
Add a link
Reference in a new issue