;********************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