u4bcdtco.asm

来自「pic单片机常用的汇编程序,很有用的,分成各个小模块」· 汇编 代码 · 共 22 行

;********************U4BCDTCO********************
;本程序实现4字节非压缩BCD码数转化为2字节压缩BCD码。
;入口参数：原非压缩BCD码数在RLTH:RLT:SOUH:SOU中。
;出口参数：结果在RLTH:RLT中。
;占用资源：W,STATUS,024H,025H,026H,027H,一重堆栈。
SOU         EQU         024H
SOUH        EQU         025H
RLT         EQU         026H
RLTH        EQU         027H

           IFNDEF       U4BCDTCO1
            #DEFINE     U4BCDTCO1
                        
U4BCDTCO    SWAPF       RLTH,W
            ADDWF       RLT,W
            MOVWF       RLTH
            SWAPF       SOUH,W
            MOVWF       RLT
            MOVF        SOU,W
            ADDWF       RLT,F
            RETURN
           ENDIF