本帖最后由 Periodic 于 2012-2-25 08:16 编辑
MOV R7,41H
MOV R6,40H
MOV R5,#0AH
LCALL FUN_1
MOV 43H,R6
MOV 44H,R7
;=================子程序====================================================
FUN_1:
SETB C
MOV R3,#00H
MOV R4,#11H ;左移R7 R6 11位
LOOP1:
CPL C
MOV A,R7
RLC A
MOV R7,A
MOV A,R6
RLC A
MOV R6,A
MOV A,R3
RLC A
MOV R3,A ;R3<-R6<-R7
DJNZ R4,LOOP2 ;R4-1!=0转移
RRC A
MOV 10H,A
RET
;------------------------------------------------
LOOP2:
JC LOOP3
SUBB A,R5 ;A= A-10
JC LOOP1
MOV R3,A
SJMP LOOP1
LOOP3:
CLR C
SUBB A,R5 ;A= A-10
CLR C
MOV R3,A
SJMP LOOP1
;======================================== |