;------------------------------------------------------------
; 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
;------------------------------------------------------------
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
			CALL	Simbolo
			MOVLW	S_comillas
			CALL	Simbolo
			MOVLW	TEMP_2
			CALL	Envia_Mensaje
			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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_L
			CALL	Envia_Variable_BDC
			MOVLW	F_fin
			CALL	Funcion
			ENDM
			
Nex_Borra_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
			CALL	Simbolo
			MOVLW	S_comillas
			call	Simbolo
			MOVLW	TEMP_2
			CALL	Envia_USART
			MOVLW	S_comillas
			call	Simbolo
			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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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
			CALL	Simbolo
			MOVLW	S_comillas
			CALL	Simbolo
			MOVLW	TEMP_2
			CALL	Envia_Mensaje
			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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_L
			CALL	Envia_Variable_BDC
			MOVLW	F_fin
			CALL	Funcion
			ENDM
			
Nex_Borra_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
			CALL	Simbolo
			MOVLW	S_comillas
			call	Simbolo
			MOVLW	TEMP_2
			CALL	Envia_USART
			MOVLW	S_comillas
			call	Simbolo
			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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_L
			CALL	Envia_Variable_BDC
			MOVLW	F_fin
			CALL	Funcion
			ENDM
			
Nex_Direccion_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_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   HIGH	TEMP_2
			CALL	BIN_a_BCD_16_H
			MOVLW   LOW	TEMP_2
			CALL	BIN_a_BCD_16_L
			CALL	Envia_Variable_BDC
			MOVLW	F_fin
			CALL	Funcion
			ENDM