conversao binario 8 bits para binario bcd com pic

[diogo_18sp]

ola boa noite caros amigos estou com uma duvida como faço pra converter em assembler ,uso o pic 16f84a um numero de oito bits (10101110) em unidade dezena e centena obrigado .

[malaquias]

Eu utilizo esta rotina:

;********************************************************************************
;* Rotina de conversão binário para decimal (8 bits) *
;********************************************************************************

BIN4DEC:
MOVWF D0 ;copia o número a ser convertido para a variável de unidades.
CLRF D1 ;limpa as dezenas.

BIN4DEC_2:
MOVLW 10 ;subtrai 10 decimal ...
SUBWF D0,W ;... do valor a ser convertido e guarda em W
BTFSS STATUS,C ;o resultado é positivo ou zero...
RETURN ;não ? então retorna, a conversão terminou
MOVWF D0 ;sim ? então copia o resultado em W para as unidades
INCF D1,F ;incrementa um nas dezenas
GOTO BIN4DEC_2 ;e reinicia o ciclo.

Grato.
Paulo Malaquias

[Vonnilmam]

Dá uma procurada aquí no site, porque eu postei uma rotina em assembler para converter binario para bcd e vice versa...na epoca eu precisava converter um dado binario para bcd afim de enviar para um ds1307...