% This program was contributed by an anonymous user on the Internet
% -----------------------------------------------------------------


%I finally made a useful program for Zusie. It multiplies two binary numbers.
% Place the numbers to be multiplied in registers A and B before starting.
% When done, the result will be placed in register C and registers A and B
% will have all bits set to alert you that the process. Maybe this could show
% people that relay computers can actually do something useful.


:1
ADDac->mxy
RDxy->c
DECb->mxy
RDxy->b
SBRZ 2
SBR 1
:2
LDL->a b11111111
LDL->b b11111111