1
« en: Viernes 16 de Abril de 2004, 16:07 »
gracias por la rutina m sera muy util.
esta es la rutina de division de 8 bits tal vez t pueda servir
DIVV8
MOVF TEMPY8,F
BTFSC STATUS,Z
RETURN
CLRF RESULT8
MOVLW 1
MOVWF IDX16
SHIFT_IT8
BCF STATUS,C
RLF IDX16,F
BCF STATUS,C
RLF TEMPY8,F
BTFSS TEMPY8,7
GOTO SHIFT_IT8
DIVU8LOOP
MOVF TEMPY8,W
SUBWF TEMPX8
BTFSC STATUS,C
GOTO COUNT8
ADDWF TEMPX8
GOTO FINAL8
COUNT8
MOVF IDX16,W
ADDWF RESULT8
FINAL8
BCF STATUS,C
RRF TEMPY8,F
BCF STATUS,C
RRF IDX16,F
BTFSS STATUS,C
GOTO DIVU8LOOP
RETURN