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

           IFNDEF       SCOBCDTU1
            #DEFINE     SCOBCDTU1
                        
SCOBCDTU    SWAPF       SOU,W
            ANDLW       0FH
            MOVWF       SOUH
            MOVLW       0FH
            ANDWF	SOU,F
            RETURN
           ENDIF