scobcddiv.asm

PIC单片机的汇编源码合集,应用比较广泛,设计程序时可做子程序来用

;********************SCOBCDDIV********************
;本程序实现单字节压缩BCD码除法。
;入口参数：被除数在SOU中，除数在RLT中。
;出口参数：商在SOU中,余数在SOUH中。
;占用资源：W,STATUS,023H,024H,025H,026H,028H,两重堆栈。
;说    明: 加载本文件的同时也加载了另外三个文件"SCOBCDTB.ASM","SBTBCD1.ASM"
;          "SUDIV.ASM",故用户在使用这三个子程序时可直接调用,不必重新加载.


           IFNDEF       SCOBCDDIV1
            #DEFINE     SCOBCDDIV1
                        
SCOBCDDIV   CALL        SCOBCDTB    ;被除数转化为二进制数
            MOVF        SOU,W
            MOVWF       SOUH        ;暂存在被除数
            MOVF        RLT,W
            MOVWF       SOU         
            CALL        SCOBCDTB    ;除数转化为二进制数
            MOVF        SOU,W
            MOVWF       RLT
            MOVF        SOUH,W
            MOVWF       SOU         ;二进制数归位
            CALL        SUDIV
            CALL        SBTBCD1     ;转化为BCD码
            MOVF        SOU,W
            MOVWF       CNT         ;暂存
            MOVF        SOUH,W
            MOVWF       SOU
            CALL        SBTBCD1
            MOVF        SOU,W
            MOVWF       SOUH
            MOVF        CNT,W
            MOVWF       SOU
            RETLW       0
            INCLUDE     "SCOBCDTB.ASM"
            INCLUDE     "SUDIV.ASM"
            INCLUDE     "SBTBCD1.ASM"
           ENDIF