Timer0 como un contador, declarar variables nuevas, constantes de

enumeración, utilizar relés...

En cuanto a los ejemplos anteriores, el microcontrolador ha ejecutado
el programa sin haber sido afectado de ninguna forma por su
entorno. En la práctica, hay pocos dispositivos que funcionen de esta
manera (por ejemplo, un simple controlador de luz de neón). Los
pines de entrada se utilizan también en este ejemplo. En la siguiente
figura se muestra un esquema, mientras que el programa está en la
siguiente página. Todo sigue siendo muy simple. El temporizador
Timer0 se utiliza como un contador. La entrada del contador está
conectada a un botón de presión, así que cada vez que se presiona el
botón, el temporizador Timer0 cuenta un pulso. Cuando el número de
pulsos coincida con el número almacenado en el registro TEST, un
uno lógico (5V) aparecerá en el pin PORTD.3. Este voltaje activa un
relé electromecánico, y por eso este bit se le denomina ‘RELÉ’ en el
programa
/*Cabecera****************************************************/

void main() {
char TEST = 5; // Constante TEST = 5
enum salidas {RELÉ = 3}; // Constante RELAY = 3

ANSEL = 0; // Todos los pines de E/S se configuran como digitales

ANSELH = 0;
PORTA = 0; // Reiniciar el puerto PORTA
TRISA = 0xFF; // Todos los pines del puerto PORTA se configuran como
entradas
PORTD = 0; // Reiniciar el puerto PORTD
TRISD = 0b11110111; // Pin RD3 se configura como salida, mientras que los
demás

// se configuran como entradas

OPTION_REG.F5 = 1; // Contador TMR0 recibe los pulsos por el pin RA4
OPTION_REG.F3 = 1; // Valor del pre-escalador 1:1

TMR0 = 0; // Reiniciar el temporizador/contador TMR0

do {
if (TMR0 == TEST) // ¿Coincide el número en el temporizador con la
// constante TEST?
(PORTD.RELAY = 1); // Números coinciden. Poner el bit RD3 a uno (salida RELÉ)
}
while (1); // Quedarse en el bucle infinito
}

Sólo una constante de enumeración RELÉ se utiliza en este ejemplo.

Se le asigna un valor mediante la declaración.
enum salidas {RELÉ = 3}; // Constante RELÉ = 3

Si varios pines del puerto PORTD están conectados a los relés, la

expresión anterior se puede escribir de la siguiente manera también:
enum salidas {RELÉ=3, CALENTADOR, MOTOR=6, SURTIDOR};

A todas las constantes, precedidas por las constantes con valores

asignados (RELÉ=3 y MOTOR=6), se les asignan automáticamente los
valores de las constantes precedentes, incrementados en 1. En este
ejemplo, a las constantes CALENTADOR y SURTIDOR se les asignan
los valores 4 y 7, es decir (CALENTADOR=4 y SURTIDOR=7),
respectivamente.

Utilizar los temporizadores Timer0, Timer1 y

Timer2. Utilizar interrupciones, declarar nuevas
funciones...
Al analizar los ejemplos anteriores, es probable que se haya fijado en la
desventaja de proporcionar tiempo de retardo por medio de la función
Delay. En estos casos, el microcontrolador se queda ‘estático’ y no hace
nada. Simplemente espera que transcurra una cierta cantidad de tiempo.
Tal pérdida de tiempo es un lujo inaceptable, por lo que se deberá aplicar
otro método. ¿Se acuerda usted del capítulo de los temporizadores? ¿Se
acuerda de lo de interrupciones? Este ejemplo los conecta de una manera
práctica. El esquema se queda inalterada, y el desafío sigue siendo
presente. Es necesario proporcionar un tiempo de retardo suficiente largo
para darse cuenta de los cambios en el puerto. Para este propósito se utiliza
el temporizador Timer0 con el pre-escalador asignado. Siempre que se
genere una interrupción con cada desbordamiento en el registro del
temporizador, la variable cnt se aumenta automáticamente en 1 al
ejecutarse cada rutina de interrupción. Cuando la variable llega al valor
400, el puerto PORTB se incrementa en 1. Todo el procedimiento se lleva a
cabo “entre bastidores”, lo que habilita al microcontrolador hacer otra tarea.
/*Cabecera******************************************************/

unsigned cnt; // Definir la variable cnt

void interrupt() {
cnt++; // Con una interrupción la cnt se incrementa en 1
TMR0 = 96; // El valor inicial se devuelve en el temporizador TMR0
INTCON = 0x20; // Bit T0IE se pone a 1, el bit T0IF se pone a 0
}

void main(){
OPTION_REG = 0x84; // Pre-escalador se le asigna al temporizador TMR0
ANSEL = 0; // Todos los pines de E/S se configuran como digitales
ANSELH = 0;
TRISB = 0; // Todos los pines de puerto PORTB se configuran

// como salidas
PORTB = 0x0; // Reiniciar el puerto PORTB
TMR0 = 96; // Temporizador T0 cuenta de 96 a 255
INTCON = 0xA0; // Habilitada interrupción TMR0
cnt = 0; // A la variable cnt se le asigna un 0

do { // Bucle infinito
if (cnt == 400) { // Incrementar el puerto PORTB después 400 interrupciones
PORTB = PORTB++; // Incrementar número en el puerto PORTB en 1
cnt = 0; // Reiniciar la variable cnt
}
} while(1);

Siempre que se produzca un desbordamiento en el registro del

temporizador TRM0, ocurre una interrupción.
/*Cabecera******************************************************/
unsigned short cnt; // Definir la variable cnt

void interrupt() {
cnt++ ; // Con una interrupción la cnt se incrementa en 1
PIR1.TMR1IF = 0; // Reiniciar el bit TMR1IF
TMR1H = 0x80; // El valor inicial se devuelve en los registros
TMR1L = 0x00; // del temporizador TMR1H y TMR1L
}

void main() {
ANSEL = 0; // Todos los pines de E/S se configuran como digitales
ANSELH = 0;
PORTB = 0xF0; // Valor inicial de los bits del puerto PORTB
TRISB = 0; // Pines del puerto PORTB se configuran como salidas
T1CON = 1; // Configurar el temporizador TMR1
PIR1.TMR1IF = 0; // Reiniciar el bit TMR1IF
TMR1H = 0x80; // Ajustar el valor inicial del temporizador TMR1
TMR1L = 0x00;
PIE1.TMR1IE = 1; // Habilitar la interrupción al producirse un desbordamiento
cnt = 0; // Reiniciar la variable cnt
INTCON = 0xC0; // Interrupción habilitada (bits GIE y PEIE)

do { // Bucle infinito
if (cnt == 76) { // Cambiar el estado del puerto PORTB después de 76
interrupciones
PORTB = ~PORTB; // Número en el puerto PORTB está invertido
cnt = 0; // Reiniciar la variable cnt
}
} while (1);
}

En este caso, una interrupción se habilita después de que se produzca un

desbordamiento en el registro del temporizador TMR1 (TMR1H, TMR1L). Además, la
combinación de los bits que varía en el puerto POTRB difiere de la en el ejemplo
anterior.
/*Cabecera******************************************************/
unsigned short cnt; // Definir la variable cnt

void Reemplazar() {
PORTB = ~PORTB; // Definir nueva función ‘Reemplazar’
} // Función invierte el estado del puerto

void interrupt() {
if (PIR1.TMR2IF) { // Si el bit TMR2IF = 1,
cnt++ ; // Incrementar variable la cnt en 1
PIR1.TMR2IF = 0; // Reiniciar el bit y
TMR2 = 0; // Reiniciar el registro TMR2
}
}

// main
void main() {
cnt = 0; // Reiniciar la variable cnt
ANSEL = 0; // Todos los pines de E/S se configuran como digitales
ANSELH = 0;
PORTB = 0b10101010; // Estado lógico en los pines del puerto PORTB
TRISB = 0; // Todos los pines del puerto PORTB se configuran como salidas
T2CON = 0xFF; // Configurar el temporizador T2
TMR2 = 0; // Valor inicial del registro del temporizador TMR2
PIE1.TMR2IE = 1; // Interrupción habilitada
INTCON = 0xC0; // Bits GIE y PEIE se ponen a 1

while (1) { // Bucle infinito

if (cnt > 30) { // Cambiar el estado del puerto PORTB después de
// más de 30 interrupciones
Reemplazar(); // Función Reemplazar invierte el estado del puerto PORTB
cnt = 0; // Reiniciar la variable cnt
}
}
}
 En este ejemplo, una interrupción ocurre después de
que se produce un desbordamiento en el registro del temporizador TMR2. Para
invertir el estado lógico de los pines del puerto se utiliza la función Reemplazar, que
normalmente no pertenece al lenguaje C estándar.

Utilizar el temporizador perro - guardián

Este ejemplo muestra cómo NO se debe utilizar el temporizador perro-
guardián. Un comando utilizado para reiniciar este temporizador se omite a
propósito en el bucle del programa principal, lo que habilita al temporizador
perro guardián “ganar la batalla del tiempo” y reiniciar al microcontrolador.
Por consiguiente, el microcontrolador se va a reiniciar sin parar, lo que
indicará el parpadeo de los LEDs del puerto PORTB.
/*Cabecera******************************************************/

void main() {
OPTION_REG = 0x0E; // Pre-escalador se le asigna al temporizador WDT (1:64)
asm CLRWDT; // Comando en ensamblador para reiniciar el temporizador WDT
PORTB = 0x0F; // Valor inicial del registro PORTB
TRISB = 0; // Todos los pines del puerto PORTB se configuran como salidas
Delay_ms(300); // Tiempo de retardo de 30mS
PORTB = 0xF0; // Valor del puerto PORTB diferente del inicial

while (1); // Bucle infinito. El programa se queda aquí hasta que el

// temporizador WDT reinicie al microcontrolador
}

Para que este ejemplo funcione apropiadamente, es necesario

habilitar al temporizador perro-guardián al seleccionar la opción
Tools/mE Programmer/Watchdog Timer - Enabled.
 Módulo CCP1 como generador de señal PWM
Este ejemplo muestra el uso del módulo CCP1 en modo PWM. Para hacer las cosas
más interesantes, la duración de los pulsos en la salida P1A (PORTC,2) se puede
cambiar por medio de los botones de presión simbólicamente denominados
‘OSCURO’ y ‘CLARO’. La duración ajustada se visualiza como una combinación
binaria en el puerto PORTB. El funcionamiento de este módulo está bajo el control
de las funciones pertenecientes a la librería especializada PWM. Aquí se utilizan las
tres de ellas:

1. PWM1_init tiene el prototipo: void Pwm1_Init(long freq); El

parámetro freq ajusta la frecuencia de la señal PWM expresada en hercios.
En este ejemplo equivale a 5kHz.
2. PWM1_Start tiene el prototipo: void Pwm1_Start(void);
3. PWM1_Set_Duty tiene el prototipo: void Pwm1_Set_Duty(unsigned
short duty_ratio); El parámetro duty_ratio ajusta la duración de pulsos en
una secuencia de pulsos.
La librería PWM también contiene la función PWM_Stop utilizada para deshabilitar
este modo. Su prototipo es: void Pwm1_Stop(void);

/*Cabecera******************************************************/
// Definir las variables ciclo_de_trabajo_actual,
// ciclo_de trabajo_anterior

unsigned short ciclo_de_trabajo_actual;

unsigned short ciclo_de trabajo_anterior;

void initMain() {
ANSEL = 0; // Todos los pines de E/S se configuran como digitales
ANSELH = 0;
PORTA = 255; // Estado inicial del puerto PORTA
TRISA = 255; // Todos los pines del puerto PORTA se configuran como entradas
PORTB = 0; // Estado inicial del puerto PORTB
TRISB = 0; // Todos los pines del puerto PORTB se configuran como salidas
PORTC = 0; // Estado inicial del puerto PORTC
TRISC = 0; // Todos los pines del puerto PORTC se configuran

// como salidas
PWM1_Init(5000); // Inicialización del módulo PWM (5KHz)
}

void main() {
initMain();
ciclo_de_trabajo_actual = 16; // Valor inicial de la variable
ciclo_de_trabajo_actual
ciclo_de trabajo_anterior = 0; // Reiniciar la variable ciclo_de trabajo_anterior
PWM1_Start(); // Iniciar el módulo PWM1

while (1) { // Bucle infinito

if (Button(&PORTA, 0,1,1)) // Si se presiona el botón conectado al RA0
ciclo_de_trabajo_actual++ ; // incrementar el valor de la variable
current_duty
if (Button(&PORTA, 1,1,1)) // Si se presiona el botón conectado al RA1
ciclo_de_trabajo_actual-- ; // decrementar el valor de la variable
current_duty

if (old_duty != ciclo_de_trabajo_actual) { // Si
ciclo_de_trabajo_actual y
// ciclo_de trabajo_anterior no son iguales
PWM1_Set_Duty(ciclo_de_trabajo_actual); // ajustar un nuevo valor
a PWM,
 ciclo_de trabajo_anterior = ciclo_de_trabajo_actual; // Guardar el nuevo valor
PORTB = ciclo_de trabajo_anterior; // y visualizarlo en el
puerto PORTB
}
Delay_ms(200); // Tiempo de retardo de 200mS
}
}

Para que este ejemplo funcione apropiadamente, es necesario

marcar las siguientes librerías en la ventana Library Manager antes
de compilar el programa: PWM Y BUTTON

Utilizar el convertidor A/D

El convertidor A/D del microcontrolador PIC16F887 se utiliza en este
ejemplo. ¿Hace falta decir que todo es pan comido? Una señal analógica
variable se aplica al pin AN2, mientras que el resultado de la conversión de
10 bits se muestra en los puertos POTRB y PORTD (8 bits menos
significativos en el puerto PORTD y 2 bits más significativos en el puerto
PORTB). La Tierra (GND) se utiliza como voltaje de referencia bajo Vref-,
mientras que el voltaje de referencia alto se aplica al pin AN3. Esto habilita
que la escala de medición se estire y encoja. IEn otras palabras, el
convertidor A/D siempre genera un resultado binario de 10 bits, lo que
significa que reconoce 1024 niveles de voltaje en total (2 10=1024). La
diferencia entre dos niveles de voltaje no es siempre la misma. Cuánto
menor sea la diferencia entre Vref+ y Vref-, tanto menor será la diferencia
entre dos de 1024 niveles. Como hemos visto, el convertidor A/D es capaz
de detectar pequeños cambios de voltaje.
/*Cabecera******************************************************/

unsigned int temp_res;

void main() {
ANSEL = 0x0C; // Pines AN2 y AN3 se configuran como analógicos
TRISA = 0xFF; // Todos los pines del puerto PORTA se configuran

// como entradas
ANSELH = 0; // Los demás pines se configuran como digitales
TRISB = 0x3F; // Pines del puerto PORTB, RB7 y RB6 se configuran
 // como salidas
TRISD = 0; // Todos los pines del PORTD se configuran como salidas
ADCON1.F4 = 1 ; // Voltaje de referencia es llevado al pin RA3.

do {
temp_res = ADC_Read(2); // Resultado de la conversión A/D es copiado a temp_res
PORTD = temp_res; // 8 bits menos significativos se mueven al puerto PORTD
PORTB = temp_res >> 2; // 2 bits más significativos se mueven a los bits RB6 y
RB7
} while(1); // Bucle infinito
}

Para que este ejemplo funcione apropiadamente, es necesario marcar

la librería ADC en la ventana Library Manager antes de compilar el
programa:
 ADC

Utilizar memoria EEPROM

Este ejemplo muestra cómo escribir y leer la memoria EEPROM incorporada.
El programa funciona de la siguiente manera. El bucle principal lee
constantemente el contenido de localidad de la memoria EEPROM en la
dirección 5 (decimal). Luego el programa entra en el bucle infinito en el que
el puerto PORTB se incrementa y se comprueba el estado de entradas del
puerto PORTA.2. En el momento de presionar el botón denominado MEMO,
un número almacenado en el puerto PORTB será guardado en la memoria
EEPROM, directamente leído y visualizado en el puerto PORTD en forma
binaria.
/*Cabecera******************************************************/

void main() {{
ANSEL = 0; // Todos los pines de E/S se configuran como digitales
ANSELH = 0;
PORTB = 0; // Valor inicial del puerto PORTB
TRISB = 0; // Todos los pines del puerto PORTB se configuran

// como salidas
 PORTD = 0; // Valor inicial del puerto PORTB
TRISD = 0; // Todos los pines del puerto PORTD se configuran

// como salidas
TRISA = 0xFF; // Todos los pines del puerto PORTA se configuran

// como entradas
PORTD = EEPROM_Read(5); // Leer la memoria EEPROM en la dirección 5

do {
PORTB = PORTB++; // Incrementar el puerto PORTB en 1
Delay_ms(100); // Tiempo de retardo de 100mS

if (PORTA.F2)
EEPROM_Write(5,PORTB); // Si se pulsa el botón MEMO, guardar el puerto PORTB

PORTD = EEPROM_Read(5); // Leer el dato escrito

do {
while (PORTA.F2); // Quedarse en este bucle hasta que el botón esté
pulsado
}
}
while(1); // Bucle infinito
}

Para comprobar el funcionamiento de este circuito, basta con pulsar el

botón MEMO y apagar el dispositivo. Después de reiniciar el dispositivo, el
programa visualizará el valor guardado en el puerto PORTD. Acuérdese de
que en el momento de escribir, el valor fue visualizado en el puerto PORTB.
Para que este ejemplo funcione apropiadamente, es necesario marcar la
librería EEPROM en la ventana Library Manager antes de compilar el
programa: EEPROM

Contador de dos dígitos LED, multiplexión

En este ejemplo el microcontrolador funciona como un contador de dos
dígitos. La variable i se incrementa (suficiente lentamente para ser visible) y
su valor se visualiza en un visualizador de dos dígitos LED (99-0). El punto
es habilitar una conversión de un número binario en un decimal y partirlo en
dos dígitos (en decenas y unidades). Como los segmentos del visualizador
LED se conectan en paralelo, es necesario asegurar que alternen
rápidamente para tener una impresión de que emiten la luz
simultáneamente (multiplexión por división en tiempo). En este ejemplo, el
temporizador TMR0 está encargado de la multiplexión por división en
tiempo, mientras que la función mask convierte un número binario a
formato decimal.

/*Cabecera******************************************************/

unsigned short mask(unsigned short num);

unsigned short digit_no, digit10, digit1, digit, i;

void interrupt() {
if (digit_no == 0) {
PORTA = 0; // Apagar ambos visualizadores
PORTD = digit1; // Colocar máscara para visualizar unidades en el

// puerto PORTD
PORTA = 1; // Encender el visualizador para las unidades (LSD)
digit_no = 1;
}else{
PORTA = 0; // Apagar ambos visualizadores
PORTD = digit10; // Colocar máscara para visualizar decenas en el
 // puerto PORTD
PORTA = 2; // Encender el visualizador para las decenas (MSD)
digit_no = 0;
}

TMR0 = 0; // Reiniciar el contador TMRO

INTCON = 0x20; // Bit T0IF=0, T0IE=1
}

void main() {
OPTION_REG = 0x80; // Ajustar el temporizador TMR0
TMR0 = 0;
INTCON = 0xA0; // Deshabilitar las interrupciones PEIE,INTE,RBIE,T0IE
PORTA = 0; // Apagar ambos visualizadores
TRISA = 0; // Todos los pines del puerto PORTA se configuran

// como salidas
PORTD = 0; // Apagar todos los segmentos del visualizador
TRISD = 0; // Todos los pines del puerto PORTD se configuran

// como salidas
do {
for (i = 0; i<=99; i++) { // Contar de 0 a 99
digit = i % 10u;
digit1 = mask(digit); // Preparar la máscara para visualizar unidades
digit = (char)(i / 10u) % 10u;
digit10 = mask(digit); // Preparar la máscara para visualizar decenas
Delay_ms(1000);
}
} while (1); // Bucle infinito
}

mask.c
/*Cabecera******************************************************/

unsigned short mask(unsigned short num) {

switch (num) {
case 0 : return 0x3F;
 case 1 : return 0x06;
case 2 : return 0x5B;
case 3 : return 0x4F;
case 4 : return 0x66;
case 5 : return 0x6D;
case 6 : return 0x7D;
case 7 : return 0x07;
case 8 : return 0x7F;
case 9 : return 0x6F;
}
}

Para que este ejemplo funcione apropiadamente, es necesario incluir

el archivo mask.c en el proyecto (aparte del archivo example9.c) en
la ventana Project Manager antes de compilar el
programa: Example9.mcppi - Sources - Add File To Project
 mask.c
 example9.c

Utilizar el visualizador LCD

Este ejemplo muestra cómo utilizar un visualizador LCD alfanumérico. Las
librerías de funciones simplifican este programa, lo que significa que al final
el esfuerzo para crear el software vale la pena. Un mensaje escrito en dos
líneas aparece en el visualizador: mikroElektronika LCD example Dos
segundos más tarde, el mensaje en la segunda línea cambia, y se visualiza
el voltaje presente en la entrada del convertidor A/D (el pin RA2). Por
ejemplo: mikroElektronika voltage:3.141V En un dispositivo real se
 puede visualizar temperatura actual o algún otro valor medido en vez de
voltaje.

Para que este ejemplo funcione apropiadamente, es necesario marcar

las siguientes librerías en la ventana Library Manager antes de
compilar el programa:
 ADC
 LCD

/*Cabecera*****************************************************/

// Conexiones del módulo LCD

sbit LCD_RS at RB4_bit;
sbit LCD_EN at RB5_bit;
sbit LCD_D4 at RB0_bit;
sbit LCD_D5 at RB1_bit;
sbit LCD_D6 at RB2_bit;
sbit LCD_D7 at RB3_bit;
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;
// Final de las conexiones del módulo LCD

// Declarar variables
unsigned char ch;
unsigned int adc_rd;
char *text;
long tlong;

void main() {
INTCON = 0; // Todas las interrupciones deshabilitadas
ANSEL = 0x04; // Pin RA2 se configura como una entrada analógica
TRISA = 0x04;
ANSELH = 0; // Los demás pines se configuran como digitales

Lcd_Init(); // Inicialización del visualizador LCD

Lcd_Cmd(_LCD_CURSOR_OFF); // Comando LCD (apagar el cursor)
Lcd_Cmd(_LCD_CLEAR); // Comando LCD (borrar el LCD)

text = "mikroElektronika"; // Definir el primer mensaje

Lcd_Out(1,1,text); // Escribir el primer mensaje en la primera línea

text = "LCD example"; // Definir el segundo mensaje

Lcd_Out(2,1,text); // Definir el primer mensaje

ADCON1 = 0x82; // Voltaje de referencia para la conversión A/D es

VCC
TRISA = 0xFF; // Todos los pines del puerto PORTA se configuran
como entradas
Delay_ms(2000);

text = "voltage:"; // Definir el tercer mensaje

 while (1) {
adc_rd = ADC_Read(2); // Conversión A/D. Pin RA2 es una entrada.
Lcd_Out(2,1,text); // Escribir el resultado en la segunda línea
tlong = (long)adc_rd * 5000; // Convertir el resultado en milivoltios
tlong = tlong / 1023; // 0..1023 -> 0-5000mV
ch = tlong / 1000; // Extraer voltios (miles de milivoltios)

// del resultado
Lcd_Chr(2,9,48+ch); // Escribir resultado en formato ASCII
Lcd_Chr_CP('.');
ch = (tlong / 100) % 10; // Extraer centenas de milivoltios
Lcd_Chr_CP(48+ch); // Escribir resultado en formato ASCII
ch = (tlong / 10) % 10; // Extraer decenas de milivoltios
Lcd_Chr_CP(48+ch); // Escribir resultado en formato ASCII
ch = tlong % 10; // Extraer unidades de milivoltios
Lcd_Chr_CP(48+ch); // Escribir resultado en formato ASCII
Lcd_Chr_CP('V');
Delay_ms(1);
}
}

Ejemplo 11
Comunicación serial RS-232
Este ejemplo muestra cómo utilizar el módulo EUSART del microcontrolador.
La conexión a una PC se habilita por medio del estándar de comunicación
RS-232. El programa funciona de la siguiente manera. Cada byte recibido
por medio de la comunicación serial se visualiza al utilizar los LEDs
conectados al puerto PORTB y después se devuelve automáticamente al
transmisor. Si ocurre un error en recepción, se lo indicará al encender el
diodo LED. La manera más fácil es comprobar el funcionamiento del
dispositivo en la práctica al utilizar un programa estándar de Windows
denominado Hyper Terminal.

/*Cabecera******************************************************/

unsigned short i;
 void main() {
UART1_Init(19200); // Inicializar el módulo USART
// (8 bits, tasa de baudios 19200, no hay bit
// de paridad...)

while (1) {
if (UART1_Data_Ready()) { // si se ha recibido un dato
i = UART1_Read(); // leerlo
UART1_Write(i); // enviarlo atrás
}
}
}

Para que este ejemplo funcione apropiadamente, es necesario marcar

la librería UART en la ventana Library Manager antes de compilar el
programa:
 UART
 Medición de temperatura por medio del sensor
DS1820. Uso del protocolo ‘1-wire’...
La medición de temperatura es una de las tareas más frecuentes realizadas
por el microcontrolador. En este ejemplo, se utiliza un sensor DS1820 para
medir. Es capaz de medir en el rango de 55 °C a 125 °C con exactitud de
0.5 °C. Para transmitir los datos al microcontrolador se utiliza un tipo
especial de la comunicación serial denominado 1-wire. Debido al hecho de
que estos sensores son simples de utilizar y de grandes capacidades, los
comandos utilizados para hacerlos funcionar y controlarlos tienen la forma
de funciones almacenadas en la librería One_Wire. En total son las
siguientes tres funciones:

 Ow_Reset se utiliza para reiniciar el sensor;

 Ow_Read se utiliza para recibir los datos del sensor; y
 Ow_Write se utiliza para enviar los comandos al sensor

Este ejemplo muestra la ventaja de utilizar librerías con las funciones listas
para ser utilizadas. Concretamente, no tiene que examinar la
documentación proporcionada por el fabricante para utilizar el sensor. Basta
con copiar alguna de estas funciones en el programa. Si le interesa saber
cómo se declaran, basta con pulsar sobre alguna de ellas y seleccione la
opción Help.
/*Cabecera******************************************************/

// Conexiones del módulo LCD

sbit LCD_RS at RB4_bit;
sbit LCD_EN at RB5_bit;
sbit LCD_D4 at RB0_bit;
sbit LCD_D5 at RB1_bit;
sbit LCD_D6 at RB2_bit;
sbit LCD_D7 at RB3_bit;
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;
// Final de conexiones del módulo LCD

const unsigned short TEMP_RESOLUTION = 9;

char *text = "000.0000";
unsigned temp;

void Display_Temperature(unsigned int temp2write) {

const unsigned short RES_SHIFT = TEMP_RESOLUTION - 8;
char temp_whole;
unsigned int temp_fraction;

// comprobar si la temperatura es negativa

if (temp2write & 0x8000) {
text[0] = '-';
temp2write = ~temp2write + 1;
}

// extraer temp_whole
temp_whole = temp2write >> RES_SHIFT ;

// convertir temp_whole en caracteres

if (temp_whole/100)
text[0] = temp_whole/100 + 48;
else
 text[0] = '0';

text[1] = (temp_whole/10)%10 + 48; // Extraer dígito de decenas

text[2] = temp_whole%10 + 48; // Extraer dígito de unidades

// extraer temp_fraction y convertirlo en unsigned int

temp_fraction = temp2write << (4-RES_SHIFT);
temp_fraction &= 0x000F;
temp_fraction *= 625;

// convertir temp_fraction en caracteres

text[4] = temp_fraction/1000 + 48; // Extraer dígito de miles
text[5] = (temp_fraction/100)%10 + 48; // Extraer dígito de centenas
text[6] = (temp_fraction/10)%10 + 48; // Extraer dígito de decenas
text[7] = temp_fraction%10 + 48; // Extraer dígito de unidades

// Visualizar temperatura en el LCD

Lcd_Out(2, 5, text);
}

void main() {
ANSEL = 0; // Configurar los pines AN como digitales
ANSELH = 0;
C1ON_bit = 0; // Deshabilitar los comparadores
C2ON_bit = 0;

Lcd_Init(); // Inicializar el LCD

Lcd_Cmd(_LCD_CLEAR); // Borrar el LCD
Lcd_Cmd(_LCD_CURSOR_OFF); // Apagar el cursor
Lcd_Out(1, 1, " Temperatura: ");

// Visualizar el carácter de grado, 'C' para centígrados

Lcd_Chr(2,13,223); // distintos visualizadores LCD tienen diferentes códigos

// de caracteres para el grado

// si ve la letra griega Alfa, intente introducir 178 en vez de 223
Lcd_Chr(2,14,'C');
 //--- bucle principal
do {
//--- realizar lectura de temperatura
Ow_Reset(&PORTE, 2); // Señal de reinicio de Onewire
Ow_Write(&PORTE, 2, 0xCC); // Ejecutar el comando SKIP_ROM
Ow_Write(&PORTE, 2, 0x44); // Ejecutar el comando CONVERT_T
Delay_us(120);
Ow_Reset(&PORTE, 2);
Ow_Write(&PORTE, 2, 0xCC); // Ejecutar el comando SKIP_ROM
Ow_Write(&PORTE, 2, 0xBE); // Ejecutar el comando READ_SCRATCHPAD
temp = Ow_Read(&PORTE, 2);
temp = (Ow_Read(&PORTE, 2) << 8) + temp;

//--- Formatear y visualizar el resultado en el LCD

Display_Temperature(temp);
Delay_ms(500);
} while (1);
}

Para que este ejemplo funcione apropiadamente, es necesario marcar

las siguientes librerías en la ventana Library Manager antes de
compilar el programa:
 One_Wire
 LCD
Generación de sonido, librería de sonido...
Las señales de audio se utilizan con frecuencia cuando se necesita llamar la
atención de usuario, confirmar que alguno de los botones se ha pulsado,
avisar que se ha llegado hasta los valores mínimos o máximos etc. Pueden
ser una simple señal de pitido así como melodías de una duración más larga
o más corta. En este ejemplo se muestra la generación de sonido por medio
de funciones que pertenecen a la librería Sound.

Además de estas funciones, la función Button que pertenece a la misma

librería se utiliza para probar los botones de presión.
/*Cabecera******************************************************/

void Tone1() {
Sound_Play(659, 250); // Frecuencia = 659Hz, duración = 250ms
}

void Tone2() {
Sound_Play(698, 250); // Frecuencia = 698Hz, duración = 250ms
}

void Tone3() {
Sound_Play(784, 250); // Frecuencia = 784Hz, duración = 250ms
}

void Melody1() { // Componer una melodía divertida 1

Tone1(); Tone2(); Tone3(); Tone3();
Tone1(); Tone2(); Tone3(); Tone3();
Tone1(); Tone2(); Tone3();
Tone1(); Tone2(); Tone3(); Tone3();
Tone1(); Tone2(); Tone3();
Tone3(); Tone3(); Tone2(); Tone2(); Tone1();
}

void ToneA() { // Tono A

Sound_Play( 880, 50);
}

void ToneC() { // Tono C

Sound_Play(1046, 50);
}

void ToneE() { // Tono E

Sound_Play(1318, 50);
}

void Melody2() { // Componer una melodía divertida 2

unsigned short i;
 for (i = 9; i > 0; i--) {
ToneA(); ToneC(); ToneE();
}
}

void main() {
ANSEL = 0; // Todos los pines de E/S son digitales
ANSELH = 0;
TRISB = 0xF0; // Pines RB7-RB4 se configuran como entradas

// RB3 se configura como salida

Sound_Init(&PORTB, 3);
Sound_Play(1000, 500);

while (1) {
if (Button(&PORTB,7,1,1)) // RB7 genera Tono1
Tone1();
while (PORTB & 0x80) ; // Esperar que se suelte el botón
if (Button(&PORTB,6,1,1)) // RB6 genera Tono2
Tone2();
while (PORTB & 0x40) ; // Esperar que se suelte el botón
if (Button(&PORTB,5,1,1)) // RB5 genera melodía 2
Melody2();
while (PORTB & 0x20) ; // Esperar que se suelte el botón
if (Button(&PORTB,4,1,1)) // RB4 genera melodía 1
Melody1();
while (PORTB & 0x10) ; // Esperar que se suelte el botón
}
}

Para que este ejemplo funcione apropiadamente, es necesario marcar

las siguientes librerías en la ventana Library Manager antes de
compilar el programa:
 Button
 Sound
Utilizar el visualizador LCD gráfico
Un LCD gráfico (GLCD) proporciona un método avanzado para visualizar
mensajes. Mientras que un LCD de caracteres puede visualizar sólo
caracteres alfanuméricos, el LCD gráfico puede visualizar los mensajes en
forma de dibujos y mapas de bits. El LCD gráfico utilizado con más
frecuencia tiene una resolución de pantalla de 128x64 píxeles. El contraste
de un GLCD se puede ajustar por medio del potenciómetro P1.

En este ejemplo el GLCD visualiza una secuencia de imágenes, de las

que un mapa de bits representa un camión almacenado en otro archivo
denominado truck_bmp.c. Para habilitar que este programa funcione
apropiadamente, usted debe añadir este archivo como archivo fuente a su
proyecto. Las directivas del preprocesador incluidas en este ejemplo le
permiten elegir si quiere visualizar toda la secuencia de imágenes o sólo
una secuencia corta. Por defecto se visualizará toda la secuencia de
imágenes. Sin embargo, al añadir un comentario delante de la
directiva #define COMPLETE_EXAMPLE se deshabilita visualizar algunas
imágenes de la secuencia. Si se comenta (o si se borra) esta directiva, las
sentencias entre las directivas #ifdef COMPLETE_EXAMPLE y #endif no serán
compiladas, así que no se ejecutarán.

/*Cabecera******************************************************/

//Declaraciones-----------------------------------------------------------------
const code char truck_bmp[1024]; // Declarar la constante definida en truck_bmp.c
// para utilizarla en este archivo
//--------------------------------------------------------final-de-declaraciones

// Conexiones del módulo Glcd

char GLCD_DataPort at PORTD;
sbit GLCD_CS1 at RB0_bit;
sbit GLCD_CS2 at RB1_bit;
sbit GLCD_RS at RB2_bit;
sbit GLCD_RW at RB3_bit;
sbit GLCD_EN at RB4_bit;
sbit GLCD_RST at RB5_bit;
sbit GLCD_CS1_Direction at TRISB0_bit;
sbit GLCD_CS2_Direction at TRISB1_bit;
sbit GLCD_RS_Direction at TRISB2_bit;
sbit GLCD_RW_Direction at TRISB3_bit;
sbit GLCD_EN_Direction at TRISB4_bit;
sbit GLCD_RST_Direction at TRISB5_bit;
// Final de conexiones del módulo Glcd

void delay2S(){ // Función de tiempo de retardo de 2 segundos

Delay_ms(2000);
}

void main() {
unsigned short ii;
char *someText;

/* Esta directiva define un macro denominado COMPLETE_EXAMPLE. Más tarde en el

programa, la directiva ifdef prueba si este macro está definido. Si se borra esta
línea o si se transforma en un comentario, las secciones del código entre las
directivas ifdef y endif no serán compiladas. */
#define COMPLETE_EXAMPLE // Poner esta línea como un comentario si quiere
// visualizar la versión corta de la secuencia

ANSEL = 0; // Configurar los pines AN como digitales

ANSELH = 0;
C1ON_bit = 0; // Deshabilitar comparadores
C2ON_bit = 0;
Glcd_Init(); // Inicializar el GLCD
Glcd_Fill(0x00); // Borrar el GLCD

while(1) { // bucle infinito, la secuencia se repite

/* Dibujar la primera imagen */

#ifdef COMPLETE_EXAMPLE
Glcd_Image(truck_bmp); // Dibujar la imagen
delay2S(); delay2S();
#endif
Glcd_Fill(0x00); // Borrar el GLCD

/* Dibujar la segunda imagen */

Glcd_Box(62,40,124,56,1); // Dibujar la caja
Glcd_Rectangle(5,5,84,35,1); // Dibujar el rectángulo
Glcd_Line(0, 0, 127, 63, 1); // Dibujar la línea

delay2S();

for(ii = 5; ii < 60; ii+=5 ){ // Dibujar líneas horizontales y verticales

Delay_ms(250);
Glcd_V_Line(2, 54, ii, 1);
Glcd_H_Line(2, 120, ii, 1);
}

delay2S();
Glcd_Fill(0x00); // Borrar el GLCD

/* Dibujar la tercera imagen */

 #ifdef COMPLETE_EXAMPLE
Glcd_Set_Font(Character8x7, 8, 7, 32); // Seleccionar la fuente, ver
// __Lib_GLCDFonts.c en la carpeta Uses
#endif

Glcd_Write_Text("mikroE", 1, 7, 2); // Escribir la cadena

for (ii = 1; ii <= 10; ii++) // Dibujar los círculos
Glcd_Circle(63,32, 3*ii, 1);
delay2S();

Glcd_Box(12,20, 70,57, 2); // Dibujar la caja

delay2S();

/* Dibujar la cuarta imagen */

#ifdef COMPLETE_EXAMPLE
Glcd_Fill(0xFF); // Llenar el GLCD
Glcd_Set_Font(Character8x7, 8, 7, 32); // Cambiar de la fuente
someText = "8x7 Font";
Glcd_Write_Text(someText, 5, 0, 2); // Escribir la cadena
delay2S();
Glcd_Set_Font(System3x5, 3, 5, 32); // Cambiar de la fuente
someText = "3X5 CAPITALS ONLY";
Glcd_Write_Text(someText, 60, 2, 2); // Escribir la cadena
delay2S();
Glcd_Set_Font(font5x7, 5, 7, 32); // Cambiar de la fuente
someText = "5x7 Font";
Glcd_Write_Text(someText, 5, 4, 2); // Escribir la cadena
delay2S();
Glcd_Set_Font(FontSystem5x7_v2, 5, 7, 32); // Cambiar de la fuente
someText = "5x7 Font (v2)";
Glcd_Write_Text(someText, 5, 6, 2); // Escribir la cadena
delay2S();
#endif
}
}

truck_bmp.c:
/*Cabecera*****************************************************/
unsigned char const truck_bmp[1024] = {
0, 0, 0, 0, 0,248, 8, 8, 8, 8, 8, 8, 12, 12, 12, 12,
12, 10, 10, 10, 10, 10, 10, 9, 9, 9, 9, 9, 9, 9, 9, 9,
9, 9, 9, 9, 9, 9, 9, 9, 9, 9,137,137,137,137,137,137,
137,137,137,137,137,137,137, 9, 9, 9, 9, 9, 9, 9, 9, 9,
9, 9, 13,253, 13,195, 6,252, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0,255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
240,240,240,240,240,224,224,240,240,240,240,240,224,192,192,224,
240,240,240,240,240,224,192, 0, 0, 0,255,255,255,255,255,195,
195,195,195,195,195,195, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0,255,240, 79,224,255, 96, 96, 96, 32, 32, 32, 32, 32,
32, 32, 32, 32, 32, 32, 32, 32, 64, 64, 64, 64,128, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0,255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
255,255,255,255,255, 0, 0, 0, 0,255,255,255,255,255, 0, 0,
0, 0,255,255,255,255,255, 0, 0, 0,255,255,255,255,255,129,
129,129,129,129,129,129,128, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0,255, 1,248, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
8, 8, 8, 8, 16,224, 24, 36,196, 70,130,130,133,217,102,112,
160,192, 96, 96, 32, 32,160,160,224,224,192, 64, 64,128,128,192,
64,128, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 63, 96, 96, 96,224, 96, 96, 96, 96, 96, 96,
99, 99, 99, 99, 99, 96, 96, 96, 96, 99, 99, 99, 99, 99, 96, 96,
96, 96, 99, 99, 99, 99, 99, 96, 96, 96, 99, 99, 99, 99, 99, 99,
99, 99, 99, 99, 99, 99, 99, 96, 96, 96, 96, 96, 96, 96, 64, 64,
64,224,224,255,246, 1, 14, 6, 6, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2,130, 67,114, 62, 35, 16, 16, 0, 7, 3, 3, 2,
4, 4, 4, 4, 4, 4, 4, 28, 16, 16, 16, 17, 17, 9, 9, 41,
112, 32, 67, 5,240,126,174,128, 56, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1,127,127,127,127,255,255,247,251,123,191, 95, 93,125,189,
189, 63, 93, 89,177,115,243,229,207, 27, 63,119,255,207,191,255,
255,255,255,255,255,255,255,127,127,127,127,127,127,127,127,255,
255,255,127,127,125,120,120,120,120,120,248,120,120,120,120,120,
120,248,248,232,143, 0, 0, 0, 0, 0, 0, 0, 0,128,240,248,
120,188,220, 92,252, 28, 28, 60, 92, 92, 60,120,248,248, 96,192,
143,168,216,136, 49, 68, 72, 50,160, 96, 0, 0, 0, 0, 0, 0,
0, 0, 0,128,192,248,248,248,248,252,254,254,254,254,254,254,
254,254,254,254,254,255,255,255,255,255,246,239,208,246,174,173,
169,128,209,208,224,247,249,255,255,252,220,240,127,255,223,255,
255,255,255,255,255,254,254,255,255,255,255,255,255,255,254,255,
255,255,255,255,255,255,254,254,254,254,254,254,254,254,254,254,
254,254,254,254,255,255,255,255,255,255,254,255,190,255,255,253,
240,239,221,223,254,168,136,170,196,208,228,230,248,127,126,156,
223,226,242,242,242,242,242,177, 32, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 1, 1, 1, 3, 3, 3, 7, 7, 7, 7, 7, 15,
15, 15, 7, 15, 15, 15, 7, 7, 15, 14, 15, 13, 15, 47, 43, 43,
43, 43, 43, 47,111,239,255,253,253,255,254,255,255,255,255,255,
191,191,239,239,239,191,255,191,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,127,127,127,127,255,255,191,191,191,191,255,254,
255,253,255,255,255,251,255,255,255,127,125, 63, 31, 31, 31, 31,
31, 31, 63, 15, 15, 7, 7, 3, 3, 3, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,
1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 3, 3, 3, 11, 11, 11, 11, 7, 3, 14, 6, 6,
6, 2, 18, 19, 19, 3, 23, 21, 21, 17, 1, 19, 19, 3, 6, 6,
14, 15, 15, 7, 15, 15, 15, 11, 2, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
};

Para que este ejemplo funcione apropiadamente, es necesario marcar

la librería GLCD en la ventana Library Manager antes de compilar el
programa. Asimismo, es necesario incluir el
documento truck_bmp.c en el proyecto.
Utilizar el panel táctil...
Un panel táctil es un
panel fino,
autoadhesivo y
transparente, colocado
sobre la pantalla de
un LCD gráfico. Es
muy sensible a la presión
así que un suave toque
provoca algunos
cambios en la señal de
salida. Hay diferentes
tipos de paneles
táctiles. El más sencillo
es el panel táctil
resistivo del que se
hablará aquí.
Un panel táctil está compuesto por dos láminas rígidas, formando una
estructura de ‘sándwich’ que tiene capas resistivas en sus caras internas. La
resistencia de estas capas no excede normalmente de 1Kohm. Los lados
opuestos de las láminas disponen de los contactos para acceder a un cable
plano.

El procedimiento para determinar las coordenadas de la posición del panel

que ha sido presionado se puede dividir en dos pasos. El primero es
determinación de la coordenada X, y el segundo es de determinar la
coordenada Y de la posición. Para determinar la coordenada X, es necesario
conectar el contacto izquierdo en la superficie A a la masa (tierra) y el
contacto derecho a la fuente de alimentación. Esto permite obtener un
divisor de voltaje al presionar el panel táctil. El valor de voltaje obtenido en
el divisor se puede leer en el contacto inferior de la superficie B. El voltaje
variará en el rango de 0V al voltaje suministrado por la fuente de
alimentación y depende de la coordenada X. Si el punto está próximo al
contacto izquierdo de la superficie A, el voltaje estará próximo a 0V.

Para la determinación de la coordenada Y, es necesario conectar el contacto

inferior de la superficie B a masa (tierra), mientras que el contacto superior
se conectará a la fuente de alimentación. En este caso, el voltaje se puede
leer en el contacto izquierdo de la superficie A . Para conectar un panel
táctil al microcontrolador es necesario crear un circuito para el control del
panel táctil. Por medio de este circuito, el microcontrolador conecta los
contactos adecuados del panel táctil a masa y a la voltaje de alimentación
(como describimos anteriormente) para determinar las coordenadas X y Y.
El contacto inferior de la superficie B y el contacto izquierdo de la superficie
A están conectados al convertidor A/D del microcontrolador. Las
coordenadas X e Y se determinan midiendo el voltaje en los respectivos
contactos. El software consiste en mostrar un menú en una pantalla LCD
gráfica, conmutar de encendido a apagado del panel táctil (control del panel
táctil) y leer los valores del convertidor A/D que representan realmente las
coordenadas X e Y de la posición. Una vez determinadas las coordenadas,
es posible decidir qué es lo que deseamos que haga el microcontrolador. En
este ejemplo se explica cómo conmutar entre encendido y apagado dos
pines digitales del microcontrolador, conectados a los LEDs A y B. En este
ejemplo se utilizan las funciones que pertenecen a las librerías Glcd y
ADC. Teniendo en cuenta que la superficie del panel táctil es ligeramente
mayor que la del LCD gráfico, en caso de requerir una mayor precisión en la
determinación de las coordenadas, es necesario incluir el software de
calibración del panel táctil.

/* Cabecera ***************************************************/

// Conexiones del módulo Glcd

char GLCD_DataPort at PORTD;
sbit GLCD_CS1 at RB0_bit;
sbit GLCD_CS2 at RB1_bit;
sbit GLCD_RS at RB2_bit;
sbit GLCD_RW at RB3_bit;
sbit GLCD_EN at RB4_bit;
sbit GLCD_RST at RB5_bit;
sbit GLCD_CS1_Direction at TRISB0_bit;
sbit GLCD_CS2_Direction at TRISB1_bit;
sbit GLCD_RS_Direction at TRISB2_bit;
sbit GLCD_RW_Direction at TRISB3_bit;
sbit GLCD_EN_Direction at TRISB4_bit;
sbit GLCD_RST_Direction at TRISB5_bit;
// Final de conexiones del módulo Glcd

// Declaración de la cadena a visualizar en el GLCD

char msg1[] = "TOUCHPANEL EXAMPLE";
char msg2[] = "MIKROELEKTRONIKA";
char msg3[] = "BUTTON1";
char msg4[] = "BUTTON2";
char msg5[] = "RC6 OFF";
char msg6[] = "RC7 OFF";
char msg7[] = "RC6 ON ";
char msg8[] = "RC7 ON ";

// Declaración de variables globales

long x_coord, y_coord, x_coord128, y_coord64; // almacenar la posición de las
// coordenadas x e y

// Leer la coordenada X
unsigned int GetX() {
//reading X
PORTC.F0 = 1; // DRIVEA = 1 (electrodo izquierdo (LEFT) conectado, electrodo
// derecho (RIGHT) conectado, electrodo superior
(TOP)desconectado)
PORTC.F1 = 0; // DRIVEB = 0 (electrodo inferior (BOTTOM) desconectado)
Delay_ms(5);
return ADC_Read(0); // leer el valor de X de RA0(BOTTOM)
}

// Leer la coordenada Y
unsigned int GetY() {
//Leer la Y
PORTC.F0 = 0; // DRIVEA = 0 (electrodo izquierdo (LEFT) desconectado,
electrodo
 // derecho (RIGHT) desconectado, electrodo superior (TOP)
conectado)
PORTC.F1 = 1; // DRIVEB = 1 (electrodo inferior (BOTTOM) conectado)
Delay_ms(5);
return ADC_Read(1); // leer el valor de Y de RA1 (del eléctrodo izquierdo LEFT)
}

void main() {
PORTA = 0x00;
TRISA = 0x03; // RA0 y RA1 son entradas analógicas
ANSEL = 0x03;
ANSELH = 0; // Configurar otros pines AN como digitales de E/S
PORTC = 0 ; // Todos los pines del puerto PORTC están a 0 (incluyendo los
// pines RC6 y RC7)

TRISC = 0 ; // PORTC es una salida

// Inicialización del GLCD

Glcd_Init(); // Glcd_Init_EP5
Glcd_Set_Font(FontSystem5x7_v2, 5, 7, 32); // Seleccionar el tamaño de fuente 5x7
Glcd_Fill(0); // Borrar GLCD
Glcd_Write_Text(msg1,10,0,1);
Glcd_Write_Text(msg2,17,7,1);

// Visualizar botones en el GLCD:

Glcd_Rectangle(8,16,60,48,1);
Glcd_Rectangle(68,16,120,48,1);
Glcd_Box(10,18,58,46,1);
Glcd_Box(70,18,118,46,1);

// Visualizar los mensajes en los botones

Glcd_Write_Text(msg3,14,3,0);
Glcd_Write_Text(msg5,14,4,0);
Glcd_Write_Text(msg4,74,3,0);
Glcd_Write_Text(msg6,74,4,0);

while (1) {
// leer X-Y y convertirlo en la resolución de 128x64 píxeles
x_coord = GetX();
y_coord = GetY();
 x_coord128 = (x_coord * 128) / 1024;
y_coord64 = 64 -((y_coord *64) / 1024);

//Si BUTTON1 ha sido presionado

if ((x_coord128 >= 10) && (x_coord128 <= 58) && (y_coord64 >= 18) &&
(y_coord64 <= 46)) {
if(PORTC.F6 == 0) { // Si RC6 = 0
PORTC.F6 = 1; // Invertir el estado lógico del pin RC6
Glcd_Write_Text(msg7,14,4,0); // Visualizar un nuevo mensaje: RC6 ON
}
else { // Si RC6 = 1
PORTC.F6 = 0; // Invertir el estado lógico del pin RC6
Glcd_Write_Text(msg5,14,4,0); // Visualizar un nuevo mensaje: RC6 OFF
}
}

// Si BUTTON2 ha sido presionado

if ((x_coord128 >= 70) && (x_coord128 <= 118) && (y_coord64 >= 18) &&
(y_coord64 <= 46)) {
if(PORTC.F7 == 0) { // Si RC7 = 0
PORTC.F7 = 1; // Invertir el estado lógico del pin RC7
Glcd_Write_Text(msg8,74,4,0); // Visualizar un nuevo mensaje: RC7 ON
}
else { // Si RC7 = 1
PORTC.F7 = 0; // Invertir el estado lógico del pin RC7
Glcd_Write_Text(msg6,74,4,0); // Visualizar un nuevo mensaje: RC7 OFF
}
}
Delay_ms(100);
}
}

Para que este ejemplo funcione apropiadamente, es necesario

marcar las siguientes librerías en la ventana Library Manager antes
de compilar el programa.
 GLCD
 ADC
 C_Stdlib