			    
			    
			
;------------------------------------------------------------
; Código assembler 
; Proyecto: Rutinas para Nextion
; Autor: Esteban Mariano Folcher Cividini
; Colaboración; KILLERJC de todopic
;		Pinonillo 16 de todopic
;	
; Fecha: 27/08/2018
; PIC: 16F877A
; Velocidad de reloj: 4 Mhz
;------------------------------------------------------------
Inicia_NEXTION		    MACRO
			    MOVLW	F_fin
			    CALL	Funcion
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Envia_Texto		    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_Mensaje
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Borra_Texto		    MACRO TEMP_1
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillasX2
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Añade_Texto		    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_mas_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_Mensaje
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Caracter_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_USART
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Añade_Caracter_Texto    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_mas_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_USART
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Color_Fondo_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_bco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW   HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Imagen_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pic
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Crop_Imagen_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_picc
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Color_Fuente_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW	HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Fuente_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_font
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Centrado_X_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_xcen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Centrado_Y_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_ycen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Password_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pw
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Linea_Texto		    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_isbr
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
;-------------------------------------------------------------------------------			    
;-------------------------------------------------------------------------------
Nex_Envia_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_Mensaje
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Borra_S_Texto	    MACRO TEMP_1
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillasX2
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Añade_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_mas_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_Mensaje
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Caracter_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_USART
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Añade_Caracter_S_Texto  MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_txt
			    CALL	Funcion
			    MOVLW	S_mas_igual_comillas
			    CALL	Simbolo
			    MOVLW	TEMP_2
			    CALL	Envia_USART
			    MOVLW	S_comillas
			    CALL	Simbolo
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Fuente_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_font
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Color_Fondo_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_bco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW	HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Color_Fuente_S_Texto    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW	HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			


Nex_Centrado_X_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_xcen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Centrado_Y_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_ycen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			

			
Nex_Linea_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_isbr
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Direccion_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_dir
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
		
Nex_Tiempo_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_tim
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW	HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Distancia_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_dis
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_ScrolLing_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Scrolling_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_en
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Imagen_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pic
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Crop_Imagen_S_Texto	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_Text
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_picc
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW	LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
;-------------------------------------------------------------------------------
;-------------------------------------------------------------------------------
			
Nex_Envia_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVLW	TEMP_3
			    CALL	BIN_a_BCD32_HHH
			    MOVLW	TEMP_4
			    CALL	BIN_a_BCD32_HH
			    MOVLW	TEMP_5
			    CALL	BIN_a_BCD32_H
			    MOVLW	TEMP_6
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
Nex_Suma_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_mas_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVLW	TEMP_3
			    CALL	BIN_a_BCD32_HHH
			    MOVLW	TEMP_4
			    CALL	BIN_a_BCD32_HH
			    MOVLW	TEMP_5
			    CALL	BIN_a_BCD32_H
			    MOVLW	TEMP_6
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Resta_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_menos_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVLW	TEMP_3
			    CALL	BIN_a_BCD32_HHH
			    MOVLW	TEMP_4
			    CALL	BIN_a_BCD32_HH
			    MOVLW	TEMP_5
			    CALL	BIN_a_BCD32_H
			    MOVLW	TEMP_6
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Muti_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_multiplica_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVLW	TEMP_3
			    CALL	BIN_a_BCD32_HHH
			    MOVLW	TEMP_4
			    CALL	BIN_a_BCD32_HH
			    MOVLW	TEMP_5
			    CALL	BIN_a_BCD32_H
			    MOVLW	TEMP_6
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Divide_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_divide_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVLW	TEMP_3
			    CALL	BIN_a_BCD32_HHH
			    MOVLW	TEMP_4
			    CALL	BIN_a_BCD32_HH
			    MOVLW	TEMP_5
			    CALL	BIN_a_BCD32_H
			    MOVLW	TEMP_6
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Variable_Numerico	    MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVF	TEMP_3,W
			    CALL	BIN_a_BCD32_HHH
			    MOVF	TEMP_4,W
			    CALL	BIN_a_BCD32_HH
			    MOVF	TEMP_5,W
			    CALL	BIN_a_BCD32_H
			    MOVF	TEMP_6,W
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Suma_Variable_Numerico  MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_mas_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVF	TEMP_3,W
			    CALL	BIN_a_BCD32_HHH
			    MOVF	TEMP_4,W
			    CALL	BIN_a_BCD32_HH
			    MOVF	TEMP_5,W
			    CALL	BIN_a_BCD32_H
			    MOVF	TEMP_6,W
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Resta_Variable_Numerico  MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_menos_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVF	TEMP_3,W
			    CALL	BIN_a_BCD32_HHH
			    MOVF	TEMP_4,W
			    CALL	BIN_a_BCD32_HH
			    MOVF	TEMP_5,W
			    CALL	BIN_a_BCD32_H
			    MOVF	TEMP_6,W
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			 
Nex_Multi_Variable_Numerico MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_multiplica_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVF	TEMP_3,W
			    CALL	BIN_a_BCD32_HHH
			    MOVF	TEMP_4,W
			    CALL	BIN_a_BCD32_HH
			    MOVF	TEMP_5,W
			    CALL	BIN_a_BCD32_H
			    MOVF	TEMP_6,W
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Divide_Variable_Numerico MACRO TEMP_1,TEMP_2,TEMP_3,TEMP_4,TEMP_5,TEMP_6
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_val
			    CALL	Funcion
			    MOVLW	S_divide_igual
			    CALL	Simbolo
			    MOVLW	'-'
			    BTFSC	TEMP_2,0
			    CALL	Envia_USART
			    MOVF	TEMP_3,W
			    CALL	BIN_a_BCD32_HHH
			    MOVF	TEMP_4,W
			    CALL	BIN_a_BCD32_HH
			    MOVF	TEMP_5,W
			    CALL	BIN_a_BCD32_H
			    MOVF	TEMP_6,W
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Color_Fondo_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_bco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW   HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Color_Fuente_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pco
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVLW   HIGH	TEMP_2
			    CALL	BIN_a_BCD32_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Fuente_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_font
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			
Nex_Centrado_X_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_xcen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Centrado_Y_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_ycen
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Digitos_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_lenth
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Formato_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_format
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Linea_Numerico		    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_isbr
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM
			    
Nex_Imagen_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_pic
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM

Nex_Crop_Imagen_Numerico	    MACRO TEMP_1,TEMP_2 
			    MOVLW	O_123_Number
			    CALL	Objeto
			    MOVLW	TEMP_1
			    CALL	Numero_Objeto
			    CALL	Envia_Numero_Objeto
			    MOVLW	S_punto
			    CALL	Simbolo
			    MOVLW	F_picc
			    CALL	Funcion
			    MOVLW	S_igual
			    CALL	Simbolo
			    MOVLW	d'0'
			    MOVWF	DATO_HHH
			    MOVWF	DATO_HH
			    MOVWF	DATO_H
			    MOVLW   LOW	TEMP_2
			    CALL	BIN_a_BCD32_L
			    CALL	Envia_Variable_BDC
			    MOVLW	F_fin
			    CALL	Funcion
			    ENDM