;********************SUBCDSUB********************
;本程序?qū)崿F(xiàn)單字節(jié)非壓縮BCD碼減法。
;入口參數(shù)：被減數(shù)在SOU中，減數(shù)在RLT中。
;出口參數(shù)：結(jié)果在SOU中，借位標志在STATUS:C中,'0'表示有借位。
;占用資源：W,STATUS,024H,026H,一重堆棧。

           IFNDEF       SUBCDSUB1
            #DEFINE     SUBCDSUB1
                        
SUBCDSUB    MOVF        RLT,W
            SUBWF       SOU,F
            BTFSC       STATUS,C    ;檢查進位
            RETURN        
            MOVLW       0F6H        ;減6處理
            SUBWF       SOU,F
            ADDLW       0           ;置借位標志
            RETURN
           ENDIF