Moderadores: andre_luis, 51, guest2003, Renie
LE_SERIAL
BTFSC PORTA,SER_IN
GOTO LE_SERIAL
MOVLW 08
MOVWF SER_CONT
CLRF SERIAL_REG
MOVLW D'09' ;DELAY DE START BIT
MOVWF REG_DELAY1
DELAY_ST
DECFSZ REG_DELAY1,F
GOTO DELAY_ST
ESPERA
CALL DELAY_SERIAL
BCF STATUS,CARRY
RRF SERIAL_REG,F
BTFSC PORTA,SER_IN
BSF SERIAL_REG,7
DECFSZ SER_CONT,F
GOTO ESPERA
MOVF SERIAL_REG,W
DELAY_SERIAL
MOVLW D'65' ;DELAY DE ~208 uSEG
MOVWF REG_DELAY1 ;xtal 4MHz
DELAY_SERIAL_2
DECFSZ REG_DELAY1,F
GOTO DELAY_SERIAL_2
RETURN
Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante