00 10	BEGIN: 	LOD A, [PRODUCT]
01 15
02 20		ADD A, [MULTIPLICAND]
03 12
04 11		STO [PRODUCT], A
05 15
06 10		LOD A, [MULTIPLIER]
07 13
08 21		SUB A, [ONE]
09 14
0A 11		STO [MULTIPLIER], A
0B 13
0C 33		JNZ BEGIN
0D 00
0E 10		LOD A, [PRODUCT]
0F 15
10 ff		HLT
11 ff
12 02	MULTIPLICAND: 	DB 02
13 04	MULTIPLIER:	DB 04
14 01	ONE:		DB 01
15 00	PRODUCT:	DB 00