proyectotecnicas / Mbed 2 deprecated final-completo

final

Dependencies:   TextLCD mbed

Fork of general by proyectotecnicas

main.cpp@8:5cfa4b38ddf1, 2015-12-14 (annotated)

Committer:
josedaparte
Date:
Mon Dec 14 15:53:14 2015 +0000
Revision:
8:5cfa4b38ddf1
Parent:
7:e27232481540
Child:
9:364316a55827
pwm;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
josedaparte 0:1334d6f26f42 1 #include "mbed.h"
josedaparte 0:1334d6f26f42 2 #include "TextLCD.h"
josedaparte 0:1334d6f26f42 3 #include "AnalogIn.h"
josedaparte 8:5cfa4b38ddf1 4 #include "Serial.h"
josedaparte 0:1334d6f26f42 5
josedaparte 5:c047b49f74e7 6 //clases
josedaparte 5:c047b49f74e7 7 Timer t;
josedaparte 0:1334d6f26f42 8 Serial pc(USBTX, USBRX);
josedaparte 0:1334d6f26f42 9 TextLCD lcd(PTD3, PTA12, PTA4, PTA5, PTC8, PTC9, TextLCD::LCD16x2);
josedaparte 0:1334d6f26f42 10
josedaparte 5:c047b49f74e7 11 //entradas
josedaparte 5:c047b49f74e7 12 DigitalIn key1(PTE31), key4(PTE17), key2(PTE19), key3(PTE18);
josedaparte 1:9ab0f526b7a7 13 InterruptIn Enable(PTA13);
josedaparte 8:5cfa4b38ddf1 14 AnalogIn externo(PTC2),interno(PTB3), presionin(PTB2), pident(PTB1);
josedaparte 8:5cfa4b38ddf1 15 AnalogOut vref(PTE30);
josedaparte 5:c047b49f74e7 16 PwmOut pwmsal(PTD2);
josedaparte 0:1334d6f26f42 17
josedaparte 5:c047b49f74e7 18 //declaracion de variables
josedaparte 5:c047b49f74e7 19 char tipo, modo = 'M';
josedaparte 8:5cfa4b38ddf1 20 float tinterno, texterno, presion, casexterno, casinterno, caspresion, valorpwm, valorpid, vrefe = 1;
josedaparte 8:5cfa4b38ddf1 21 float Tres=0, optimo=0;
josedaparte 5:c047b49f74e7 22 int i = 0, j = 0, sel = 1, hora=0, min=0, seg=0, horain = 8, minin = 0, horafin = 22, minfin = 0, temp = 26;
josedaparte 5:c047b49f74e7 23 int hh1, hh0, mm0, mm1, B1, B2, B3, B4, num, tempauto = 0, tipobanio = 0, pdig, sdig, tempmanual = 40, set = 0;
josedaparte 0:1334d6f26f42 24 void menu();
josedaparte 0:1334d6f26f42 25 void selec();
josedaparte 4:96c3f113f0b0 26 void func();
josedaparte 8:5cfa4b38ddf1 27 //recibe tension de referencia cambiar por que reciba la de el teclado o del externo
josedaparte 8:5cfa4b38ddf1 28 void modotemp()
josedaparte 8:5cfa4b38ddf1 29 {
josedaparte 8:5cfa4b38ddf1 30 if (modo == 'A') {
josedaparte 8:5cfa4b38ddf1 31 switch (tempauto) {
josedaparte 8:5cfa4b38ddf1 32
josedaparte 8:5cfa4b38ddf1 33 case 0:
josedaparte 8:5cfa4b38ddf1 34 if ((hora > horain||(hora == horain && min >= minin)) && ( hora < horafin ||(hora == horafin && min <= minfin))) {
josedaparte 8:5cfa4b38ddf1 35 optimo= -(11/10*texterno)+50;
josedaparte 8:5cfa4b38ddf1 36 if (optimo > 25 && optimo < 65) {
josedaparte 8:5cfa4b38ddf1 37 Tres = optimo;
josedaparte 8:5cfa4b38ddf1 38 } else {
josedaparte 8:5cfa4b38ddf1 39 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 40 }
josedaparte 8:5cfa4b38ddf1 41 } else {
josedaparte 8:5cfa4b38ddf1 42 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 43 }
josedaparte 8:5cfa4b38ddf1 44 break;
josedaparte 8:5cfa4b38ddf1 45 case 1:
josedaparte 8:5cfa4b38ddf1 46 if ((hora > horain||(hora == horain && min >= minin)) && ( hora < horafin ||(hora == horafin && min <= minfin))) {
josedaparte 8:5cfa4b38ddf1 47 optimo= -(11/10*texterno)+55;
josedaparte 8:5cfa4b38ddf1 48 if (optimo > 25 && optimo < 65) {
josedaparte 8:5cfa4b38ddf1 49 Tres = optimo;
josedaparte 8:5cfa4b38ddf1 50 } else {
josedaparte 8:5cfa4b38ddf1 51 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 52 }
josedaparte 8:5cfa4b38ddf1 53 } else {
josedaparte 8:5cfa4b38ddf1 54 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 55 }
josedaparte 8:5cfa4b38ddf1 56 break;
josedaparte 8:5cfa4b38ddf1 57 case 2:
josedaparte 8:5cfa4b38ddf1 58 if ((hora > horain||(hora == horain && min >= minin)) && ( hora < horafin ||(hora == horafin && min <= minfin))) {
josedaparte 8:5cfa4b38ddf1 59 optimo= -(11/10*texterno)+65;
josedaparte 8:5cfa4b38ddf1 60 if (optimo > 25 && optimo < 65 ) {
josedaparte 8:5cfa4b38ddf1 61 Tres = optimo;
josedaparte 8:5cfa4b38ddf1 62
josedaparte 8:5cfa4b38ddf1 63 } else {
josedaparte 8:5cfa4b38ddf1 64 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 65 }
josedaparte 8:5cfa4b38ddf1 66 } else {
josedaparte 8:5cfa4b38ddf1 67 Tres = tinterno;
josedaparte 8:5cfa4b38ddf1 68 }
josedaparte 8:5cfa4b38ddf1 69 break;
josedaparte 8:5cfa4b38ddf1 70 }
josedaparte 8:5cfa4b38ddf1 71 }
josedaparte 8:5cfa4b38ddf1 72 if (modo == 'M') {
josedaparte 8:5cfa4b38ddf1 73 Tres = tempmanual;
josedaparte 8:5cfa4b38ddf1 74 }
josedaparte 8:5cfa4b38ddf1 75 vrefe = ((Tres * 8 / 100) - 2) / 3.3;
josedaparte 8:5cfa4b38ddf1 76 }
josedaparte 8:5cfa4b38ddf1 77 //funcion del pwm
josedaparte 8:5cfa4b38ddf1 78
josedaparte 8:5cfa4b38ddf1 79 void pwm()
josedaparte 8:5cfa4b38ddf1 80 {
josedaparte 8:5cfa4b38ddf1 81 if(vrefe <= 1 && vrefe >= 0) {
josedaparte 8:5cfa4b38ddf1 82 vref.write(vrefe);
josedaparte 8:5cfa4b38ddf1 83 }
josedaparte 8:5cfa4b38ddf1 84 valorpid = pident.read() * 3.3;
josedaparte 8:5cfa4b38ddf1 85 if(valorpid >1)
josedaparte 8:5cfa4b38ddf1 86 pwmsal.write(1);
josedaparte 8:5cfa4b38ddf1 87 else if(valorpid <= 1 && valorpid >= 0.6) {
josedaparte 8:5cfa4b38ddf1 88 valorpwm = 2.5 * valorpid - 1.5;
josedaparte 8:5cfa4b38ddf1 89 pwmsal.write(valorpwm);
josedaparte 8:5cfa4b38ddf1 90 } else
josedaparte 8:5cfa4b38ddf1 91 pwmsal.write(0);
josedaparte 8:5cfa4b38ddf1 92 }
josedaparte 4:96c3f113f0b0 93
josedaparte 5:c047b49f74e7 94 //funcion de set de hora
josedaparte 5:c047b49f74e7 95 void sethora()
josedaparte 5:c047b49f74e7 96 {
josedaparte 5:c047b49f74e7 97 if(i == 0) { //set de primer digito hora
josedaparte 5:c047b49f74e7 98 if(num > 2) {
josedaparte 5:c047b49f74e7 99 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 100 lcd.printf("valor invalido");
josedaparte 5:c047b49f74e7 101 wait(.7);
josedaparte 5:c047b49f74e7 102 func();
josedaparte 5:c047b49f74e7 103 } else {
josedaparte 5:c047b49f74e7 104 hh1 = num;
josedaparte 5:c047b49f74e7 105 lcd.cls();
josedaparte 5:c047b49f74e7 106 lcd.printf("%dx:xx",hh1);
josedaparte 5:c047b49f74e7 107 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 108 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 109 wait(.7);
josedaparte 5:c047b49f74e7 110 i++;
josedaparte 5:c047b49f74e7 111 }
josedaparte 5:c047b49f74e7 112 } else //fin de set 1er digito hora ok
josedaparte 5:c047b49f74e7 113 if(i == 1) {
josedaparte 5:c047b49f74e7 114 pc.printf("aca ingresaria 2 dig hora\n\r"); //inicio 2do digito hora
josedaparte 5:c047b49f74e7 115 if(hh1 == 2 && num > 4) {
josedaparte 5:c047b49f74e7 116 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 117 lcd.printf("valor invalido");
josedaparte 5:c047b49f74e7 118 wait(.7);
josedaparte 5:c047b49f74e7 119 func();
josedaparte 5:c047b49f74e7 120 } else {
josedaparte 5:c047b49f74e7 121 hh0 = num;
josedaparte 5:c047b49f74e7 122 lcd.cls();
josedaparte 5:c047b49f74e7 123 lcd.printf("%d%d:xx",hh1,hh0);
josedaparte 5:c047b49f74e7 124 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 125 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 126 wait(.7);
josedaparte 5:c047b49f74e7 127 i++;
josedaparte 5:c047b49f74e7 128 }
josedaparte 5:c047b49f74e7 129 } else //fin 2do digito hora
josedaparte 5:c047b49f74e7 130 if(i == 2) {
josedaparte 5:c047b49f74e7 131 pc.printf("aca ingresaria 1 dig seg\n\r"); //inicio 1er digito minuto
josedaparte 5:c047b49f74e7 132 if(num > 6) {
josedaparte 5:c047b49f74e7 133 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 134 lcd.printf("valor invalido");
josedaparte 5:c047b49f74e7 135 wait(.7);
josedaparte 5:c047b49f74e7 136 func();
josedaparte 5:c047b49f74e7 137 } else {
josedaparte 5:c047b49f74e7 138 mm1 = num;
josedaparte 5:c047b49f74e7 139 lcd.cls();
josedaparte 5:c047b49f74e7 140 lcd.printf("%d%d:%dx",hh1,hh0,mm1);
josedaparte 5:c047b49f74e7 141 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 142 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 143 wait(.7);
josedaparte 5:c047b49f74e7 144 i++;
josedaparte 5:c047b49f74e7 145 }
josedaparte 5:c047b49f74e7 146 } else //fin 2do digito minuto
josedaparte 5:c047b49f74e7 147 if(i == 3) {
josedaparte 5:c047b49f74e7 148 pc.printf("aca ingresaria 2 dig seg\n\r"); //inicio 2do digito minuto
josedaparte 5:c047b49f74e7 149 if(mm1 == 6) {
josedaparte 5:c047b49f74e7 150 mm0 = 0;
josedaparte 5:c047b49f74e7 151 } else {
josedaparte 5:c047b49f74e7 152 mm0 = num;
josedaparte 5:c047b49f74e7 153 }
josedaparte 5:c047b49f74e7 154 lcd.cls();
josedaparte 5:c047b49f74e7 155 lcd.printf("%d%d:%d%d",hh1,hh0,mm1,mm0);
josedaparte 5:c047b49f74e7 156 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 157 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 158 i++;
josedaparte 5:c047b49f74e7 159 } //fin 2do digito minuto
josedaparte 5:c047b49f74e7 160 }
josedaparte 5:c047b49f74e7 161 // fin funcion set de hora
josedaparte 5:c047b49f74e7 162
josedaparte 5:c047b49f74e7 163 //funcion que imprime la hora
josedaparte 5:c047b49f74e7 164 void imprimehora()
josedaparte 5:c047b49f74e7 165 {
josedaparte 5:c047b49f74e7 166 lcd.locate(11,1);
josedaparte 5:c047b49f74e7 167 if(min < 10 && hora >= 10)
josedaparte 3:ef1eaeaf5c4e 168 lcd.printf("%2i:0%i", hora, min);
josedaparte 5:c047b49f74e7 169 if(hora < 10 && min >= 10)
josedaparte 3:ef1eaeaf5c4e 170 lcd.printf("0%i:%2i", hora, min);
josedaparte 5:c047b49f74e7 171 if(hora < 10 && min < 10)
josedaparte 3:ef1eaeaf5c4e 172 lcd.printf("0%i:0%i", hora, min);
josedaparte 5:c047b49f74e7 173 if(hora >= 10 && min >= 10)
josedaparte 3:ef1eaeaf5c4e 174 lcd.printf("%i:%i", hora, min);
josedaparte 5:c047b49f74e7 175 }
josedaparte 0:1334d6f26f42 176
josedaparte 5:c047b49f74e7 177 //lectura de teclado y navegacion por menu
josedaparte 0:1334d6f26f42 178 void func()
josedaparte 0:1334d6f26f42 179 {
josedaparte 0:1334d6f26f42 180 B1 = key1.read();
josedaparte 0:1334d6f26f42 181 B2 = key2.read();
josedaparte 0:1334d6f26f42 182 B3 = key3.read();
josedaparte 0:1334d6f26f42 183 B4 = key4.read();
josedaparte 0:1334d6f26f42 184 num = 2*2*2*B1 + 2*2*B2 + 2*B3 + B4;
josedaparte 2:a3cc9101e1c3 185 pc.printf("llama a func\n\r");
josedaparte 2:a3cc9101e1c3 186 if(num == 10) {
josedaparte 2:a3cc9101e1c3 187 set = 0;
josedaparte 0:1334d6f26f42 188 menu();
josedaparte 2:a3cc9101e1c3 189 } else if(num == 11) {
josedaparte 2:a3cc9101e1c3 190 set = 0;
josedaparte 2:a3cc9101e1c3 191 selec();
josedaparte 2:a3cc9101e1c3 192 } else if(num != 10 && num != 11) {
josedaparte 0:1334d6f26f42 193
josedaparte 2:a3cc9101e1c3 194 pc.printf("antes del case\n\r");
josedaparte 2:a3cc9101e1c3 195 switch(set) {
josedaparte 2:a3cc9101e1c3 196 case 0:
josedaparte 2:a3cc9101e1c3 197 pc.printf("case 0");
josedaparte 2:a3cc9101e1c3 198 break;
josedaparte 5:c047b49f74e7 199 case 1: //seteo hora
josedaparte 5:c047b49f74e7 200 sethora();
josedaparte 5:c047b49f74e7 201 if(i == 4) { //pasa la hora al reloj
josedaparte 5:c047b49f74e7 202 hora = (hh1 * 10) + hh0;
josedaparte 5:c047b49f74e7 203 min = (mm1 * 10) + mm0;
josedaparte 5:c047b49f74e7 204 hh0 = hh1 = mm1 = mm0 = 0;
josedaparte 5:c047b49f74e7 205 t.start();
josedaparte 5:c047b49f74e7 206 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 207 lcd.printf("reloj ");
josedaparte 5:c047b49f74e7 208 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 209 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 210 i = 0;
josedaparte 5:c047b49f74e7 211 }
josedaparte 5:c047b49f74e7 212 break; //fin pasa hora al reloj
josedaparte 2:a3cc9101e1c3 213 case 2:
josedaparte 5:c047b49f74e7 214 pc.printf("ingreso temperaturas de auto\n\r"); //set temperaturas auto
josedaparte 3:ef1eaeaf5c4e 215 if(num == 0 || num == 1 || num == 2) {
josedaparte 3:ef1eaeaf5c4e 216 tempauto = num;
josedaparte 3:ef1eaeaf5c4e 217 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 218 if(num == 0)
josedaparte 3:ef1eaeaf5c4e 219 lcd.printf("tipo frio ");
josedaparte 3:ef1eaeaf5c4e 220 else if(num == 1)
josedaparte 3:ef1eaeaf5c4e 221 lcd.printf("tipo normal ");
josedaparte 5:c047b49f74e7 222 else
josedaparte 5:c047b49f74e7 223 lcd.printf("tipo caliente");
josedaparte 3:ef1eaeaf5c4e 224 wait(1);
josedaparte 3:ef1eaeaf5c4e 225 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 226 lcd.printf("temperatura");
josedaparte 3:ef1eaeaf5c4e 227 set = 0;
josedaparte 3:ef1eaeaf5c4e 228 } else {
josedaparte 3:ef1eaeaf5c4e 229 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 230 lcd.printf("valor invalido");
josedaparte 3:ef1eaeaf5c4e 231 wait(1);
josedaparte 3:ef1eaeaf5c4e 232 lcd.printf("tipo banio");
josedaparte 3:ef1eaeaf5c4e 233 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 234 }
josedaparte 2:a3cc9101e1c3 235 break;
josedaparte 5:c047b49f74e7 236 case 3: //tipo de baño
josedaparte 2:a3cc9101e1c3 237 pc.printf("ingreso tipo banio %d\n\r",num);
josedaparte 2:a3cc9101e1c3 238 if(num == 0 || num == 1) {
josedaparte 2:a3cc9101e1c3 239 tipobanio = num;
josedaparte 2:a3cc9101e1c3 240 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 241 if(num == 0)
josedaparte 3:ef1eaeaf5c4e 242 lcd.printf("banio rapido ");
josedaparte 2:a3cc9101e1c3 243 else
josedaparte 3:ef1eaeaf5c4e 244 lcd.printf("banio normal ");
josedaparte 2:a3cc9101e1c3 245 wait(1);
josedaparte 2:a3cc9101e1c3 246 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 247 lcd.printf("tipo banio ");
josedaparte 2:a3cc9101e1c3 248 pc.printf("%.1d\n\r", tipobanio);
josedaparte 2:a3cc9101e1c3 249 set = 0;
josedaparte 2:a3cc9101e1c3 250 } else {
josedaparte 2:a3cc9101e1c3 251 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 252 lcd.printf("valor invalido");
josedaparte 2:a3cc9101e1c3 253 wait(1);
josedaparte 2:a3cc9101e1c3 254 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 255 lcd.printf("tipo banio ");
josedaparte 2:a3cc9101e1c3 256 }
josedaparte 2:a3cc9101e1c3 257 break;
josedaparte 5:c047b49f74e7 258 case 4: //set de horarios
josedaparte 2:a3cc9101e1c3 259 pc.printf("case 4\n\r");
josedaparte 5:c047b49f74e7 260 sethora();
josedaparte 5:c047b49f74e7 261 if(i == 4 && j == 0) { //pasa la hora al reloj
josedaparte 5:c047b49f74e7 262 horain = (hh1 * 10) + hh0;
josedaparte 5:c047b49f74e7 263 minin = (mm1 * 10) + mm0;
josedaparte 5:c047b49f74e7 264 hh0 = hh1 = mm1 = mm0 = 0;
josedaparte 5:c047b49f74e7 265 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 266 lcd.printf("horario ");
josedaparte 5:c047b49f74e7 267 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 268 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 269 pc.printf("hora de inicio %d:%d\n\r",horain,minin);
josedaparte 5:c047b49f74e7 270 pc.printf("hora de fin %d:%d\n\r",horafin,minfin);
josedaparte 5:c047b49f74e7 271 i = 0;
josedaparte 5:c047b49f74e7 272 j = 1;
josedaparte 5:c047b49f74e7 273 }
josedaparte 5:c047b49f74e7 274 if(i == 4 && j == 1) { //pasa la hora al reloj
josedaparte 5:c047b49f74e7 275 horafin = (hh1 * 10) + hh0;
josedaparte 5:c047b49f74e7 276 minfin = (mm1 * 10) + mm0;
josedaparte 5:c047b49f74e7 277 hh0 = hh1 = mm1 = mm0 = 0;
josedaparte 5:c047b49f74e7 278 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 279 lcd.printf("horario ");
josedaparte 5:c047b49f74e7 280 lcd.locate(0,1);
josedaparte 5:c047b49f74e7 281 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 5:c047b49f74e7 282 pc.printf("hora de inicio %d:%d\n\r",horain,minin);
josedaparte 5:c047b49f74e7 283 pc.printf("hora de fin %d:%d\n\r",horafin,minfin);
josedaparte 5:c047b49f74e7 284 i = 0;
josedaparte 5:c047b49f74e7 285 j = 0;
josedaparte 5:c047b49f74e7 286 }
josedaparte 2:a3cc9101e1c3 287 break;
josedaparte 4:96c3f113f0b0 288 case 5: //set temperatura manual
josedaparte 2:a3cc9101e1c3 289 if(i == 0) {
josedaparte 2:a3cc9101e1c3 290 pdig = num;
josedaparte 2:a3cc9101e1c3 291 pc.printf("%.1d\n\r", pdig);
josedaparte 2:a3cc9101e1c3 292 } else if(i == 1) {
josedaparte 2:a3cc9101e1c3 293 sdig = num;
josedaparte 2:a3cc9101e1c3 294 pc.printf("%.1d\n\r", sdig);
josedaparte 5:c047b49f74e7 295 tempmanual = (pdig * 10) + sdig;
josedaparte 8:5cfa4b38ddf1 296 if(tempmanual >= 65) {
josedaparte 7:e27232481540 297 tempmanual = 65;}
josedaparte 8:5cfa4b38ddf1 298 if(tempmanual <= 25){
josedaparte 8:5cfa4b38ddf1 299 tempmanual = 25;}
josedaparte 5:c047b49f74e7 300 pc.printf("%.1d\n\r", tempmanual);
josedaparte 3:ef1eaeaf5c4e 301 imprimehora();
josedaparte 3:ef1eaeaf5c4e 302 lcd.locate(0,0);
josedaparte 5:c047b49f74e7 303 lcd.printf("temperatura a %d",tempmanual);
josedaparte 3:ef1eaeaf5c4e 304 wait(1);
josedaparte 3:ef1eaeaf5c4e 305 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 306 lcd.printf("temperatura ");
josedaparte 2:a3cc9101e1c3 307 }
josedaparte 2:a3cc9101e1c3 308 i++;
josedaparte 2:a3cc9101e1c3 309 if(i == 2) {
josedaparte 2:a3cc9101e1c3 310 i = 0;
josedaparte 2:a3cc9101e1c3 311 }
josedaparte 2:a3cc9101e1c3 312 break;
josedaparte 4:96c3f113f0b0 313 case 6: //tipo de banio manual
josedaparte 2:a3cc9101e1c3 314 pc.printf("ingreso tipo banio %d\n\r",num);
josedaparte 2:a3cc9101e1c3 315 if(num == 0 || num == 1) {
josedaparte 2:a3cc9101e1c3 316 tipobanio = num;
josedaparte 2:a3cc9101e1c3 317 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 318 if(num == 0)
josedaparte 3:ef1eaeaf5c4e 319 lcd.printf("banio rapido ");
josedaparte 2:a3cc9101e1c3 320 else
josedaparte 3:ef1eaeaf5c4e 321 lcd.printf("banio normal ");
josedaparte 2:a3cc9101e1c3 322 wait(1);
josedaparte 2:a3cc9101e1c3 323 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 324 lcd.printf("tipo banio ");
josedaparte 2:a3cc9101e1c3 325 pc.printf("%.1d\n\r", tipobanio);
josedaparte 2:a3cc9101e1c3 326 set = 0;
josedaparte 2:a3cc9101e1c3 327 } else {
josedaparte 2:a3cc9101e1c3 328 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 329 lcd.printf("valor invalido");
josedaparte 2:a3cc9101e1c3 330 wait(1);
josedaparte 2:a3cc9101e1c3 331 lcd.cls();
josedaparte 3:ef1eaeaf5c4e 332 lcd.printf("tipo banio ");
josedaparte 2:a3cc9101e1c3 333 }
josedaparte 2:a3cc9101e1c3 334 break;
josedaparte 2:a3cc9101e1c3 335 }
josedaparte 2:a3cc9101e1c3 336 pc.printf("salgo case\n\r");
josedaparte 3:ef1eaeaf5c4e 337 pc.printf("%d",i);
josedaparte 2:a3cc9101e1c3 338 }
josedaparte 2:a3cc9101e1c3 339 }
josedaparte 2:a3cc9101e1c3 340
josedaparte 5:c047b49f74e7 341 //impresion de menu
josedaparte 2:a3cc9101e1c3 342 void menu ()
josedaparte 2:a3cc9101e1c3 343 {
josedaparte 0:1334d6f26f42 344 lcd.cls();
josedaparte 5:c047b49f74e7 345 imprimehora();
josedaparte 2:a3cc9101e1c3 346 switch (sel) {
josedaparte 2:a3cc9101e1c3 347 case 1:
josedaparte 0:1334d6f26f42 348 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 349 lcd.printf("auto");
josedaparte 0:1334d6f26f42 350 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 351 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 352 sel = 2;
josedaparte 0:1334d6f26f42 353 break;
josedaparte 0:1334d6f26f42 354 case 2:
josedaparte 0:1334d6f26f42 355 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 356 lcd.printf("manual");
josedaparte 0:1334d6f26f42 357 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 358 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 359 sel = 3;
josedaparte 0:1334d6f26f42 360 break;
josedaparte 2:a3cc9101e1c3 361 case 3:
josedaparte 0:1334d6f26f42 362 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 363 lcd.printf("reloj");
josedaparte 0:1334d6f26f42 364 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 365 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 366 sel = 1;
josedaparte 0:1334d6f26f42 367 break;
josedaparte 2:a3cc9101e1c3 368 case 4:
josedaparte 0:1334d6f26f42 369 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 370 lcd.printf("temperatura");
josedaparte 0:1334d6f26f42 371 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 372 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 373 sel = 5;
josedaparte 0:1334d6f26f42 374 break;
josedaparte 0:1334d6f26f42 375 case 5:
josedaparte 0:1334d6f26f42 376 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 377 lcd.printf("tipo banio ");
josedaparte 0:1334d6f26f42 378 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 379 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 380 sel = 6;
josedaparte 0:1334d6f26f42 381 break;
josedaparte 2:a3cc9101e1c3 382 case 6:
josedaparte 0:1334d6f26f42 383 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 384 lcd.printf("horarios");
josedaparte 0:1334d6f26f42 385 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 386 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 387 sel = 9;
josedaparte 0:1334d6f26f42 388 break;
josedaparte 2:a3cc9101e1c3 389 case 7:
josedaparte 0:1334d6f26f42 390 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 391 lcd.printf("temperatura");
josedaparte 0:1334d6f26f42 392 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 393 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 394 sel = 8;
josedaparte 0:1334d6f26f42 395 break;
josedaparte 2:a3cc9101e1c3 396 case 8:
josedaparte 0:1334d6f26f42 397 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 398 lcd.printf("tipo banio ");
josedaparte 0:1334d6f26f42 399 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 400 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 401 sel = 10;
josedaparte 0:1334d6f26f42 402 break;
josedaparte 2:a3cc9101e1c3 403 case 9:
josedaparte 0:1334d6f26f42 404 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 405 lcd.printf("salir");
josedaparte 0:1334d6f26f42 406 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 407 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 408 sel = 4;
josedaparte 0:1334d6f26f42 409 break;
josedaparte 0:1334d6f26f42 410 case 10:
josedaparte 0:1334d6f26f42 411 lcd.locate(0,0);
josedaparte 0:1334d6f26f42 412 lcd.printf("salir");
josedaparte 0:1334d6f26f42 413 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 414 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 0:1334d6f26f42 415 sel = 7;
josedaparte 2:a3cc9101e1c3 416 break;
josedaparte 2:a3cc9101e1c3 417 }
josedaparte 0:1334d6f26f42 418 }
josedaparte 0:1334d6f26f42 419
josedaparte 2:a3cc9101e1c3 420 void selec()
josedaparte 2:a3cc9101e1c3 421 {
josedaparte 2:a3cc9101e1c3 422 switch (sel) {
josedaparte 0:1334d6f26f42 423 case 2:
josedaparte 2:a3cc9101e1c3 424 modo = 'A';
josedaparte 0:1334d6f26f42 425 sel = 4;
josedaparte 0:1334d6f26f42 426 menu();
josedaparte 0:1334d6f26f42 427 break;
josedaparte 0:1334d6f26f42 428 case 3:
josedaparte 0:1334d6f26f42 429 modo = 'M';
josedaparte 0:1334d6f26f42 430 sel = 7;
josedaparte 0:1334d6f26f42 431 menu();
josedaparte 0:1334d6f26f42 432 break;
josedaparte 0:1334d6f26f42 433 case 1:
josedaparte 0:1334d6f26f42 434 pc.printf("aca ingresaria la hora\r\n");
josedaparte 2:a3cc9101e1c3 435 set = 1;
josedaparte 0:1334d6f26f42 436 break;
josedaparte 0:1334d6f26f42 437 case 5:
josedaparte 0:1334d6f26f42 438 pc.printf("aca ingresaria la temperatura\r\n");
josedaparte 3:ef1eaeaf5c4e 439 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 440 lcd.printf(" 0_F 1_N 2_C");
josedaparte 2:a3cc9101e1c3 441 set = 2;
josedaparte 0:1334d6f26f42 442 break;
josedaparte 0:1334d6f26f42 443 case 6:
josedaparte 0:1334d6f26f42 444 pc.printf("aca ingresaria el tipo de banio\r\n");
josedaparte 3:ef1eaeaf5c4e 445 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 446 lcd.printf(" 0_rap 1_norm");
josedaparte 2:a3cc9101e1c3 447 set = 3;
josedaparte 0:1334d6f26f42 448 break;
josedaparte 0:1334d6f26f42 449 case 4:
josedaparte 0:1334d6f26f42 450 sel = 1;
josedaparte 5:c047b49f74e7 451 menu(); //salida1
josedaparte 0:1334d6f26f42 452 break;
josedaparte 0:1334d6f26f42 453 case 8:
josedaparte 0:1334d6f26f42 454 pc.printf("aca ingresaria la temperatura2\r\n");
josedaparte 3:ef1eaeaf5c4e 455 lcd.locate(0,0);
josedaparte 3:ef1eaeaf5c4e 456 lcd.printf("ingrese temperat");
josedaparte 2:a3cc9101e1c3 457 set = 5;
josedaparte 0:1334d6f26f42 458 break;
josedaparte 0:1334d6f26f42 459 case 7:
josedaparte 0:1334d6f26f42 460 sel = 2;
josedaparte 0:1334d6f26f42 461 menu();
josedaparte 0:1334d6f26f42 462 break;
josedaparte 0:1334d6f26f42 463 case 9:
josedaparte 0:1334d6f26f42 464 pc.printf("aca ingresaria el horario\r\n");
josedaparte 2:a3cc9101e1c3 465 set = 4;
josedaparte 0:1334d6f26f42 466 break;
josedaparte 0:1334d6f26f42 467 case 10:
josedaparte 0:1334d6f26f42 468 pc.printf("aca ingresaria tipo banio\r\n");
josedaparte 3:ef1eaeaf5c4e 469 lcd.locate(0,0);
josedaparte 2:a3cc9101e1c3 470 lcd.printf(" 0_rap 1_norm");
josedaparte 2:a3cc9101e1c3 471 set = 6;
josedaparte 0:1334d6f26f42 472 break;
josedaparte 0:1334d6f26f42 473 }
josedaparte 2:a3cc9101e1c3 474 }
josedaparte 2:a3cc9101e1c3 475
josedaparte 5:c047b49f74e7 476 //programa principal
josedaparte 2:a3cc9101e1c3 477 int main()
josedaparte 2:a3cc9101e1c3 478 {
josedaparte 3:ef1eaeaf5c4e 479 t.start();
josedaparte 0:1334d6f26f42 480 pc.baud(115200);
josedaparte 1:9ab0f526b7a7 481 Enable.rise(&func);
josedaparte 6:eb50c82e7d93 482
josedaparte 2:a3cc9101e1c3 483 while(1) {
josedaparte 8:5cfa4b38ddf1 484 modotemp();
josedaparte 3:ef1eaeaf5c4e 485 //reloj
josedaparte 5:c047b49f74e7 486 seg = t.read();
josedaparte 5:c047b49f74e7 487 if(seg == 60) {
josedaparte 3:ef1eaeaf5c4e 488 seg=0;
josedaparte 3:ef1eaeaf5c4e 489 t.reset();
josedaparte 5:c047b49f74e7 490 min++;
josedaparte 3:ef1eaeaf5c4e 491 }
josedaparte 5:c047b49f74e7 492 if(min==60) {
josedaparte 3:ef1eaeaf5c4e 493 min=0;
josedaparte 5:c047b49f74e7 494 hora++;
josedaparte 5:c047b49f74e7 495 }
josedaparte 5:c047b49f74e7 496 if(hora==24) {
josedaparte 5:c047b49f74e7 497 hora=0;
josedaparte 3:ef1eaeaf5c4e 498 }
josedaparte 5:c047b49f74e7 499 imprimehora();
josedaparte 8:5cfa4b38ddf1 500
josedaparte 2:a3cc9101e1c3 501 //convierte voltaje a temperatura
josedaparte 0:1334d6f26f42 502 casexterno = externo.read() * 3.3;
josedaparte 2:a3cc9101e1c3 503 texterno = (casexterno + 0.2) * 100 / 5;
josedaparte 0:1334d6f26f42 504 casinterno = interno.read() * 3.3;
josedaparte 0:1334d6f26f42 505 tinterno = (casinterno + 2) * 100 / 8;
josedaparte 5:c047b49f74e7 506 //sensor de presion
josedaparte 5:c047b49f74e7 507 caspresion = presionin.read() * 3.3;
josedaparte 6:eb50c82e7d93 508 if(caspresion >= 2.34) {
josedaparte 6:eb50c82e7d93 509
josedaparte 6:eb50c82e7d93 510 }
josedaparte 6:eb50c82e7d93 511 if(caspresion >= 1.68 && caspresion <= 1.85) {
josedaparte 6:eb50c82e7d93 512
josedaparte 6:eb50c82e7d93 513 }
josedaparte 6:eb50c82e7d93 514 if(caspresion <= 1.03) {
josedaparte 6:eb50c82e7d93 515
josedaparte 6:eb50c82e7d93 516 }
josedaparte 2:a3cc9101e1c3 517
josedaparte 0:1334d6f26f42 518 lcd.locate(0,1);
josedaparte 3:ef1eaeaf5c4e 519 lcd.printf("%.0fC %.0fC %c ", texterno, tinterno, modo);
josedaparte 8:5cfa4b38ddf1 520 pwm();
josedaparte 2:a3cc9101e1c3 521 wait(1);
josedaparte 8:5cfa4b38ddf1 522 } //fin wile
josedaparte 0:1334d6f26f42 523 }