#include "P18F4455.inc" VAR0 EQU 0X00 ORG 0X00 CONFIG_SERIAL: MOVLW D'32' MOVWF SPBRG MOVLW B'00100010' MOVWF TXSTA MOVLW B'10000000' MOVWF RCSTA ; MOVLW D'32' ; MOVWF SPBRG ; MOVLW B'00100010' ; MOVWF TXSTA ; MOVLW B'10010000' ; MOVWF RCSTA MOVLW B'00000000' MOVWF BAUDCON ; CLRF TRISD ; CLRF PORTD ; MOVLW 0XFF ; MOVWF ADCON1 ; CLRF TRISB ; MOVLW D'10' ; MOVWF PORTB ;CLRF BAUDCON NEXT_VAL: ;MOVFF VAR0, TXREG MOVLW D'10' MOVWF TXREG WAIT_FLAG BTFSS PIR1,TXIF BRA WAIT_FLAG WAIT_SEND: BTFSS TXSTA,TRMT BRA WAIT_SEND ;;;;;;;;;;;;;;;;;; MOVLW B'10000101' MOVWF T0CON CLRF TMR0L BCF INTCON, TMR0IF DELAY: BTFSS INTCON, TMR0IF GOTO DELAY ;;;;;;;;;;;;;;;;;;; BTG PORTD, 2 GOTO NEXT_VAL MAIN: ; BTFSS PIR1, RCIF ; BRA MAIN ; MOVFF RCREG, PORTB ; BTG PORTD, 2 ; NOP ; NOP ; NOP ; NOP ; NOP ; BRA MAIN END