dd.asm

来自「单片机试验」· 汇编 代码 · 共 45 行

 org 00h
	mov r0,#30h
	mov r4,#00h       
	mov r5,#10h    
	mov r6,#0ffh    
	mov r7,#0ffh    
        sjmp multi
	sjmp $
multi:  mov a,r6
        mov b,r4      
	mul ab         
	mov @r0,a      
	mov r3,b      
	mov a,r4
	mov b,r7   
	mul ab        
	add a,r3
	mov r3,a       
	mov a,b
	addc a,#00h
	mov r2,a      
	mov a,r6       
	mov b,r5 
	mul ab         
	add a,r3
	inc r0
	mov @r0,a     
	mov r1,#00h
	mov a,r2
	addc a,b
	mov r2,a      
	jnc last       
	inc r1         
last:   mov a,r7
        mov b,r5
	mul ab         
	add a,r2       
	inc r0
	mov @r0,a
	mov a,b
	addc a,r1
	inc r0
	mov @r0,a     
	ret