;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Mi segundo programa después de retomar el PIC16F877A. En esta situación quiero mostrar;;;
;;; la palabra "Hola" por un LCD 2x16 conectado al puerto B								  ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		List	P=16f877A
		include	p16f877a.inc
	

		ORG	0x00
		goto	Inicio
		ORG	0x05		;	Salta el vector de Reset
		
Mensajes

		ADDWF PCL,F
Mensaje1
		DT	"HOLA",0	; mensaje a mostrar
		
Inicio
		bsf		STATUS,RP0	; pasa a banco 1
		clrf	TRISB		; borra puerta b
		clrf	TRISA
		movlw	0x06
		movwf	ADCON0		; puerto A entradas/salidas digitales
		bcf		STATUS,RP0	; regresa a banco 0
		call	Retardo_10ms
		call	LCD_Inicializa	; llama a inicializar lcd
Bucle	movlw	Mensaje1	; indica el mensaje a mostrar
		call	LCD_Mensaje	; rutina para mostrar el mensaje indicado
		goto	Bucle		; un bucle que solo muestra ese mensaje
		
	INCLUDE	<LCD_4BIT.INC>
	INCLUDE	<RETARDOS.INC>
	INCLUDE	<LCD_MENS.INC>
		end