Microchip PIC 16F87X Trabajo Y Explicación página 70

T E
RABAJO Y XPLICACIÓN
PROGRAMA 10
El teclado y el LCD.
Haciendo uso de las rutinas incluidas en los ficheros TECLADO.INC y LCD_CXX.INC, se trata
de leer el teclado y, visualizar sobre el módulo LCD la tecla pulsada.
El ejemplo pretende mostrar la interrupción por cambio de estado en cualquiera de las líneas
RB4-RB7 del PIC el sistema se mantiene en el modo SLEEP de bajo consumo y sólo reacciona cuando
tiene lugar la pulsación de cualquier tecla.
List
include "P16F876.INC"
Lcd_var equ
Key_var equ
Temporal_1 equ
Temporal_2 equ
Temporal_3 equ
org
goto
org
goto
include "LCD_CXX.INC"
include "TECLADO.INC"
Tabla_Mensajes movwf PCL
Mens_0 equ
dt
;------------------------------------------------------------------------------------------------------------------------------
;Mensaje: Esta rutina visualiza en el LCD el mensaje cuyo inicio está indicado en el acumulador. El fin
;de un mensaje se determina mediante el código 0x00
Mensaje movwf Temporal_1
Mensaje_1 movf
call
movwf Temporal_2
movf
btfss
goto
return
No_es_ultimo call
incf
goto
;Se incluye una temporización de 10mS para eliminar los rebotes de las teclas
Delay_10ms bcf
movlw b'195'
movwf TMR0
Delay_1 btfss
goto
return
D P
ESARROLLO ROYECTOS Y
PIC 16F87
X
p=16F876
0x20
0x22
0x28
0x29
0x2a
0x04
Interrupcion
0x05
Inicio
$
"Se ha pulsado: ",0x00
Temporal_1,W
Tabla_Mensajes
Temporal_2,F
STATUS,Z
No_es_ultimo
LCD_DATO
Temporal_1,F
Mensaje_1
INTCON,T0IF
INTCON,T0IF
Delay_1
P E
ROTOTIPOS LECTRÓNICOS
;Tipo de procesador
;Definiciones de registros internos
;Inicio de las variables para el LCD
;Inicio de las variables del teclado
;Variable temporal nº 1
;Variable temporal nº 2
;Variable temporal nº 3
;Vector de interrupción
;Incluir rutinas de manejo del LCD
;Incluir rutinas de manejo del teclado
;Desplazamiento sobre la tabla
;Salva posición de la tabla
;Recupera posición de la tabla
;Busca caracter de salida
;Guarda el caracter
;Mira si es el último
;Visualiza en el LCD
;Siguiente caracter
;Desactiva flag del TMR0
;Carga el TMR0 con 195
;Han transcurrido 10mS ??
;No, esperar
2º DPE
70