52 lines
683 B
NASM
52 lines
683 B
NASM
arithr START 0 .komentar1
|
|
LDX #10
|
|
SHIFTR A, 10, X
|
|
LDS #11 .komentar2
|
|
LDT #5
|
|
NOBASE .koment
|
|
NOBASE
|
|
BASE ZERO .KOMENTAR
|
|
ORG tab-tab
|
|
LAB NOBASE
|
|
EQU
|
|
LAB NOBASE .koment
|
|
.komentar3
|
|
LDA ZERO
|
|
ADDR S, A
|
|
ADDR T, A
|
|
STA sum
|
|
|
|
.komentar4
|
|
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 .komentar5
|
|
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 .komentar6
|
|
mod RESW 1
|
|
.komentar7
|
|
|