fsumi.asm

来自「pic子程序库与运算平台(PIC系列的四则运算、多字节、浮点等运算函数）」· 汇编 代码 · 共 28 行

;********************FSUMI********************
;本程序实现在单字节数据块中查找无符号数极小值。
;入口参数：数据块首址在SADR中,数据个数在W中。
;出口参数：极小值在SOU中,极小值地址在SADR中。
;占用资源：W,STATUS,FSR,020H,024H,028H,一重堆栈。
;说    明: 如果有两个或两个以上相等的极小值,则只能给出第一个极小值的地址.

           IFNDEF       FSUMI1
            #DEFINE     FSUMI1

FSUMI       MOVWF       TEMP1
            MOVF        SADR,W
            MOVWF       FSR
            MOVLW       0FFH
LOOP45      SUBWF       INDF,W
            BTFSC       STATUS,C
            GOTO        RECOVER1
            MOVF        FSR,W
            MOVWF       SADR        ;SADR中存放最大值地址
            MOVF        INDF,W      ;W中总是存放最大值
LOOP46      INCF        FSR,F
            DECFSZ      TEMP1,F
            GOTO        LOOP45
            MOVWF       SOU
            RETURN
RECOVER1    SUBWF       INDF,W      ;恢复W
            GOTO        LOOP46
           ENDIF