;------------------------------------------------------------
; Código assembler 
; Proyecto: usart_prueba
; Autor: 
; Fecha: 06/08/2018
; PIC: 16F877A
; Velocidad de reloj: 4 Mhz
; Descripcion: 
;------------------------------------------------------------
    LIST    P=PIC16F877A
    INCLUDE P16F877A.INC

	__CONFIG _FOSC_XT & _WDTE_OFF & _PWRTE_OFF & _BOREN_ON & _LVP_OFF & _CPD_OFF & _WRT_OFF & _CP_OFF
							   ;+ OJO CTIVADO PARA SIMULACION 
							   
		    

PUERTO_TX	    EQU		6			;PIN DE TRANSMICION+
PUERTO_RC	    EQU		7			;PINDE RECEPCION   +TENER EN CUENTA TU PIC	
		
		    CBLOCK	0x20
		    ENDC
		    
		
Inicio		    ORG		0x00			;DIRECCION DE VECTOR RESET
		    PAGESEL	COMIENZO
		    GOTO	COMIENZO		;COMIENZO DEL PROGRAMA
		    CODE

Tabla_Nextion	    MOVWF	PCL			;CALCULA EL DESPLAZAMIENTO SOBRE LA TABLA
Nextion_Tabla_1	    
		    DT		"n0.val=100˙˙˙"0x00	;MENSAJE QUE SOLO PUEDE IR COMPUESTO
							;POR CONSTANTES Y QUE A DEMAS SOLO
							;TRABAJA EN EL MOMENTO DE ENSAMBLADO
							;Y NO ME DEJARIA ACTUALIZAR NUNCA SU VALOR 
		    
COMIENZO	    CALL	Inicia_USART_Nextion	;INICIO LOS PARAMETROS Y CONFIGURACIONES 
							;DE TRANSMICION Y RECEPCION USART
Principal	    MOVLW	Nextion_Tabla_1		;CARGO LA PRIMERA POCICION DE LA TABLA SOLICITADA
		    CALL	Nextion			;TRANSMITO DATOS
		    CALL	Retardo_1s		;ESPERO UN SEGUNDO 
		    GOTO	Principal		;MANTENGO ESTE BUCLE CERADO 
		    
		    
		    INCLUDE	<Nextion_TX_RC.INC>	;SUBRUTINA QUE TRATA LA TABLA Y LA ENVIA
							;Y TAMBIEN RECIBE
		    INCLUDE	<RETARDOS.INC>		;SUBRUTINA DE DIFERENTES RETARDOS
		    END					;FIN DE MI PROGRAMA