80 lines
936 B
Plaintext
80 lines
936 B
Plaintext
Multiplier V.1:
|
|
|
|
Inputs:
|
|
|
|
INP
|
|
STA 10000000 #Input 1
|
|
INP
|
|
STA 10000001 #Input 2
|
|
|
|
Counter-Setup: 00000100
|
|
|
|
LDI 01111111 #konst
|
|
SUB 10000001 #Input 2
|
|
STA 10000010 #Round-Pointer
|
|
|
|
Add: 00001000
|
|
|
|
LDA 10000011 #Out
|
|
ADD 10000000 #Input 1
|
|
STA 10000011
|
|
|
|
Count: 00001100
|
|
|
|
LDI 00000001
|
|
ADD 10000010
|
|
STA 10000010
|
|
|
|
Jump back: 00010001
|
|
|
|
LDA 10000010
|
|
JIF to Add
|
|
|
|
Outputs: 00010011
|
|
|
|
LDA 10000011
|
|
OUT
|
|
HLT
|
|
|
|
|
|
##########
|
|
|
|
Multiplier V.2:
|
|
|
|
Inputs:
|
|
|
|
INP
|
|
STA 10000000 #Input 1
|
|
INP
|
|
STA 10000001 #Input 2
|
|
|
|
Counter-Setup: 00000100
|
|
|
|
LDI 10000000 #konst
|
|
ADD 10000001 #Input 2
|
|
STA 10000010 #Round-Pointer
|
|
|
|
Add: 00001000
|
|
|
|
LDA 10000011 #Out
|
|
ADD 10000000 #Input 1
|
|
STA 10000011
|
|
|
|
Count: 00001100
|
|
|
|
LDI 00000001
|
|
STA 10000100 #temp1
|
|
LDA 10000010 #Round-Pointer
|
|
SUB 10000100 #temp1
|
|
STA 10000010 #Round-Pointer
|
|
|
|
Jump back: 00010001
|
|
|
|
LDA 10000010
|
|
JIF to Add
|
|
|
|
Outputs: 00010011
|
|
|
|
LDA 10000011
|
|
OUT
|
|
HLT |