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
|