EEPW论坛

;入口
;       BCDREG  寄存器
;出口
DAALF   MACRO   BCDVAL,BCDREG
        MOVLFB  BCDVAL,BCDREG
        DAAF    BCDREG
        ENDM
;-------BCD加法调整宏定义---------------
;入口
;       BCDREG  寄存器
;出口
;PIC17XXX DAW
;MCS51  DAA
DAAF    MACRO   BCDREG
        MOVLW   .6
        ADDWF   BCDREG,W
        BTFSC   STATUS,DC
        MOVWF   BCDREG;低4位有进位+06H
        MOVLW   0X60
        ADDWF   BCDREG,W
        BTFSC   STATUS,C
        MOVWF   BCDREG;高4位有进位+60H
        ENDM
;-------BCD减法调整宏定义-----------------
;入口
;       BCDREG  寄存器
;出口
DASF    MACRO   BCDREG
        MOVLW   0X06
        SUBWF   BCDREG,W
        BTFSC   STATUS,DC
        MOVWF   BCDREG;低4位有进位-06H
        MOVLW   0X60
        SUBWF   BCDREG,W
        BTFSC   STATUS,C
        MOVWF   BCDREG;高4位有进位-60H
        ENDM