checkpoint
This commit is contained in:
parent
dadc137833
commit
3856635345
7 changed files with 241 additions and 35 deletions
|
|
@ -1,35 +1,32 @@
|
|||
arithr START 0 .komentar1
|
||||
LDS #11 .komentar2
|
||||
+LDX #10
|
||||
SHIFTR A, 10, X
|
||||
+LDS #11 .komentar2
|
||||
LDT #5
|
||||
.komentar3
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
ADDR T, A
|
||||
STA sum
|
||||
FIX
|
||||
FLOAT
|
||||
|
||||
.komentar4
|
||||
LDA ZERO
|
||||
+LDA ZERO, X .test
|
||||
ADDR S, A
|
||||
LDA 123, X . kom
|
||||
SUBR T, A
|
||||
STA diff
|
||||
HIO
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
MULR T, A
|
||||
STA prod
|
||||
|
||||
SUBR A, X
|
||||
SHIFTR A, 10
|
||||
SHIFTL X, #101
|
||||
LA DIVR S, T . en komentar
|
||||
LDA ZERO
|
||||
+LDA ZERO
|
||||
ADDR S, A
|
||||
lab SHIFTR A, 5
|
||||
CLR SHIFTR L, 100 .komentar
|
||||
DIVR T, A
|
||||
STA quot
|
||||
FIX . s komentarjem
|
||||
|
||||
LDA ZERO
|
||||
ADDR S, A
|
||||
LOOP SUBR T, A .komentar5
|
||||
|
|
@ -37,12 +34,6 @@ LOOP SUBR T, A .komentar5
|
|||
JGT LOOP
|
||||
JEQ LOOP
|
||||
STA mod
|
||||
Lab SVC #100
|
||||
lab CLEAR A
|
||||
SVC 10
|
||||
TIXR S
|
||||
test SVC @300 . se en komentar
|
||||
LA TIXR T . komentar at the end
|
||||
HALT J HALT
|
||||
END arithr
|
||||
|
||||
|
|
@ -53,3 +44,4 @@ prod RESW 1
|
|||
quot RESW 1 .komentar6
|
||||
mod RESW 1
|
||||
.komentar7
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue