STM32F103C8_Barrido_Display Barrido de un Display de Ánodo Común

Dependencies:   mbed

Committer:
Antulius
Date:
Fri Jun 28 19:32:38 2019 +0000
Revision:
1:dc2ae76df12d
Parent:
0:9f7581d1af6f
Child:
2:49e089d4d1ac
STM32F103C8_Barrido_Teclado

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Antulius 0:9f7581d1af6f 1 /* ###########################################################################
Antulius 0:9f7581d1af6f 2 ** Archivo : main.c
Antulius 0:9f7581d1af6f 3 ** Proyecto : STM32-F103C8_Plantilla
Antulius 0:9f7581d1af6f 4 ** Procesador : STM32F103C8
Antulius 0:9f7581d1af6f 5 ** Herramienta : Mbed
Antulius 0:9f7581d1af6f 6 ** Version : Driver 01.01
Antulius 0:9f7581d1af6f 7 ** Compilador : GNU C Compiler
Antulius 0:9f7581d1af6f 8 ** Fecha/Hora : 14-07-2015, 11:48, # CodeGen: 0
Antulius 0:9f7581d1af6f 9 ** Descripción :
Antulius 0:9f7581d1af6f 10 ** Este proyecto hace...
Antulius 0:9f7581d1af6f 11 ** This module contains user's application code.
Antulius 0:9f7581d1af6f 12 ** Componentes : GPIO, Timer, etc .
Antulius 0:9f7581d1af6f 13 ** Configuraciones : Includes, Stacks y Drivers externos
Antulius 0:9f7581d1af6f 14 ** Autores :
Antulius 0:9f7581d1af6f 15 ** ATEAM Development Group:
Antulius 0:9f7581d1af6f 16 ** - Antulio Morgado Valle
Antulius 0:9f7581d1af6f 17 **
Antulius 0:9f7581d1af6f 18 ** Versión : Beta
Antulius 0:9f7581d1af6f 19 ** Revisión : A
Antulius 0:9f7581d1af6f 20 ** Release : 0
Antulius 0:9f7581d1af6f 21 ** Bugs & Fixes :
Antulius 0:9f7581d1af6f 22 ** Date : 20/10/2019
Antulius 0:9f7581d1af6f 23 ** Added support for Led_RGB
Antulius 0:9f7581d1af6f 24 ** 22/09/2018
Antulius 0:9f7581d1af6f 25 ** Added LCD Menu, Beta version (with bugs)
Antulius 0:9f7581d1af6f 26 **
Antulius 0:9f7581d1af6f 27 ** ###########################################################################*/
Antulius 0:9f7581d1af6f 28 /*
Antulius 0:9f7581d1af6f 29 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Antulius 0:9f7581d1af6f 30 : Includes
Antulius 0:9f7581d1af6f 31 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Antulius 0:9f7581d1af6f 32 */
Antulius 0:9f7581d1af6f 33 #include "mbed.h"
Antulius 0:9f7581d1af6f 34 #include "stm32f103c8t6.h"
Antulius 0:9f7581d1af6f 35 //#include "stm32f10x.h"
Antulius 0:9f7581d1af6f 36 #include "PinNames.h"
Antulius 0:9f7581d1af6f 37 //#include "SysClockConf.h"
Antulius 0:9f7581d1af6f 38 //#include "AnalogIn.h"
Antulius 0:9f7581d1af6f 39 //#include "Led_RGB.h"
Antulius 0:9f7581d1af6f 40 //#include "Serial.h"
Antulius 0:9f7581d1af6f 41 //#include "stdio.h"
Antulius 0:9f7581d1af6f 42
Antulius 0:9f7581d1af6f 43 /*
Antulius 0:9f7581d1af6f 44 :...............................................................................
Antulius 0:9f7581d1af6f 45 : Definiciones
Antulius 0:9f7581d1af6f 46 :...............................................................................
Antulius 0:9f7581d1af6f 47 */
Antulius 1:dc2ae76df12d 48 #define on 0 // Estado para boton presionado
Antulius 1:dc2ae76df12d 49 #define off 1 // Estado para boton sin presionar
Antulius 1:dc2ae76df12d 50 #define hold 2 // Estado para boton mantenido
Antulius 1:dc2ae76df12d 51 #define release 3 // Estado para boton liberado
Antulius 1:dc2ae76df12d 52 #define TRUE 1
Antulius 1:dc2ae76df12d 53 #define FALSE 0
Antulius 1:dc2ae76df12d 54 #define Ticker_Period 1000 // Periodo de Tiempo del Ticker (us)
Antulius 1:dc2ae76df12d 55 #define Rate_Period 2 // Tiempo de Encendido de los Digitos (ms)
Antulius 1:dc2ae76df12d 56 #define Scan_Time 2 // Tiempo de Barrido del Display (ms)
Antulius 1:dc2ae76df12d 57 #define Shift_Time 2 // Tiempo de corrimiento (x Counter_Time)
Antulius 1:dc2ae76df12d 58 #define Counter_Time 100 // Tiempo de counter (ms)
Antulius 1:dc2ae76df12d 59 #define String_Size 20 // Tamaño del Buffer de Caracteres
Antulius 1:dc2ae76df12d 60 #define Digit_Null 0xFF // Valor para apagar los Segmentos
Antulius 1:dc2ae76df12d 61 #define Degree_Symbol 0x0F // Valor para el Símbolo de Grados
Antulius 1:dc2ae76df12d 62 #define DO2 0.0078125 // 128 Hz (Escala Filosófica)
Antulius 1:dc2ae76df12d 63 #define DOs2 0.0073740180703125 // 136 Hz
Antulius 1:dc2ae76df12d 64 #define RE2 0.006960146234375 // 144 Hz
Antulius 1:dc2ae76df12d 65 #define REs2 0.0065695032421875 // 152 Hz
Antulius 1:dc2ae76df12d 66 #define MI2 0.006200785359375 // 161 Hz
Antulius 1:dc2ae76df12d 67 #define FA2 0.005852762015625 // 171 Hz
Antulius 1:dc2ae76df12d 68 #define FAs2 0.0055242717265625 // 181 Hz
Antulius 1:dc2ae76df12d 69 #define SOL2 0.0052142181796875 // 192 Hz
Antulius 1:dc2ae76df12d 70 #define SOLs2 0.0049215666015625 // 203 Hz
Antulius 1:dc2ae76df12d 71 #define LA2 0.004645340296875 // 215 Hz
Antulius 1:dc2ae76df12d 72 #define LAs2 0.004384617375 // 228 Hz
Antulius 1:dc2ae76df12d 73 #define SI2 0.0041385277109375 // 242 Hz
Antulius 1:dc2ae76df12d 74 #define DO3 0.00390625 // 256 Hz
Antulius 1:dc2ae76df12d 75 #define DOs3 0.00368700903515625 // 271 Hz
Antulius 1:dc2ae76df12d 76 #define RE3 0.0034800731171875 // 287 Hz
Antulius 1:dc2ae76df12d 77 #define REs3 0.00328475162109375 // 304 Hz
Antulius 1:dc2ae76df12d 78 #define MI3 0.0031003926796875 // 323 Hz
Antulius 1:dc2ae76df12d 79 #define FA3 0.0029263810078125 // 342 Hz
Antulius 1:dc2ae76df12d 80 #define FAs3 0.0055242717265625 // 362 Hz
Antulius 1:dc2ae76df12d 81 #define SOL3 0.00260710908984375 // 384 Hz
Antulius 1:dc2ae76df12d 82 #define SOLs3 0.00246078330078125 // 406 Hz
Antulius 1:dc2ae76df12d 83 #define LA3 0.0023226701484375 // 431 Hz
Antulius 1:dc2ae76df12d 84 #define LAs3 0.0021923086875 // 456 Hz
Antulius 1:dc2ae76df12d 85 #define SI3 0.00206926385546875 // 483 Hz
Antulius 1:dc2ae76df12d 86 #define DO4 0.00390625 // 512 Hz
Antulius 1:dc2ae76df12d 87 #define DOs4 0.001843504517578125 // 542 Hz
Antulius 1:dc2ae76df12d 88 #define RE4 0.00174003655859375 // 575 Hz
Antulius 1:dc2ae76df12d 89 #define REs4 0.001642375810546875 // 609 Hz
Antulius 1:dc2ae76df12d 90 #define MI4 0.00155019633984375 // 645 Hz
Antulius 1:dc2ae76df12d 91 #define FA4 0.00146319050390625 // 683 Hz
Antulius 1:dc2ae76df12d 92 #define FAs4 0.001381067931640625 // 724 Hz
Antulius 1:dc2ae76df12d 93 #define SOL4 0.001303554544921875 // 767 Hz
Antulius 1:dc2ae76df12d 94 #define SOLs4 0.001230391650390625 // 813 Hz
Antulius 1:dc2ae76df12d 95 #define LA4 0.00116133507421875 // 861 Hz
Antulius 1:dc2ae76df12d 96 #define LAs4 0.00109615434375 // 912 Hz
Antulius 1:dc2ae76df12d 97 #define SI4 0.001034631927734375 // 966 Hz
Antulius 1:dc2ae76df12d 98 #define DO5 0.001953125 // 1024 Hz
Antulius 0:9f7581d1af6f 99 /*
Antulius 0:9f7581d1af6f 100 +-------------------------------------------------------------------------------
Antulius 0:9f7581d1af6f 101 | Configuración de Puertos
Antulius 0:9f7581d1af6f 102 +-------------------------------------------------------------------------------
Antulius 0:9f7581d1af6f 103 */
Antulius 1:dc2ae76df12d 104 BusIn Renglones (PA_8, PA_9, PA_10, PA_11); // Definición para los Renglones
Antulius 1:dc2ae76df12d 105
Antulius 1:dc2ae76df12d 106 BusOut Anodos (PB_6, PB_7, PB_8, PB_9); // Definición para los Ánodos
Antulius 1:dc2ae76df12d 107 BusOut Catodos (PA_0, PA_1,PA_2,PA_3,PA_4,PA_5,PA_6,PA_7); // Definición para los Cätodos
Antulius 1:dc2ae76df12d 108 DigitalOut Green_Led (PC_11); // Led de Actividad del Programa
Antulius 1:dc2ae76df12d 109 DigitalOut Red_Led (PB_11); // Led de Actividad del Programa
Antulius 1:dc2ae76df12d 110 PwmOut Buzzer (PB_13); // Salida del Buzzer
Antulius 1:dc2ae76df12d 111 Ticker Barrido;
Antulius 1:dc2ae76df12d 112 Serial Terminal(USBTX, USBRX); //activa la Terminal a traves del Puerto USB
Antulius 0:9f7581d1af6f 113 /*
Antulius 0:9f7581d1af6f 114 +-------------------------------------------------------------------------------
Antulius 0:9f7581d1af6f 115 | Variables Globales de Usuario
Antulius 0:9f7581d1af6f 116 +-------------------------------------------------------------------------------
Antulius 0:9f7581d1af6f 117 */
Antulius 1:dc2ae76df12d 118 uint16_t Rate=1000;
Antulius 1:dc2ae76df12d 119 // Offset: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
Antulius 1:dc2ae76df12d 120 // 0 1 2 3 4 5 6 7 8 9 A b C d E f G h I j K L M n o P q r S t u V W X y Z null a e +o +/c c /c +u +n [ ] ° ^ ¬ + > ^ / v < v > /_ - _ = /= == ¬_ ii # /# J /J -J -/J -J -/J | || + /+ null ! " # $ % & ' ( ) * + - . / : ; < > ? @
Antulius 1:dc2ae76df12d 121 uint8_t Segmentos[]={0x81,0xE7,0x49,0x43,0x27,0x13,0x11,0xC7,0x01,0x03,0x05,0x31,0x99,0x61,0x19,0x1D,0x91,0x35,0xBD,0xB3,0x2D,0xB9,0x85,0x75,0x71,0x0D,0x07,0x3D,0x13,0x39,0xF1,0xE1,0xA1,0x25,0x37,0x49,0xFF,0xBE,0xF6,0x0F,0x8F,0x4F,0x2F,0x1F,0x0F,0x13,0x01,0x7F,0x7D,0x7B,0x79,0x75,0x73,0x71,0x70,0x99,0xC3,0x3F,0x9F,0xCF,0x6F,0x7D,0xF9,0xF3,0xD7,0xF7,0xDF,0x7F,0xFB,0x5F,0x7B,0x5B,0xBD,0xF5,0x6D,0x37,0xE3,0xB9,0x9D,0x7C,0xE7,0xBD,0xCa,0x00};
Antulius 1:dc2ae76df12d 122 uint8_t Digitos[]={0x08,0x04,0x02,0x01,0x00,0x0F}; // Millares, Centenas, Decenas, Unidades, Apagados, Encendidos
Antulius 1:dc2ae76df12d 123 uint8_t Numeros[]={1,0,2,4};
Antulius 1:dc2ae76df12d 124 uint8_t Cadena[]={33,0,21,10,36,14,28,18,22,36,35,10,12,10,29,14,23,12,24,36,36};
Antulius 1:dc2ae76df12d 125 uint8_t Tecla[]={1,2,3,10,4,5,6,11,7,8,9,12,75,0,74,13};
Antulius 1:dc2ae76df12d 126 uint8_t Boton[]={1,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1};
Antulius 1:dc2ae76df12d 127 uint8_t Boton_Ant[]={1,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1};
Antulius 1:dc2ae76df12d 128 uint8_t Edo_Boton[]={off,off,off,off, off,off,off,off, off,off,off,off, off,off,off,off};
Antulius 1:dc2ae76df12d 129 uint8_t Renglon[]={0,0,0,0};
Antulius 1:dc2ae76df12d 130 uint8_t punto_decimal=0; //Posición del punto decimal: 0=sin punto, 1=unidades, 2=decenas, 3=centemas 4=millares,
Antulius 1:dc2ae76df12d 131 uint8_t cont_1ms;
Antulius 1:dc2ae76df12d 132 uint8_t cont_10ms;
Antulius 1:dc2ae76df12d 133 uint8_t cont_100ms;
Antulius 1:dc2ae76df12d 134 uint8_t cont_1s;
Antulius 1:dc2ae76df12d 135 uint8_t scan_rate=25;
Antulius 1:dc2ae76df12d 136 uint8_t shift_rate=0;
Antulius 1:dc2ae76df12d 137 uint16_t counter=250;
Antulius 1:dc2ae76df12d 138 uint8_t i=0;
Antulius 1:dc2ae76df12d 139 uint8_t j=0;
Antulius 1:dc2ae76df12d 140 uint8_t valor=0;
Antulius 1:dc2ae76df12d 141 uint8_t nchar=0;
Antulius 1:dc2ae76df12d 142 bool flag1=FALSE;
Antulius 1:dc2ae76df12d 143 bool flag2=FALSE;
Antulius 1:dc2ae76df12d 144 bool Blinking=FALSE;
Antulius 1:dc2ae76df12d 145 bool mode=0;
Antulius 0:9f7581d1af6f 146
Antulius 0:9f7581d1af6f 147 /*
Antulius 0:9f7581d1af6f 148 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Antulius 0:9f7581d1af6f 149 | Definición de Funciones Prototipo y Rutinas de los Vectores de Interrupción
Antulius 0:9f7581d1af6f 150 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Antulius 0:9f7581d1af6f 151 */
Antulius 1:dc2ae76df12d 152 void Barrido_OnInterrupt(void);
Antulius 1:dc2ae76df12d 153 void Buzzer_SetPeriodMode(float Periodo,bool Estado);
Antulius 0:9f7581d1af6f 154 /*
Antulius 0:9f7581d1af6f 155 #===============================================================================
Antulius 0:9f7581d1af6f 156 |
Antulius 0:9f7581d1af6f 157 | P R O G R A M A P R I N C I P A L
Antulius 0:9f7581d1af6f 158 |
Antulius 0:9f7581d1af6f 159 #===============================================================================
Antulius 0:9f7581d1af6f 160 */
Antulius 1:dc2ae76df12d 161 int main()
Antulius 1:dc2ae76df12d 162 {
Antulius 1:dc2ae76df12d 163 // Inicialización de variables, puertos e interrupciones
Antulius 1:dc2ae76df12d 164 Terminal.baud(115200); // Establece la velocidad de Transmisión de la Terminal
Antulius 1:dc2ae76df12d 165 Barrido.attach_us(&Barrido_OnInterrupt, Ticker_Period); // Periodo de Interrupción del Timer = 1ms (Ticker_Period=1000)
Antulius 1:dc2ae76df12d 166 Renglones.mode(PullUp); // Habilita los Pull-Up's de las entradas
Antulius 1:dc2ae76df12d 167 while (true)
Antulius 1:dc2ae76df12d 168 { //El Programa principal está aquí !!!
Antulius 1:dc2ae76df12d 169 nchar=0; // Inicializa el contador de caracteres a desplegar
Antulius 1:dc2ae76df12d 170 if (flag1==TRUE)
Antulius 1:dc2ae76df12d 171 {
Antulius 1:dc2ae76df12d 172 Buzzer_SetPeriodMode(LA4,FALSE);// Apaga el Buzzer
Antulius 1:dc2ae76df12d 173 Buzzer=off; // Apaga el Buzzer
Antulius 1:dc2ae76df12d 174 Anodos=Digitos[4]; // Apaga todos los Digitos (Evita fantasmas)
Antulius 1:dc2ae76df12d 175 Catodos=Segmentos[Numeros[i]]; // Escribe los segmentos del Dígito
Antulius 1:dc2ae76df12d 176 if (i==4-punto_decimal) Catodos=(Segmentos[Numeros[i]]& 0xFE); // Enciende el punto decimal
Antulius 1:dc2ae76df12d 177 Anodos=Digitos[i]; // Activa el Dígito/columna
Antulius 1:dc2ae76df12d 178 valor=Renglones; // Lee los renglones
Antulius 1:dc2ae76df12d 179 Renglon[i]=(valor>>i)&1; // Obtiene el valor de cada bit del renglón
Antulius 1:dc2ae76df12d 180 Boton[i+j]=Renglon[i]; // Llena el renglon-columna correspondiente
Antulius 1:dc2ae76df12d 181 if (Boton[i+j]==1)
Antulius 1:dc2ae76df12d 182 {
Antulius 1:dc2ae76df12d 183 Buzzer_SetPeriodMode(DO5,TRUE); // Selecciona Tono y lo habilita
Antulius 1:dc2ae76df12d 184 Buzzer=on; // Enciende el Buzzer
Antulius 1:dc2ae76df12d 185 }
Antulius 1:dc2ae76df12d 186 if ( Boton[i+j] && Boton_Ant[i+j])
Antulius 1:dc2ae76df12d 187 {
Antulius 1:dc2ae76df12d 188 Edo_Boton[i+j]= off; // El Botón está Apagado
Antulius 1:dc2ae76df12d 189 }
Antulius 1:dc2ae76df12d 190 if (!Boton[i+j] && Boton_Ant[i+j])
Antulius 1:dc2ae76df12d 191 {
Antulius 1:dc2ae76df12d 192 Edo_Boton[i+j]= on; // El Botón está Encendido
Antulius 1:dc2ae76df12d 193 }
Antulius 1:dc2ae76df12d 194 if (!Boton[i+j] && !Boton_Ant[i+j])
Antulius 1:dc2ae76df12d 195 {
Antulius 1:dc2ae76df12d 196 Edo_Boton[i+j]= hold; // El Botón está Presionado
Antulius 1:dc2ae76df12d 197 }
Antulius 1:dc2ae76df12d 198 if ( Boton[i+j] && !Boton_Ant[i+j])
Antulius 1:dc2ae76df12d 199 {
Antulius 1:dc2ae76df12d 200 Edo_Boton[i+j]= release; // El Botón está Liberado
Antulius 1:dc2ae76df12d 201 }
Antulius 1:dc2ae76df12d 202 Boton_Ant[i+j]=Boton[i+j]; // Actualiza el valor del botón anterior
Antulius 1:dc2ae76df12d 203 if (valor != 0xFF)
Antulius 1:dc2ae76df12d 204 {
Antulius 1:dc2ae76df12d 205 Numeros[0]= Digit_Null; // Millares
Antulius 1:dc2ae76df12d 206 Numeros[1]= Digit_Null; // Centenas
Antulius 1:dc2ae76df12d 207 Numeros[2]= Digit_Null; // Decenas
Antulius 1:dc2ae76df12d 208 Numeros[3]= Tecla[i+j]; // Unidades
Antulius 1:dc2ae76df12d 209 mode=2;
Antulius 1:dc2ae76df12d 210 }
Antulius 1:dc2ae76df12d 211 i++; // Incrementa la columna
Antulius 1:dc2ae76df12d 212 if (i==4) // Se terminó de barrer las columnas?
Antulius 1:dc2ae76df12d 213 {
Antulius 1:dc2ae76df12d 214 i=0; // Reinicia las columnas
Antulius 1:dc2ae76df12d 215 j=j+4; // Brinca al siguiente renglón
Antulius 1:dc2ae76df12d 216 if (j==16) j=0; // Se terminó de barrer los renglones? Reinicia los renglones
Antulius 1:dc2ae76df12d 217
Antulius 1:dc2ae76df12d 218 if (mode==1) // Se va a desplegar un mensaje?
Antulius 1:dc2ae76df12d 219 {
Antulius 1:dc2ae76df12d 220 Numeros[i]=Cadena[i+nchar]; // Cargamos 4 caracteres en el buffer de despliege
Antulius 1:dc2ae76df12d 221 if (nchar >= String_Size) nchar=0; // Restablece el contador de caractres
Antulius 1:dc2ae76df12d 222 }
Antulius 1:dc2ae76df12d 223 if (mode==2) // Se va a desplegar un el valor de la botonera
Antulius 1:dc2ae76df12d 224 {
Antulius 1:dc2ae76df12d 225 if ( Blinking==1) punto_decimal=3; // Activa los puntos del Reloj
Antulius 1:dc2ae76df12d 226 if ( Blinking==0) punto_decimal=0; // Desactiva los puntos del Reloj
Antulius 1:dc2ae76df12d 227 if (i==4-punto_decimal)
Antulius 1:dc2ae76df12d 228 Catodos=Segmentos[Numeros[i]&0xFE]; // Enciende el punto decimal
Antulius 1:dc2ae76df12d 229 Terminal.printf("Tecla Oprimida: %c",valor);
Antulius 1:dc2ae76df12d 230 }
Antulius 1:dc2ae76df12d 231 Red_Led=!Red_Led; // Parpadeo del Led Rojo
Antulius 1:dc2ae76df12d 232 }
Antulius 1:dc2ae76df12d 233
Antulius 1:dc2ae76df12d 234 flag1=FALSE; // Apaga la Bandera 1
Antulius 1:dc2ae76df12d 235 }
Antulius 1:dc2ae76df12d 236 if (flag2==TRUE) // Está puesta la Bandera 2?
Antulius 1:dc2ae76df12d 237 {
Antulius 1:dc2ae76df12d 238 Green_Led=!Green_Led; // Parpadeo del Led Verde
Antulius 1:dc2ae76df12d 239 flag2=FALSE; // Apaga la Bandera 2
Antulius 1:dc2ae76df12d 240 }
Antulius 0:9f7581d1af6f 241 }
Antulius 0:9f7581d1af6f 242 }
Antulius 1:dc2ae76df12d 243 /* END main() */
Antulius 0:9f7581d1af6f 244 /*
Antulius 0:9f7581d1af6f 245 ................................................................................
Antulius 0:9f7581d1af6f 246 : Rutinas de los Vectores de Interrupción
Antulius 0:9f7581d1af6f 247 ................................................................................
Antulius 0:9f7581d1af6f 248 */
Antulius 1:dc2ae76df12d 249 void Barrido_OnInterrupt(void) // Rutina de Atención al Ticker
Antulius 0:9f7581d1af6f 250 {
Antulius 1:dc2ae76df12d 251 cont_1ms++;
Antulius 1:dc2ae76df12d 252 scan_rate++;
Antulius 1:dc2ae76df12d 253 counter--;
Antulius 1:dc2ae76df12d 254 if(!scan_rate) // Se terminó el tiempo de barrido
Antulius 1:dc2ae76df12d 255 {
Antulius 1:dc2ae76df12d 256 scan_rate=Rate_Period; // Restablece el tiempo de barrido?
Antulius 1:dc2ae76df12d 257 flag1=TRUE; // Enciende la bandera para las rutinas de despliege y teclado
Antulius 1:dc2ae76df12d 258 }
Antulius 1:dc2ae76df12d 259 if (cont_1ms>=10)
Antulius 1:dc2ae76df12d 260 {
Antulius 1:dc2ae76df12d 261 cont_10ms++;
Antulius 1:dc2ae76df12d 262 cont_1ms=0;
Antulius 1:dc2ae76df12d 263 }
Antulius 1:dc2ae76df12d 264 if (cont_10ms>=10)
Antulius 1:dc2ae76df12d 265 {
Antulius 1:dc2ae76df12d 266 cont_100ms++;
Antulius 1:dc2ae76df12d 267 cont_10ms=0;
Antulius 1:dc2ae76df12d 268 }
Antulius 1:dc2ae76df12d 269 if (cont_100ms>=10)
Antulius 0:9f7581d1af6f 270 {
Antulius 1:dc2ae76df12d 271 cont_1s++;
Antulius 1:dc2ae76df12d 272 cont_100ms=0;
Antulius 1:dc2ae76df12d 273 }
Antulius 1:dc2ae76df12d 274 if (cont_1s>=10)
Antulius 1:dc2ae76df12d 275 {
Antulius 1:dc2ae76df12d 276 cont_1s=0;
Antulius 1:dc2ae76df12d 277 }
Antulius 1:dc2ae76df12d 278 if (!counter) // Se terminó de contar?
Antulius 1:dc2ae76df12d 279 {
Antulius 1:dc2ae76df12d 280 counter=500; // Restablece el contador
Antulius 1:dc2ae76df12d 281 Blinking= !Blinking; // Parpadeo
Antulius 1:dc2ae76df12d 282 shift_rate --; // Decrementa el tiempo del corrimiento
Antulius 1:dc2ae76df12d 283 flag2=TRUE; // Prende la bandera para realizar un desplazamiento
Antulius 1:dc2ae76df12d 284 }
Antulius 1:dc2ae76df12d 285 if (!shift_rate) // Se terminó el tiempo de corrimiento?
Antulius 1:dc2ae76df12d 286 {
Antulius 1:dc2ae76df12d 287 mode=!mode; // Tiempo entre desplazamientos del mensaje
Antulius 1:dc2ae76df12d 288 shift_rate = Shift_Time; // Restablece el tiempo de los corrimientos
Antulius 1:dc2ae76df12d 289 }
Antulius 1:dc2ae76df12d 290 }
Antulius 1:dc2ae76df12d 291 /* END Events */
Antulius 1:dc2ae76df12d 292
Antulius 0:9f7581d1af6f 293 /*
Antulius 0:9f7581d1af6f 294 ________________________________________________________________________________
Antulius 0:9f7581d1af6f 295 |
Antulius 0:9f7581d1af6f 296 | Funciones Prototipo
Antulius 0:9f7581d1af6f 297 |_______________________________________________________________________________
Antulius 0:9f7581d1af6f 298 */
Antulius 0:9f7581d1af6f 299 // Las Funciones Prototipo van aquí !
Antulius 1:dc2ae76df12d 300 void Buzzer_SetPeriodMode(float Periodo,bool Estado)
Antulius 0:9f7581d1af6f 301 {
Antulius 1:dc2ae76df12d 302 Buzzer.period(Periodo);
Antulius 1:dc2ae76df12d 303 Buzzer.pulsewidth(Periodo/2);
Antulius 1:dc2ae76df12d 304 if (Estado==1)Buzzer=0.5;
Antulius 1:dc2ae76df12d 305 if (Estado==0)Buzzer=0.0;
Antulius 0:9f7581d1af6f 306 }
Antulius 0:9f7581d1af6f 307
Antulius 1:dc2ae76df12d 308 /* END Routines */
Antulius 0:9f7581d1af6f 309
Antulius 1:dc2ae76df12d 310 /* END program */
Antulius 1:dc2ae76df12d 311 /*+------------------------------------------------------------------------------------
Antulius 1:dc2ae76df12d 312 *+ Descripción del Display de 7 Segmentos de Anodos Comunes en modo multiplexado
Antulius 1:dc2ae76df12d 313 *+-------------------------------------------------------------------------------------
Antulius 1:dc2ae76df12d 314 *+ 13 12 11 10 9 8
Antulius 1:dc2ae76df12d 315 *+ | | | | | |
Antulius 1:dc2ae76df12d 316 *+ | | | | | |
Antulius 1:dc2ae76df12d 317 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 318 *+ | A a f A A b |
Antulius 1:dc2ae76df12d 319 *+ | 4 3 2 |
Antulius 1:dc2ae76df12d 320 *+ | ______________________________________________ |
Antulius 1:dc2ae76df12d 321 *+ | | ____ ____ _____ _____ | |
Antulius 1:dc2ae76df12d 322 *+ | | / / / / / / / / | |
Antulius 1:dc2ae76df12d 323 *+ | | /____ / /____ / . /____ / /____ / | |
Antulius 1:dc2ae76df12d 324 *+ | | / / / / . / / / / | |
Antulius 1:dc2ae76df12d 325 *+ | | /____ /. /_____/ . /____ /. /____ /. | |
Antulius 1:dc2ae76df12d 326 *+ | | | |
Antulius 1:dc2ae76df12d 327 *+ | |______________________________________________| |
Antulius 1:dc2ae76df12d 328 *+ | |
Antulius 1:dc2ae76df12d 329 *+ | A |
Antulius 1:dc2ae76df12d 330 *+ | e d p c g 1 |
Antulius 1:dc2ae76df12d 331 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 332 *+ | | | | | | |
Antulius 1:dc2ae76df12d 333 *+ | | | | | | |
Antulius 1:dc2ae76df12d 334 *+ 1 2 3 4 5 6 7
Antulius 1:dc2ae76df12d 335 *+
Antulius 1:dc2ae76df12d 336 *+ Display: HS410561K-D30
Antulius 1:dc2ae76df12d 337 *+
Antulius 1:dc2ae76df12d 338 *+
Antulius 1:dc2ae76df12d 339 *+ 13 12 11 10 9 8
Antulius 1:dc2ae76df12d 340 *+ | | | | | |
Antulius 1:dc2ae76df12d 341 *+ | | | | | |
Antulius 1:dc2ae76df12d 342 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 343 *+ | A g f p a b |
Antulius 1:dc2ae76df12d 344 *+ | 4 |
Antulius 1:dc2ae76df12d 345 *+ | ______________________________________________ |
Antulius 1:dc2ae76df12d 346 *+ | | ____ ____ _____ _____ | |
Antulius 1:dc2ae76df12d 347 *+ | | / / / / / / / / | |
Antulius 1:dc2ae76df12d 348 *+ | | /____ / /____ / . /____ / /____ / | |
Antulius 1:dc2ae76df12d 349 *+ | | / / / / . / / / / | |
Antulius 1:dc2ae76df12d 350 *+ | | /____ /. /_____/ /____ /. /____ /. | |
Antulius 1:dc2ae76df12d 351 *+ | | | |
Antulius 1:dc2ae76df12d 352 *+ | |______________________________________________| |
Antulius 1:dc2ae76df12d 353 *+ | |
Antulius 1:dc2ae76df12d 354 *+ | A A A |
Antulius 1:dc2ae76df12d 355 *+ | e 3 2 c d 1 |
Antulius 1:dc2ae76df12d 356 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 357 *+ | | | | | | |
Antulius 1:dc2ae76df12d 358 *+ | | | | | | |
Antulius 1:dc2ae76df12d 359 *+ 1 2 3 4 5 6 7
Antulius 1:dc2ae76df12d 360 *+
Antulius 1:dc2ae76df12d 361 *+ Display: BQ-M544RE
Antulius 1:dc2ae76df12d 362 *+
Antulius 1:dc2ae76df12d 363 *+
Antulius 1:dc2ae76df12d 364 *+ 16 15 14 13 11
Antulius 1:dc2ae76df12d 365 *+ | | | | |
Antulius 1:dc2ae76df12d 366 *+ | | | | |
Antulius 1:dc2ae76df12d 367 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 368 *+ | b g a c f |
Antulius 1:dc2ae76df12d 369 *+ | |
Antulius 1:dc2ae76df12d 370 *+ | ______________________________________________ |
Antulius 1:dc2ae76df12d 371 *+ | | ____ ____ _____ . _____ | |
Antulius 1:dc2ae76df12d 372 *+ | | / / / / / / / / | |
Antulius 1:dc2ae76df12d 373 *+ | | /____ / /____ / . /____ / /____ / | |
Antulius 1:dc2ae76df12d 374 *+ | | / / / / . / / / / | |
Antulius 1:dc2ae76df12d 375 *+ | | /____ /. /_____/ . /____ /. /____ /. | |
Antulius 1:dc2ae76df12d 376 *+ | | | |
Antulius 1:dc2ae76df12d 377 *+ | |______________________________________________| |
Antulius 1:dc2ae76df12d 378 *+ | |
Antulius 1:dc2ae76df12d 379 *+ | A A A A A |
Antulius 1:dc2ae76df12d 380 *+ | 4 3 3 p e 2 p 1 |
Antulius 1:dc2ae76df12d 381 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 382 *+ | | | | | | | |
Antulius 1:dc2ae76df12d 383 *+ | | | | | | | |
Antulius 1:dc2ae76df12d 384 *+ 1 2 3 4 5 6 7 8
Antulius 1:dc2ae76df12d 385 *+
Antulius 1:dc2ae76df12d 386 *+ Display: KEM-3942BSR
Antulius 1:dc2ae76df12d 387 *+
Antulius 1:dc2ae76df12d 388 +*
Antulius 1:dc2ae76df12d 389 *+
Antulius 1:dc2ae76df12d 390 *+ 12 11 10 9 8 7
Antulius 1:dc2ae76df12d 391 *+ | | | | | |
Antulius 1:dc2ae76df12d 392 *+ | | | | | |
Antulius 1:dc2ae76df12d 393 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 394 *+ | A a f A A b |
Antulius 1:dc2ae76df12d 395 *+ | 4 3 2 |
Antulius 1:dc2ae76df12d 396 *+ | ______________________________________________ |
Antulius 1:dc2ae76df12d 397 *+ | | ____ ____ _____ _____ | |
Antulius 1:dc2ae76df12d 398 *+ | | / / / / / / / / | |
Antulius 1:dc2ae76df12d 399 *+ | | /____ / /____ / . /____ / /____ / | |
Antulius 1:dc2ae76df12d 400 *+ | | / / / / . / / / / | |
Antulius 1:dc2ae76df12d 401 *+ | | /____ /. /_____/ . /____ /. /____ /. | |
Antulius 1:dc2ae76df12d 402 *+ | | | |
Antulius 1:dc2ae76df12d 403 *+ | |______________________________________________| |
Antulius 1:dc2ae76df12d 404 *+ | |
Antulius 1:dc2ae76df12d 405 *+ | A |
Antulius 1:dc2ae76df12d 406 *+ | e d p c g 1 |
Antulius 1:dc2ae76df12d 407 *+ --------------------------------------------------
Antulius 1:dc2ae76df12d 408 *+ | | | | | |
Antulius 1:dc2ae76df12d 409 *+ | | | | | |
Antulius 1:dc2ae76df12d 410 *+ 1 2 3 4 5 6
Antulius 1:dc2ae76df12d 411 *+
Antulius 1:dc2ae76df12d 412 *+ Display: FYQ-2841BH
Antulius 1:dc2ae76df12d 413 *+
Antulius 1:dc2ae76df12d 414 *+
Antulius 1:dc2ae76df12d 415 *+ PTA17 PTA16 PTA15 PTA14
Antulius 1:dc2ae76df12d 416 *+ A4 A3 A2 A1
Antulius 1:dc2ae76df12d 417 *+ Mill Cent Dec Uni
Antulius 0:9f7581d1af6f 418 *+
Antulius 1:dc2ae76df12d 419 *+ FRDM_KL25Z PTE23 PTE22 PTE21 PTE20 PTE5 PTE4 PTE3 PTE2 # Hex
Antulius 1:dc2ae76df12d 420 *+ FRDM-KL46Z PTE23 PTE22 PTE21 PTE20 PTE19 PTE18 PTE17 PTE16 # Hex Offset
Antulius 1:dc2ae76df12d 421 *+ a
Antulius 1:dc2ae76df12d 422 *+ ______ g f a b c d e p
Antulius 1:dc2ae76df12d 423 *+ / / 1 0 0 0 1 0 0 0 0 0x81 0
Antulius 1:dc2ae76df12d 424 *+ f / g / b 1 1 0 1 1 1 1 0 1 0xE7 1
Antulius 1:dc2ae76df12d 425 *+ /_____/ 1 0 1 1 0 1 0 0 2 0x49 2
Antulius 1:dc2ae76df12d 426 *+ / / 1 0 0 1 0 1 0 0 3 0x43 3
Antulius 1:dc2ae76df12d 427 *+ e / / c 1 1 0 1 0 0 1 0 4 0x27 4
Antulius 1:dc2ae76df12d 428 *+ /_____/ . 1 0 0 1 0 0 0 1 5 0x13 5
Antulius 1:dc2ae76df12d 429 *+ d p 1 0 0 0 0 0 0 1 6 0x11 6
Antulius 1:dc2ae76df12d 430 *+ 1 1 0 1 1 1 0 0 7 0xC7 7
Antulius 1:dc2ae76df12d 431 *+ 1 0 0 0 0 0 0 0 8 0x01 8
Antulius 1:dc2ae76df12d 432 *+ 1 0 0 1 0 0 0 0 9 0x03 9
Antulius 1:dc2ae76df12d 433 *+ 1 1 0 0 0 0 0 0 A 0x05 10
Antulius 1:dc2ae76df12d 434 *+ 1 0 0 0 0 0 1 1 b 0x31 11
Antulius 1:dc2ae76df12d 435 *+ 1 0 1 0 1 0 0 1 C 0x99 12
Antulius 1:dc2ae76df12d 436 *+ 1 0 0 0 0 1 1 0 d 0x61 13
Antulius 1:dc2ae76df12d 437 *+ 1 0 1 0 0 0 0 1 E 0x19 14
Antulius 1:dc2ae76df12d 438 *+ 1 1 1 0 0 0 0 1 f 0x1D 15
Antulius 1:dc2ae76df12d 439 *+ 1 0 0 0 1 0 0 1 G 0x91 16
Antulius 1:dc2ae76df12d 440 *+ 1 1 0 0 0 0 1 1 h 0x35 17
Antulius 1:dc2ae76df12d 441 *+ 1 1 0 1 1 1 1 1 i 0xBD 18
Antulius 1:dc2ae76df12d 442 *+ 1 0 0 0 1 1 1 0 J 0xB3 19
Antulius 1:dc2ae76df12d 443 *+ 1 0 1 0 0 0 1 0 k 0x2D 20
Antulius 1:dc2ae76df12d 444 *+ 1 0 1 0 1 0 1 1 L 0xB9 21
Antulius 1:dc2ae76df12d 445 *+ 1 1 0 0 1 0 0 0 M 0x85 22
Antulius 1:dc2ae76df12d 446 *+ 1 1 0 0 0 1 1 1 n 0x75 23
Antulius 1:dc2ae76df12d 447 *+ 1 0 0 0 0 1 1 1 o 0x71 24
Antulius 1:dc2ae76df12d 448 *+ 1 1 1 0 0 0 0 0 P 0x0D 25
Antulius 1:dc2ae76df12d 449 *+ 1 1 0 1 0 0 0 0 q 0x07 26
Antulius 1:dc2ae76df12d 450 *+ 1 1 1 0 0 1 1 1 r 0x3D 27
Antulius 1:dc2ae76df12d 451 *+ 1 0 0 1 0 0 0 1 s 0x13 28
Antulius 1:dc2ae76df12d 452 *+ 1 0 1 0 0 0 1 1 t 0x39 29
Antulius 1:dc2ae76df12d 453 *+ 1 0 0 0 1 1 1 1 u 0xF1 30
Antulius 1:dc2ae76df12d 454 *+ 1 0 0 0 1 0 1 1 V 0xE1 31
Antulius 1:dc2ae76df12d 455 *+ 1 0 0 0 1 0 1 0 w 0xA1 32
Antulius 1:dc2ae76df12d 456 *+ 1 1 0 0 1 0 1 0 X 0x25 33
Antulius 1:dc2ae76df12d 457 *+ 1 0 0 1 0 0 1 0 y 0x37 34
Antulius 1:dc2ae76df12d 458 *+ 1 0 1 0 1 1 0 0 Z 0x49 35
Antulius 1:dc2ae76df12d 459 *+ 1 0 0 0 0 1 0 0 a 0x84 36
Antulius 1:dc2ae76df12d 460 *+ 1 0 1 0 0 0 0 0 e 0xA0 37
Antulius 1:dc2ae76df12d 461 *+ 1 1 1 1 0 0 0 1 + c 0xF1 38
Antulius 1:dc2ae76df12d 462 *+ 1 1 1 1 0 1 0 0 +/c 0xF4 39
Antulius 1:dc2ae76df12d 463 *+ 1 0 1 0 0 1 1 1 c 0xA7 40
Antulius 1:dc2ae76df12d 464 *+ 1 0 0 1 0 1 1 1 /c 0x97 41
Antulius 1:dc2ae76df12d 465 *+ 1 1 1 1 0 0 1 0 + u 0xF2 42
Antulius 1:dc2ae76df12d 466 *+ 1 1 1 1 1 0 0 0 + n 0xF8 43
Antulius 1:dc2ae76df12d 467 *+ 1 0 1 0 1 0 0 1 [ 0xA9 44
Antulius 1:dc2ae76df12d 468 *+ 1 0 0 1 1 1 0 0 ] 0x9C 45
Antulius 1:dc2ae76df12d 469 *+ 1 1 1 1 0 0 0 0 ° 0xF0 46
Antulius 1:dc2ae76df12d 470 *+ 1 1 1 1 1 1 0 0 ¬ 0xFC 47
Antulius 1:dc2ae76df12d 471 *+ 1 1 1 1 0 1 1 0 + > 0xF6 48
Antulius 1:dc2ae76df12d 472 *+ 1 1 1 0 0 1 1 1 ^ 0xE7 49
Antulius 1:dc2ae76df12d 473 *+ 1 0 1 0 1 1 1 1 / < 0xAF 50
Antulius 1:dc2ae76df12d 474 *+ 1 0 0 1 1 1 1 1 / v 0x9F 51
Antulius 1:dc2ae76df12d 475 *+ 1 1 0 1 0 1 1 1 > 0xD7 52
Antulius 1:dc2ae76df12d 476 *+ 1 1 1 1 0 0 1 1 v 0xF3 53
Antulius 1:dc2ae76df12d 477 *+ 1 1 1 1 1 0 0 1 < 0xF9 54
Antulius 1:dc2ae76df12d 478 *+ 1 1 1 1 1 1 0 1 / _ 0xBF 55
Antulius 1:dc2ae76df12d 479 *+ 1 1 1 1 0 1 1 1 - 0xF7 56
Antulius 1:dc2ae76df12d 480 *+ 1 0 1 1 1 1 1 1 _ 0xFD 57
Antulius 1:dc2ae76df12d 481 *+ 1 1 1 1 0 1 0 1 = 0xF5 58
Antulius 1:dc2ae76df12d 482 *+ 1 0 1 1 0 1 1 1 / = 0xB7 59
Antulius 1:dc2ae76df12d 483 *+ 1 0 1 1 0 1 0 1 == 0xB5 60
Antulius 1:dc2ae76df12d 484 *+ 1 0 1 1 1 1 0 1 _¬ 0xBD 61
Antulius 1:dc2ae76df12d 485 *+ 1 1 0 0 1 1 1 1 ii 0xCF 62
Antulius 1:dc2ae76df12d 486 *+ 1 1 1 1 1 0 1 0 # 0xFA 63
Antulius 1:dc2ae76df12d 487 *+ 1 0 0 1 1 1 1 0 j 0x9E 64
Antulius 1:dc2ae76df12d 488 *+ 1 1 0 1 1 1 0 0 /j 0xDC 65
Antulius 1:dc2ae76df12d 489 *+ 1 1 1 0 1 0 0 1 - j 0xE9 66
Antulius 1:dc2ae76df12d 490 *+ 1 0 1 0 1 0 1 1 -/j 0xAB 67
Antulius 1:dc2ae76df12d 491 *+ 1 0 0 0 1 1 1 0 - J 0x8E 68
Antulius 1:dc2ae76df12d 492 *+ 1 1 0 1 1 0 0 0 -/J 0xD8 69
Antulius 1:dc2ae76df12d 493 *+ 1 1 1 0 1 0 1 1 | 0xEB 70
Antulius 1:dc2ae76df12d 494 *+ 1 1 0 0 1 0 1 0 || 0xCA 71
Antulius 1:dc2ae76df12d 495 *+ 1 1 0 1 0 1 1 0 + 0xD6 72
Antulius 1:dc2ae76df12d 496 *+ 1 1 1 0 0 0 1 1 /+ 0xE3 73
Antulius 1:dc2ae76df12d 497 *+ 1 0 0 1 1 0 1 1 espacio 0xFF 74
Antulius 0:9f7581d1af6f 498 *+
Antulius 1:dc2ae76df12d 499 *+ Nota: Cada dígito se activa al hacer la señal A correspondiente en "alto"
Antulius 1:dc2ae76df12d 500 *+ y enviar las señales de los segmentos que se desean encender en "bajo"
Antulius 0:9f7581d1af6f 501 *+
Antulius 1:dc2ae76df12d 502 *+---------------------------------------------------------------------------------------- */
Antulius 1:dc2ae76df12d 503 /*........................................................................................
Antulius 1:dc2ae76df12d 504 :
Antulius 1:dc2ae76df12d 505 : TECLADO MATRICIAL DE 4X4
Antulius 1:dc2ae76df12d 506 :
Antulius 1:dc2ae76df12d 507 : C1 C2 C3 C4
Antulius 1:dc2ae76df12d 508 : | | | |
Antulius 1:dc2ae76df12d 509 : | | | |
Antulius 1:dc2ae76df12d 510 : | 1 | 2 | 3 | F1
Antulius 1:dc2ae76df12d 511 : R1 __/ ________/ ________/ ________/
Antulius 1:dc2ae76df12d 512 : | | | |
Antulius 1:dc2ae76df12d 513 : | 4 | 5 | 6 | F2
Antulius 1:dc2ae76df12d 514 : R2 __/ ________/ ________/ ________/
Antulius 1:dc2ae76df12d 515 : | | | |
Antulius 1:dc2ae76df12d 516 : | 7 | 8 | 9 | F3
Antulius 1:dc2ae76df12d 517 : R3 __/ ________/ ________/ ________/
Antulius 1:dc2ae76df12d 518 : | | | |
Antulius 1:dc2ae76df12d 519 : | * | 0 | # | F4
Antulius 1:dc2ae76df12d 520 : R4 __/ ________/ ________/ ________/
Antulius 1:dc2ae76df12d 521 :
Antulius 1:dc2ae76df12d 522 :
Antulius 1:dc2ae76df12d 523 : Función: REN1 REN2 REN3 REN4 COL1 COL2 COL3 COL4
Antulius 1:dc2ae76df12d 524 : Pin: 1 2 3 4 5 6 7 8
Antulius 1:dc2ae76df12d 525 ..........................................................................................
Antulius 0:9f7581d1af6f 526 *+----------------------------------------------------------------------------*
Antulius 0:9f7581d1af6f 527 *+
Antulius 0:9f7581d1af6f 528 *+ Powered by
Antulius 0:9f7581d1af6f 529 *+
Antulius 0:9f7581d1af6f 530 *+ T H E A N T U L I U ' S T E A M R&D Unltd
Antulius 0:9f7581d1af6f 531 *+
Antulius 0:9f7581d1af6f 532 *+ Research, Development, Systems, Equipment, Support & Spare Parts.
Antulius 0:9f7581d1af6f 533 *+ (C) Copyright 1989-2019, All Rights Reserved
Antulius 0:9f7581d1af6f 534 *+
Antulius 0:9f7581d1af6f 535 *+ Welcome to The Beaners Proyect Community!
Antulius 0:9f7581d1af6f 536 *+----------------------------------------------------------------------------*/
Antulius 1:dc2ae76df12d 537 /* END Mbed */
Antulius 0:9f7581d1af6f 538 /* END Mbed */