;A PROGRAM A PC ÁLTAL RS232 VONALON ELKÜLDÖTT KARAKTERT VISSZAKÜLDI A PC-NEK.
LIST 	p=16F628

	include "P16F628.inc"

	__config  0x3D18

	
	cblock	0x20
	endc

	org 	0x00	

	MOVLW	0x07
	MOVWF	CMCON

;INICIALIZÁCIÓS RÉSZ

	MOVLW	b'10010000'
	MOVWF	RCSTA
	BSF	STATUS,RP0	
	MOVLW	0x00	
	MOVWF	TRISA

	MOVLW	b'00000010'	
	MOVWF	TRISB
	
	MOVLW	0x19		;9600 8N1
	MOVWF	SPBRG
	
	MOVLW	b'00100100'
	MOVWF	TXSTA

	MOVLW	b'11110000'
	MOVWF	PIE1

	BCF	STATUS,RP0
	MOVLW	b'11111000'
	MOVWF	INTCON

		
LOOP	BTFSS	PIR1,RCIF	;RS232 VÉTEL		
	GOTO	LOOP
	MOVF	RCREG,W
	MOVWF	TXREG		;RS232 ADÁS
	bsf 	STATUS,RP0
VAR 	btfss 	TXSTA,TRMT     
        goto 	VAR
        bcf 	STATUS,RP0
	goto	LOOP

	END