分享一道单字节无符号数的乘法

只看该作者 · 2011-3-25 10:35

;********************SUMUL********************
;本程序实现单字节无符号数乘法。
;入口参数：被乘数在SOU中，乘数在RLT中。
;出口参数：结果在SOUH:SOU中。
;占用资源：W,STATUS,023H,024H,025H,026H,一重堆栈。
         IFNDEF       SUMUL1
         #DEFINE    SUMUL1

SUMUL  MOVLW    8
         MOVWF    CNT
         MOVF       SOU,W
         CLRF          SOU
         CLRF          SOUH
         BCF          STATUS,C
LOOP2  RRF             RLT,F
         BTFSC       STATUS,C
         ADDWF       SOUH,F
         RRF          SOUH,F
         RRF          SOU,F
         DECFSZ    CNT,F
         GOTO       LOOP2
         RETLW       0
         ENDIF
:victory:

只看该作者 · 2011-3-25 15:11

再加一道使用加法的单字节乘法子程序。
;入口是被乘数SOU,RLT为乘数
;出口是R5存高位，R1存低位
;R1低位R5高位
CLRF R1
CLRF R5
LOOP0 MOVF SOU, W
ADDWF R1, 1
MOVF R5, W
BTFSC C
ADDLW .1
MOVWF R5
DECFSZ RLT, 1
GOTO LOOP0

只看该作者 · 2011-3-25 15:12

恩不好意思说是子程序，结果开头的子程序名和末尾的RETURN漏了，自动补上哈。