;********************SUBCDNEG********************
;本程序?qū)崿F(xiàn)單字節(jié)非壓縮BCD碼求補(bǔ)。
;入口參數(shù)：待處理的數(shù)據(jù)在SOU中。
;出口參數(shù)：結(jié)果在SOU中。
;占用資源：W,STATUS,024H.,一重堆棧。
;說(shuō)    明: 0求補(bǔ)還是0.

           IFNDEF       SUBCDNEG1
            #DEFINE     SUBCDNEG1
                                                
SUBCDNEG    MOVF        SOU,F       ;判斷是不是0
            BTFSC       STATUS,Z
            RETURN
            MOVF        SOU,W
            SUBLW       .10
            MOVWF       SOU
            RETURN
           ENDIF