kevin escobar sosa / Mbed 2 deprecated tarea3_1

alarma configurable y se prende y apaga con control remoto

Dependencies:   Debounced Pulse1 QEI RTC-DS1307 TextLCD mbed

main.cpp@0:31bb391d0545, 2018-06-01 (annotated)

Committer:
slorm
Date:
Fri Jun 01 20:55:03 2018 +0000
Revision:
0:31bb391d0545
alarma con control remoto

Who changed what in which revision?

UserRevisionLine numberNew contents of line
slorm 0:31bb391d0545 1 #include "mbed.h"
slorm 0:31bb391d0545 2 #include "DebouncedIn.h"
slorm 0:31bb391d0545 3 #include "TextLCD.h"
slorm 0:31bb391d0545 4 #include "QEI.h"
slorm 0:31bb391d0545 5 #include "Rtc_Ds1307.h"
slorm 0:31bb391d0545 6 #include <Pulse1.h>
slorm 0:31bb391d0545 7 Serial pc(USBTX, USBRX);
slorm 0:31bb391d0545 8 PulseInOut irda(PTD5);
slorm 0:31bb391d0545 9 TextLCD lcd(PTB10, PTB11, PTE2, PTE3, PTE4, PTE5); // rs, e, d4-d7
slorm 0:31bb391d0545 10 Rtc_Ds1307 rtc(PTE0, PTE1);
slorm 0:31bb391d0545 11 QEI wheel (PTD7, PTD6, NC, 100);
slorm 0:31bb391d0545 12
slorm 0:31bb391d0545 13 DebouncedIn button_enco(PTC5);
slorm 0:31bb391d0545 14
slorm 0:31bb391d0545 15 DigitalOut led(LED1);
slorm 0:31bb391d0545 16
slorm 0:31bb391d0545 17 int C1=0x0C;
slorm 0:31bb391d0545 18 int m=0;
slorm 0:31bb391d0545 19 int Conf=0; // 0: Alarma y 1:Reloj
slorm 0:31bb391d0545 20 int Lugar=0; // Definen el punto en el cual va el programa
slorm 0:31bb391d0545 21 int i;
slorm 0:31bb391d0545 22 int visual=1;
slorm 0:31bb391d0545 23 int ac=1;
slorm 0:31bb391d0545 24 int activ1=0;
slorm 0:31bb391d0545 25 int ac2=0;
slorm 0:31bb391d0545 26 int ac3=0;
slorm 0:31bb391d0545 27 int ac4=0;
slorm 0:31bb391d0545 28 int ac5=0;
slorm 0:31bb391d0545 29 int ac6=0;
slorm 0:31bb391d0545 30 int ac7=0;
slorm 0:31bb391d0545 31 int alarma1=0;
slorm 0:31bb391d0545 32 int alarma2=0;
slorm 0:31bb391d0545 33 int alarma3=0;
slorm 0:31bb391d0545 34 int alarma4=0;
slorm 0:31bb391d0545 35 int alarma5=0;
slorm 0:31bb391d0545 36 int alarma6=0;
slorm 0:31bb391d0545 37 int alarma7=0;
slorm 0:31bb391d0545 38 int selec=1;
slorm 0:31bb391d0545 39 int n=0;
slorm 0:31bb391d0545 40 int comp1=0;
slorm 0:31bb391d0545 41 int comp2=0;
slorm 0:31bb391d0545 42 int comp3=0;
slorm 0:31bb391d0545 43 int comp4=0;
slorm 0:31bb391d0545 44 int comp5=0;
slorm 0:31bb391d0545 45 int comp6=0;
slorm 0:31bb391d0545 46 int comp7=0;
slorm 0:31bb391d0545 47 int comp8=0;
slorm 0:31bb391d0545 48 int header=0;
slorm 0:31bb391d0545 49 int mode=1;
slorm 0:31bb391d0545 50 int j=0;
slorm 0:31bb391d0545 51 int k=0;
slorm 0:31bb391d0545 52 int numP[35];
slorm 0:31bb391d0545 53 int numP_nor[35];
slorm 0:31bb391d0545 54 int numb=32;
slorm 0:31bb391d0545 55 int boton1[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,1,0,0,1,1,1,1,1}; //1
slorm 0:31bb391d0545 56 int boton2[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,1}; //2
slorm 0:31bb391d0545 57 int boton3[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,0,0,1,1,0,1,1,1,1}; //3
slorm 0:31bb391d0545 58 int boton4[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,1,0,1,0,0,0,0,1,0,1,0,1,1,1,1}; //4
slorm 0:31bb391d0545 59 int boton5[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,0,0,0,1,0,1,1,1,1}; //5
slorm 0:31bb391d0545 60 int boton6[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,0,1,1,1,1,1,1,0,1}; //6
slorm 0:31bb391d0545 61 int boton7[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,1,1,1,1,1,0,1}; //7
slorm 0:31bb391d0545 62 int boton8[32]= {0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,1,0,0,0,0,0,1,1,0,1,1,1,1,1};
slorm 0:31bb391d0545 63
slorm 0:31bb391d0545 64 int main()
slorm 0:31bb391d0545 65 {
slorm 0:31bb391d0545 66 Rtc_Ds1307::Time_rtc tm = {};
slorm 0:31bb391d0545 67 Rtc_Ds1307::Time_rtc Alarm = {};
slorm 0:31bb391d0545 68 Rtc_Ds1307::Time_rtc Alarm1 = {};
slorm 0:31bb391d0545 69 Rtc_Ds1307::Time_rtc Alarm2 = {};
slorm 0:31bb391d0545 70 Rtc_Ds1307::Time_rtc Alarm3 = {};
slorm 0:31bb391d0545 71 Rtc_Ds1307::Time_rtc Alarm4 = {};
slorm 0:31bb391d0545 72 Rtc_Ds1307::Time_rtc Alarm5 = {};
slorm 0:31bb391d0545 73 Rtc_Ds1307::Time_rtc Alarm6 = {};
slorm 0:31bb391d0545 74 lcd.cls();
slorm 0:31bb391d0545 75 lcd.writeCommand(C1);//escribimos un comando segun el manual del modulo LCD
slorm 0:31bb391d0545 76
slorm 0:31bb391d0545 77 lcd.locate(0,0);
slorm 0:31bb391d0545 78 lcd.printf("--Alarma --Hora");
slorm 0:31bb391d0545 79
slorm 0:31bb391d0545 80 rtc.getTime(tm); //lee el tiempo del DS1307
slorm 0:31bb391d0545 81
slorm 0:31bb391d0545 82 while(1)
slorm 0:31bb391d0545 83 {
slorm 0:31bb391d0545 84 switch (Lugar)
slorm 0:31bb391d0545 85 {
slorm 0:31bb391d0545 86 case 0:
slorm 0:31bb391d0545 87 led= 1;
slorm 0:31bb391d0545 88 m=wheel.getPulses(); // m son los datos del encoder
slorm 0:31bb391d0545 89 if(m!=0 && Conf==0){
slorm 0:31bb391d0545 90 Conf=1;
slorm 0:31bb391d0545 91 wheel.reset();
slorm 0:31bb391d0545 92 m=0;
slorm 0:31bb391d0545 93 }
slorm 0:31bb391d0545 94
slorm 0:31bb391d0545 95 if(m!=0 && Conf==1){
slorm 0:31bb391d0545 96 Conf=0;
slorm 0:31bb391d0545 97 wheel.reset();
slorm 0:31bb391d0545 98 m=0;
slorm 0:31bb391d0545 99 }
slorm 0:31bb391d0545 100
slorm 0:31bb391d0545 101 if(Conf==0){
slorm 0:31bb391d0545 102
slorm 0:31bb391d0545 103 lcd.locate(11,0);
slorm 0:31bb391d0545 104 lcd.printf("-");
slorm 0:31bb391d0545 105 lcd.locate(1,0);
slorm 0:31bb391d0545 106 lcd.printf(">");
slorm 0:31bb391d0545 107 lcd.locate(0,1);
slorm 0:31bb391d0545 108 wait(0.1);
slorm 0:31bb391d0545 109
slorm 0:31bb391d0545 110 }
slorm 0:31bb391d0545 111
slorm 0:31bb391d0545 112 if(Conf==1){
slorm 0:31bb391d0545 113
slorm 0:31bb391d0545 114 lcd.locate(1,0);
slorm 0:31bb391d0545 115 lcd.printf("-");
slorm 0:31bb391d0545 116 lcd.locate(11,0);
slorm 0:31bb391d0545 117 lcd.printf(">");
slorm 0:31bb391d0545 118 lcd.locate(0,1);
slorm 0:31bb391d0545 119 wait(0.1);
slorm 0:31bb391d0545 120 }
slorm 0:31bb391d0545 121
slorm 0:31bb391d0545 122 if (button_enco.falling()){ //si se pulsa boton encoder
slorm 0:31bb391d0545 123 Lugar=1;
slorm 0:31bb391d0545 124 m=0;
slorm 0:31bb391d0545 125 }
slorm 0:31bb391d0545 126
slorm 0:31bb391d0545 127 break;
slorm 0:31bb391d0545 128
slorm 0:31bb391d0545 129 case 1:
slorm 0:31bb391d0545 130 switch(i)
slorm 0:31bb391d0545 131 {
slorm 0:31bb391d0545 132 case 0:
slorm 0:31bb391d0545 133
slorm 0:31bb391d0545 134
slorm 0:31bb391d0545 135 if(Conf==0)
slorm 0:31bb391d0545 136 {
slorm 0:31bb391d0545 137 lcd.cls();
slorm 0:31bb391d0545 138 lcd.locate(0,0);
slorm 0:31bb391d0545 139 lcd.printf("Config. Alarma ");
slorm 0:31bb391d0545 140 wait(1);
slorm 0:31bb391d0545 141 i++;
slorm 0:31bb391d0545 142 m=0;
slorm 0:31bb391d0545 143 lcd.cls();
slorm 0:31bb391d0545 144 lcd.locate(0,0);
slorm 0:31bb391d0545 145 lcd.printf("Dia: ");
slorm 0:31bb391d0545 146 tm.date=1;
slorm 0:31bb391d0545 147 }
slorm 0:31bb391d0545 148
slorm 0:31bb391d0545 149 if(Conf==1)
slorm 0:31bb391d0545 150 {
slorm 0:31bb391d0545 151 lcd.cls();
slorm 0:31bb391d0545 152 lcd.locate(0,0);
slorm 0:31bb391d0545 153 lcd.printf("Config. hora ");
slorm 0:31bb391d0545 154 wait(1);
slorm 0:31bb391d0545 155 i++;
slorm 0:31bb391d0545 156 m=0;
slorm 0:31bb391d0545 157 lcd.cls();
slorm 0:31bb391d0545 158 lcd.locate(0,0);
slorm 0:31bb391d0545 159 lcd.printf("Dia: ");
slorm 0:31bb391d0545 160
slorm 0:31bb391d0545 161 }
slorm 0:31bb391d0545 162
slorm 0:31bb391d0545 163 break;
slorm 0:31bb391d0545 164
slorm 0:31bb391d0545 165 case 1:
slorm 0:31bb391d0545 166 m=wheel.getPulses();
slorm 0:31bb391d0545 167 if (m!=0)
slorm 0:31bb391d0545 168 {
slorm 0:31bb391d0545 169 tm.date=tm.date+m;
slorm 0:31bb391d0545 170 if(tm.date>31)
slorm 0:31bb391d0545 171 {
slorm 0:31bb391d0545 172 tm.date=31;
slorm 0:31bb391d0545 173 }
slorm 0:31bb391d0545 174 if(tm.date<1)
slorm 0:31bb391d0545 175 {
slorm 0:31bb391d0545 176 tm.date=1;
slorm 0:31bb391d0545 177 }
slorm 0:31bb391d0545 178
slorm 0:31bb391d0545 179 wheel.reset();
slorm 0:31bb391d0545 180 m=0;
slorm 0:31bb391d0545 181 }
slorm 0:31bb391d0545 182 lcd.locate(5,0);
slorm 0:31bb391d0545 183 lcd.printf("%02d",tm.date);
slorm 0:31bb391d0545 184
slorm 0:31bb391d0545 185 if (button_enco.falling())
slorm 0:31bb391d0545 186 {
slorm 0:31bb391d0545 187 i++;
slorm 0:31bb391d0545 188 m=0;
slorm 0:31bb391d0545 189 lcd.cls();
slorm 0:31bb391d0545 190 lcd.locate(0,0);
slorm 0:31bb391d0545 191 lcd.printf("Mes: ");
slorm 0:31bb391d0545 192 //tm.mon=1;
slorm 0:31bb391d0545 193 }
slorm 0:31bb391d0545 194
slorm 0:31bb391d0545 195 break;
slorm 0:31bb391d0545 196
slorm 0:31bb391d0545 197 case 2:
slorm 0:31bb391d0545 198 m=wheel.getPulses();
slorm 0:31bb391d0545 199 if (m!=0)
slorm 0:31bb391d0545 200 {
slorm 0:31bb391d0545 201 tm.mon=tm.mon+m;
slorm 0:31bb391d0545 202 if(tm.mon>12)
slorm 0:31bb391d0545 203 {
slorm 0:31bb391d0545 204 tm.mon=12;
slorm 0:31bb391d0545 205 }
slorm 0:31bb391d0545 206 if(tm.mon<1)
slorm 0:31bb391d0545 207 {
slorm 0:31bb391d0545 208 tm.mon=1;
slorm 0:31bb391d0545 209 }
slorm 0:31bb391d0545 210
slorm 0:31bb391d0545 211 wheel.reset();
slorm 0:31bb391d0545 212 m=0;
slorm 0:31bb391d0545 213 }
slorm 0:31bb391d0545 214 lcd.locate(5,0);
slorm 0:31bb391d0545 215 lcd.printf("%02d",tm.mon);
slorm 0:31bb391d0545 216
slorm 0:31bb391d0545 217 if (button_enco.falling())
slorm 0:31bb391d0545 218 {
slorm 0:31bb391d0545 219 i++;
slorm 0:31bb391d0545 220 m=0;
slorm 0:31bb391d0545 221 lcd.cls();
slorm 0:31bb391d0545 222 lcd.locate(0,0);
slorm 0:31bb391d0545 223 lcd.printf("Year: ");
slorm 0:31bb391d0545 224
slorm 0:31bb391d0545 225 }
slorm 0:31bb391d0545 226
slorm 0:31bb391d0545 227 break;
slorm 0:31bb391d0545 228
slorm 0:31bb391d0545 229 case 3:
slorm 0:31bb391d0545 230 m=wheel.getPulses();
slorm 0:31bb391d0545 231 if (m!=0)
slorm 0:31bb391d0545 232 {
slorm 0:31bb391d0545 233 tm.year=tm.year+m;
slorm 0:31bb391d0545 234
slorm 0:31bb391d0545 235 if(tm.year<2000)
slorm 0:31bb391d0545 236 {
slorm 0:31bb391d0545 237 tm.year=2000;
slorm 0:31bb391d0545 238 }
slorm 0:31bb391d0545 239
slorm 0:31bb391d0545 240 wheel.reset();
slorm 0:31bb391d0545 241 m=0;
slorm 0:31bb391d0545 242 }
slorm 0:31bb391d0545 243 lcd.locate(6,0);
slorm 0:31bb391d0545 244 lcd.printf("%02d",tm.year);
slorm 0:31bb391d0545 245
slorm 0:31bb391d0545 246 if (button_enco.falling())
slorm 0:31bb391d0545 247 {
slorm 0:31bb391d0545 248 i++;
slorm 0:31bb391d0545 249 m=0;
slorm 0:31bb391d0545 250 lcd.cls();
slorm 0:31bb391d0545 251 lcd.locate(0,0);
slorm 0:31bb391d0545 252 lcd.printf("Hora: ");
slorm 0:31bb391d0545 253
slorm 0:31bb391d0545 254 }
slorm 0:31bb391d0545 255
slorm 0:31bb391d0545 256 break;
slorm 0:31bb391d0545 257
slorm 0:31bb391d0545 258 case 4:
slorm 0:31bb391d0545 259 m=wheel.getPulses();
slorm 0:31bb391d0545 260
slorm 0:31bb391d0545 261 if (m!=0)
slorm 0:31bb391d0545 262 {
slorm 0:31bb391d0545 263 tm.hour=tm.hour + m;
slorm 0:31bb391d0545 264 if(tm.hour>23)
slorm 0:31bb391d0545 265 {
slorm 0:31bb391d0545 266 tm.hour=23;
slorm 0:31bb391d0545 267 }
slorm 0:31bb391d0545 268 if(tm.hour<0)
slorm 0:31bb391d0545 269 {
slorm 0:31bb391d0545 270 tm.hour=0;
slorm 0:31bb391d0545 271 }
slorm 0:31bb391d0545 272
slorm 0:31bb391d0545 273 wheel.reset();
slorm 0:31bb391d0545 274 m=0;
slorm 0:31bb391d0545 275 }
slorm 0:31bb391d0545 276 lcd.locate(6,0);
slorm 0:31bb391d0545 277 lcd.printf("%02d",tm.hour);
slorm 0:31bb391d0545 278
slorm 0:31bb391d0545 279 if (button_enco.falling())
slorm 0:31bb391d0545 280 {
slorm 0:31bb391d0545 281 i++;
slorm 0:31bb391d0545 282 m=0;
slorm 0:31bb391d0545 283 lcd.cls();
slorm 0:31bb391d0545 284 lcd.locate(0,0);
slorm 0:31bb391d0545 285 lcd.printf("Minuto: ");
slorm 0:31bb391d0545 286 //tm.min=0;
slorm 0:31bb391d0545 287 }
slorm 0:31bb391d0545 288
slorm 0:31bb391d0545 289 break;
slorm 0:31bb391d0545 290
slorm 0:31bb391d0545 291 case 5:
slorm 0:31bb391d0545 292 m=wheel.getPulses();
slorm 0:31bb391d0545 293 if (m!=0)
slorm 0:31bb391d0545 294 {
slorm 0:31bb391d0545 295 tm.min=tm.min+m;
slorm 0:31bb391d0545 296 if(tm.min>59)
slorm 0:31bb391d0545 297 {
slorm 0:31bb391d0545 298 tm.min=59;
slorm 0:31bb391d0545 299 }
slorm 0:31bb391d0545 300 if(tm.min<0)
slorm 0:31bb391d0545 301 {
slorm 0:31bb391d0545 302 tm.min=0;
slorm 0:31bb391d0545 303 }
slorm 0:31bb391d0545 304
slorm 0:31bb391d0545 305 wheel.reset();
slorm 0:31bb391d0545 306 m=0;
slorm 0:31bb391d0545 307 }
slorm 0:31bb391d0545 308 lcd.locate(8,0);
slorm 0:31bb391d0545 309 lcd.printf("%02d",tm.min);
slorm 0:31bb391d0545 310
slorm 0:31bb391d0545 311 if (button_enco.falling())
slorm 0:31bb391d0545 312 {
slorm 0:31bb391d0545 313 i++;
slorm 0:31bb391d0545 314 m=0;
slorm 0:31bb391d0545 315 lcd.cls();
slorm 0:31bb391d0545 316 lcd.locate(0,0);
slorm 0:31bb391d0545 317 lcd.printf("Segundo: ");
slorm 0:31bb391d0545 318 //tm.sec=0;
slorm 0:31bb391d0545 319 }
slorm 0:31bb391d0545 320
slorm 0:31bb391d0545 321 break;
slorm 0:31bb391d0545 322
slorm 0:31bb391d0545 323
slorm 0:31bb391d0545 324 case 6:
slorm 0:31bb391d0545 325 m=wheel.getPulses();
slorm 0:31bb391d0545 326 if (m!=0)
slorm 0:31bb391d0545 327 {
slorm 0:31bb391d0545 328 tm.sec=tm.sec+m;
slorm 0:31bb391d0545 329 if(tm.sec>59)
slorm 0:31bb391d0545 330 {
slorm 0:31bb391d0545 331 tm.sec=59;
slorm 0:31bb391d0545 332 }
slorm 0:31bb391d0545 333 if(tm.sec<0)
slorm 0:31bb391d0545 334 {
slorm 0:31bb391d0545 335 tm.sec=0;
slorm 0:31bb391d0545 336 }
slorm 0:31bb391d0545 337
slorm 0:31bb391d0545 338 wheel.reset();
slorm 0:31bb391d0545 339 m=0;
slorm 0:31bb391d0545 340 }
slorm 0:31bb391d0545 341 lcd.locate(9,0);
slorm 0:31bb391d0545 342 lcd.printf("%02d",tm.sec);
slorm 0:31bb391d0545 343
slorm 0:31bb391d0545 344 if (button_enco.falling())
slorm 0:31bb391d0545 345 {
slorm 0:31bb391d0545 346 ///////////////////
slorm 0:31bb391d0545 347 if(Conf==0)
slorm 0:31bb391d0545 348 {
slorm 0:31bb391d0545 349
slorm 0:31bb391d0545 350 lcd.cls();
slorm 0:31bb391d0545 351 lcd.locate(0,0);
slorm 0:31bb391d0545 352 lcd.printf("Alarma:");
slorm 0:31bb391d0545 353 i++;
slorm 0:31bb391d0545 354 m=0;
slorm 0:31bb391d0545 355
slorm 0:31bb391d0545 356 }
slorm 0:31bb391d0545 357
slorm 0:31bb391d0545 358 if(Conf==1)
slorm 0:31bb391d0545 359 {
slorm 0:31bb391d0545 360 rtc.setTime(tm, false, false);
slorm 0:31bb391d0545 361 rtc.startClock();
slorm 0:31bb391d0545 362 lcd.cls();
slorm 0:31bb391d0545 363 lcd.locate(0,0);
slorm 0:31bb391d0545 364 lcd.printf("Hora Config. ");
slorm 0:31bb391d0545 365 wait(1);
slorm 0:31bb391d0545 366 i=0;
slorm 0:31bb391d0545 367 m=0;
slorm 0:31bb391d0545 368 Lugar=0;
slorm 0:31bb391d0545 369 lcd.locate(0,0);
slorm 0:31bb391d0545 370 lcd.printf("--Alarma --Hora");
slorm 0:31bb391d0545 371 }
slorm 0:31bb391d0545 372
slorm 0:31bb391d0545 373 ///////////////////
slorm 0:31bb391d0545 374 }
slorm 0:31bb391d0545 375
slorm 0:31bb391d0545 376 break;
slorm 0:31bb391d0545 377 case 7:
slorm 0:31bb391d0545 378 m=wheel.getPulses();
slorm 0:31bb391d0545 379 if (m!=0)
slorm 0:31bb391d0545 380 {
slorm 0:31bb391d0545 381 selec=selec+m;
slorm 0:31bb391d0545 382 if(selec>7)
slorm 0:31bb391d0545 383 {
slorm 0:31bb391d0545 384 selec=7;
slorm 0:31bb391d0545 385 }
slorm 0:31bb391d0545 386 if(selec<1)
slorm 0:31bb391d0545 387 {
slorm 0:31bb391d0545 388 selec=1;
slorm 0:31bb391d0545 389 }
slorm 0:31bb391d0545 390
slorm 0:31bb391d0545 391 wheel.reset();
slorm 0:31bb391d0545 392 m=0;
slorm 0:31bb391d0545 393 }
slorm 0:31bb391d0545 394 lcd.locate(9,0);
slorm 0:31bb391d0545 395 lcd.printf("%02d",selec);
slorm 0:31bb391d0545 396
slorm 0:31bb391d0545 397 if (button_enco.falling())
slorm 0:31bb391d0545 398 {
slorm 0:31bb391d0545 399 i++;
slorm 0:31bb391d0545 400 m=0;
slorm 0:31bb391d0545 401 lcd.cls();
slorm 0:31bb391d0545 402 lcd.locate(0,0);
slorm 0:31bb391d0545 403 lcd.printf("%02d seleccionada",selec);
slorm 0:31bb391d0545 404 //tm.sec=0;
slorm 0:31bb391d0545 405 }
slorm 0:31bb391d0545 406 break;
slorm 0:31bb391d0545 407
slorm 0:31bb391d0545 408 case 8:
slorm 0:31bb391d0545 409 if (selec==1)
slorm 0:31bb391d0545 410 {
slorm 0:31bb391d0545 411 Alarm=tm;
slorm 0:31bb391d0545 412 lcd.cls();
slorm 0:31bb391d0545 413 lcd.locate(0,0);
slorm 0:31bb391d0545 414 i=0;
slorm 0:31bb391d0545 415 m=0;
slorm 0:31bb391d0545 416 Lugar++;
slorm 0:31bb391d0545 417 }
slorm 0:31bb391d0545 418 if (selec==2)
slorm 0:31bb391d0545 419 {
slorm 0:31bb391d0545 420 Alarm1=tm;
slorm 0:31bb391d0545 421 lcd.cls();
slorm 0:31bb391d0545 422 lcd.locate(0,0);
slorm 0:31bb391d0545 423 i=0;
slorm 0:31bb391d0545 424 m=0;
slorm 0:31bb391d0545 425 Lugar++;
slorm 0:31bb391d0545 426 }
slorm 0:31bb391d0545 427 if (selec==3)
slorm 0:31bb391d0545 428 {
slorm 0:31bb391d0545 429 Alarm2=tm;
slorm 0:31bb391d0545 430 lcd.cls();
slorm 0:31bb391d0545 431 lcd.locate(0,0);
slorm 0:31bb391d0545 432 i=0;
slorm 0:31bb391d0545 433 m=0;
slorm 0:31bb391d0545 434 Lugar++;
slorm 0:31bb391d0545 435 }
slorm 0:31bb391d0545 436 if (selec==4)
slorm 0:31bb391d0545 437 {
slorm 0:31bb391d0545 438 Alarm3=tm;
slorm 0:31bb391d0545 439 lcd.cls();
slorm 0:31bb391d0545 440 lcd.locate(0,0);
slorm 0:31bb391d0545 441 i=0;
slorm 0:31bb391d0545 442 m=0;
slorm 0:31bb391d0545 443 Lugar++;
slorm 0:31bb391d0545 444 }
slorm 0:31bb391d0545 445 if (selec==5)
slorm 0:31bb391d0545 446 {
slorm 0:31bb391d0545 447 Alarm4=tm;
slorm 0:31bb391d0545 448 lcd.cls();
slorm 0:31bb391d0545 449 lcd.locate(0,0);
slorm 0:31bb391d0545 450 i=0;
slorm 0:31bb391d0545 451 m=0;
slorm 0:31bb391d0545 452 Lugar++;
slorm 0:31bb391d0545 453 }
slorm 0:31bb391d0545 454 if (selec==6)
slorm 0:31bb391d0545 455 {
slorm 0:31bb391d0545 456 Alarm5=tm;
slorm 0:31bb391d0545 457 lcd.cls();
slorm 0:31bb391d0545 458 lcd.locate(0,0);
slorm 0:31bb391d0545 459 i=0;
slorm 0:31bb391d0545 460 m=0;
slorm 0:31bb391d0545 461 Lugar++;
slorm 0:31bb391d0545 462 }
slorm 0:31bb391d0545 463 if (selec==7)
slorm 0:31bb391d0545 464 {
slorm 0:31bb391d0545 465 Alarm6=tm;
slorm 0:31bb391d0545 466 lcd.cls();
slorm 0:31bb391d0545 467 lcd.locate(0,0);
slorm 0:31bb391d0545 468 i=0;
slorm 0:31bb391d0545 469 m=0;
slorm 0:31bb391d0545 470 Lugar++;
slorm 0:31bb391d0545 471 }
slorm 0:31bb391d0545 472
slorm 0:31bb391d0545 473 break;
slorm 0:31bb391d0545 474
slorm 0:31bb391d0545 475 }
slorm 0:31bb391d0545 476 break;
slorm 0:31bb391d0545 477
slorm 0:31bb391d0545 478 case 2:
slorm 0:31bb391d0545 479 led=1;
slorm 0:31bb391d0545 480 rtc.getTime(tm);
slorm 0:31bb391d0545 481 m=wheel.getPulses();
slorm 0:31bb391d0545 482 if (m!=0)
slorm 0:31bb391d0545 483 {
slorm 0:31bb391d0545 484 visual=visual+m;
slorm 0:31bb391d0545 485 if(visual>10)
slorm 0:31bb391d0545 486 {
slorm 0:31bb391d0545 487 visual=1;
slorm 0:31bb391d0545 488 }
slorm 0:31bb391d0545 489 if(visual<1)
slorm 0:31bb391d0545 490 {
slorm 0:31bb391d0545 491 visual=10;
slorm 0:31bb391d0545 492 }
slorm 0:31bb391d0545 493
slorm 0:31bb391d0545 494 wheel.reset();
slorm 0:31bb391d0545 495 m=0;
slorm 0:31bb391d0545 496 }
slorm 0:31bb391d0545 497 if(visual==1)
slorm 0:31bb391d0545 498 {
slorm 0:31bb391d0545 499
slorm 0:31bb391d0545 500 lcd.locate(0,0);
slorm 0:31bb391d0545 501 lcd.printf("Hora: ");
slorm 0:31bb391d0545 502 lcd.locate(8,0);
slorm 0:31bb391d0545 503 lcd.printf("%02d:",tm.hour);
slorm 0:31bb391d0545 504 lcd.printf("%02d:",tm.min);
slorm 0:31bb391d0545 505 lcd.printf("%02d",tm.sec);
slorm 0:31bb391d0545 506
slorm 0:31bb391d0545 507 lcd.locate(0,1);
slorm 0:31bb391d0545 508 lcd.printf("%02d/",tm.mon);
slorm 0:31bb391d0545 509 lcd.printf("%02d/",tm.date);
slorm 0:31bb391d0545 510 lcd.printf("%02d",tm.year);
slorm 0:31bb391d0545 511 lcd.printf(",");
slorm 0:31bb391d0545 512 if(activ1==1)
slorm 0:31bb391d0545 513 {
slorm 0:31bb391d0545 514 lcd.printf("1");
slorm 0:31bb391d0545 515 }
slorm 0:31bb391d0545 516
slorm 0:31bb391d0545 517 if(ac2==1)
slorm 0:31bb391d0545 518 {
slorm 0:31bb391d0545 519 lcd.printf("2");
slorm 0:31bb391d0545 520 }
slorm 0:31bb391d0545 521 if(ac3==1)
slorm 0:31bb391d0545 522 {
slorm 0:31bb391d0545 523 lcd.printf("3");
slorm 0:31bb391d0545 524 }
slorm 0:31bb391d0545 525 if(ac4==1)
slorm 0:31bb391d0545 526 {
slorm 0:31bb391d0545 527 lcd.printf("4");
slorm 0:31bb391d0545 528 }
slorm 0:31bb391d0545 529 if(ac5==1)
slorm 0:31bb391d0545 530 {
slorm 0:31bb391d0545 531 lcd.printf("5");
slorm 0:31bb391d0545 532 }
slorm 0:31bb391d0545 533 if(ac6==1)
slorm 0:31bb391d0545 534 {
slorm 0:31bb391d0545 535 lcd.printf("6");
slorm 0:31bb391d0545 536 }
slorm 0:31bb391d0545 537 if(ac7==1)
slorm 0:31bb391d0545 538 {
slorm 0:31bb391d0545 539 lcd.printf("7");
slorm 0:31bb391d0545 540 }
slorm 0:31bb391d0545 541 wait(0.1);
slorm 0:31bb391d0545 542
slorm 0:31bb391d0545 543 //////
slorm 0:31bb391d0545 544
slorm 0:31bb391d0545 545 }
slorm 0:31bb391d0545 546
slorm 0:31bb391d0545 547 if(visual==2)
slorm 0:31bb391d0545 548 {
slorm 0:31bb391d0545 549 lcd.locate(0,0);
slorm 0:31bb391d0545 550 lcd.printf("Alarma1 ");
slorm 0:31bb391d0545 551 lcd.locate(8,0);
slorm 0:31bb391d0545 552 lcd.printf("%02d:",Alarm.hour);
slorm 0:31bb391d0545 553 lcd.printf("%02d:",Alarm.min);
slorm 0:31bb391d0545 554 lcd.printf("%02d",Alarm.sec);
slorm 0:31bb391d0545 555
slorm 0:31bb391d0545 556
slorm 0:31bb391d0545 557 lcd.locate(0,1);
slorm 0:31bb391d0545 558 lcd.printf("%02d/",Alarm.mon);
slorm 0:31bb391d0545 559 lcd.printf("%02d/",Alarm.date);
slorm 0:31bb391d0545 560 lcd.printf("%02d",Alarm.year);
slorm 0:31bb391d0545 561
slorm 0:31bb391d0545 562 if (activ1==0)
slorm 0:31bb391d0545 563 {
slorm 0:31bb391d0545 564 lcd.printf(" off");
slorm 0:31bb391d0545 565 }
slorm 0:31bb391d0545 566 if (activ1==1)
slorm 0:31bb391d0545 567 {
slorm 0:31bb391d0545 568 lcd.printf(" on");
slorm 0:31bb391d0545 569 }
slorm 0:31bb391d0545 570 wait(0.1);
slorm 0:31bb391d0545 571 lcd.cls();
slorm 0:31bb391d0545 572
slorm 0:31bb391d0545 573 }
slorm 0:31bb391d0545 574 if(visual==3)
slorm 0:31bb391d0545 575 {
slorm 0:31bb391d0545 576 lcd.locate(0,0);
slorm 0:31bb391d0545 577 lcd.printf("Alarma2 ");
slorm 0:31bb391d0545 578 lcd.locate(8,0);
slorm 0:31bb391d0545 579 lcd.printf("%02d:",Alarm1.hour);
slorm 0:31bb391d0545 580 lcd.printf("%02d:",Alarm1.min);
slorm 0:31bb391d0545 581 lcd.printf("%02d",Alarm1.sec);
slorm 0:31bb391d0545 582
slorm 0:31bb391d0545 583
slorm 0:31bb391d0545 584 lcd.locate(0,1);
slorm 0:31bb391d0545 585 lcd.printf("%02d/",Alarm1.mon);
slorm 0:31bb391d0545 586 lcd.printf("%02d/",Alarm1.date);
slorm 0:31bb391d0545 587 lcd.printf("%02d",Alarm1.year);
slorm 0:31bb391d0545 588
slorm 0:31bb391d0545 589 if (ac2==0)
slorm 0:31bb391d0545 590 {
slorm 0:31bb391d0545 591 lcd.printf(" off");
slorm 0:31bb391d0545 592 }
slorm 0:31bb391d0545 593 if (ac2==1)
slorm 0:31bb391d0545 594 {
slorm 0:31bb391d0545 595 lcd.printf(" on");
slorm 0:31bb391d0545 596 }
slorm 0:31bb391d0545 597 wait(0.1);
slorm 0:31bb391d0545 598 lcd.cls();
slorm 0:31bb391d0545 599
slorm 0:31bb391d0545 600 }
slorm 0:31bb391d0545 601 if(visual==4)
slorm 0:31bb391d0545 602 {
slorm 0:31bb391d0545 603 lcd.locate(0,0);
slorm 0:31bb391d0545 604 lcd.printf("Alarma3 ");
slorm 0:31bb391d0545 605 lcd.locate(8,0);
slorm 0:31bb391d0545 606 lcd.printf("%02d:",Alarm2.hour);
slorm 0:31bb391d0545 607 lcd.printf("%02d:",Alarm2.min);
slorm 0:31bb391d0545 608 lcd.printf("%02d",Alarm2.sec);
slorm 0:31bb391d0545 609
slorm 0:31bb391d0545 610
slorm 0:31bb391d0545 611 lcd.locate(0,1);
slorm 0:31bb391d0545 612 lcd.printf("%02d/",Alarm2.mon);
slorm 0:31bb391d0545 613 lcd.printf("%02d/",Alarm2.date);
slorm 0:31bb391d0545 614 lcd.printf("%02d",Alarm2.year);
slorm 0:31bb391d0545 615
slorm 0:31bb391d0545 616 if (ac3==0)
slorm 0:31bb391d0545 617 {
slorm 0:31bb391d0545 618 lcd.printf(" off");
slorm 0:31bb391d0545 619 }
slorm 0:31bb391d0545 620 if (ac3==1)
slorm 0:31bb391d0545 621 {
slorm 0:31bb391d0545 622 lcd.printf(" on");
slorm 0:31bb391d0545 623 }
slorm 0:31bb391d0545 624 wait(0.1);
slorm 0:31bb391d0545 625 lcd.cls();
slorm 0:31bb391d0545 626
slorm 0:31bb391d0545 627 }
slorm 0:31bb391d0545 628 if(visual==5)
slorm 0:31bb391d0545 629 {
slorm 0:31bb391d0545 630 lcd.locate(0,0);
slorm 0:31bb391d0545 631 lcd.printf("Alarma4 ");
slorm 0:31bb391d0545 632 lcd.locate(8,0);
slorm 0:31bb391d0545 633 lcd.printf("%02d:",Alarm3.hour);
slorm 0:31bb391d0545 634 lcd.printf("%02d:",Alarm3.min);
slorm 0:31bb391d0545 635 lcd.printf("%02d",Alarm3.sec);
slorm 0:31bb391d0545 636
slorm 0:31bb391d0545 637
slorm 0:31bb391d0545 638 lcd.locate(0,1);
slorm 0:31bb391d0545 639 lcd.printf("%02d/",Alarm3.mon);
slorm 0:31bb391d0545 640 lcd.printf("%02d/",Alarm3.date);
slorm 0:31bb391d0545 641 lcd.printf("%02d",Alarm3.year);
slorm 0:31bb391d0545 642
slorm 0:31bb391d0545 643 if (ac4==0)
slorm 0:31bb391d0545 644 {
slorm 0:31bb391d0545 645 lcd.printf(" off");
slorm 0:31bb391d0545 646 }
slorm 0:31bb391d0545 647 if (ac4==1)
slorm 0:31bb391d0545 648 {
slorm 0:31bb391d0545 649 lcd.printf(" on");
slorm 0:31bb391d0545 650 }
slorm 0:31bb391d0545 651 wait(0.1);
slorm 0:31bb391d0545 652 lcd.cls();
slorm 0:31bb391d0545 653
slorm 0:31bb391d0545 654 }
slorm 0:31bb391d0545 655 if(visual==6)
slorm 0:31bb391d0545 656 {
slorm 0:31bb391d0545 657 lcd.locate(0,0);
slorm 0:31bb391d0545 658 lcd.printf("Alarma5 ");
slorm 0:31bb391d0545 659 lcd.locate(8,0);
slorm 0:31bb391d0545 660 lcd.printf("%02d:",Alarm4.hour);
slorm 0:31bb391d0545 661 lcd.printf("%02d:",Alarm4.min);
slorm 0:31bb391d0545 662 lcd.printf("%02d",Alarm4.sec);
slorm 0:31bb391d0545 663
slorm 0:31bb391d0545 664
slorm 0:31bb391d0545 665 lcd.locate(0,1);
slorm 0:31bb391d0545 666 lcd.printf("%02d/",Alarm4.mon);
slorm 0:31bb391d0545 667 lcd.printf("%02d/",Alarm4.date);
slorm 0:31bb391d0545 668 lcd.printf("%02d",Alarm4.year);
slorm 0:31bb391d0545 669
slorm 0:31bb391d0545 670 if (ac5==0)
slorm 0:31bb391d0545 671 {
slorm 0:31bb391d0545 672 lcd.printf(" off");
slorm 0:31bb391d0545 673 }
slorm 0:31bb391d0545 674 if (ac5==1)
slorm 0:31bb391d0545 675 {
slorm 0:31bb391d0545 676 lcd.printf(" on");
slorm 0:31bb391d0545 677 }
slorm 0:31bb391d0545 678 wait(0.1);
slorm 0:31bb391d0545 679 lcd.cls();
slorm 0:31bb391d0545 680
slorm 0:31bb391d0545 681 }
slorm 0:31bb391d0545 682 if(visual==7)
slorm 0:31bb391d0545 683 {
slorm 0:31bb391d0545 684 lcd.locate(0,0);
slorm 0:31bb391d0545 685 lcd.printf("Alarma6 ");
slorm 0:31bb391d0545 686 lcd.locate(8,0);
slorm 0:31bb391d0545 687 lcd.printf("%02d:",Alarm5.hour);
slorm 0:31bb391d0545 688 lcd.printf("%02d:",Alarm5.min);
slorm 0:31bb391d0545 689 lcd.printf("%02d",Alarm5.sec);
slorm 0:31bb391d0545 690
slorm 0:31bb391d0545 691
slorm 0:31bb391d0545 692 lcd.locate(0,1);
slorm 0:31bb391d0545 693 lcd.printf("%02d/",Alarm5.mon);
slorm 0:31bb391d0545 694 lcd.printf("%02d/",Alarm5.date);
slorm 0:31bb391d0545 695 lcd.printf("%02d",Alarm5.year);
slorm 0:31bb391d0545 696 if (ac6==0)
slorm 0:31bb391d0545 697 {
slorm 0:31bb391d0545 698 lcd.printf(" off");
slorm 0:31bb391d0545 699 }
slorm 0:31bb391d0545 700 if (ac6==1)
slorm 0:31bb391d0545 701 {
slorm 0:31bb391d0545 702 lcd.printf(" on");
slorm 0:31bb391d0545 703 }
slorm 0:31bb391d0545 704 wait(0.1);
slorm 0:31bb391d0545 705 lcd.cls();
slorm 0:31bb391d0545 706
slorm 0:31bb391d0545 707 }
slorm 0:31bb391d0545 708 if(visual==8)
slorm 0:31bb391d0545 709 {
slorm 0:31bb391d0545 710 lcd.locate(0,0);
slorm 0:31bb391d0545 711 lcd.printf("Alarma7 ");
slorm 0:31bb391d0545 712 lcd.locate(8,0);
slorm 0:31bb391d0545 713 lcd.printf("%02d:",Alarm6.hour);
slorm 0:31bb391d0545 714 lcd.printf("%02d:",Alarm6.min);
slorm 0:31bb391d0545 715 lcd.printf("%02d",Alarm6.sec);
slorm 0:31bb391d0545 716
slorm 0:31bb391d0545 717
slorm 0:31bb391d0545 718 lcd.locate(0,1);
slorm 0:31bb391d0545 719 lcd.printf("%02d/",Alarm6.mon);
slorm 0:31bb391d0545 720 lcd.printf("%02d/",Alarm6.date);
slorm 0:31bb391d0545 721 lcd.printf("%02d",Alarm6.year);
slorm 0:31bb391d0545 722
slorm 0:31bb391d0545 723 if (ac7==0)
slorm 0:31bb391d0545 724 {
slorm 0:31bb391d0545 725 lcd.printf(" off");
slorm 0:31bb391d0545 726 }
slorm 0:31bb391d0545 727 if (ac7==1)
slorm 0:31bb391d0545 728 {
slorm 0:31bb391d0545 729 lcd.printf(" on");
slorm 0:31bb391d0545 730 }
slorm 0:31bb391d0545 731 wait(0.1);
slorm 0:31bb391d0545 732 lcd.cls();
slorm 0:31bb391d0545 733
slorm 0:31bb391d0545 734 }
slorm 0:31bb391d0545 735 if (visual==9)
slorm 0:31bb391d0545 736 {
slorm 0:31bb391d0545 737 lcd.locate(0,0);
slorm 0:31bb391d0545 738 lcd.printf("Nueva alarma");
slorm 0:31bb391d0545 739 wait(0.1);
slorm 0:31bb391d0545 740 lcd.cls();
slorm 0:31bb391d0545 741 if (button_enco.falling())
slorm 0:31bb391d0545 742 {
slorm 0:31bb391d0545 743 Conf=0;
slorm 0:31bb391d0545 744 Lugar=1;
slorm 0:31bb391d0545 745 i=0;
slorm 0:31bb391d0545 746 }
slorm 0:31bb391d0545 747 }
slorm 0:31bb391d0545 748 if(visual==10)
slorm 0:31bb391d0545 749 {
slorm 0:31bb391d0545 750 lcd.locate(0,0);
slorm 0:31bb391d0545 751 lcd.printf("guardar");
slorm 0:31bb391d0545 752 wait(0.1);
slorm 0:31bb391d0545 753 lcd.cls();
slorm 0:31bb391d0545 754 if (button_enco.falling())
slorm 0:31bb391d0545 755 {
slorm 0:31bb391d0545 756 lcd.cls();
slorm 0:31bb391d0545 757 Lugar=3;
slorm 0:31bb391d0545 758 }
slorm 0:31bb391d0545 759 }
slorm 0:31bb391d0545 760 if( (tm.date==Alarm.date)&&(tm.mon==Alarm.mon)&&(tm.year==Alarm.year)&&(tm.hour==Alarm.hour)&&(tm.min==Alarm.min)&&(tm.sec==Alarm.sec)&&(activ1==1) )
slorm 0:31bb391d0545 761 {
slorm 0:31bb391d0545 762 Lugar=4;
slorm 0:31bb391d0545 763 alarma1=1;
slorm 0:31bb391d0545 764 lcd.cls();
slorm 0:31bb391d0545 765 lcd.locate(0,0);
slorm 0:31bb391d0545 766 lcd.printf("Alarma 1 Activa");
slorm 0:31bb391d0545 767 m=0;
slorm 0:31bb391d0545 768 }
slorm 0:31bb391d0545 769 if( (tm.date==Alarm1.date)&&(tm.mon==Alarm1.mon)&&(tm.year==Alarm1.year)&&(tm.hour==Alarm1.hour)&&(tm.min==Alarm1.min)&&(tm.sec==Alarm1.sec)&&(ac2==1) )
slorm 0:31bb391d0545 770 {
slorm 0:31bb391d0545 771 Lugar=4;
slorm 0:31bb391d0545 772 alarma2=1;
slorm 0:31bb391d0545 773 lcd.cls();
slorm 0:31bb391d0545 774 lcd.locate(0,0);
slorm 0:31bb391d0545 775 lcd.printf("Alarma 2 Activa");
slorm 0:31bb391d0545 776 m=0;
slorm 0:31bb391d0545 777 }
slorm 0:31bb391d0545 778 if( (tm.date==Alarm2.date)&&(tm.mon==Alarm2.mon)&&(tm.year==Alarm2.year)&&(tm.hour==Alarm2.hour)&&(tm.min==Alarm2.min)&&(tm.sec==Alarm2.sec)&&(ac3==1) )
slorm 0:31bb391d0545 779 {
slorm 0:31bb391d0545 780 Lugar=4;
slorm 0:31bb391d0545 781 alarma3=1;
slorm 0:31bb391d0545 782 lcd.cls();
slorm 0:31bb391d0545 783 lcd.locate(0,0);
slorm 0:31bb391d0545 784 lcd.printf("Alarma 3 Activa");
slorm 0:31bb391d0545 785 m=0;
slorm 0:31bb391d0545 786 }
slorm 0:31bb391d0545 787 if( (tm.date==Alarm3.date)&&(tm.mon==Alarm3.mon)&&(tm.year==Alarm3.year)&&(tm.hour==Alarm3.hour)&&(tm.min==Alarm3.min)&&(tm.sec==Alarm3.sec)&&(ac4==1))
slorm 0:31bb391d0545 788 {
slorm 0:31bb391d0545 789 Lugar=4;
slorm 0:31bb391d0545 790 alarma4=1;
slorm 0:31bb391d0545 791 lcd.cls();
slorm 0:31bb391d0545 792 lcd.locate(0,0);
slorm 0:31bb391d0545 793 lcd.printf("Alarma 4 Activa");
slorm 0:31bb391d0545 794 m=0;
slorm 0:31bb391d0545 795 }
slorm 0:31bb391d0545 796 if( (tm.date==Alarm4.date)&&(tm.mon==Alarm4.mon)&&(tm.year==Alarm4.year)&&(tm.hour==Alarm4.hour)&&(tm.min==Alarm4.min)&&(tm.sec==Alarm4.sec)&&(ac5==1) )
slorm 0:31bb391d0545 797 {
slorm 0:31bb391d0545 798 Lugar=4;
slorm 0:31bb391d0545 799 alarma5=1;
slorm 0:31bb391d0545 800 lcd.cls();
slorm 0:31bb391d0545 801 lcd.locate(0,0);
slorm 0:31bb391d0545 802 lcd.printf("Alarma 5 Activa");
slorm 0:31bb391d0545 803 m=0;
slorm 0:31bb391d0545 804 }
slorm 0:31bb391d0545 805 if( (tm.date==Alarm5.date)&&(tm.mon==Alarm5.mon)&&(tm.year==Alarm5.year)&&(tm.hour==Alarm5.hour)&&(tm.min==Alarm5.min)&&(tm.sec==Alarm5.sec)&&(ac6==1) )
slorm 0:31bb391d0545 806 {
slorm 0:31bb391d0545 807 Lugar=4;
slorm 0:31bb391d0545 808 alarma6=1;
slorm 0:31bb391d0545 809 lcd.cls();
slorm 0:31bb391d0545 810 lcd.locate(0,0);
slorm 0:31bb391d0545 811 lcd.printf("Alarma 6 Activa");
slorm 0:31bb391d0545 812 m=0;
slorm 0:31bb391d0545 813 }
slorm 0:31bb391d0545 814 if( (tm.date==Alarm6.date)&&(tm.mon==Alarm6.mon)&&(tm.year==Alarm6.year)&&(tm.hour==Alarm6.hour)&&(tm.min==Alarm6.min)&&(tm.sec==Alarm6.sec)&&(ac7==1) )
slorm 0:31bb391d0545 815 {
slorm 0:31bb391d0545 816 Lugar=4;
slorm 0:31bb391d0545 817 alarma7=1;
slorm 0:31bb391d0545 818 lcd.cls();
slorm 0:31bb391d0545 819 lcd.locate(0,0);
slorm 0:31bb391d0545 820 lcd.printf("Alarma 7 Activa");
slorm 0:31bb391d0545 821 m=0;
slorm 0:31bb391d0545 822 }
slorm 0:31bb391d0545 823
slorm 0:31bb391d0545 824
slorm 0:31bb391d0545 825 break;
slorm 0:31bb391d0545 826 case 3:
slorm 0:31bb391d0545 827 switch (ac){
slorm 0:31bb391d0545 828 case 1:
slorm 0:31bb391d0545 829 header = irda.read_high_us();
slorm 0:31bb391d0545 830 if(header>3500)
slorm 0:31bb391d0545 831 {
slorm 0:31bb391d0545 832 ac=2;
slorm 0:31bb391d0545 833 }
slorm 0:31bb391d0545 834 break;
slorm 0:31bb391d0545 835 case 2:
slorm 0:31bb391d0545 836
slorm 0:31bb391d0545 837 for(j=0;j<numb;++j)
slorm 0:31bb391d0545 838 {
slorm 0:31bb391d0545 839 numP[j] = irda.read_high_us(); //funcion para leer un pulso alto
slorm 0:31bb391d0545 840 }
slorm 0:31bb391d0545 841 header=0;
slorm 0:31bb391d0545 842 for(j=0;j<numb;++j)
slorm 0:31bb391d0545 843 {
slorm 0:31bb391d0545 844 if(numP[j]<1000)
slorm 0:31bb391d0545 845 {
slorm 0:31bb391d0545 846 numP_nor[j]=0;
slorm 0:31bb391d0545 847 }
slorm 0:31bb391d0545 848 if(numP[j]>1000)
slorm 0:31bb391d0545 849 {
slorm 0:31bb391d0545 850 numP_nor[j]=1;
slorm 0:31bb391d0545 851 }
slorm 0:31bb391d0545 852 pc.printf("%d,",numP_nor[j]);
slorm 0:31bb391d0545 853 }
slorm 0:31bb391d0545 854 pc.printf("\n");
slorm 0:31bb391d0545 855 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 856 {
slorm 0:31bb391d0545 857 if(numP_nor[j]==boton1[j])
slorm 0:31bb391d0545 858 {
slorm 0:31bb391d0545 859 n=0;
slorm 0:31bb391d0545 860 }
slorm 0:31bb391d0545 861 else
slorm 0:31bb391d0545 862 {
slorm 0:31bb391d0545 863 n=1;
slorm 0:31bb391d0545 864 }
slorm 0:31bb391d0545 865 comp1=comp1+n;
slorm 0:31bb391d0545 866 n=0;
slorm 0:31bb391d0545 867 }
slorm 0:31bb391d0545 868
slorm 0:31bb391d0545 869 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 870 {
slorm 0:31bb391d0545 871 if(numP_nor[j]==boton2[j])
slorm 0:31bb391d0545 872 {
slorm 0:31bb391d0545 873 n=0;
slorm 0:31bb391d0545 874 }
slorm 0:31bb391d0545 875 else
slorm 0:31bb391d0545 876 {
slorm 0:31bb391d0545 877 n=1;
slorm 0:31bb391d0545 878 }
slorm 0:31bb391d0545 879 comp2=comp2+n;
slorm 0:31bb391d0545 880 n=0;
slorm 0:31bb391d0545 881 }
slorm 0:31bb391d0545 882 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 883 {
slorm 0:31bb391d0545 884 if(numP_nor[j]==boton3[j])
slorm 0:31bb391d0545 885 {
slorm 0:31bb391d0545 886 n=0;
slorm 0:31bb391d0545 887 }
slorm 0:31bb391d0545 888 else
slorm 0:31bb391d0545 889 {
slorm 0:31bb391d0545 890 n=1;
slorm 0:31bb391d0545 891 }
slorm 0:31bb391d0545 892 comp3=comp3+n;
slorm 0:31bb391d0545 893 n=0;
slorm 0:31bb391d0545 894 }
slorm 0:31bb391d0545 895 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 896 {
slorm 0:31bb391d0545 897 if(numP_nor[j]==boton4[j])
slorm 0:31bb391d0545 898 {
slorm 0:31bb391d0545 899 n=0;
slorm 0:31bb391d0545 900 }
slorm 0:31bb391d0545 901 else
slorm 0:31bb391d0545 902 {
slorm 0:31bb391d0545 903 n=1;
slorm 0:31bb391d0545 904 }
slorm 0:31bb391d0545 905 comp4=comp4+n;
slorm 0:31bb391d0545 906 n=0;
slorm 0:31bb391d0545 907 }
slorm 0:31bb391d0545 908 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 909 {
slorm 0:31bb391d0545 910 if(numP_nor[j]==boton5[j])
slorm 0:31bb391d0545 911 {
slorm 0:31bb391d0545 912 n=0;
slorm 0:31bb391d0545 913 }
slorm 0:31bb391d0545 914 else
slorm 0:31bb391d0545 915 {
slorm 0:31bb391d0545 916 n=1;
slorm 0:31bb391d0545 917 }
slorm 0:31bb391d0545 918 comp5=comp5+n;
slorm 0:31bb391d0545 919 n=0;
slorm 0:31bb391d0545 920 }
slorm 0:31bb391d0545 921 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 922 {
slorm 0:31bb391d0545 923 if(numP_nor[j]==boton6[j])
slorm 0:31bb391d0545 924 {
slorm 0:31bb391d0545 925 n=0;
slorm 0:31bb391d0545 926 }
slorm 0:31bb391d0545 927 else
slorm 0:31bb391d0545 928 {
slorm 0:31bb391d0545 929 n=1;
slorm 0:31bb391d0545 930 }
slorm 0:31bb391d0545 931 comp6=comp6+n;
slorm 0:31bb391d0545 932 n=0;
slorm 0:31bb391d0545 933 }
slorm 0:31bb391d0545 934 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 935 {
slorm 0:31bb391d0545 936 if(numP_nor[j]==boton7[j])
slorm 0:31bb391d0545 937 {
slorm 0:31bb391d0545 938 n=0;
slorm 0:31bb391d0545 939 }
slorm 0:31bb391d0545 940 else
slorm 0:31bb391d0545 941 {
slorm 0:31bb391d0545 942 n=1;
slorm 0:31bb391d0545 943 }
slorm 0:31bb391d0545 944 comp7=comp7+n;
slorm 0:31bb391d0545 945 n=0;
slorm 0:31bb391d0545 946 }
slorm 0:31bb391d0545 947 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 948 {
slorm 0:31bb391d0545 949 if(numP_nor[j]==boton8[j])
slorm 0:31bb391d0545 950 {
slorm 0:31bb391d0545 951 n=0;
slorm 0:31bb391d0545 952 }
slorm 0:31bb391d0545 953 else
slorm 0:31bb391d0545 954 {
slorm 0:31bb391d0545 955 n=1;
slorm 0:31bb391d0545 956 }
slorm 0:31bb391d0545 957 comp8=comp8+n;
slorm 0:31bb391d0545 958 n=0;
slorm 0:31bb391d0545 959 }
slorm 0:31bb391d0545 960 if ((comp1==0))
slorm 0:31bb391d0545 961 {
slorm 0:31bb391d0545 962 pc.printf("Oprimio 1\n");
slorm 0:31bb391d0545 963 if(activ1==0)
slorm 0:31bb391d0545 964 {
slorm 0:31bb391d0545 965 activ1=1;
slorm 0:31bb391d0545 966 lcd.cls();
slorm 0:31bb391d0545 967 lcd.printf("Alarma 1: on");
slorm 0:31bb391d0545 968 }
slorm 0:31bb391d0545 969 else if(activ1==1)
slorm 0:31bb391d0545 970 {
slorm 0:31bb391d0545 971 activ1=0;
slorm 0:31bb391d0545 972 lcd.cls();
slorm 0:31bb391d0545 973 lcd.printf("Alarma 1: off");
slorm 0:31bb391d0545 974 }
slorm 0:31bb391d0545 975
slorm 0:31bb391d0545 976 }
slorm 0:31bb391d0545 977 if ((comp2==0))
slorm 0:31bb391d0545 978 {
slorm 0:31bb391d0545 979 pc.printf("Oprimio 2\n");
slorm 0:31bb391d0545 980 if(ac2==0)
slorm 0:31bb391d0545 981 {
slorm 0:31bb391d0545 982 ac2=1;
slorm 0:31bb391d0545 983 lcd.cls();
slorm 0:31bb391d0545 984 lcd.printf("Alarma 2: on");
slorm 0:31bb391d0545 985 }
slorm 0:31bb391d0545 986 else if(ac2==1)
slorm 0:31bb391d0545 987 {
slorm 0:31bb391d0545 988 ac2=0;
slorm 0:31bb391d0545 989 lcd.cls();
slorm 0:31bb391d0545 990 lcd.printf("Alarma 2: off");
slorm 0:31bb391d0545 991 }
slorm 0:31bb391d0545 992
slorm 0:31bb391d0545 993 }
slorm 0:31bb391d0545 994 if ((comp3==0))
slorm 0:31bb391d0545 995 {
slorm 0:31bb391d0545 996
slorm 0:31bb391d0545 997 pc.printf("Oprimio 3\n");
slorm 0:31bb391d0545 998 if(ac3==0)
slorm 0:31bb391d0545 999 {
slorm 0:31bb391d0545 1000 ac3=1;
slorm 0:31bb391d0545 1001 lcd.cls();
slorm 0:31bb391d0545 1002 lcd.printf("Alarma 3: on");
slorm 0:31bb391d0545 1003 }
slorm 0:31bb391d0545 1004 else if(ac3==1)
slorm 0:31bb391d0545 1005 {
slorm 0:31bb391d0545 1006 ac3=0;
slorm 0:31bb391d0545 1007 lcd.cls();
slorm 0:31bb391d0545 1008 lcd.printf("Alarma 3: off");
slorm 0:31bb391d0545 1009 }
slorm 0:31bb391d0545 1010
slorm 0:31bb391d0545 1011 }
slorm 0:31bb391d0545 1012 if ((comp4==0))
slorm 0:31bb391d0545 1013 {
slorm 0:31bb391d0545 1014
slorm 0:31bb391d0545 1015 pc.printf("Oprimio 4\n");
slorm 0:31bb391d0545 1016 if(ac4==0)
slorm 0:31bb391d0545 1017 {
slorm 0:31bb391d0545 1018 ac4=1;
slorm 0:31bb391d0545 1019 lcd.cls();
slorm 0:31bb391d0545 1020 lcd.printf("Alarma 4: on");
slorm 0:31bb391d0545 1021 }
slorm 0:31bb391d0545 1022 else if(ac4==1)
slorm 0:31bb391d0545 1023 {
slorm 0:31bb391d0545 1024 ac4=0;
slorm 0:31bb391d0545 1025 lcd.cls();
slorm 0:31bb391d0545 1026 lcd.printf("Alarma 4: off");
slorm 0:31bb391d0545 1027 }
slorm 0:31bb391d0545 1028
slorm 0:31bb391d0545 1029 }
slorm 0:31bb391d0545 1030 if ((comp5==0))
slorm 0:31bb391d0545 1031 {
slorm 0:31bb391d0545 1032
slorm 0:31bb391d0545 1033 pc.printf("Oprimio 5\n");
slorm 0:31bb391d0545 1034 if(ac5==0)
slorm 0:31bb391d0545 1035 {
slorm 0:31bb391d0545 1036 ac5=1;
slorm 0:31bb391d0545 1037 lcd.cls();
slorm 0:31bb391d0545 1038 lcd.printf("Alarma 5: on");
slorm 0:31bb391d0545 1039 }
slorm 0:31bb391d0545 1040 else if(ac5==1)
slorm 0:31bb391d0545 1041 {
slorm 0:31bb391d0545 1042 ac5=0;
slorm 0:31bb391d0545 1043 lcd.cls();
slorm 0:31bb391d0545 1044 lcd.printf("Alarma 5: off");
slorm 0:31bb391d0545 1045 }
slorm 0:31bb391d0545 1046
slorm 0:31bb391d0545 1047 }
slorm 0:31bb391d0545 1048 if ((comp6==0))
slorm 0:31bb391d0545 1049 {
slorm 0:31bb391d0545 1050
slorm 0:31bb391d0545 1051 pc.printf("Oprimio 6\n");
slorm 0:31bb391d0545 1052 if(ac6==0)
slorm 0:31bb391d0545 1053 {
slorm 0:31bb391d0545 1054 ac6=1;
slorm 0:31bb391d0545 1055 lcd.cls();
slorm 0:31bb391d0545 1056 lcd.printf("Alarma 6: on");
slorm 0:31bb391d0545 1057 }
slorm 0:31bb391d0545 1058 else if(ac6==1)
slorm 0:31bb391d0545 1059 {
slorm 0:31bb391d0545 1060 ac6=0;
slorm 0:31bb391d0545 1061 lcd.cls();
slorm 0:31bb391d0545 1062 lcd.printf("Alarma 6: off");
slorm 0:31bb391d0545 1063 }
slorm 0:31bb391d0545 1064
slorm 0:31bb391d0545 1065 }
slorm 0:31bb391d0545 1066 if ((comp7==0))
slorm 0:31bb391d0545 1067 {
slorm 0:31bb391d0545 1068
slorm 0:31bb391d0545 1069 pc.printf("Oprimio 7\n");
slorm 0:31bb391d0545 1070 if(ac7==0)
slorm 0:31bb391d0545 1071 {
slorm 0:31bb391d0545 1072 ac7=1;
slorm 0:31bb391d0545 1073 lcd.cls();
slorm 0:31bb391d0545 1074 lcd.printf("Alarma 7: on");
slorm 0:31bb391d0545 1075 }
slorm 0:31bb391d0545 1076 else if(ac7==1)
slorm 0:31bb391d0545 1077 {
slorm 0:31bb391d0545 1078 ac7=0;
slorm 0:31bb391d0545 1079 lcd.cls();
slorm 0:31bb391d0545 1080 lcd.printf("Alarma 7: off");
slorm 0:31bb391d0545 1081 }
slorm 0:31bb391d0545 1082
slorm 0:31bb391d0545 1083 }
slorm 0:31bb391d0545 1084 if ((comp8==0))
slorm 0:31bb391d0545 1085 {
slorm 0:31bb391d0545 1086 Lugar=2;
slorm 0:31bb391d0545 1087 visual=1;
slorm 0:31bb391d0545 1088 }
slorm 0:31bb391d0545 1089 comp1=0;
slorm 0:31bb391d0545 1090 comp2=0;
slorm 0:31bb391d0545 1091 comp3=0;
slorm 0:31bb391d0545 1092 comp4=0;
slorm 0:31bb391d0545 1093 comp5=0;
slorm 0:31bb391d0545 1094 comp6=0;
slorm 0:31bb391d0545 1095 comp7=0;
slorm 0:31bb391d0545 1096 comp8=0;
slorm 0:31bb391d0545 1097 n=0;
slorm 0:31bb391d0545 1098 ac=1;
slorm 0:31bb391d0545 1099 }
slorm 0:31bb391d0545 1100 break;
slorm 0:31bb391d0545 1101
slorm 0:31bb391d0545 1102 case 4:
slorm 0:31bb391d0545 1103 led=0;
slorm 0:31bb391d0545 1104 switch (mode){
slorm 0:31bb391d0545 1105 case 1:
slorm 0:31bb391d0545 1106 header = irda.read_high_us();
slorm 0:31bb391d0545 1107 if(header>3500)
slorm 0:31bb391d0545 1108 {
slorm 0:31bb391d0545 1109 mode=2;
slorm 0:31bb391d0545 1110 }
slorm 0:31bb391d0545 1111 break;
slorm 0:31bb391d0545 1112 case 2:
slorm 0:31bb391d0545 1113
slorm 0:31bb391d0545 1114 for(j=0;j<numb;++j)
slorm 0:31bb391d0545 1115 {
slorm 0:31bb391d0545 1116 numP[j] = irda.read_high_us(); //funcion para leer un pulso alto
slorm 0:31bb391d0545 1117 }
slorm 0:31bb391d0545 1118 header=0;
slorm 0:31bb391d0545 1119 for(j=0;j<numb;++j)
slorm 0:31bb391d0545 1120 {
slorm 0:31bb391d0545 1121 if(numP[j]<1000)
slorm 0:31bb391d0545 1122 {
slorm 0:31bb391d0545 1123 numP_nor[j]=0;
slorm 0:31bb391d0545 1124 }
slorm 0:31bb391d0545 1125 if(numP[j]>1000)
slorm 0:31bb391d0545 1126 {
slorm 0:31bb391d0545 1127 numP_nor[j]=1;
slorm 0:31bb391d0545 1128 }
slorm 0:31bb391d0545 1129 pc.printf("%d,",numP_nor[j]);
slorm 0:31bb391d0545 1130 }
slorm 0:31bb391d0545 1131 pc.printf("\n");
slorm 0:31bb391d0545 1132 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1133 {
slorm 0:31bb391d0545 1134 if(numP_nor[j]==boton1[j])
slorm 0:31bb391d0545 1135 {
slorm 0:31bb391d0545 1136 n=0;
slorm 0:31bb391d0545 1137 }
slorm 0:31bb391d0545 1138 else
slorm 0:31bb391d0545 1139 {
slorm 0:31bb391d0545 1140 n=1;
slorm 0:31bb391d0545 1141 }
slorm 0:31bb391d0545 1142 comp1=comp1+n;
slorm 0:31bb391d0545 1143 n=0;
slorm 0:31bb391d0545 1144 }
slorm 0:31bb391d0545 1145
slorm 0:31bb391d0545 1146 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1147 {
slorm 0:31bb391d0545 1148 if(numP_nor[j]==boton2[j])
slorm 0:31bb391d0545 1149 {
slorm 0:31bb391d0545 1150 n=0;
slorm 0:31bb391d0545 1151 }
slorm 0:31bb391d0545 1152 else
slorm 0:31bb391d0545 1153 {
slorm 0:31bb391d0545 1154 n=1;
slorm 0:31bb391d0545 1155 }
slorm 0:31bb391d0545 1156 comp2=comp2+n;
slorm 0:31bb391d0545 1157 n=0;
slorm 0:31bb391d0545 1158 }
slorm 0:31bb391d0545 1159 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1160 {
slorm 0:31bb391d0545 1161 if(numP_nor[j]==boton3[j])
slorm 0:31bb391d0545 1162 {
slorm 0:31bb391d0545 1163 n=0;
slorm 0:31bb391d0545 1164 }
slorm 0:31bb391d0545 1165 else
slorm 0:31bb391d0545 1166 {
slorm 0:31bb391d0545 1167 n=1;
slorm 0:31bb391d0545 1168 }
slorm 0:31bb391d0545 1169 comp3=comp3+n;
slorm 0:31bb391d0545 1170 n=0;
slorm 0:31bb391d0545 1171 }
slorm 0:31bb391d0545 1172 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1173 {
slorm 0:31bb391d0545 1174 if(numP_nor[j]==boton4[j])
slorm 0:31bb391d0545 1175 {
slorm 0:31bb391d0545 1176 n=0;
slorm 0:31bb391d0545 1177 }
slorm 0:31bb391d0545 1178 else
slorm 0:31bb391d0545 1179 {
slorm 0:31bb391d0545 1180 n=1;
slorm 0:31bb391d0545 1181 }
slorm 0:31bb391d0545 1182 comp4=comp4+n;
slorm 0:31bb391d0545 1183 n=0;
slorm 0:31bb391d0545 1184 }
slorm 0:31bb391d0545 1185 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1186 {
slorm 0:31bb391d0545 1187 if(numP_nor[j]==boton5[j])
slorm 0:31bb391d0545 1188 {
slorm 0:31bb391d0545 1189 n=0;
slorm 0:31bb391d0545 1190 }
slorm 0:31bb391d0545 1191 else
slorm 0:31bb391d0545 1192 {
slorm 0:31bb391d0545 1193 n=1;
slorm 0:31bb391d0545 1194 }
slorm 0:31bb391d0545 1195 comp5=comp5+n;
slorm 0:31bb391d0545 1196 n=0;
slorm 0:31bb391d0545 1197 }
slorm 0:31bb391d0545 1198 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1199 {
slorm 0:31bb391d0545 1200 if(numP_nor[j]==boton6[j])
slorm 0:31bb391d0545 1201 {
slorm 0:31bb391d0545 1202 n=0;
slorm 0:31bb391d0545 1203 }
slorm 0:31bb391d0545 1204 else
slorm 0:31bb391d0545 1205 {
slorm 0:31bb391d0545 1206 n=1;
slorm 0:31bb391d0545 1207 }
slorm 0:31bb391d0545 1208 comp6=comp6+n;
slorm 0:31bb391d0545 1209 n=0;
slorm 0:31bb391d0545 1210 }
slorm 0:31bb391d0545 1211 for (j=0;j<numb;++j)
slorm 0:31bb391d0545 1212 {
slorm 0:31bb391d0545 1213 if(numP_nor[j]==boton7[j])
slorm 0:31bb391d0545 1214 {
slorm 0:31bb391d0545 1215 n=0;
slorm 0:31bb391d0545 1216 }
slorm 0:31bb391d0545 1217 else
slorm 0:31bb391d0545 1218 {
slorm 0:31bb391d0545 1219 n=1;
slorm 0:31bb391d0545 1220 }
slorm 0:31bb391d0545 1221 comp7=comp7+n;
slorm 0:31bb391d0545 1222 n=0;
slorm 0:31bb391d0545 1223 }
slorm 0:31bb391d0545 1224 if ((comp1==0)&&(alarma1==1))
slorm 0:31bb391d0545 1225 {
slorm 0:31bb391d0545 1226 alarma1=0;
slorm 0:31bb391d0545 1227 Lugar=2;
slorm 0:31bb391d0545 1228 pc.printf("Oprimio 1\n");
slorm 0:31bb391d0545 1229 lcd.cls();
slorm 0:31bb391d0545 1230 lcd.printf("Alarma 1: off");
slorm 0:31bb391d0545 1231 wait(2);
slorm 0:31bb391d0545 1232 lcd.cls();
slorm 0:31bb391d0545 1233
slorm 0:31bb391d0545 1234 }
slorm 0:31bb391d0545 1235 if ((comp2==0)&&(alarma2==1))
slorm 0:31bb391d0545 1236 {
slorm 0:31bb391d0545 1237 alarma2=0;
slorm 0:31bb391d0545 1238 Lugar=2;
slorm 0:31bb391d0545 1239 pc.printf("Oprimio 2\n");
slorm 0:31bb391d0545 1240 lcd.cls();
slorm 0:31bb391d0545 1241 lcd.printf("Alarma 2: off");
slorm 0:31bb391d0545 1242 wait(2);
slorm 0:31bb391d0545 1243 lcd.cls();
slorm 0:31bb391d0545 1244 }
slorm 0:31bb391d0545 1245 if ((comp3==0)&&(alarma3==1))
slorm 0:31bb391d0545 1246 {
slorm 0:31bb391d0545 1247 alarma3=0;
slorm 0:31bb391d0545 1248 Lugar=2;
slorm 0:31bb391d0545 1249 pc.printf("Oprimio 3\n");
slorm 0:31bb391d0545 1250 lcd.cls();
slorm 0:31bb391d0545 1251 lcd.printf("Alarma 3: off");
slorm 0:31bb391d0545 1252 wait(2);
slorm 0:31bb391d0545 1253 lcd.cls();
slorm 0:31bb391d0545 1254 }
slorm 0:31bb391d0545 1255 if ((comp4==0)&&(alarma4==1))
slorm 0:31bb391d0545 1256 {
slorm 0:31bb391d0545 1257 alarma4=0;
slorm 0:31bb391d0545 1258 Lugar=2;
slorm 0:31bb391d0545 1259 pc.printf("Oprimio 4\n");
slorm 0:31bb391d0545 1260 lcd.cls();
slorm 0:31bb391d0545 1261 lcd.printf("Alarma 4: off");
slorm 0:31bb391d0545 1262 wait(2);
slorm 0:31bb391d0545 1263 lcd.cls();
slorm 0:31bb391d0545 1264 }
slorm 0:31bb391d0545 1265 if ((comp5==0)&&(alarma5==1))
slorm 0:31bb391d0545 1266 {
slorm 0:31bb391d0545 1267 alarma5=0;
slorm 0:31bb391d0545 1268 Lugar=2;
slorm 0:31bb391d0545 1269 pc.printf("Oprimio 5\n");
slorm 0:31bb391d0545 1270 lcd.cls();
slorm 0:31bb391d0545 1271 lcd.printf("Alarma 5: off");
slorm 0:31bb391d0545 1272 wait(2);
slorm 0:31bb391d0545 1273 lcd.cls();
slorm 0:31bb391d0545 1274 }
slorm 0:31bb391d0545 1275 if ((comp6==0)&&(alarma6==1))
slorm 0:31bb391d0545 1276 {
slorm 0:31bb391d0545 1277 alarma6=0;
slorm 0:31bb391d0545 1278 Lugar=2;
slorm 0:31bb391d0545 1279 pc.printf("Oprimio 6\n");
slorm 0:31bb391d0545 1280 lcd.cls();
slorm 0:31bb391d0545 1281 lcd.printf("Alarma 6: off");
slorm 0:31bb391d0545 1282 wait(2);
slorm 0:31bb391d0545 1283 lcd.cls();
slorm 0:31bb391d0545 1284 }
slorm 0:31bb391d0545 1285 if ((comp7==0)&&(alarma7==1))
slorm 0:31bb391d0545 1286 {
slorm 0:31bb391d0545 1287 alarma7=0;
slorm 0:31bb391d0545 1288 Lugar=2;
slorm 0:31bb391d0545 1289 pc.printf("Oprimio 7\n");
slorm 0:31bb391d0545 1290 lcd.cls();
slorm 0:31bb391d0545 1291 lcd.printf("Alarma 7: off");
slorm 0:31bb391d0545 1292 wait(2);
slorm 0:31bb391d0545 1293 lcd.cls();
slorm 0:31bb391d0545 1294 }
slorm 0:31bb391d0545 1295 comp1=0;
slorm 0:31bb391d0545 1296 comp2=0;
slorm 0:31bb391d0545 1297 comp3=0;
slorm 0:31bb391d0545 1298 comp4=0;
slorm 0:31bb391d0545 1299 comp5=0;
slorm 0:31bb391d0545 1300 comp6=0;
slorm 0:31bb391d0545 1301 comp7=0;
slorm 0:31bb391d0545 1302 n=0;
slorm 0:31bb391d0545 1303 mode=1;
slorm 0:31bb391d0545 1304 }
slorm 0:31bb391d0545 1305
slorm 0:31bb391d0545 1306 }
slorm 0:31bb391d0545 1307 }
slorm 0:31bb391d0545 1308 }