LIST P=16F628

	#include "P16F628.INC"


	__config  0x3F18

	ORG	0X00
	
	MOVLW	7
	MOVWF	CMCON

	BSF	STATUS,RP0	
	MOVLW	0X00	
	MOVWF	TRISA
	MOVWF	PORTA

	MOVLW	b'00000010'	
	MOVWF	TRISB
	
	MOVLW	0X19		;9600 8N1
	MOVWF	SPBRG
	
	MOVLW	b'00100100'
	MOVWF	TXSTA
	BCF	STATUS,RP0	

LOOP	CALL	UZENET		
	GOTO	LOOP
	
send	MOVWF	TXREG
	bsf 	STATUS,RP0
VAR  	btfss 	TXSTA,TRMT     
        goto 	VAR
        bcf 	STATUS,RP0     



UZENET	movlw  '1' 
        call send 
        movlw  '6' 
        call send 
        movlw  'F' 
        call send 
        movlw  '6' 
        call send 
        movlw  '2' 
        call send 
        movlw  '8' 
        call send 
        movlw  ' ' 
        call send 
        movlw  'a' 
        call send 
        movlw  'l' 
        call send 
        movlw  'i' 
        call send 
        movlw  'v' 
        call send 
        movlw  'e' 
        call send
        return 


	END