Programa que permite configurar 7 alarmas distintas y luego escogerla según las necesidades usando un control remoto o emulador de samsung apretando uno de los botones entre 1 y 7 respectivamente.

Dependencies:   Debounced Pulse1 QEI RTC-DS1307 TextLCD mbed

Committer:
sochoam
Date:
Mon Jun 04 17:14:52 2018 +0000
Revision:
0:dd4f7313a8a4
Programa que permite configurar 7 alarmas distintas y luego escogerla seg?n las necesidades usando un control remoto o emulador de samsung apretando uno de los botones entre 1 y 7 respectivamente.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
sochoam 0:dd4f7313a8a4 1 #include "mbed.h"
sochoam 0:dd4f7313a8a4 2 #include "DebouncedIn.h"
sochoam 0:dd4f7313a8a4 3 #include "TextLCD.h"
sochoam 0:dd4f7313a8a4 4 #include "QEI.h"
sochoam 0:dd4f7313a8a4 5 #include "Rtc_Ds1307.h"
sochoam 0:dd4f7313a8a4 6 #include "string.h"
sochoam 0:dd4f7313a8a4 7 #include <Pulse1.h>
sochoam 0:dd4f7313a8a4 8
sochoam 0:dd4f7313a8a4 9 PulseInOut irda(PTB0);// en este puerto se pone el sensor infrarrojo
sochoam 0:dd4f7313a8a4 10 TextLCD lcd(PTB10, PTB11, PTE2, PTE3, PTE4, PTE5); // rs, e, d4-d7
sochoam 0:dd4f7313a8a4 11 Rtc_Ds1307 rtc(PTE0, PTE1);
sochoam 0:dd4f7313a8a4 12 QEI wheel (PTA16, PTA17, NC, 48);
sochoam 0:dd4f7313a8a4 13 DebouncedIn button_enco(PTC5);
sochoam 0:dd4f7313a8a4 14 DigitalOut myled(LED3);
sochoam 0:dd4f7313a8a4 15
sochoam 0:dd4f7313a8a4 16 int numN[35];//cadena para almacenar todos los tiempos que conforman los bits de datos
sochoam 0:dd4f7313a8a4 17 int numP[35];//cadena para almacenar todos los tiempos que conforman los bits de datos
sochoam 0:dd4f7313a8a4 18 int numbin[35];
sochoam 0:dd4f7313a8a4 19 int bin[35];//cadena para almacenar todos los tiempos que conforman los bits de datos
sochoam 0:dd4f7313a8a4 20 int dato; // tiempo de cada dato que se lee
sochoam 0:dd4f7313a8a4 21 int pul_low;
sochoam 0:dd4f7313a8a4 22 int i1,j1,k1,header,proL,proH;
sochoam 0:dd4f7313a8a4 23 char r;
sochoam 0:dd4f7313a8a4 24 char cadena[33];
sochoam 0:dd4f7313a8a4 25 char uno[33]="11100000111000000010000011011111";
sochoam 0:dd4f7313a8a4 26 char dos[33]="11100000111000001010000001011111";
sochoam 0:dd4f7313a8a4 27 char tres[33]="11100000111000000110000010011111";
sochoam 0:dd4f7313a8a4 28 char cuatro[33]="11100000111000000001000011101111";
sochoam 0:dd4f7313a8a4 29 char cinco[33]="11100000111000001001000001101111";
sochoam 0:dd4f7313a8a4 30 char seis[33]="11100000111000000101000010101111";
sochoam 0:dd4f7313a8a4 31 char siete[33]="11100000111000000011000011001111";
sochoam 0:dd4f7313a8a4 32 char set[33]="10001010111100010011010100101000";
sochoam 0:dd4f7313a8a4 33 int mode=0;
sochoam 0:dd4f7313a8a4 34 int code;
sochoam 0:dd4f7313a8a4 35 int numb=32;
sochoam 0:dd4f7313a8a4 36 int s=0;
sochoam 0:dd4f7313a8a4 37 //
sochoam 0:dd4f7313a8a4 38 int C1=0x0C;
sochoam 0:dd4f7313a8a4 39 int m;
sochoam 0:dd4f7313a8a4 40 int Conf=0; // 0: Alarma y 1:Reloj
sochoam 0:dd4f7313a8a4 41 int Lugar=0; // Definen el punto en el cual va el programa
sochoam 0:dd4f7313a8a4 42 int i=0;
sochoam 0:dd4f7313a8a4 43 int j=1;
sochoam 0:dd4f7313a8a4 44 int IRDA=1;
sochoam 0:dd4f7313a8a4 45 int irda_en=0;
sochoam 0:dd4f7313a8a4 46 int visual=0;
sochoam 0:dd4f7313a8a4 47 int alarma=0;
sochoam 0:dd4f7313a8a4 48 int main()
sochoam 0:dd4f7313a8a4 49 {
sochoam 0:dd4f7313a8a4 50 myled=1;
sochoam 0:dd4f7313a8a4 51 j=1;
sochoam 0:dd4f7313a8a4 52 Rtc_Ds1307::Time_rtc tm2 = {};
sochoam 0:dd4f7313a8a4 53 Rtc_Ds1307::Time_rtc tm = {};
sochoam 0:dd4f7313a8a4 54 Rtc_Ds1307::Time_rtc Alarm[8] = {};
sochoam 0:dd4f7313a8a4 55 lcd.cls();
sochoam 0:dd4f7313a8a4 56 lcd.writeCommand(C1);//escribimos un comando segun el manual del modulo LCD
sochoam 0:dd4f7313a8a4 57 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 58 lcd.printf("--ALARMA --HORA");
sochoam 0:dd4f7313a8a4 59 rtc.getTime(tm); //lee el tiempo del DS1307
sochoam 0:dd4f7313a8a4 60
sochoam 0:dd4f7313a8a4 61 while(1)
sochoam 0:dd4f7313a8a4 62 {
sochoam 0:dd4f7313a8a4 63
sochoam 0:dd4f7313a8a4 64 switch (Lugar)
sochoam 0:dd4f7313a8a4 65 {
sochoam 0:dd4f7313a8a4 66 case 0:
sochoam 0:dd4f7313a8a4 67 m=wheel.getPulses(); // m son los datos del encoder
sochoam 0:dd4f7313a8a4 68 if(m!=0 && Conf==0){
sochoam 0:dd4f7313a8a4 69 Conf=1;
sochoam 0:dd4f7313a8a4 70 wheel.reset();
sochoam 0:dd4f7313a8a4 71 m=0;
sochoam 0:dd4f7313a8a4 72 }
sochoam 0:dd4f7313a8a4 73
sochoam 0:dd4f7313a8a4 74 if(m!=0 && Conf==1){
sochoam 0:dd4f7313a8a4 75 Conf=0;
sochoam 0:dd4f7313a8a4 76 wheel.reset();
sochoam 0:dd4f7313a8a4 77 m=0;
sochoam 0:dd4f7313a8a4 78 }
sochoam 0:dd4f7313a8a4 79
sochoam 0:dd4f7313a8a4 80 if(Conf==0){
sochoam 0:dd4f7313a8a4 81
sochoam 0:dd4f7313a8a4 82 lcd.locate(11,0);
sochoam 0:dd4f7313a8a4 83 lcd.printf("-");
sochoam 0:dd4f7313a8a4 84 lcd.locate(1,0);
sochoam 0:dd4f7313a8a4 85 lcd.printf(">");
sochoam 0:dd4f7313a8a4 86 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 87 wait(0.1);
sochoam 0:dd4f7313a8a4 88
sochoam 0:dd4f7313a8a4 89 }
sochoam 0:dd4f7313a8a4 90
sochoam 0:dd4f7313a8a4 91 if(Conf==1){
sochoam 0:dd4f7313a8a4 92
sochoam 0:dd4f7313a8a4 93 lcd.locate(1,0);
sochoam 0:dd4f7313a8a4 94 lcd.printf("-");
sochoam 0:dd4f7313a8a4 95 lcd.locate(11,0);
sochoam 0:dd4f7313a8a4 96 lcd.printf(">");
sochoam 0:dd4f7313a8a4 97 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 98 wait(0.1);
sochoam 0:dd4f7313a8a4 99 }
sochoam 0:dd4f7313a8a4 100
sochoam 0:dd4f7313a8a4 101 if (button_enco.falling()){ //si se pulsa boton encoder
sochoam 0:dd4f7313a8a4 102 Lugar++;
sochoam 0:dd4f7313a8a4 103 m=0;
sochoam 0:dd4f7313a8a4 104 }
sochoam 0:dd4f7313a8a4 105
sochoam 0:dd4f7313a8a4 106 break;
sochoam 0:dd4f7313a8a4 107
sochoam 0:dd4f7313a8a4 108 case 1:
sochoam 0:dd4f7313a8a4 109 switch(i)
sochoam 0:dd4f7313a8a4 110 {
sochoam 0:dd4f7313a8a4 111 case 0:
sochoam 0:dd4f7313a8a4 112 if(Conf==0) // ALARMA
sochoam 0:dd4f7313a8a4 113 {
sochoam 0:dd4f7313a8a4 114 lcd.cls();
sochoam 0:dd4f7313a8a4 115 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 116 lcd.printf("CONFIG. ALARMA ");
sochoam 0:dd4f7313a8a4 117 wait(1);
sochoam 0:dd4f7313a8a4 118 lcd.cls();
sochoam 0:dd4f7313a8a4 119 i++;
sochoam 0:dd4f7313a8a4 120 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 121 lcd.printf("DIA: ");
sochoam 0:dd4f7313a8a4 122 m=0;
sochoam 0:dd4f7313a8a4 123 }
sochoam 0:dd4f7313a8a4 124
sochoam 0:dd4f7313a8a4 125 if(Conf==1) //RELOJ
sochoam 0:dd4f7313a8a4 126 {
sochoam 0:dd4f7313a8a4 127 lcd.cls();
sochoam 0:dd4f7313a8a4 128 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 129 lcd.printf("CONFIG. HORA ");
sochoam 0:dd4f7313a8a4 130 wait(1);
sochoam 0:dd4f7313a8a4 131 i++;
sochoam 0:dd4f7313a8a4 132 lcd.cls();
sochoam 0:dd4f7313a8a4 133 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 134 lcd.printf("DIA: ");
sochoam 0:dd4f7313a8a4 135 m=0;
sochoam 0:dd4f7313a8a4 136
sochoam 0:dd4f7313a8a4 137 }
sochoam 0:dd4f7313a8a4 138
sochoam 0:dd4f7313a8a4 139 break;
sochoam 0:dd4f7313a8a4 140
sochoam 0:dd4f7313a8a4 141 case 1: //DAY OF WEEK
sochoam 0:dd4f7313a8a4 142 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 143 if (m!=0)
sochoam 0:dd4f7313a8a4 144 {
sochoam 0:dd4f7313a8a4 145 tm.wday=tm.wday+m;
sochoam 0:dd4f7313a8a4 146 if(tm.wday>7)
sochoam 0:dd4f7313a8a4 147 {
sochoam 0:dd4f7313a8a4 148 tm.wday=1;
sochoam 0:dd4f7313a8a4 149 }
sochoam 0:dd4f7313a8a4 150 if(tm.wday<1)
sochoam 0:dd4f7313a8a4 151 {
sochoam 0:dd4f7313a8a4 152 tm.wday=1;
sochoam 0:dd4f7313a8a4 153 }
sochoam 0:dd4f7313a8a4 154
sochoam 0:dd4f7313a8a4 155 wheel.reset();
sochoam 0:dd4f7313a8a4 156 m=0;
sochoam 0:dd4f7313a8a4 157 }
sochoam 0:dd4f7313a8a4 158
sochoam 0:dd4f7313a8a4 159 switch(tm.wday){
sochoam 0:dd4f7313a8a4 160 case (1):
sochoam 0:dd4f7313a8a4 161 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 162 lcd.printf("DOMINGO ");
sochoam 0:dd4f7313a8a4 163 break;
sochoam 0:dd4f7313a8a4 164 case (2):
sochoam 0:dd4f7313a8a4 165 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 166 lcd.printf("LUNES ");
sochoam 0:dd4f7313a8a4 167 break;
sochoam 0:dd4f7313a8a4 168 case (3):
sochoam 0:dd4f7313a8a4 169 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 170 lcd.printf("MARTES ");
sochoam 0:dd4f7313a8a4 171 break;
sochoam 0:dd4f7313a8a4 172 case (4):
sochoam 0:dd4f7313a8a4 173 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 174 lcd.printf("MIERCOLES");
sochoam 0:dd4f7313a8a4 175 break;
sochoam 0:dd4f7313a8a4 176 case (5):
sochoam 0:dd4f7313a8a4 177 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 178 lcd.printf("JUEVES ");
sochoam 0:dd4f7313a8a4 179 break;
sochoam 0:dd4f7313a8a4 180 case (6):
sochoam 0:dd4f7313a8a4 181 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 182 lcd.printf("VIERNES ");
sochoam 0:dd4f7313a8a4 183 break;
sochoam 0:dd4f7313a8a4 184 case (7):
sochoam 0:dd4f7313a8a4 185 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 186 lcd.printf("SABADO ");
sochoam 0:dd4f7313a8a4 187 break;
sochoam 0:dd4f7313a8a4 188 }
sochoam 0:dd4f7313a8a4 189
sochoam 0:dd4f7313a8a4 190
sochoam 0:dd4f7313a8a4 191 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 192 {
sochoam 0:dd4f7313a8a4 193 switch(Conf)
sochoam 0:dd4f7313a8a4 194 {
sochoam 0:dd4f7313a8a4 195 case 0:
sochoam 0:dd4f7313a8a4 196 i=5;
sochoam 0:dd4f7313a8a4 197 m=0;
sochoam 0:dd4f7313a8a4 198 lcd.cls();
sochoam 0:dd4f7313a8a4 199 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 200 lcd.printf("HORA: ");
sochoam 0:dd4f7313a8a4 201 m=0;
sochoam 0:dd4f7313a8a4 202 break;
sochoam 0:dd4f7313a8a4 203 case 1:
sochoam 0:dd4f7313a8a4 204 i=2;
sochoam 0:dd4f7313a8a4 205 m=0;
sochoam 0:dd4f7313a8a4 206 lcd.cls();
sochoam 0:dd4f7313a8a4 207 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 208 lcd.printf("DIA: ");
sochoam 0:dd4f7313a8a4 209 break;
sochoam 0:dd4f7313a8a4 210 }
sochoam 0:dd4f7313a8a4 211 }
sochoam 0:dd4f7313a8a4 212
sochoam 0:dd4f7313a8a4 213 break;
sochoam 0:dd4f7313a8a4 214 case 2: // DAY OF DATE
sochoam 0:dd4f7313a8a4 215 m=0;
sochoam 0:dd4f7313a8a4 216 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 217 if (m!=0)
sochoam 0:dd4f7313a8a4 218 {
sochoam 0:dd4f7313a8a4 219 tm.date=tm.date+m;
sochoam 0:dd4f7313a8a4 220 if(tm.date>31)
sochoam 0:dd4f7313a8a4 221 {
sochoam 0:dd4f7313a8a4 222 tm.date=1;
sochoam 0:dd4f7313a8a4 223 }
sochoam 0:dd4f7313a8a4 224 if(tm.date<1)
sochoam 0:dd4f7313a8a4 225 {
sochoam 0:dd4f7313a8a4 226 tm.date=1;
sochoam 0:dd4f7313a8a4 227 }
sochoam 0:dd4f7313a8a4 228
sochoam 0:dd4f7313a8a4 229 wheel.reset();
sochoam 0:dd4f7313a8a4 230 m=0;
sochoam 0:dd4f7313a8a4 231 }
sochoam 0:dd4f7313a8a4 232 lcd.locate(5,0);
sochoam 0:dd4f7313a8a4 233 lcd.printf("%02d ",tm.date);
sochoam 0:dd4f7313a8a4 234
sochoam 0:dd4f7313a8a4 235 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 236 {
sochoam 0:dd4f7313a8a4 237 i++;
sochoam 0:dd4f7313a8a4 238 m=0;
sochoam 0:dd4f7313a8a4 239 lcd.cls();
sochoam 0:dd4f7313a8a4 240 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 241 lcd.printf("MES: ");
sochoam 0:dd4f7313a8a4 242
sochoam 0:dd4f7313a8a4 243 }
sochoam 0:dd4f7313a8a4 244 break;
sochoam 0:dd4f7313a8a4 245 case 3: // MONTH
sochoam 0:dd4f7313a8a4 246 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 247 if (m!=0)
sochoam 0:dd4f7313a8a4 248 {
sochoam 0:dd4f7313a8a4 249 tm.mon=tm.mon+m;
sochoam 0:dd4f7313a8a4 250 if(tm.mon>12)
sochoam 0:dd4f7313a8a4 251 {
sochoam 0:dd4f7313a8a4 252 tm.mon=1;
sochoam 0:dd4f7313a8a4 253 }
sochoam 0:dd4f7313a8a4 254 if(tm.mon<1)
sochoam 0:dd4f7313a8a4 255 {
sochoam 0:dd4f7313a8a4 256 tm.mon=1;
sochoam 0:dd4f7313a8a4 257 }
sochoam 0:dd4f7313a8a4 258
sochoam 0:dd4f7313a8a4 259 wheel.reset();
sochoam 0:dd4f7313a8a4 260 m=0;
sochoam 0:dd4f7313a8a4 261 }
sochoam 0:dd4f7313a8a4 262 lcd.locate(7,0);
sochoam 0:dd4f7313a8a4 263 lcd.printf("%02d",tm.mon);
sochoam 0:dd4f7313a8a4 264
sochoam 0:dd4f7313a8a4 265 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 266 {
sochoam 0:dd4f7313a8a4 267 i++;
sochoam 0:dd4f7313a8a4 268 m=0;
sochoam 0:dd4f7313a8a4 269 lcd.cls();
sochoam 0:dd4f7313a8a4 270 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 271 lcd.printf("ANO: ");
sochoam 0:dd4f7313a8a4 272
sochoam 0:dd4f7313a8a4 273 }
sochoam 0:dd4f7313a8a4 274
sochoam 0:dd4f7313a8a4 275 break;
sochoam 0:dd4f7313a8a4 276
sochoam 0:dd4f7313a8a4 277 case 4: //YEAR
sochoam 0:dd4f7313a8a4 278 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 279 if (m!=0)
sochoam 0:dd4f7313a8a4 280 {
sochoam 0:dd4f7313a8a4 281 tm.year=tm.year+m;
sochoam 0:dd4f7313a8a4 282 if(tm.year>2022)
sochoam 0:dd4f7313a8a4 283 {
sochoam 0:dd4f7313a8a4 284 tm.year=2018;
sochoam 0:dd4f7313a8a4 285 }
sochoam 0:dd4f7313a8a4 286 if(tm.year<2018)
sochoam 0:dd4f7313a8a4 287 {
sochoam 0:dd4f7313a8a4 288 tm.year=2018;
sochoam 0:dd4f7313a8a4 289 }
sochoam 0:dd4f7313a8a4 290
sochoam 0:dd4f7313a8a4 291 wheel.reset();
sochoam 0:dd4f7313a8a4 292 m=0;
sochoam 0:dd4f7313a8a4 293 }
sochoam 0:dd4f7313a8a4 294 lcd.locate(6,0);
sochoam 0:dd4f7313a8a4 295 lcd.printf("%02d",tm.year);
sochoam 0:dd4f7313a8a4 296
sochoam 0:dd4f7313a8a4 297 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 298 {
sochoam 0:dd4f7313a8a4 299 i=5;
sochoam 0:dd4f7313a8a4 300 m=0;
sochoam 0:dd4f7313a8a4 301 lcd.cls();
sochoam 0:dd4f7313a8a4 302 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 303 lcd.printf("HORA: ");
sochoam 0:dd4f7313a8a4 304
sochoam 0:dd4f7313a8a4 305
sochoam 0:dd4f7313a8a4 306 }
sochoam 0:dd4f7313a8a4 307
sochoam 0:dd4f7313a8a4 308 break;
sochoam 0:dd4f7313a8a4 309
sochoam 0:dd4f7313a8a4 310 case 5: //HOUR
sochoam 0:dd4f7313a8a4 311 m=0;
sochoam 0:dd4f7313a8a4 312 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 313 if (m!=0)
sochoam 0:dd4f7313a8a4 314 {
sochoam 0:dd4f7313a8a4 315 tm.hour+= m;
sochoam 0:dd4f7313a8a4 316 if(tm.hour>23)
sochoam 0:dd4f7313a8a4 317 {
sochoam 0:dd4f7313a8a4 318 tm.hour=0;
sochoam 0:dd4f7313a8a4 319 }
sochoam 0:dd4f7313a8a4 320 if(tm.hour<0)
sochoam 0:dd4f7313a8a4 321 {
sochoam 0:dd4f7313a8a4 322 tm.hour=0;
sochoam 0:dd4f7313a8a4 323 }
sochoam 0:dd4f7313a8a4 324
sochoam 0:dd4f7313a8a4 325 wheel.reset();
sochoam 0:dd4f7313a8a4 326 m=0;
sochoam 0:dd4f7313a8a4 327 }
sochoam 0:dd4f7313a8a4 328 lcd.locate(6,0);
sochoam 0:dd4f7313a8a4 329 lcd.printf("%02d",tm.hour);
sochoam 0:dd4f7313a8a4 330
sochoam 0:dd4f7313a8a4 331 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 332 {
sochoam 0:dd4f7313a8a4 333 i=6;
sochoam 0:dd4f7313a8a4 334 m=0;
sochoam 0:dd4f7313a8a4 335 lcd.cls();
sochoam 0:dd4f7313a8a4 336 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 337 lcd.printf("MINUTO: ");
sochoam 0:dd4f7313a8a4 338 //tm.min=0;
sochoam 0:dd4f7313a8a4 339 }
sochoam 0:dd4f7313a8a4 340
sochoam 0:dd4f7313a8a4 341 break;
sochoam 0:dd4f7313a8a4 342
sochoam 0:dd4f7313a8a4 343 case 6: //MINUTE
sochoam 0:dd4f7313a8a4 344 m=0;
sochoam 0:dd4f7313a8a4 345 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 346 if (m!=0)
sochoam 0:dd4f7313a8a4 347 {
sochoam 0:dd4f7313a8a4 348 tm.min=tm.min+m;
sochoam 0:dd4f7313a8a4 349 if(tm.min>59)
sochoam 0:dd4f7313a8a4 350 {
sochoam 0:dd4f7313a8a4 351 tm.min=0;
sochoam 0:dd4f7313a8a4 352 }
sochoam 0:dd4f7313a8a4 353 if(tm.min<0)
sochoam 0:dd4f7313a8a4 354 {
sochoam 0:dd4f7313a8a4 355 tm.min=0;
sochoam 0:dd4f7313a8a4 356 }
sochoam 0:dd4f7313a8a4 357
sochoam 0:dd4f7313a8a4 358 wheel.reset();
sochoam 0:dd4f7313a8a4 359 m=0;
sochoam 0:dd4f7313a8a4 360 }
sochoam 0:dd4f7313a8a4 361 lcd.locate(8,0);
sochoam 0:dd4f7313a8a4 362 lcd.printf("%02d",tm.min);
sochoam 0:dd4f7313a8a4 363
sochoam 0:dd4f7313a8a4 364 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 365 {
sochoam 0:dd4f7313a8a4 366 i=7;
sochoam 0:dd4f7313a8a4 367 m=0;
sochoam 0:dd4f7313a8a4 368 lcd.cls();
sochoam 0:dd4f7313a8a4 369 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 370 lcd.printf("SEGUNDO: ");
sochoam 0:dd4f7313a8a4 371 //tm.sec=0;
sochoam 0:dd4f7313a8a4 372 }
sochoam 0:dd4f7313a8a4 373
sochoam 0:dd4f7313a8a4 374 break;
sochoam 0:dd4f7313a8a4 375
sochoam 0:dd4f7313a8a4 376
sochoam 0:dd4f7313a8a4 377 case 7: //SECOND
sochoam 0:dd4f7313a8a4 378 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 379 if (m!=0)
sochoam 0:dd4f7313a8a4 380 {
sochoam 0:dd4f7313a8a4 381 tm.sec=tm.sec+m;
sochoam 0:dd4f7313a8a4 382 if(tm.sec>59)
sochoam 0:dd4f7313a8a4 383 {
sochoam 0:dd4f7313a8a4 384 tm.sec=0;
sochoam 0:dd4f7313a8a4 385 }
sochoam 0:dd4f7313a8a4 386 if(tm.sec<0)
sochoam 0:dd4f7313a8a4 387 {
sochoam 0:dd4f7313a8a4 388 tm.sec=0;
sochoam 0:dd4f7313a8a4 389 }
sochoam 0:dd4f7313a8a4 390
sochoam 0:dd4f7313a8a4 391 wheel.reset();
sochoam 0:dd4f7313a8a4 392 m=0;
sochoam 0:dd4f7313a8a4 393 }
sochoam 0:dd4f7313a8a4 394 lcd.locate(8,0);
sochoam 0:dd4f7313a8a4 395 lcd.printf("%02d",tm.sec);
sochoam 0:dd4f7313a8a4 396
sochoam 0:dd4f7313a8a4 397 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 398 {
sochoam 0:dd4f7313a8a4 399 ///////////////////
sochoam 0:dd4f7313a8a4 400 if(Conf==0)
sochoam 0:dd4f7313a8a4 401 {
sochoam 0:dd4f7313a8a4 402 Alarm[j]=tm;
sochoam 0:dd4f7313a8a4 403 lcd.cls();
sochoam 0:dd4f7313a8a4 404 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 405 lcd.printf("CONFIG. %d ALARMA",j);
sochoam 0:dd4f7313a8a4 406 wait(1);
sochoam 0:dd4f7313a8a4 407 i=0;
sochoam 0:dd4f7313a8a4 408 m=0;
sochoam 0:dd4f7313a8a4 409 if(j>=7)
sochoam 0:dd4f7313a8a4 410 {
sochoam 0:dd4f7313a8a4 411 Lugar++;
sochoam 0:dd4f7313a8a4 412 }
sochoam 0:dd4f7313a8a4 413 j++;
sochoam 0:dd4f7313a8a4 414 lcd.cls();
sochoam 0:dd4f7313a8a4 415
sochoam 0:dd4f7313a8a4 416 }
sochoam 0:dd4f7313a8a4 417
sochoam 0:dd4f7313a8a4 418 if(Conf==1)
sochoam 0:dd4f7313a8a4 419 {
sochoam 0:dd4f7313a8a4 420 rtc.setTime(tm, true, false);
sochoam 0:dd4f7313a8a4 421 lcd.cls();
sochoam 0:dd4f7313a8a4 422 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 423 lcd.printf("CONFIG. HORA ");
sochoam 0:dd4f7313a8a4 424 wait(1);
sochoam 0:dd4f7313a8a4 425 i=0;
sochoam 0:dd4f7313a8a4 426 m=0;
sochoam 0:dd4f7313a8a4 427 Lugar=0;
sochoam 0:dd4f7313a8a4 428 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 429 lcd.printf("--ALARMA --HORA");
sochoam 0:dd4f7313a8a4 430 }
sochoam 0:dd4f7313a8a4 431
sochoam 0:dd4f7313a8a4 432 ///////////////////
sochoam 0:dd4f7313a8a4 433 }
sochoam 0:dd4f7313a8a4 434
sochoam 0:dd4f7313a8a4 435 break;
sochoam 0:dd4f7313a8a4 436
sochoam 0:dd4f7313a8a4 437 }
sochoam 0:dd4f7313a8a4 438 break;
sochoam 0:dd4f7313a8a4 439
sochoam 0:dd4f7313a8a4 440 case 2: // SHOW THE TIME AND ALARM AND COMPROBATE THE ALARM STATE
sochoam 0:dd4f7313a8a4 441 rtc.getTime(tm2); //READING THE RTC
sochoam 0:dd4f7313a8a4 442
sochoam 0:dd4f7313a8a4 443
sochoam 0:dd4f7313a8a4 444 if(visual==0)
sochoam 0:dd4f7313a8a4 445 {
sochoam 0:dd4f7313a8a4 446 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 447 lcd.printf("HORA: ");
sochoam 0:dd4f7313a8a4 448 lcd.locate(8,0);
sochoam 0:dd4f7313a8a4 449 lcd.printf("%02d:",tm2.hour);
sochoam 0:dd4f7313a8a4 450 lcd.printf("%02d:",tm2.min);
sochoam 0:dd4f7313a8a4 451 lcd.printf("%02d",tm2.sec);
sochoam 0:dd4f7313a8a4 452 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 453 switch(tm2.wday){
sochoam 0:dd4f7313a8a4 454 case (1):
sochoam 0:dd4f7313a8a4 455 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 456 lcd.printf("DOM ");
sochoam 0:dd4f7313a8a4 457 break;
sochoam 0:dd4f7313a8a4 458 case (2):
sochoam 0:dd4f7313a8a4 459 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 460 lcd.printf("LUN ");
sochoam 0:dd4f7313a8a4 461 break;
sochoam 0:dd4f7313a8a4 462 case (3):
sochoam 0:dd4f7313a8a4 463 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 464 lcd.printf("MAR ");
sochoam 0:dd4f7313a8a4 465 break;
sochoam 0:dd4f7313a8a4 466 case (4):
sochoam 0:dd4f7313a8a4 467 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 468 lcd.printf("MIE ");
sochoam 0:dd4f7313a8a4 469 break;
sochoam 0:dd4f7313a8a4 470 case (5):
sochoam 0:dd4f7313a8a4 471 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 472 lcd.printf("JUE ");
sochoam 0:dd4f7313a8a4 473 break;
sochoam 0:dd4f7313a8a4 474 case (6):
sochoam 0:dd4f7313a8a4 475 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 476 lcd.printf("VIE ");
sochoam 0:dd4f7313a8a4 477 break;
sochoam 0:dd4f7313a8a4 478 case (7):
sochoam 0:dd4f7313a8a4 479 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 480 lcd.printf("SAB ");
sochoam 0:dd4f7313a8a4 481 break;
sochoam 0:dd4f7313a8a4 482 }
sochoam 0:dd4f7313a8a4 483 lcd.locate(6,1);
sochoam 0:dd4f7313a8a4 484 lcd.printf("%02d/",tm2.date);
sochoam 0:dd4f7313a8a4 485 lcd.printf("%02d/",tm2.mon);
sochoam 0:dd4f7313a8a4 486 lcd.printf("%02d",tm2.year);
sochoam 0:dd4f7313a8a4 487 wait(0.1);
sochoam 0:dd4f7313a8a4 488 //////////
sochoam 0:dd4f7313a8a4 489 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 490 if(m!=0)
sochoam 0:dd4f7313a8a4 491 {
sochoam 0:dd4f7313a8a4 492 visual=1;
sochoam 0:dd4f7313a8a4 493 wheel.reset();
sochoam 0:dd4f7313a8a4 494 m=0;
sochoam 0:dd4f7313a8a4 495 }
sochoam 0:dd4f7313a8a4 496 }
sochoam 0:dd4f7313a8a4 497
sochoam 0:dd4f7313a8a4 498 if(visual==1)
sochoam 0:dd4f7313a8a4 499 {
sochoam 0:dd4f7313a8a4 500 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 501 lcd.printf(" ");
sochoam 0:dd4f7313a8a4 502 lcd.locate(8,0);
sochoam 0:dd4f7313a8a4 503 lcd.printf("%02d:",Alarm[IRDA].hour);
sochoam 0:dd4f7313a8a4 504 lcd.printf("%02d:",Alarm[IRDA].min);
sochoam 0:dd4f7313a8a4 505 lcd.printf("%02d",Alarm[IRDA].sec);
sochoam 0:dd4f7313a8a4 506
sochoam 0:dd4f7313a8a4 507 switch(Alarm[IRDA].wday){
sochoam 0:dd4f7313a8a4 508 case (1):
sochoam 0:dd4f7313a8a4 509 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 510 lcd.printf(" DOM ");
sochoam 0:dd4f7313a8a4 511 break;
sochoam 0:dd4f7313a8a4 512 case (2):
sochoam 0:dd4f7313a8a4 513 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 514 lcd.printf(" LUN ");
sochoam 0:dd4f7313a8a4 515 break;
sochoam 0:dd4f7313a8a4 516 case (3):
sochoam 0:dd4f7313a8a4 517 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 518 lcd.printf(" MAR ");
sochoam 0:dd4f7313a8a4 519 break;
sochoam 0:dd4f7313a8a4 520 case (4):
sochoam 0:dd4f7313a8a4 521 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 522 lcd.printf(" MIE ");
sochoam 0:dd4f7313a8a4 523 break;
sochoam 0:dd4f7313a8a4 524 case (5):
sochoam 0:dd4f7313a8a4 525 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 526 lcd.printf(" JUE ");
sochoam 0:dd4f7313a8a4 527 break;
sochoam 0:dd4f7313a8a4 528 case (6):
sochoam 0:dd4f7313a8a4 529 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 530 lcd.printf(" VIE ");
sochoam 0:dd4f7313a8a4 531 break;
sochoam 0:dd4f7313a8a4 532 case (7):
sochoam 0:dd4f7313a8a4 533 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 534 lcd.printf(" SAB ");
sochoam 0:dd4f7313a8a4 535 break;
sochoam 0:dd4f7313a8a4 536 }
sochoam 0:dd4f7313a8a4 537 lcd.locate(5,1);
sochoam 0:dd4f7313a8a4 538 lcd.printf("SET %d ALARMA",IRDA);
sochoam 0:dd4f7313a8a4 539 wait(0.1);
sochoam 0:dd4f7313a8a4 540 ////
sochoam 0:dd4f7313a8a4 541 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 542 if(m!=0)
sochoam 0:dd4f7313a8a4 543 {
sochoam 0:dd4f7313a8a4 544 visual=0;
sochoam 0:dd4f7313a8a4 545 wheel.reset();
sochoam 0:dd4f7313a8a4 546 m=0;
sochoam 0:dd4f7313a8a4 547 }
sochoam 0:dd4f7313a8a4 548 }
sochoam 0:dd4f7313a8a4 549 /////////////////////////////////// ALARM COMPROBATION /////////////////////////////////////////////////////////////////////////////
sochoam 0:dd4f7313a8a4 550 if( (tm2.wday==Alarm[IRDA].wday)&&((tm2.hour)==Alarm[IRDA].hour)&&(tm2.min==Alarm[IRDA].min)&&(tm2.sec==Alarm[IRDA].sec) )
sochoam 0:dd4f7313a8a4 551 {
sochoam 0:dd4f7313a8a4 552 Lugar++;
sochoam 0:dd4f7313a8a4 553 lcd.cls();
sochoam 0:dd4f7313a8a4 554 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 555 lcd.printf("ALARMA ACTIVA!!");
sochoam 0:dd4f7313a8a4 556 wait(1);
sochoam 0:dd4f7313a8a4 557 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 558 lcd.printf("->APAGAR ");
sochoam 0:dd4f7313a8a4 559 lcd.locate(0,1);
sochoam 0:dd4f7313a8a4 560 lcd.printf("--POSPONER ");
sochoam 0:dd4f7313a8a4 561 m=0;
sochoam 0:dd4f7313a8a4 562 }
sochoam 0:dd4f7313a8a4 563 ////////////////// IRDA WAITING ///////////////////////////////////////////////////////////////////////////////////////////////////
sochoam 0:dd4f7313a8a4 564 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 565 {
sochoam 0:dd4f7313a8a4 566 irda_en=1;
sochoam 0:dd4f7313a8a4 567 lcd.cls();
sochoam 0:dd4f7313a8a4 568 lcd.locate(0,0);
sochoam 0:dd4f7313a8a4 569 lcd.printf(" ESPERANDO SENAL ");
sochoam 0:dd4f7313a8a4 570
sochoam 0:dd4f7313a8a4 571 }
sochoam 0:dd4f7313a8a4 572
sochoam 0:dd4f7313a8a4 573 break;
sochoam 0:dd4f7313a8a4 574
sochoam 0:dd4f7313a8a4 575 case 3: //TURN OFF OR POSTPONE THE ALARM
sochoam 0:dd4f7313a8a4 576
sochoam 0:dd4f7313a8a4 577 if(alarma==0) //CHOICE OF POSTPONE
sochoam 0:dd4f7313a8a4 578 {
sochoam 0:dd4f7313a8a4 579 myled=1;
sochoam 0:dd4f7313a8a4 580 wait(0.5);
sochoam 0:dd4f7313a8a4 581 myled=0;
sochoam 0:dd4f7313a8a4 582 wait(0.5);
sochoam 0:dd4f7313a8a4 583
sochoam 0:dd4f7313a8a4 584 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 585 if(m!=0)
sochoam 0:dd4f7313a8a4 586 {
sochoam 0:dd4f7313a8a4 587 alarma=1;
sochoam 0:dd4f7313a8a4 588 m=0;
sochoam 0:dd4f7313a8a4 589 wheel.reset();
sochoam 0:dd4f7313a8a4 590
sochoam 0:dd4f7313a8a4 591 lcd.locate(1,0);
sochoam 0:dd4f7313a8a4 592 lcd.printf("-");
sochoam 0:dd4f7313a8a4 593 lcd.locate(1,1);
sochoam 0:dd4f7313a8a4 594 lcd.printf(">");
sochoam 0:dd4f7313a8a4 595 }
sochoam 0:dd4f7313a8a4 596 }
sochoam 0:dd4f7313a8a4 597
sochoam 0:dd4f7313a8a4 598 ///////////////////
sochoam 0:dd4f7313a8a4 599
sochoam 0:dd4f7313a8a4 600 if(alarma==1) //CHOICE OF TURN OFF
sochoam 0:dd4f7313a8a4 601 {
sochoam 0:dd4f7313a8a4 602 myled=1;
sochoam 0:dd4f7313a8a4 603 wait(0.5);
sochoam 0:dd4f7313a8a4 604 myled=0;
sochoam 0:dd4f7313a8a4 605 wait(0.5);
sochoam 0:dd4f7313a8a4 606
sochoam 0:dd4f7313a8a4 607 m=wheel.getPulses();
sochoam 0:dd4f7313a8a4 608 if(m!=0)
sochoam 0:dd4f7313a8a4 609 {
sochoam 0:dd4f7313a8a4 610 alarma=0;
sochoam 0:dd4f7313a8a4 611 m=0;
sochoam 0:dd4f7313a8a4 612 wheel.reset();
sochoam 0:dd4f7313a8a4 613
sochoam 0:dd4f7313a8a4 614 lcd.locate(1,0);
sochoam 0:dd4f7313a8a4 615 lcd.printf(">");
sochoam 0:dd4f7313a8a4 616 lcd.locate(1,1);
sochoam 0:dd4f7313a8a4 617 lcd.printf("-");
sochoam 0:dd4f7313a8a4 618 }
sochoam 0:dd4f7313a8a4 619 }
sochoam 0:dd4f7313a8a4 620
sochoam 0:dd4f7313a8a4 621 if (button_enco.falling())
sochoam 0:dd4f7313a8a4 622 {
sochoam 0:dd4f7313a8a4 623 if(alarma==0)
sochoam 0:dd4f7313a8a4 624 {
sochoam 0:dd4f7313a8a4 625 Lugar=2; //RETURN TO SHOW THE TIME
sochoam 0:dd4f7313a8a4 626 wheel.reset();
sochoam 0:dd4f7313a8a4 627 m=0;
sochoam 0:dd4f7313a8a4 628 myled=1;
sochoam 0:dd4f7313a8a4 629 lcd.cls();
sochoam 0:dd4f7313a8a4 630 }
sochoam 0:dd4f7313a8a4 631 if(alarma==1)
sochoam 0:dd4f7313a8a4 632 {
sochoam 0:dd4f7313a8a4 633 Lugar=2; //RETURN TO SHOW THE TIME WITH CURRENT ALARM UPDATED
sochoam 0:dd4f7313a8a4 634 rtc.getTime(tm2);
sochoam 0:dd4f7313a8a4 635 if(tm.min!=58)
sochoam 0:dd4f7313a8a4 636 {
sochoam 0:dd4f7313a8a4 637 Alarm[IRDA].min=tm2.min+1;
sochoam 0:dd4f7313a8a4 638 }
sochoam 0:dd4f7313a8a4 639 if(tm.min==59)
sochoam 0:dd4f7313a8a4 640 {
sochoam 0:dd4f7313a8a4 641 Alarm[IRDA].min=0;
sochoam 0:dd4f7313a8a4 642 Alarm[IRDA].hour=tm2.hour+1;
sochoam 0:dd4f7313a8a4 643 }
sochoam 0:dd4f7313a8a4 644 Alarm[IRDA].sec=tm2.sec;
sochoam 0:dd4f7313a8a4 645 lcd.cls();
sochoam 0:dd4f7313a8a4 646 alarma=0;
sochoam 0:dd4f7313a8a4 647 myled=1;
sochoam 0:dd4f7313a8a4 648 }
sochoam 0:dd4f7313a8a4 649 }
sochoam 0:dd4f7313a8a4 650 break;
sochoam 0:dd4f7313a8a4 651 }
sochoam 0:dd4f7313a8a4 652 ///////////////////////////////// IRDA READING //////////////////////////////////////////////////////////////////////////////////
sochoam 0:dd4f7313a8a4 653 while (irda_en)
sochoam 0:dd4f7313a8a4 654 {
sochoam 0:dd4f7313a8a4 655 fflush( stdin );
sochoam 0:dd4f7313a8a4 656 lop2: if(!mode){
sochoam 0:dd4f7313a8a4 657 header = irda.read_high_us();
sochoam 0:dd4f7313a8a4 658 if(header>3500) goto seguir2;
sochoam 0:dd4f7313a8a4 659 goto lop2;
sochoam 0:dd4f7313a8a4 660 }
sochoam 0:dd4f7313a8a4 661
sochoam 0:dd4f7313a8a4 662 seguir2:
sochoam 0:dd4f7313a8a4 663 for(i1=0;i1<numb;++i1){
sochoam 0:dd4f7313a8a4 664 numP[i1] = irda.read_high_us(); //funcion para leer un pulso alto
sochoam 0:dd4f7313a8a4 665 if (numP[i1]<1000){
sochoam 0:dd4f7313a8a4 666 s=0;
sochoam 0:dd4f7313a8a4 667 r='0';
sochoam 0:dd4f7313a8a4 668 }else{
sochoam 0:dd4f7313a8a4 669 s=1;
sochoam 0:dd4f7313a8a4 670 r='1';
sochoam 0:dd4f7313a8a4 671 }
sochoam 0:dd4f7313a8a4 672 numbin[i1]=s;
sochoam 0:dd4f7313a8a4 673 cadena[i1]=r;
sochoam 0:dd4f7313a8a4 674 }
sochoam 0:dd4f7313a8a4 675 if (!strcmp(cadena,uno)){
sochoam 0:dd4f7313a8a4 676 IRDA=1;
sochoam 0:dd4f7313a8a4 677 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 678 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 679 goto seguir2;
sochoam 0:dd4f7313a8a4 680 }else if (!strcmp(cadena,dos)){
sochoam 0:dd4f7313a8a4 681 IRDA=2;
sochoam 0:dd4f7313a8a4 682 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 683 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 684 goto seguir2;
sochoam 0:dd4f7313a8a4 685 }else if (!strcmp(cadena,tres)){
sochoam 0:dd4f7313a8a4 686 IRDA=3;
sochoam 0:dd4f7313a8a4 687 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 688 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 689 goto seguir2;
sochoam 0:dd4f7313a8a4 690 }else if (!strcmp(cadena,cuatro)){
sochoam 0:dd4f7313a8a4 691 IRDA=4;
sochoam 0:dd4f7313a8a4 692 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 693 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 694 goto seguir2;
sochoam 0:dd4f7313a8a4 695 }else if (!strcmp(cadena,cinco)){
sochoam 0:dd4f7313a8a4 696 IRDA=5;
sochoam 0:dd4f7313a8a4 697 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 698 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 699 goto seguir2;
sochoam 0:dd4f7313a8a4 700 }else if (!strcmp(cadena,seis)){
sochoam 0:dd4f7313a8a4 701 IRDA=6;
sochoam 0:dd4f7313a8a4 702 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 703 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 704 goto seguir2;
sochoam 0:dd4f7313a8a4 705 }else if (!strcmp(cadena,siete)){
sochoam 0:dd4f7313a8a4 706 IRDA=7;
sochoam 0:dd4f7313a8a4 707 lcd.locate(8,1);
sochoam 0:dd4f7313a8a4 708 lcd.printf("%d",IRDA);
sochoam 0:dd4f7313a8a4 709 goto seguir2;
sochoam 0:dd4f7313a8a4 710 }else if(!strcmp(cadena,set)){
sochoam 0:dd4f7313a8a4 711 goto lop3;
sochoam 0:dd4f7313a8a4 712 }
sochoam 0:dd4f7313a8a4 713 lop3: Lugar=2;
sochoam 0:dd4f7313a8a4 714 irda_en=0;
sochoam 0:dd4f7313a8a4 715 lcd.cls();
sochoam 0:dd4f7313a8a4 716 break;
sochoam 0:dd4f7313a8a4 717 }
sochoam 0:dd4f7313a8a4 718 }
sochoam 0:dd4f7313a8a4 719 }