21imcu.html

一些关于数据转换与计算的子程序

55&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 55 55 55 55 <br>
;&nbsp;&nbsp;&nbsp; 12 34 56 78&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 12 34 56 79 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; FF FF FF FF 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br>
;__________________________________________________________________________<br>
<br>
;_____________________________________________________________________________<br>
;Name: <a name="_SUBM4">SUBM4</a><br>
;Func: 四字节乘四字节乘法子程序<br>
;Input:被乘数和乘数分别放在内部RAM20H--27H单元中,乘数位数放在2AH单元中<br>
;OutPut: 乘积放在内部RAM61H-68H单元中.<br>
;_____________________________________________________________________________<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 20H<br>
DATA1 DEFB 0FFH 被乘数低字节<br>
DATA2 DEFB 0FFH<br>
DATA3 DEFB 0FFH<br>
DATA4 DEFB 7FH 被乘数高字节<br>
DATB1 DEFB 0FFH 乘数低字节<br>
DATB2 DEFB 0FFH<br>
DATB3 DEFB 0FFH<br>
DATB4 DEFB 7FH 乘数高字节<br>
COVNT EQU 20H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 2000H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AJMP&nbsp;&nbsp;&nbsp; MAIN<br>
MAIN:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R0, 
&nbsp;&nbsp;&nbsp; DATA1<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R1, 
&nbsp;&nbsp;&nbsp; DATA2<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R2, 
&nbsp;&nbsp;&nbsp; DATA3<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R3, 
&nbsp;&nbsp;&nbsp; DATA4<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R4, 
&nbsp;&nbsp;&nbsp; DATB1<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R5, 
&nbsp;&nbsp;&nbsp; DATB2<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R6, 
&nbsp;&nbsp;&nbsp; DATB3<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R7, 
&nbsp;&nbsp;&nbsp; DATB4<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 2AH, 
&nbsp;&nbsp;&nbsp; #COVNT<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLR&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 61H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 62H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 63H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 64H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 65H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 66H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 67H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 68H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ACALL&nbsp;&nbsp;&nbsp; CHENG6<br>
LOOP0:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; SJMP&nbsp;&nbsp;&nbsp; LOOP0<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 2200H<br>
CHENG6: MOV A, 61H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 61H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 61H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 62H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 62H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 62H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 63H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 63H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 63H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 64H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 64H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 64H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 65H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 65H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 65H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 66H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 66H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 66H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 67H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 67H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 67H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 68H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 68H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 68H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R4<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R4<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R4,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R5<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R5<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R5,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R6<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R6<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R6,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R7<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R7<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R7,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; JNC&nbsp;&nbsp;&nbsp; LOOP1<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 61H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADD&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R0<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 61H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 62H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R1<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 63H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R2<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 63H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 64H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; R3<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 64H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 65H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A, 
&nbsp;&nbsp;&nbsp; #00H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 65H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 66H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A, 
&nbsp;&nbsp;&nbsp; #00H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 66H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 67H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A, 
&nbsp;&nbsp;&nbsp; #00H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 67H,&nbsp;&nbsp;&nbsp; A<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; A,&nbsp;&nbsp;&nbsp; 68H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ADDC&nbsp;&nbsp;&nbsp; A, 
&nbsp;&nbsp;&nbsp; #00H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; 68H,&nbsp;&nbsp;&nbsp; A<br>
LOOP1:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DJNZ&nbsp;&nbsp;&nbsp; 2AH, 
&nbsp;&nbsp;&nbsp; LOOP2<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; RET<br>
LOOP2:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AJMP&nbsp;&nbsp;&nbsp; CHENG6<br>
END<br>
;__________________________________________________________________________<br>
;&nbsp;&nbsp;&nbsp; 被乘数 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 乘数 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 积数<br>
;&nbsp;&nbsp;&nbsp; 23H22H21H20H&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 27H26H25H24H 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 68H--61H<br>
;&nbsp;&nbsp;&nbsp; 7F FF FF FF&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 7F FF FF 
FF&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 3F FF FF FF 00 00 01 00<br>
;&nbsp;&nbsp;&nbsp; 00 FF FF FF&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 00 00 FF 
FF&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 00 00 00 FF FE FF 00 01<br>
;__________________________________________________________________________<br>
;_____________________________________________________________________________<br>
;Name: <a name="_CHU3">CHU3</a><br>
;Func:&nbsp; 五字节除五字节除法子程序<br>
;Input: 被除数放在内部RAM20H-24H单元中,除数放在10H-14H单元中.<br>
;OutPut:商数放在25-29单元中,25H单元放最低字节,余数放在20H-24H单元中,20H单元放最低字节<br>
;Use: 用A,C,R0,R1,R2,R3,R6,R7寄存器,其中R0作移位减计数器,使用位地址60H单元作进位位,C作暂存器<br>
;_____________________________________________________________________________<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 20H<br>
DATA1:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 21H 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 被除数最低字节<br>
DATA2:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 43H 
&nbsp;&nbsp;&nbsp; <br>
DATA3:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 65H 
&nbsp;&nbsp;&nbsp; <br>
DATA4:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 87H 
&nbsp;&nbsp;&nbsp; <br>
DATA5:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; A9H 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 被除数最高字节<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 10H<br>
DATB1:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 9AH 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 除数最低字节<br>
DATB2:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 78H<br>
DATB3:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 56H<br>
DATB4:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 34H<br>
DATB5:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DEFB&nbsp;&nbsp;&nbsp; 12H 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 除数最高字节<br>
ORG 2000H<br>
AJMP MAIN<br>
MAIN: ACALL CHU3<br>
LOOP: SJMP LOOP<br>
CHU3: MOV R0, #DATB1<br>
MOV R7, #04H ;检查除数为零停止运算<br>
LOOP1: MOV A, @R0<br>
JNC R0<br>
ORL A, @R0<br>
JNZ A, LOOP0<br>
DJNZ R7, LOOP1<br>
AJMP LOOP2<br>
LOOP0: CLR A<br>
MOV R0, #25H<br>
MOV R7, #05H<br>
LOOP3: MOV @R0, A<br>
INC R0<br>
DJNZ R7, LOOP6<br>
MOV R6, #28H ;移位计数器<br>
LOOP8: MOV R0, #DATA1 ;与商连在一起左移<br>
MOV R7, #0AH<br>
LOOP4: MOV A, @R0<br>
RLC A<br>
MOV @R0, A<br>
INC R0<br>
DJNZ R7, LOOP<br>
CLR C<br>
MOV R0, #25H; 被除数减除数(此被除数是扩充位)<br>
MOV R1, #DATB1<br>
MOV R7, #05H<br>
LOOP5: MOV A, @R0<br>
SUBB A, @R1<br>
MOV @R0, A<br>
INC R0<br>
INC R1<br>
DJNZ R7, LOOP5<br>
JNC C, LOOP6 <br>
MOV 66H, C ;暂存进位位<br>
MOV R0, #25H ;不够减恢复余数<br>
MOV R1, #DATB1<br>
MOV R7, #05H<br>
CLR C<br>
LOOP7: MOV A, @R0<br>
ADDC A, @R1<br>
MOV @R0, A<br>
INC R0<br>
INC R1<br>
DJNZ R7, LOOP7<br>
MOV C, 60H<br>
LOOP6: CPL C<br>
DJNZ R6, LOOP8<br>
MOV R1, #20H<br>
MOV R1, #25H<br>
MOV 7, #05H<br>
LOOP9: MOV A, @R0<br>
RLC A<br>
MOV R3, A<br>
MOV A, @R1<br>
MOV @R0, A<br>
MOV A, R3<br>
MOV @R1, A<br>
INC R0<br>
INC R1<br>
DJNZ R7, LOOP9<br>
LOOP2: RET<br>
;_____________________________________________________________________________<br>
;Name: <a name="_CHU4">CHU4</a><br>
;Func:&nbsp;&nbsp; 双字节除单字节除法子程序<br>
;Input:&nbsp; 被除数放在R0,R1 R0放被除数低字节,除数放在R4,R7为字节长度<br>
;OutPut: 商数庆在R0中,余数放在R1中<br>
;Use:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br>
;_____________________________________________________________________________<br>
<br>
DATA1 EQU 6DH 被除数低字节<br>
DATA2 EQU 32H 被除数高字节<br>
DATB EQU 47H 除数<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ORG&nbsp;&nbsp;&nbsp; 2000H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AJMP&nbsp;&nbsp;&nbsp; MAIN<br>
MAIN:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R0, 
&nbsp;&nbsp;&nbsp; #DATA1<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R1, 
&nbsp;&nbsp;&nbsp; #DATA2<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R4, 
&nbsp;&nbsp;&nbsp; #DATB<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MOV&nbsp;&nbsp;&nbsp; R7, 
&nbsp;&nbsp;&nbsp; #08H<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ACALL&nbsp;&nbsp;&nbsp; CHU4<br>
LOOP:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; SJMP&nbsp;&nbsp;&nbsp; LOOP<br>