Texto Lcd

; **** Encabezado ****
list p=16F84A
#include P16F84A.inc
__CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC
;///////////////////////////////////////////////////////////////////
;****Declaración de Registros ****
LCD_Dato equ 0x0C ;registro para guardar dato a enviar al LCD
Loop equ 0x0D ;registro para inicializacion del LCD
Contador1 equ 0x0E ;registropara enviar a LCD el nible bajo
Contador2 equ 0x0F ;registro para demoras
;**** Declaracion de bits para control LCD ****
RS equ 0
RW equ 1
E equ 2
BACK equ 3

D4 equ 4
D5 equ5
D6 equ 6
D7_BF equ 7
;**** Declaracion de Bytes del LCD ****
LCD_PORT_Control equ 0x05 ; PORTA para control del LCD
LCD_PORT_Data equ 0x06 ; PORTB para envio de Datos al LCDLCD_TRIS_Control equ 0x85 ; TRISA
LCD_TRIS_Data equ 0x86 ; TRISB
; **** Comandos de Software para la LCD ****
LCDLinea1 equ 0x80 ; Dirección comienzo línea1
LCDLinea2 equ 0xC0 ; Dirección comienzolínea2
LCDClr equ 0x01 ; Borra pantalla, cursor a Inicio
LCDInicio equ 0x02 ; Cursor a Inicio, DDRAM sin cambios
LCDInc equ 0x06 ; Modo incrementa cursor
LCDDec equ 0x04 ; Modo decrementa cursorLCDOn equ 0x0C ; Pantalla On
LCDOff equ 0x08 ; Pantalla Off
CursOn equ 0x0E ; Pantalla On, cursor On
CursOff equ 0x0C ; Pantalla On, cursor Off
CursBlink equ 0x0F ; Pantalla On, Cursorparpadeante
CurIzda equ 0x10 ; Mueve cursor a la izquierda
CurDecha equ 0x14 ; Mueve cursor a la derecha
DisIzda equ 0x18 ; Mueve Display a la izquierda
DisDecha equ 0x1C ; Mueve Display ala Derecha
LCDBus_4_2 equ 0x28 ; Bus 4 bits, 2 líneas, 5x7
;**** Definiciones para el ensamblador ****
#DEFINE LCD_E LCD_PORT_Control,E ;
#DEFINE LCD_RS LCD_PORT_Control,RS
#DEFINELCD_RW LCD_PORT_Control,RW
#DEFINE LCD_D4 LCD_PORT_Data,D4
#DEFINE LCD_D5 LCD_PORT_Data,D5
#DEFINE LCD_D6 LCD_PORT_Data,D6
#DEFINE LCD_D7_BF LCD_PORT_Data,D7_BF
#DEFINE...