move DPTR, #0001h
movx a, @DPTR
inc dptr
mov r1, a
movx a, @DPTR
inc dptr
mov r2, a
movx a, @DPTR
inc dptr
mov r3, a
movx a, @DPTR
mov r4, a

mov r1, a
mov r3,b
MUL ab
mov r5, a
mov r6, b

mov a, r2
mov b, r4
MUL ab
mov r7, a
mov r8, b

mov a, r1
mov b, r4
MUL ab
add b,r7
jnc nocarry
	inc r6
	jnc nocarry
	inc r5
nocarry:mov r7, b
add a, r6
jnc nocarry
	inc r5
nocarry:mov r6, a

mov a, r2
mov b, r4
MUL ab
add b, r8
jnc nocarry
	inc r7
	jnc nocarry
	inc r6
	jnc nocarry
	inc r5
nocarry:mov r8, b
add a, r7
jnc nocarry
	inc r6
	jnc nocarry
	inc r1
nocarry:mov r7, a