mshr.asm

来自「微芯公司的PIC子程序库及运算平台」· 汇编 代码 · 共 26 行

;********************MSHR********************
;本程序实现多字节二进制数带进位非循环右移1位。
;入口参数: 原数据地址在SADR中，字节数在CNT中。
;出口参数: 结果首地址在SADR中，字节数在CNT中,最低位在STATUS:C中。
;占用资源: W,STATUS,FSR,020H,023H,一重堆栈。
;说    明: 原数据将被冲掉.     

           IFNDEF       MSHR1
            #DEFINE     MSHR1

MSHR        MOVF        CNT,W
            RLF         CNT,F       ;保护C
            ADDWF       SADR,W
            MOVWF       FSR
            MOVF        SADR,W
            SUBWF       FSR,W
            DECF        FSR,F       ;得到最高位字节
            RRF         CNT,F       ;恢复C
            MOVWF       CNT         ;字节数
LOOP9       RRF         INDF,F
            DECF        FSR,F
            DECFSZ      CNT,F
            GOTO        LOOP9
            MOVWF       CNT
            RETURN
           ENDIF