;********************DCOBCDTU********************
;本程序實現雙字節壓縮BCD碼數轉化為四字節非壓縮BCD碼。
;入口參數：原BCD碼數在SOUH:SOU中。
;出口參數：結果在RLTH:RLT:SOUH:SOU中。
;占用資源：W,STATUS,024H,025H,026H,027H,一重堆棧。

           IFNDEF       DCOBCDTU1
            #DEFINE     DCOBCDTU1
                        
DCOBCDTU    SWAPF       SOUH,W
            ANDLW       0FH
            MOVWF       RLTH
            MOVLW       0FH
            ANDWF	SOUH,W
            MOVWF       RLT       
            SWAPF       SOU,W
            ANDLW       0FH
            MOVWF       SOUH
            MOVLW       0FH
            ANDWF	SOU,F
            RETURN
           ENDIF