Skip to content
Permalink
Branch: master
Find file Copy path
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
119 lines (108 sloc) 1.66 KB
-- HUMAN RESOURCE MACHINE PROGRAM --
-- 20-Multiplication-Workshop - SIZE 92/15 - SPEED 64/109 --
-- This solution is level-specific (quality-limited input) and assumes input
-- values of 0-9.
-- Based on 93.67.specific-mschordan.asm.
BUMPUP 9
BUMPUP 9
ADD 9
COPYTO 4
INBOX
JUMPZ out1
COPYTO 0
INBOX
JUMPZ out
SUB 4
JUMPN b123
JUMPZ b4
SUB 9
JUMPN b5
JUMPZ b6
SUB 9
JUMPN b7
JUMPZ b8
COPYFROM 0
ADD 0
ADD 0
COPYTO 3
ADD 3
ADD 3
out:
OUTBOX
a:
INBOX
JUMPZ out1
COPYTO 0
INBOX
JUMPZ out
SUB 4
JUMPN b123
JUMPZ b4
SUB 9
JUMPN b5
JUMPZ b6
SUB 9
JUMPN b7
JUMPZ b8
COPYFROM 0
ADD 0
ADD 0
COPYTO 3
ADD 3
ADD 3
JUMP out
out1:
OUTBOX
INBOX
JUMP a
b1:
COPYFROM 0
JUMP out
b2:
COPYFROM 0
ADD 0
JUMP out
b123:
ADD 9
JUMPN b1
JUMPZ b2
COPYFROM 0
ADD 0
ADD 0
JUMP out
b4:
COPYFROM 0
ADD 0
ADD 0
ADD 0
JUMP out
b5:
COPYFROM 0
ADD 0
ADD 0
ADD 0
ADD 0
JUMP out
b6:
COPYFROM 0
ADD 0
ADD 0
COPYTO 3
ADD 3
JUMP out
b7:
COPYFROM 0
ADD 0
ADD 0
COPYTO 3
ADD 3
ADD 0
JUMP out
b8:
COPYFROM 0
ADD 0
ADD 0
ADD 0
COPYTO 3
ADD 3
JUMP out
You can’t perform that action at this time.