TareaDS3231-ADL - Tarea Reloj Ds3231

Users » dsuranr15 » Code » TareaDS3231-ADL

Daniel Uran / Mbed 2 deprecated TareaDS3231-ADL

Tarea Reloj Ds3231

Dependencies: mbed Debounced QEI ds3231 TextLCD Pulse1

main.cpp@0:6c5518885385, 2019-08-30 (annotated)

Committer:: dsuranr15
Date:: Fri Aug 30 14:05:20 2019 +0000
Revision:: 0:6c5518885385

Tarea Reloj Ds3231

Who changed what in which revision?

User	Revision	Line number	New contents of line
dsuranr15	0:6c5518885385	1
dsuranr15	0:6c5518885385	2	//Programa para la activacion de 6 alarmas.
dsuranr15	0:6c5518885385	3
dsuranr15	0:6c5518885385	4	#include "mbed.h"
dsuranr15	0:6c5518885385	5	#include "TextLCD.h"
dsuranr15	0:6c5518885385	6	#include "control.h" //libreria creada para el control
dsuranr15	0:6c5518885385	7	#include "control1.h"//libreria control con una modificacion
dsuranr15	0:6c5518885385	8	#include <Pulse1.h> // libreria pulsador
dsuranr15	0:6c5518885385	9	#include "DebouncedIn.h" //libreria para encoder
dsuranr15	0:6c5518885385	10	#include "QEI.h" //libreria para encoder
dsuranr15	0:6c5518885385	11	#include "ds3231.h" //libreria reloj
dsuranr15	0:6c5518885385	12
dsuranr15	0:6c5518885385	13	DigitalOut led1(LED1);
dsuranr15	0:6c5518885385	14	DigitalOut led2(LED2);
dsuranr15	0:6c5518885385	15
dsuranr15	0:6c5518885385	16
dsuranr15	0:6c5518885385	17	int p;
dsuranr15	0:6c5518885385	18	int con=0;
dsuranr15	0:6c5518885385	19	int m=0;
dsuranr15	0:6c5518885385	20	int pos;
dsuranr15	0:6c5518885385	21	int H=0;
dsuranr15	0:6c5518885385	22	int s=0;
dsuranr15	0:6c5518885385	23	int nu=0;
dsuranr15	0:6c5518885385	24	int al=0;
dsuranr15	0:6c5518885385	25	int m1=0;
dsuranr15	0:6c5518885385	26	int y=0;
dsuranr15	0:6c5518885385	27	int d=0;
dsuranr15	0:6c5518885385	28	int ALM1[10];
dsuranr15	0:6c5518885385	29	int ALM2[10];
dsuranr15	0:6c5518885385	30	int ALM3[10];
dsuranr15	0:6c5518885385	31	int ALM4[10];
dsuranr15	0:6c5518885385	32	int ALM5[10];
dsuranr15	0:6c5518885385	33	int ALM6[10];
dsuranr15	0:6c5518885385	34
dsuranr15	0:6c5518885385	35	int ALM_1[4];
dsuranr15	0:6c5518885385	36	int ALM_2[4];
dsuranr15	0:6c5518885385	37	int ALM_3[4];
dsuranr15	0:6c5518885385	38	int ALM_4[4];
dsuranr15	0:6c5518885385	39	int ALM_5[4];
dsuranr15	0:6c5518885385	40	int ALM_6[4];
dsuranr15	0:6c5518885385	41
dsuranr15	0:6c5518885385	42	int FEC1[10];
dsuranr15	0:6c5518885385	43	int FEC2[10];
dsuranr15	0:6c5518885385	44	int FEC3[10];
dsuranr15	0:6c5518885385	45	int FEC4[10];
dsuranr15	0:6c5518885385	46	int FEC5[10];
dsuranr15	0:6c5518885385	47	int FEC6[10];
dsuranr15	0:6c5518885385	48
dsuranr15	0:6c5518885385	49	int FEC_1[8];
dsuranr15	0:6c5518885385	50	int FEC_2[8];
dsuranr15	0:6c5518885385	51	int FEC_3[8];
dsuranr15	0:6c5518885385	52	int FEC_4[8];
dsuranr15	0:6c5518885385	53	int FEC_5[8];
dsuranr15	0:6c5518885385	54	int FEC_6[8];
dsuranr15	0:6c5518885385	55
dsuranr15	0:6c5518885385	56
dsuranr15	0:6c5518885385	57
dsuranr15	0:6c5518885385	58	char alm_1[4];
dsuranr15	0:6c5518885385	59	char alm_2[4];
dsuranr15	0:6c5518885385	60	char alm_3[4];
dsuranr15	0:6c5518885385	61	char alm_4[4];
dsuranr15	0:6c5518885385	62	char alm_5[4];
dsuranr15	0:6c5518885385	63	char alm_6[4];
dsuranr15	0:6c5518885385	64
dsuranr15	0:6c5518885385	65	char fec_1[8];
dsuranr15	0:6c5518885385	66	char fec_2[8];
dsuranr15	0:6c5518885385	67	char fec_3[8];
dsuranr15	0:6c5518885385	68	char fec_4[8];
dsuranr15	0:6c5518885385	69	char fec_5[8];
dsuranr15	0:6c5518885385	70	char fec_6[8];
dsuranr15	0:6c5518885385	71
dsuranr15	0:6c5518885385	72	char buffer[32];
dsuranr15	0:6c5518885385	73	char buffer1[32];
dsuranr15	0:6c5518885385	74	char HORA[32];
dsuranr15	0:6c5518885385	75	char FECHA[32];
dsuranr15	0:6c5518885385	76
dsuranr15	0:6c5518885385	77
dsuranr15	0:6c5518885385	78
dsuranr15	0:6c5518885385	79	TextLCD LCD(PTB8,PTB9, PTB10, PTB11, PTE2, PTE3); //Pines LCD
dsuranr15	0:6c5518885385	80	DebouncedIn button4(PTC12);// boton encoder
dsuranr15	0:6c5518885385	81	Ds3231 rtc(D14, D15); //reloj
dsuranr15	0:6c5518885385	82	QEI wheel (PTD7, PTD6, NC, 180); //encoder
dsuranr15	0:6c5518885385	83
dsuranr15	0:6c5518885385	84	void hora() //funcion creada para leer la hora del reloj
dsuranr15	0:6c5518885385	85	{
dsuranr15	0:6c5518885385	86
dsuranr15	0:6c5518885385	87
dsuranr15	0:6c5518885385	88	time_t epoch_time;
dsuranr15	0:6c5518885385	89	ds3231_cntl_stat_t rtc_control_status = {0,0};
dsuranr15	0:6c5518885385	90	rtc.set_cntl_stat_reg(rtc_control_status);
dsuranr15	0:6c5518885385	91
dsuranr15	0:6c5518885385	92
dsuranr15	0:6c5518885385	93
dsuranr15	0:6c5518885385	94	epoch_time = rtc.get_epoch();
dsuranr15	0:6c5518885385	95	strftime(buffer, 32, "%H:%M:%S", localtime(&epoch_time)); // La hora se guarda en buffer y HORA para despues ser mostrada.
dsuranr15	0:6c5518885385	96	strftime(HORA, 32, "%H%M", localtime(&epoch_time));
dsuranr15	0:6c5518885385	97	LCD.cls();
dsuranr15	0:6c5518885385	98	LCD.locate(4,0);
dsuranr15	0:6c5518885385	99	LCD.printf("%s", buffer);
dsuranr15	0:6c5518885385	100
dsuranr15	0:6c5518885385	101	strftime(buffer1, 32, "%a %Y-%m-%d", localtime(&epoch_time));// La fecha se guarda en buffer y FECHA para despues ser mostrada.
dsuranr15	0:6c5518885385	102	strftime(FECHA, 32, "%Y%m%d", localtime(&epoch_time));
dsuranr15	0:6c5518885385	103
dsuranr15	0:6c5518885385	104	LCD.locate(1,1);
dsuranr15	0:6c5518885385	105	LCD.printf("%s", buffer1);
dsuranr15	0:6c5518885385	106	wait(1);
dsuranr15	0:6c5518885385	107
dsuranr15	0:6c5518885385	108
dsuranr15	0:6c5518885385	109
dsuranr15	0:6c5518885385	110
dsuranr15	0:6c5518885385	111
dsuranr15	0:6c5518885385	112
dsuranr15	0:6c5518885385	113	}
dsuranr15	0:6c5518885385	114
dsuranr15	0:6c5518885385	115
dsuranr15	0:6c5518885385	116
dsuranr15	0:6c5518885385	117
dsuranr15	0:6c5518885385	118
dsuranr15	0:6c5518885385	119
dsuranr15	0:6c5518885385	120	int main()
dsuranr15	0:6c5518885385	121	{
dsuranr15	0:6c5518885385	122
dsuranr15	0:6c5518885385	123	led1=0; // les iniciales de las alarmas
dsuranr15	0:6c5518885385	124	led2=1;
dsuranr15	0:6c5518885385	125
dsuranr15	0:6c5518885385	126
dsuranr15	0:6c5518885385	127
dsuranr15	0:6c5518885385	128
dsuranr15	0:6c5518885385	129	while(1) {
dsuranr15	0:6c5518885385	130
dsuranr15	0:6c5518885385	131
dsuranr15	0:6c5518885385	132
dsuranr15	0:6c5518885385	133	hora(); // se toma la hora de la funcion.
dsuranr15	0:6c5518885385	134	LCD.cls();
dsuranr15	0:6c5518885385	135	wheel.reset();
dsuranr15	0:6c5518885385	136
dsuranr15	0:6c5518885385	137	p=irda.read_high_us(4000); // se lee el irda
dsuranr15	0:6c5518885385	138
dsuranr15	0:6c5518885385	139
dsuranr15	0:6c5518885385	140	if((strncmp(HORA,alm_1,4)==0) && (strncmp(FECHA,fec_1,4)==0)&&(y==0) ) { // si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	141
dsuranr15	0:6c5518885385	142	LCD.cls();
dsuranr15	0:6c5518885385	143	LCD.printf("ALM_1_0N");
dsuranr15	0:6c5518885385	144	led2=0;
dsuranr15	0:6c5518885385	145	wait(5);
dsuranr15	0:6c5518885385	146	y=1;
dsuranr15	0:6c5518885385	147	led2=1;
dsuranr15	0:6c5518885385	148
dsuranr15	0:6c5518885385	149
dsuranr15	0:6c5518885385	150	}
dsuranr15	0:6c5518885385	151
dsuranr15	0:6c5518885385	152	if((strncmp(HORA,alm_2,4)==0) && (strncmp(FECHA,fec_2,4)==0)&&(y==0)) { // si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	153	LCD.cls();
dsuranr15	0:6c5518885385	154	LCD.printf("ALM_2_0N");
dsuranr15	0:6c5518885385	155	led2=0;
dsuranr15	0:6c5518885385	156	wait(5);
dsuranr15	0:6c5518885385	157	y=1;
dsuranr15	0:6c5518885385	158	led2=1;
dsuranr15	0:6c5518885385	159
dsuranr15	0:6c5518885385	160
dsuranr15	0:6c5518885385	161	}
dsuranr15	0:6c5518885385	162
dsuranr15	0:6c5518885385	163	if((strncmp(HORA,alm_3,4)==0) && (strncmp(FECHA,fec_3,4)==0)&&(y==0)) {// si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	164	LCD.cls();
dsuranr15	0:6c5518885385	165	LCD.printf("ALM_3_0N");
dsuranr15	0:6c5518885385	166	led2=0;
dsuranr15	0:6c5518885385	167	wait(5);
dsuranr15	0:6c5518885385	168	y=1;
dsuranr15	0:6c5518885385	169	led2=1;
dsuranr15	0:6c5518885385	170
dsuranr15	0:6c5518885385	171
dsuranr15	0:6c5518885385	172	}
dsuranr15	0:6c5518885385	173
dsuranr15	0:6c5518885385	174	if((strncmp(HORA,alm_4,4)==0) && (strncmp(FECHA,fec_4,4)==0)&&(y==0)) {// si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	175	LCD.cls();
dsuranr15	0:6c5518885385	176	LCD.printf("ALM_4_0FF");
dsuranr15	0:6c5518885385	177	led1=1;
dsuranr15	0:6c5518885385	178	wait(5);
dsuranr15	0:6c5518885385	179	y=1;
dsuranr15	0:6c5518885385	180	led1=0;
dsuranr15	0:6c5518885385	181
dsuranr15	0:6c5518885385	182
dsuranr15	0:6c5518885385	183	}
dsuranr15	0:6c5518885385	184
dsuranr15	0:6c5518885385	185	if((strncmp(HORA,alm_5,4)==0) && (strncmp(FECHA,fec_5,4)==0)&&(y==0)) {// si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	186	LCD.cls();
dsuranr15	0:6c5518885385	187	LCD.printf("ALM_5_0FF");
dsuranr15	0:6c5518885385	188	led1=1;
dsuranr15	0:6c5518885385	189	wait(5);
dsuranr15	0:6c5518885385	190	y=1;
dsuranr15	0:6c5518885385	191	led1=0;
dsuranr15	0:6c5518885385	192
dsuranr15	0:6c5518885385	193
dsuranr15	0:6c5518885385	194	}
dsuranr15	0:6c5518885385	195
dsuranr15	0:6c5518885385	196	if((strncmp(HORA,alm_6,4)==0) && (strncmp(FECHA,fec_6,4)==0)&&(y==0)) {// si la alarma es igual en hora y fecha se activa
dsuranr15	0:6c5518885385	197	LCD.cls();
dsuranr15	0:6c5518885385	198	LCD.printf("ALM_6_0FF");
dsuranr15	0:6c5518885385	199	led1=1;
dsuranr15	0:6c5518885385	200	wait(5);
dsuranr15	0:6c5518885385	201	y=1;
dsuranr15	0:6c5518885385	202	led1=0;
dsuranr15	0:6c5518885385	203
dsuranr15	0:6c5518885385	204
dsuranr15	0:6c5518885385	205	}
dsuranr15	0:6c5518885385	206
dsuranr15	0:6c5518885385	207
dsuranr15	0:6c5518885385	208	///////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	209	//ENCODER
dsuranr15	0:6c5518885385	210	//////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	211
dsuranr15	0:6c5518885385	212	// esta parte del codigo se utiliza para realizar la lectura inicial del enconder, una vez se presiona el boton entra en modo encoder.
dsuranr15	0:6c5518885385	213	if(button4.falling()) {
dsuranr15	0:6c5518885385	214	con++;
dsuranr15	0:6c5518885385	215
dsuranr15	0:6c5518885385	216	while(con==1) {
dsuranr15	0:6c5518885385	217	if(button4.falling()) {
dsuranr15	0:6c5518885385	218	con++;
dsuranr15	0:6c5518885385	219	wheel.reset();
dsuranr15	0:6c5518885385	220	}
dsuranr15	0:6c5518885385	221
dsuranr15	0:6c5518885385	222	m=wheel.getPulses();// se lee la posicion del encoder
dsuranr15	0:6c5518885385	223
dsuranr15	0:6c5518885385	224	if(m>3) {
dsuranr15	0:6c5518885385	225	wheel.reset();
dsuranr15	0:6c5518885385	226	m=3;
dsuranr15	0:6c5518885385	227	}
dsuranr15	0:6c5518885385	228	if(m<0) {
dsuranr15	0:6c5518885385	229	wheel.reset();
dsuranr15	0:6c5518885385	230	m=0;
dsuranr15	0:6c5518885385	231	}
dsuranr15	0:6c5518885385	232
dsuranr15	0:6c5518885385	233	LCD.cls();
dsuranr15	0:6c5518885385	234	LCD.locate(0,0);
dsuranr15	0:6c5518885385	235	LCD.printf("1-H0RA");
dsuranr15	0:6c5518885385	236	LCD.locate(8,0);
dsuranr15	0:6c5518885385	237	LCD.printf("2-FECHA");
dsuranr15	0:6c5518885385	238	LCD.locate(0,1);
dsuranr15	0:6c5518885385	239	LCD.printf("3-ALARMA");
dsuranr15	0:6c5518885385	240
dsuranr15	0:6c5518885385	241	LCD.locate(13,1);
dsuranr15	0:6c5518885385	242	LCD.printf("%i",m);
dsuranr15	0:6c5518885385	243	wait(0.5);
dsuranr15	0:6c5518885385	244	if(button4.falling()) { // al pulsar el encoder se entra en el siguiente menu
dsuranr15	0:6c5518885385	245	pos=m;
dsuranr15	0:6c5518885385	246	con++;
dsuranr15	0:6c5518885385	247	}
dsuranr15	0:6c5518885385	248
dsuranr15	0:6c5518885385	249	}
dsuranr15	0:6c5518885385	250	con=0;
dsuranr15	0:6c5518885385	251
dsuranr15	0:6c5518885385	252	}
dsuranr15	0:6c5518885385	253
dsuranr15	0:6c5518885385	254
dsuranr15	0:6c5518885385	255	///////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	256	//CONTROL
dsuranr15	0:6c5518885385	257	//////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	258
dsuranr15	0:6c5518885385	259	// Esta parte del codigo permite seleccionar el modo control.
dsuranr15	0:6c5518885385	260
dsuranr15	0:6c5518885385	261	if(p!=-1) { // al inicio se declara un p= irda, cuando se oprime el boton por un tiempo se vuelve -1 y nos permite entrar en modo control
dsuranr15	0:6c5518885385	262
dsuranr15	0:6c5518885385	263	fflush( stdin );
dsuranr15	0:6c5518885385	264	LCD.cls();
dsuranr15	0:6c5518885385	265	LCD.locate(0,0);
dsuranr15	0:6c5518885385	266	LCD.printf("1-H0RA");
dsuranr15	0:6c5518885385	267	LCD.locate(8,0);
dsuranr15	0:6c5518885385	268	LCD.printf("2-FECHA");
dsuranr15	0:6c5518885385	269	LCD.locate(0,1);
dsuranr15	0:6c5518885385	270	LCD.printf("3-ALARMA");
dsuranr15	0:6c5518885385	271	wait(1);
dsuranr15	0:6c5518885385	272	control();
dsuranr15	0:6c5518885385	273	if(num==1) { // se realiza una conversion de los datos enviados por el control
dsuranr15	0:6c5518885385	274	pos=1;
dsuranr15	0:6c5518885385	275	} else if(num==2) {
dsuranr15	0:6c5518885385	276	pos=2;
dsuranr15	0:6c5518885385	277	} else if (num==3) {
dsuranr15	0:6c5518885385	278	pos=3;
dsuranr15	0:6c5518885385	279	}
dsuranr15	0:6c5518885385	280
dsuranr15	0:6c5518885385	281	p=-1;
dsuranr15	0:6c5518885385	282
dsuranr15	0:6c5518885385	283	}
dsuranr15	0:6c5518885385	284	///////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	285	//CASOS MENU
dsuranr15	0:6c5518885385	286	//////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	287
dsuranr15	0:6c5518885385	288
dsuranr15	0:6c5518885385	289	nu=0;
dsuranr15	0:6c5518885385	290	switch (pos) {
dsuranr15	0:6c5518885385	291	case 1: // el caso 1 configura la hora, ya sea con control o con encoder
dsuranr15	0:6c5518885385	292	LCD.cls();
dsuranr15	0:6c5518885385	293	LCD.printf("1-H0RA");
dsuranr15	0:6c5518885385	294	wait(2);
dsuranr15	0:6c5518885385	295	ds3231_time_t rtc_time;
dsuranr15	0:6c5518885385	296
dsuranr15	0:6c5518885385	297	//while(H==0) {
dsuranr15	0:6c5518885385	298	LCD.cls();
dsuranr15	0:6c5518885385	299	LCD.printf("C0NFIGURACI0N H0RA");
dsuranr15	0:6c5518885385	300	wait(2);
dsuranr15	0:6c5518885385	301	wheel.reset();
dsuranr15	0:6c5518885385	302
dsuranr15	0:6c5518885385	303	H=1;
dsuranr15	0:6c5518885385	304	m=0;
dsuranr15	0:6c5518885385	305
dsuranr15	0:6c5518885385	306
dsuranr15	0:6c5518885385	307	while(H==1) { //configuracion de hora
dsuranr15	0:6c5518885385	308	//hasta que no se de ok con encoder o se de la hora con reloj no sale del ciclo
dsuranr15	0:6c5518885385	309
dsuranr15	0:6c5518885385	310	LCD.cls();
dsuranr15	0:6c5518885385	311	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	312	LCD.locate(13,0);
dsuranr15	0:6c5518885385	313	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	314
dsuranr15	0:6c5518885385	315	p=irda.read_high_us(4000); // leer el irda
dsuranr15	0:6c5518885385	316	m=wheel.getPulses();
dsuranr15	0:6c5518885385	317	wait(0.5);
dsuranr15	0:6c5518885385	318
dsuranr15	0:6c5518885385	319	if(button4.falling()) {
dsuranr15	0:6c5518885385	320	wheel.reset();
dsuranr15	0:6c5518885385	321	H=H++;
dsuranr15	0:6c5518885385	322
dsuranr15	0:6c5518885385	323	}
dsuranr15	0:6c5518885385	324	if(p!=-1) {
dsuranr15	0:6c5518885385	325	m=0;
dsuranr15	0:6c5518885385	326	LCD.cls();
dsuranr15	0:6c5518885385	327	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	328	wait(2);
dsuranr15	0:6c5518885385	329	LCD.cls();
dsuranr15	0:6c5518885385	330	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	331	m=control1(2);
dsuranr15	0:6c5518885385	332	H++;
dsuranr15	0:6c5518885385	333
dsuranr15	0:6c5518885385	334	}
dsuranr15	0:6c5518885385	335	rtc_time.hours = m;
dsuranr15	0:6c5518885385	336
dsuranr15	0:6c5518885385	337	}
dsuranr15	0:6c5518885385	338	m=0;
dsuranr15	0:6c5518885385	339	while(H==2) { //configuracion de minutos
dsuranr15	0:6c5518885385	340
dsuranr15	0:6c5518885385	341	LCD.cls();
dsuranr15	0:6c5518885385	342	LCD.printf("MINUT0S");
dsuranr15	0:6c5518885385	343	LCD.locate(13,0);
dsuranr15	0:6c5518885385	344	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	345
dsuranr15	0:6c5518885385	346
dsuranr15	0:6c5518885385	347	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	348	m=wheel.getPulses();
dsuranr15	0:6c5518885385	349	wait(0.5);
dsuranr15	0:6c5518885385	350
dsuranr15	0:6c5518885385	351
dsuranr15	0:6c5518885385	352
dsuranr15	0:6c5518885385	353	if(button4.falling()) {//configuracion de minutos con encoder
dsuranr15	0:6c5518885385	354	wheel.reset();
dsuranr15	0:6c5518885385	355	H=H++;
dsuranr15	0:6c5518885385	356
dsuranr15	0:6c5518885385	357	}
dsuranr15	0:6c5518885385	358	if(p!=-1) { //configuracion de minutos con control
dsuranr15	0:6c5518885385	359	m=0;
dsuranr15	0:6c5518885385	360	LCD.cls();
dsuranr15	0:6c5518885385	361	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	362	wait(2);
dsuranr15	0:6c5518885385	363	LCD.cls();
dsuranr15	0:6c5518885385	364	LCD.printf("MINUTOS");
dsuranr15	0:6c5518885385	365	m=control1(2);
dsuranr15	0:6c5518885385	366	H++;
dsuranr15	0:6c5518885385	367
dsuranr15	0:6c5518885385	368	}
dsuranr15	0:6c5518885385	369	rtc_time.minutes = m; // se graba en la memoria del reloj los minutos
dsuranr15	0:6c5518885385	370
dsuranr15	0:6c5518885385	371	}
dsuranr15	0:6c5518885385	372	m=0;
dsuranr15	0:6c5518885385	373	while(H==3) { //configuracion de segundos
dsuranr15	0:6c5518885385	374
dsuranr15	0:6c5518885385	375	LCD.cls();
dsuranr15	0:6c5518885385	376	LCD.printf("SEGUND0S");
dsuranr15	0:6c5518885385	377	LCD.locate(13,0);
dsuranr15	0:6c5518885385	378	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	379
dsuranr15	0:6c5518885385	380
dsuranr15	0:6c5518885385	381	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	382	m=wheel.getPulses();
dsuranr15	0:6c5518885385	383	wait(0.5);
dsuranr15	0:6c5518885385	384
dsuranr15	0:6c5518885385	385
dsuranr15	0:6c5518885385	386
dsuranr15	0:6c5518885385	387	if(button4.falling()) {
dsuranr15	0:6c5518885385	388	wheel.reset();
dsuranr15	0:6c5518885385	389	H=H++;
dsuranr15	0:6c5518885385	390	}
dsuranr15	0:6c5518885385	391	if(p!=-1) { // modo control
dsuranr15	0:6c5518885385	392	m=0;
dsuranr15	0:6c5518885385	393	LCD.cls();
dsuranr15	0:6c5518885385	394	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	395	wait(2);
dsuranr15	0:6c5518885385	396	LCD.cls();
dsuranr15	0:6c5518885385	397	LCD.printf("SEGUND0S");
dsuranr15	0:6c5518885385	398	m=control1(2);
dsuranr15	0:6c5518885385	399	H++; //variable para avanzar al otro modo
dsuranr15	0:6c5518885385	400
dsuranr15	0:6c5518885385	401
dsuranr15	0:6c5518885385	402	}
dsuranr15	0:6c5518885385	403	rtc_time.seconds = m; // se graba en la memoria del reloj los segundos
dsuranr15	0:6c5518885385	404
dsuranr15	0:6c5518885385	405	}
dsuranr15	0:6c5518885385	406
dsuranr15	0:6c5518885385	407
dsuranr15	0:6c5518885385	408
dsuranr15	0:6c5518885385	409	//}
dsuranr15	0:6c5518885385	410	rtc_time.mode = false; //formato 24 horas del reloj
dsuranr15	0:6c5518885385	411	rtc.set_time(rtc_time); // se guarda la hora
dsuranr15	0:6c5518885385	412
dsuranr15	0:6c5518885385	413
dsuranr15	0:6c5518885385	414	break;
dsuranr15	0:6c5518885385	415	case 2:
dsuranr15	0:6c5518885385	416
dsuranr15	0:6c5518885385	417	ds3231_calendar_t rtc_calendar; // variable para configurar el calendario
dsuranr15	0:6c5518885385	418	LCD.cls();
dsuranr15	0:6c5518885385	419	LCD.printf("2-FECHA");
dsuranr15	0:6c5518885385	420	wait(2);
dsuranr15	0:6c5518885385	421
dsuranr15	0:6c5518885385	422
dsuranr15	0:6c5518885385	423	//while(H==0) {
dsuranr15	0:6c5518885385	424	LCD.cls();
dsuranr15	0:6c5518885385	425	LCD.printf("C0NFIGURACI0N FECHA");
dsuranr15	0:6c5518885385	426	wait(2);
dsuranr15	0:6c5518885385	427	wheel.reset();
dsuranr15	0:6c5518885385	428
dsuranr15	0:6c5518885385	429	H=1;
dsuranr15	0:6c5518885385	430	m=0;
dsuranr15	0:6c5518885385	431
dsuranr15	0:6c5518885385	432
dsuranr15	0:6c5518885385	433	while(H==1) { // configuracion del dia de la semana
dsuranr15	0:6c5518885385	434	LCD.cls();
dsuranr15	0:6c5518885385	435	LCD.printf("DIA 1-7");
dsuranr15	0:6c5518885385	436	LCD.locate(13,0);
dsuranr15	0:6c5518885385	437	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	438
dsuranr15	0:6c5518885385	439	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	440	m=wheel.getPulses(); // lectura del encoder
dsuranr15	0:6c5518885385	441
dsuranr15	0:6c5518885385	442	wait(0.5);
dsuranr15	0:6c5518885385	443
dsuranr15	0:6c5518885385	444
dsuranr15	0:6c5518885385	445	if(button4.falling()) {
dsuranr15	0:6c5518885385	446	wheel.reset();
dsuranr15	0:6c5518885385	447	H=H++;
dsuranr15	0:6c5518885385	448
dsuranr15	0:6c5518885385	449	}
dsuranr15	0:6c5518885385	450	if(p!=-1) { // modo control
dsuranr15	0:6c5518885385	451	m=0;
dsuranr15	0:6c5518885385	452	LCD.cls();
dsuranr15	0:6c5518885385	453	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	454	wait(2);
dsuranr15	0:6c5518885385	455	LCD.cls();
dsuranr15	0:6c5518885385	456	LCD.printf("DIA 1-7");
dsuranr15	0:6c5518885385	457	m=control1(1);
dsuranr15	0:6c5518885385	458
dsuranr15	0:6c5518885385	459	H++;
dsuranr15	0:6c5518885385	460	wait(2);
dsuranr15	0:6c5518885385	461
dsuranr15	0:6c5518885385	462	}
dsuranr15	0:6c5518885385	463	rtc_calendar.day = m; // se guarda el dia en el reloj
dsuranr15	0:6c5518885385	464
dsuranr15	0:6c5518885385	465
dsuranr15	0:6c5518885385	466
dsuranr15	0:6c5518885385	467	}
dsuranr15	0:6c5518885385	468	m=0;
dsuranr15	0:6c5518885385	469	wheel.reset();
dsuranr15	0:6c5518885385	470	while(H==2) { // configuracion del dia igual que en los casos anteriores, se define por control o por encoder
dsuranr15	0:6c5518885385	471
dsuranr15	0:6c5518885385	472	LCD.cls();
dsuranr15	0:6c5518885385	473	LCD.printf("DIA");
dsuranr15	0:6c5518885385	474	LCD.locate(13,0);
dsuranr15	0:6c5518885385	475	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	476
dsuranr15	0:6c5518885385	477
dsuranr15	0:6c5518885385	478	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	479	m=wheel.getPulses();
dsuranr15	0:6c5518885385	480	wait(0.5);
dsuranr15	0:6c5518885385	481
dsuranr15	0:6c5518885385	482
dsuranr15	0:6c5518885385	483
dsuranr15	0:6c5518885385	484	if(button4.falling()) {
dsuranr15	0:6c5518885385	485	wheel.reset();
dsuranr15	0:6c5518885385	486	H=H++;
dsuranr15	0:6c5518885385	487
dsuranr15	0:6c5518885385	488	}
dsuranr15	0:6c5518885385	489
dsuranr15	0:6c5518885385	490	if(p!=-1) { // configuracion del dia por control
dsuranr15	0:6c5518885385	491	m=0;
dsuranr15	0:6c5518885385	492	LCD.cls();
dsuranr15	0:6c5518885385	493	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	494	wait(2);
dsuranr15	0:6c5518885385	495	LCD.cls();
dsuranr15	0:6c5518885385	496	LCD.printf("DIA");
dsuranr15	0:6c5518885385	497	m=control1(2);
dsuranr15	0:6c5518885385	498
dsuranr15	0:6c5518885385	499	H++;
dsuranr15	0:6c5518885385	500	wait(2);
dsuranr15	0:6c5518885385	501
dsuranr15	0:6c5518885385	502	}
dsuranr15	0:6c5518885385	503	rtc_calendar.date = m; // se guarda la variable dia
dsuranr15	0:6c5518885385	504
dsuranr15	0:6c5518885385	505	}
dsuranr15	0:6c5518885385	506	m=0;
dsuranr15	0:6c5518885385	507	wheel.reset();
dsuranr15	0:6c5518885385	508	while(H==3) { // configuracion del dia igual que en los casos anteriores, se define por control o por encoder
dsuranr15	0:6c5518885385	509
dsuranr15	0:6c5518885385	510	LCD.cls();
dsuranr15	0:6c5518885385	511	LCD.printf("MES");
dsuranr15	0:6c5518885385	512	LCD.locate(13,0);
dsuranr15	0:6c5518885385	513	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	514
dsuranr15	0:6c5518885385	515
dsuranr15	0:6c5518885385	516	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	517	m=wheel.getPulses();
dsuranr15	0:6c5518885385	518	wait(0.5);
dsuranr15	0:6c5518885385	519
dsuranr15	0:6c5518885385	520
dsuranr15	0:6c5518885385	521
dsuranr15	0:6c5518885385	522	if(button4.falling()) { // modo encoder
dsuranr15	0:6c5518885385	523	wheel.reset();
dsuranr15	0:6c5518885385	524	H=H++;
dsuranr15	0:6c5518885385	525
dsuranr15	0:6c5518885385	526	}
dsuranr15	0:6c5518885385	527
dsuranr15	0:6c5518885385	528	if(p!=-1) { // configuracion del dia por control
dsuranr15	0:6c5518885385	529	m=0;
dsuranr15	0:6c5518885385	530	LCD.cls();
dsuranr15	0:6c5518885385	531	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	532	wait(2);
dsuranr15	0:6c5518885385	533	LCD.cls();
dsuranr15	0:6c5518885385	534	LCD.printf("MES");
dsuranr15	0:6c5518885385	535	m=control1(2);
dsuranr15	0:6c5518885385	536
dsuranr15	0:6c5518885385	537	H++;
dsuranr15	0:6c5518885385	538	wait(2);
dsuranr15	0:6c5518885385	539
dsuranr15	0:6c5518885385	540	}
dsuranr15	0:6c5518885385	541	rtc_calendar.month = m; // se guarda la variable dia
dsuranr15	0:6c5518885385	542
dsuranr15	0:6c5518885385	543	}
dsuranr15	0:6c5518885385	544	m=0;
dsuranr15	0:6c5518885385	545	wheel.reset();
dsuranr15	0:6c5518885385	546
dsuranr15	0:6c5518885385	547
dsuranr15	0:6c5518885385	548	while(H==4) { // se configura igual que el dia y el mes
dsuranr15	0:6c5518885385	549
dsuranr15	0:6c5518885385	550	LCD.cls();
dsuranr15	0:6c5518885385	551	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	552	LCD.locate(13,0);
dsuranr15	0:6c5518885385	553	LCD.printf("%i",m );
dsuranr15	0:6c5518885385	554
dsuranr15	0:6c5518885385	555
dsuranr15	0:6c5518885385	556
dsuranr15	0:6c5518885385	557	m=wheel.getPulses(); // datos del encoder
dsuranr15	0:6c5518885385	558	wait(0.5);
dsuranr15	0:6c5518885385	559
dsuranr15	0:6c5518885385	560
dsuranr15	0:6c5518885385	561
dsuranr15	0:6c5518885385	562
dsuranr15	0:6c5518885385	563
dsuranr15	0:6c5518885385	564
dsuranr15	0:6c5518885385	565
dsuranr15	0:6c5518885385	566	if(button4.falling()) {
dsuranr15	0:6c5518885385	567	wheel.reset();
dsuranr15	0:6c5518885385	568	H=H++;
dsuranr15	0:6c5518885385	569
dsuranr15	0:6c5518885385	570	}
dsuranr15	0:6c5518885385	571	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	572	if(p!=-1) {
dsuranr15	0:6c5518885385	573	m=0;
dsuranr15	0:6c5518885385	574	LCD.cls();
dsuranr15	0:6c5518885385	575	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	576	wait(2);
dsuranr15	0:6c5518885385	577	LCD.cls();
dsuranr15	0:6c5518885385	578	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	579	m=control1(2);
dsuranr15	0:6c5518885385	580
dsuranr15	0:6c5518885385	581	H++;
dsuranr15	0:6c5518885385	582	wait(1);
dsuranr15	0:6c5518885385	583
dsuranr15	0:6c5518885385	584	}
dsuranr15	0:6c5518885385	585	rtc_calendar.year = m; // variable para guardar el año
dsuranr15	0:6c5518885385	586
dsuranr15	0:6c5518885385	587
dsuranr15	0:6c5518885385	588	}
dsuranr15	0:6c5518885385	589
dsuranr15	0:6c5518885385	590
dsuranr15	0:6c5518885385	591
dsuranr15	0:6c5518885385	592
dsuranr15	0:6c5518885385	593	//}
dsuranr15	0:6c5518885385	594	//write calendar registers
dsuranr15	0:6c5518885385	595	rtc.set_calendar(rtc_calendar);
dsuranr15	0:6c5518885385	596
dsuranr15	0:6c5518885385	597
dsuranr15	0:6c5518885385	598
dsuranr15	0:6c5518885385	599
dsuranr15	0:6c5518885385	600	break;
dsuranr15	0:6c5518885385	601
dsuranr15	0:6c5518885385	602	case 3: // casos de alarmas
dsuranr15	0:6c5518885385	603
dsuranr15	0:6c5518885385	604	LCD.cls();
dsuranr15	0:6c5518885385	605	LCD.locate(0,0);
dsuranr15	0:6c5518885385	606	LCD.printf(" 0N 1 2 3 ");
dsuranr15	0:6c5518885385	607	LCD.locate(0,1);
dsuranr15	0:6c5518885385	608	LCD.printf("0FF 4 5 6 ");
dsuranr15	0:6c5518885385	609
dsuranr15	0:6c5518885385	610
dsuranr15	0:6c5518885385	611	m=0;
dsuranr15	0:6c5518885385	612	LCD.locate(13,1);
dsuranr15	0:6c5518885385	613	LCD.printf("%i",m);
dsuranr15	0:6c5518885385	614	s=0;
dsuranr15	0:6c5518885385	615	while(s!=1) {
dsuranr15	0:6c5518885385	616	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	617	if(p!=-1) { // modo control
dsuranr15	0:6c5518885385	618	fflush( stdin );
dsuranr15	0:6c5518885385	619	LCD.locate(16,0);
dsuranr15	0:6c5518885385	620	LCD.printf("C");
dsuranr15	0:6c5518885385	621	wait(1);
dsuranr15	0:6c5518885385	622	nu=control();
dsuranr15	0:6c5518885385	623	p=-1;
dsuranr15	0:6c5518885385	624	s=1;
dsuranr15	0:6c5518885385	625	}
dsuranr15	0:6c5518885385	626
dsuranr15	0:6c5518885385	627	if(button4.falling()) { // modo encoder
dsuranr15	0:6c5518885385	628	con++;
dsuranr15	0:6c5518885385	629	wheel.reset();
dsuranr15	0:6c5518885385	630	while(con==1) {
dsuranr15	0:6c5518885385	631	if(button4.falling()) {
dsuranr15	0:6c5518885385	632	con++;
dsuranr15	0:6c5518885385	633	}
dsuranr15	0:6c5518885385	634	m=wheel.getPulses();
dsuranr15	0:6c5518885385	635	if(m>9) {
dsuranr15	0:6c5518885385	636	m=9;
dsuranr15	0:6c5518885385	637	}
dsuranr15	0:6c5518885385	638	if(m<0) {
dsuranr15	0:6c5518885385	639	m=1;
dsuranr15	0:6c5518885385	640	}
dsuranr15	0:6c5518885385	641	LCD.locate(13,1);
dsuranr15	0:6c5518885385	642	LCD.printf("%i",m);
dsuranr15	0:6c5518885385	643	wait(0.5);
dsuranr15	0:6c5518885385	644	if(button4.falling()) {
dsuranr15	0:6c5518885385	645	nu=m;
dsuranr15	0:6c5518885385	646	con++;
dsuranr15	0:6c5518885385	647	s=1;
dsuranr15	0:6c5518885385	648	}
dsuranr15	0:6c5518885385	649	}
dsuranr15	0:6c5518885385	650	con=0;
dsuranr15	0:6c5518885385	651	}
dsuranr15	0:6c5518885385	652	}
dsuranr15	0:6c5518885385	653
dsuranr15	0:6c5518885385	654
dsuranr15	0:6c5518885385	655
dsuranr15	0:6c5518885385	656	switch (nu) {
dsuranr15	0:6c5518885385	657	case 1: // configuracion alarma 1
dsuranr15	0:6c5518885385	658	LCD.cls();
dsuranr15	0:6c5518885385	659	LCD.printf(" ALM 1");
dsuranr15	0:6c5518885385	660	al=0;
dsuranr15	0:6c5518885385	661	con=0;
dsuranr15	0:6c5518885385	662	wait(1);
dsuranr15	0:6c5518885385	663	int x=0;
dsuranr15	0:6c5518885385	664	while(x==0) {
dsuranr15	0:6c5518885385	665
dsuranr15	0:6c5518885385	666	if(button4.falling()) {
dsuranr15	0:6c5518885385	667	con++;
dsuranr15	0:6c5518885385	668
dsuranr15	0:6c5518885385	669	while(con==1) { // entra al modo encoder
dsuranr15	0:6c5518885385	670	if(button4.falling()) {
dsuranr15	0:6c5518885385	671	con++;
dsuranr15	0:6c5518885385	672	}
dsuranr15	0:6c5518885385	673	m=wheel.getPulses();
dsuranr15	0:6c5518885385	674	LCD.cls();
dsuranr15	0:6c5518885385	675	LCD.locate(0,1);
dsuranr15	0:6c5518885385	676	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	677
dsuranr15	0:6c5518885385	678	wait(2);
dsuranr15	0:6c5518885385	679	int j=0;
dsuranr15	0:6c5518885385	680	LCD.cls();
dsuranr15	0:6c5518885385	681	LCD.locate(0,1);
dsuranr15	0:6c5518885385	682	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	683	for(j=0; j<2; ++j) { //ciclo para crear el vector alarma,
dsuranr15	0:6c5518885385	684	ALM1[2]=0; // como ALM es un entero en la posicion donde va a ir los : se pone un cero para que no ponga problema
dsuranr15	0:6c5518885385	685	d=0;
dsuranr15	0:6c5518885385	686	wheel.reset();
dsuranr15	0:6c5518885385	687	while(d==0) {
dsuranr15	0:6c5518885385	688	num=wheel.getPulses();
dsuranr15	0:6c5518885385	689	if(num>9) {
dsuranr15	0:6c5518885385	690	num=9;
dsuranr15	0:6c5518885385	691	}
dsuranr15	0:6c5518885385	692	if(num<0) {
dsuranr15	0:6c5518885385	693	num=0;
dsuranr15	0:6c5518885385	694	}
dsuranr15	0:6c5518885385	695	ALM1[j]=num; // correspondiente al ciclo for se ubica el numero en la posicion
dsuranr15	0:6c5518885385	696	LCD.locate(j,0);
dsuranr15	0:6c5518885385	697	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	698	if(button4.falling()) {
dsuranr15	0:6c5518885385	699	d=1;
dsuranr15	0:6c5518885385	700	}
dsuranr15	0:6c5518885385	701	}
dsuranr15	0:6c5518885385	702	wait(1);
dsuranr15	0:6c5518885385	703	}
dsuranr15	0:6c5518885385	704
dsuranr15	0:6c5518885385	705	wheel.reset(); // borra los datos del encoder
dsuranr15	0:6c5518885385	706	LCD.cls();
dsuranr15	0:6c5518885385	707	LCD.locate(0,1);
dsuranr15	0:6c5518885385	708	LCD.printf("MIN");
dsuranr15	0:6c5518885385	709
dsuranr15	0:6c5518885385	710
dsuranr15	0:6c5518885385	711
dsuranr15	0:6c5518885385	712	for(j=3; j<5; ++j) { // en el mismo vector se configura los minutos, nuevamente el ciclo for es para recorrer el vector
dsuranr15	0:6c5518885385	713	d=0;
dsuranr15	0:6c5518885385	714	wheel.reset();
dsuranr15	0:6c5518885385	715	while(d==0) {
dsuranr15	0:6c5518885385	716	num=wheel.getPulses();
dsuranr15	0:6c5518885385	717	if(num>9) {
dsuranr15	0:6c5518885385	718	num=9;
dsuranr15	0:6c5518885385	719	}
dsuranr15	0:6c5518885385	720	if(num<0) {
dsuranr15	0:6c5518885385	721	num=0;
dsuranr15	0:6c5518885385	722	}
dsuranr15	0:6c5518885385	723	ALM1[j]=num; // se recorre el vector
dsuranr15	0:6c5518885385	724	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	725	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	726	if(button4.falling()) {
dsuranr15	0:6c5518885385	727	d=1;
dsuranr15	0:6c5518885385	728	}
dsuranr15	0:6c5518885385	729	}
dsuranr15	0:6c5518885385	730	wait(1);
dsuranr15	0:6c5518885385	731	}
dsuranr15	0:6c5518885385	732
dsuranr15	0:6c5518885385	733
dsuranr15	0:6c5518885385	734	///////////////////////////////
dsuranr15	0:6c5518885385	735	j=0;
dsuranr15	0:6c5518885385	736	LCD.cls();
dsuranr15	0:6c5518885385	737	LCD.locate(0,1);
dsuranr15	0:6c5518885385	738	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	739	for(j=0; j<4; ++j) {// se configura el vector FEC, primeramente va el año
dsuranr15	0:6c5518885385	740	FEC1[4]=0; // estas dos posiciones es donde se van a poner "-" para no tener problemas despues se ponen en cero
dsuranr15	0:6c5518885385	741	FEC1[7]=0;
dsuranr15	0:6c5518885385	742	d=0;
dsuranr15	0:6c5518885385	743	wheel.reset();
dsuranr15	0:6c5518885385	744	while(d==0) {
dsuranr15	0:6c5518885385	745	num=wheel.getPulses();
dsuranr15	0:6c5518885385	746	if(num>9) {
dsuranr15	0:6c5518885385	747	num=9;
dsuranr15	0:6c5518885385	748	}
dsuranr15	0:6c5518885385	749	if(num<0) {
dsuranr15	0:6c5518885385	750	num=0;
dsuranr15	0:6c5518885385	751	}
dsuranr15	0:6c5518885385	752	FEC1[j]=num;
dsuranr15	0:6c5518885385	753	LCD.locate(j,0);
dsuranr15	0:6c5518885385	754	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	755	if(button4.falling()) {
dsuranr15	0:6c5518885385	756	d=1;
dsuranr15	0:6c5518885385	757	}
dsuranr15	0:6c5518885385	758	}
dsuranr15	0:6c5518885385	759	wait(1);
dsuranr15	0:6c5518885385	760	}
dsuranr15	0:6c5518885385	761
dsuranr15	0:6c5518885385	762	j=0;
dsuranr15	0:6c5518885385	763	LCD.cls();
dsuranr15	0:6c5518885385	764	LCD.locate(0,1);
dsuranr15	0:6c5518885385	765	LCD.printf("MES");
dsuranr15	0:6c5518885385	766	for(j=5; j<7; ++j) { // se configura de la misma manera que los dos anteriores
dsuranr15	0:6c5518885385	767	//ALM1[2]=0;
dsuranr15	0:6c5518885385	768	d=0;
dsuranr15	0:6c5518885385	769	wheel.reset();
dsuranr15	0:6c5518885385	770	while(d==0) {
dsuranr15	0:6c5518885385	771	num=wheel.getPulses();
dsuranr15	0:6c5518885385	772	if(num>9) {
dsuranr15	0:6c5518885385	773	num=9;
dsuranr15	0:6c5518885385	774	}
dsuranr15	0:6c5518885385	775	if(num<0) {
dsuranr15	0:6c5518885385	776	num=0;
dsuranr15	0:6c5518885385	777	}
dsuranr15	0:6c5518885385	778	FEC1[j]=num;
dsuranr15	0:6c5518885385	779	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	780	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	781	if(button4.falling()) {
dsuranr15	0:6c5518885385	782	d=1;
dsuranr15	0:6c5518885385	783	}
dsuranr15	0:6c5518885385	784	}
dsuranr15	0:6c5518885385	785	wait(1);
dsuranr15	0:6c5518885385	786	}
dsuranr15	0:6c5518885385	787
dsuranr15	0:6c5518885385	788	j=0;
dsuranr15	0:6c5518885385	789	LCD.cls();
dsuranr15	0:6c5518885385	790	LCD.locate(0,1);
dsuranr15	0:6c5518885385	791	LCD.printf("DIA");
dsuranr15	0:6c5518885385	792	for(j=8; j<10; ++j) {// se configura de la misma manera que los anteriores
dsuranr15	0:6c5518885385	793	//ALM1[2]=0;
dsuranr15	0:6c5518885385	794	d=0;
dsuranr15	0:6c5518885385	795	wheel.reset();
dsuranr15	0:6c5518885385	796	while(d==0) {
dsuranr15	0:6c5518885385	797	num=wheel.getPulses();
dsuranr15	0:6c5518885385	798	if(num>9) {
dsuranr15	0:6c5518885385	799	num=9;
dsuranr15	0:6c5518885385	800	}
dsuranr15	0:6c5518885385	801	if(num<0) {
dsuranr15	0:6c5518885385	802	num=0;
dsuranr15	0:6c5518885385	803	}
dsuranr15	0:6c5518885385	804	FEC1[j]=num;
dsuranr15	0:6c5518885385	805	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	806	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	807	if(button4.falling()) {
dsuranr15	0:6c5518885385	808	d=1;
dsuranr15	0:6c5518885385	809	}
dsuranr15	0:6c5518885385	810	}
dsuranr15	0:6c5518885385	811	wait(1);
dsuranr15	0:6c5518885385	812	}
dsuranr15	0:6c5518885385	813
dsuranr15	0:6c5518885385	814	//////////////////////////////////
dsuranr15	0:6c5518885385	815	LCD.cls();
dsuranr15	0:6c5518885385	816	LCD.locate(14,0);
dsuranr15	0:6c5518885385	817	LCD.printf("A1");
dsuranr15	0:6c5518885385	818	for(j=0; j<5; ++j) { // con este ciclo se muestra en pantalla la hora configurada
dsuranr15	0:6c5518885385	819	//
dsuranr15	0:6c5518885385	820	LCD.locate(2,0);
dsuranr15	0:6c5518885385	821	LCD.printf(":"); // el cero se dejo para poner en pantalla este simbolo
dsuranr15	0:6c5518885385	822	LCD.locate(j,0);
dsuranr15	0:6c5518885385	823	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	824
dsuranr15	0:6c5518885385	825
dsuranr15	0:6c5518885385	826	}
dsuranr15	0:6c5518885385	827
dsuranr15	0:6c5518885385	828
dsuranr15	0:6c5518885385	829	for(j=0; j<10; ++j) { //con el ciclo for se imprime la fecha
dsuranr15	0:6c5518885385	830	//
dsuranr15	0:6c5518885385	831	LCD.locate(4,1);
dsuranr15	0:6c5518885385	832	LCD.printf("-"); // los dos ceros se pusieron para poner este simbolo
dsuranr15	0:6c5518885385	833	LCD.locate(7,1);
dsuranr15	0:6c5518885385	834	LCD.printf("-");
dsuranr15	0:6c5518885385	835	LCD.locate(j,1);
dsuranr15	0:6c5518885385	836	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	837
dsuranr15	0:6c5518885385	838
dsuranr15	0:6c5518885385	839	}
dsuranr15	0:6c5518885385	840	wait(5);
dsuranr15	0:6c5518885385	841
dsuranr15	0:6c5518885385	842
dsuranr15	0:6c5518885385	843	ALM_1[0]=ALM1[0]; // lo que se hace con esto es quitar el cero que se añadio
dsuranr15	0:6c5518885385	844	ALM_1[1]=ALM1[1];
dsuranr15	0:6c5518885385	845	ALM_1[2]=ALM1[3];
dsuranr15	0:6c5518885385	846	ALM_1[3]=ALM1[4];
dsuranr15	0:6c5518885385	847
dsuranr15	0:6c5518885385	848	FEC_1[0]=FEC1[0]; // se quitan los dos ceros que se añadieron para mostrar
dsuranr15	0:6c5518885385	849	FEC_1[1]=FEC1[1];
dsuranr15	0:6c5518885385	850	FEC_1[2]=FEC1[2];
dsuranr15	0:6c5518885385	851	FEC_1[3]=FEC1[3];
dsuranr15	0:6c5518885385	852	FEC_1[4]=FEC1[5];
dsuranr15	0:6c5518885385	853	FEC_1[5]=FEC1[6];
dsuranr15	0:6c5518885385	854	FEC_1[6]=FEC1[8];
dsuranr15	0:6c5518885385	855	FEC_1[7]=FEC1[9];
dsuranr15	0:6c5518885385	856
dsuranr15	0:6c5518885385	857	// para la comparacion de la hora con la alarma se hace con dos vectores tipo chart es por eso que
dsuranr15	0:6c5518885385	858	// realizamos la transformacion de los vectores enteros a tipo char.
dsuranr15	0:6c5518885385	859
dsuranr15	0:6c5518885385	860	sprintf(alm_1,"%d%d%d%d",ALM_1[0],ALM_1[1],ALM_1[2],ALM_1[3]);
dsuranr15	0:6c5518885385	861	sprintf(fec_1,"%d%d%d%d%d%d%d%d",FEC_1[0],FEC_1[1],FEC_1[2],FEC_1[3],FEC_1[4],FEC_1[5],FEC_1[6],FEC_1[7]);
dsuranr15	0:6c5518885385	862
dsuranr15	0:6c5518885385	863	x=1;
dsuranr15	0:6c5518885385	864	wait(1);
dsuranr15	0:6c5518885385	865	al=1;
dsuranr15	0:6c5518885385	866	con=2; // variables para entrar en los while o salir de ellos
dsuranr15	0:6c5518885385	867
dsuranr15	0:6c5518885385	868	}
dsuranr15	0:6c5518885385	869	wait(1);
dsuranr15	0:6c5518885385	870	}
dsuranr15	0:6c5518885385	871	al=0;
dsuranr15	0:6c5518885385	872	wait(1);
dsuranr15	0:6c5518885385	873	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	874
dsuranr15	0:6c5518885385	875	if(p!=-1) { // este modo trabaja con el control, lo unico que cambia es la manera de obtener los datos, lo otro es lo mismo para las
dsuranr15	0:6c5518885385	876	// 6 alarmas.
dsuranr15	0:6c5518885385	877	while (al!=1) {
dsuranr15	0:6c5518885385	878	LCD.cls();
dsuranr15	0:6c5518885385	879	LCD.locate(0,1);
dsuranr15	0:6c5518885385	880	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	881	wait(2);
dsuranr15	0:6c5518885385	882	int j=0;
dsuranr15	0:6c5518885385	883	LCD.cls();
dsuranr15	0:6c5518885385	884	LCD.locate(0,1);
dsuranr15	0:6c5518885385	885	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	886	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	887	ALM1[2]=0;
dsuranr15	0:6c5518885385	888	fflush( stdin );
dsuranr15	0:6c5518885385	889	//wait(1);
dsuranr15	0:6c5518885385	890	control();
dsuranr15	0:6c5518885385	891	ALM1[j]=num;
dsuranr15	0:6c5518885385	892	LCD.locate(j,0);
dsuranr15	0:6c5518885385	893	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	894	wait(1);
dsuranr15	0:6c5518885385	895	}
dsuranr15	0:6c5518885385	896	LCD.cls();
dsuranr15	0:6c5518885385	897	LCD.locate(0,1);
dsuranr15	0:6c5518885385	898	LCD.printf("MIN");
dsuranr15	0:6c5518885385	899
dsuranr15	0:6c5518885385	900	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	901	fflush( stdin );
dsuranr15	0:6c5518885385	902	//wait(1);
dsuranr15	0:6c5518885385	903	control();
dsuranr15	0:6c5518885385	904	ALM1[j]=num;
dsuranr15	0:6c5518885385	905	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	906	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	907	wait(1);
dsuranr15	0:6c5518885385	908	}
dsuranr15	0:6c5518885385	909	////////////////////////
dsuranr15	0:6c5518885385	910	j=0;
dsuranr15	0:6c5518885385	911	LCD.cls();
dsuranr15	0:6c5518885385	912	LCD.locate(0,1);
dsuranr15	0:6c5518885385	913	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	914	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	915	FEC1[4]=0;
dsuranr15	0:6c5518885385	916	FEC1[7]=0;
dsuranr15	0:6c5518885385	917
dsuranr15	0:6c5518885385	918
dsuranr15	0:6c5518885385	919	fflush( stdin );
dsuranr15	0:6c5518885385	920	//wait(1);
dsuranr15	0:6c5518885385	921	control();
dsuranr15	0:6c5518885385	922	FEC1[j]=num;
dsuranr15	0:6c5518885385	923	LCD.locate(j,0);
dsuranr15	0:6c5518885385	924	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	925	wait(1);
dsuranr15	0:6c5518885385	926	}
dsuranr15	0:6c5518885385	927
dsuranr15	0:6c5518885385	928
dsuranr15	0:6c5518885385	929	j=0;
dsuranr15	0:6c5518885385	930	LCD.cls();
dsuranr15	0:6c5518885385	931	LCD.locate(0,1);
dsuranr15	0:6c5518885385	932	LCD.printf("MES");
dsuranr15	0:6c5518885385	933	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	934	//ALM1[2]=0;
dsuranr15	0:6c5518885385	935	fflush( stdin );
dsuranr15	0:6c5518885385	936	//wait(1);
dsuranr15	0:6c5518885385	937	control();
dsuranr15	0:6c5518885385	938	FEC1[j]=num;
dsuranr15	0:6c5518885385	939	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	940	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	941	wait(1);
dsuranr15	0:6c5518885385	942	}
dsuranr15	0:6c5518885385	943
dsuranr15	0:6c5518885385	944
dsuranr15	0:6c5518885385	945	j=0;
dsuranr15	0:6c5518885385	946	LCD.cls();
dsuranr15	0:6c5518885385	947	LCD.locate(0,1);
dsuranr15	0:6c5518885385	948	LCD.printf("DIA");
dsuranr15	0:6c5518885385	949	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	950	//ALM1[2]=0;
dsuranr15	0:6c5518885385	951	fflush( stdin );
dsuranr15	0:6c5518885385	952	//wait(1);
dsuranr15	0:6c5518885385	953	control();
dsuranr15	0:6c5518885385	954	FEC1[j]=num;
dsuranr15	0:6c5518885385	955	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	956	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	957	wait(1);
dsuranr15	0:6c5518885385	958	}
dsuranr15	0:6c5518885385	959
dsuranr15	0:6c5518885385	960
dsuranr15	0:6c5518885385	961	////////////////////////
dsuranr15	0:6c5518885385	962	LCD.cls();
dsuranr15	0:6c5518885385	963	LCD.locate(14,0);
dsuranr15	0:6c5518885385	964	LCD.printf("A1");
dsuranr15	0:6c5518885385	965	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	966	//
dsuranr15	0:6c5518885385	967	LCD.locate(2,0);
dsuranr15	0:6c5518885385	968	LCD.printf(":");
dsuranr15	0:6c5518885385	969	LCD.locate(j,0);
dsuranr15	0:6c5518885385	970	LCD.printf("%i",ALM1[j]);
dsuranr15	0:6c5518885385	971
dsuranr15	0:6c5518885385	972
dsuranr15	0:6c5518885385	973	}
dsuranr15	0:6c5518885385	974
dsuranr15	0:6c5518885385	975
dsuranr15	0:6c5518885385	976	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	977	//
dsuranr15	0:6c5518885385	978	LCD.locate(4,1);
dsuranr15	0:6c5518885385	979	LCD.printf("-");
dsuranr15	0:6c5518885385	980	LCD.locate(7,1);
dsuranr15	0:6c5518885385	981	LCD.printf("-");
dsuranr15	0:6c5518885385	982	LCD.locate(j,1);
dsuranr15	0:6c5518885385	983	LCD.printf("%i",FEC1[j]);
dsuranr15	0:6c5518885385	984
dsuranr15	0:6c5518885385	985
dsuranr15	0:6c5518885385	986	}
dsuranr15	0:6c5518885385	987	wait(5);
dsuranr15	0:6c5518885385	988
dsuranr15	0:6c5518885385	989
dsuranr15	0:6c5518885385	990	ALM_1[0]=ALM1[0];
dsuranr15	0:6c5518885385	991	ALM_1[1]=ALM1[1];
dsuranr15	0:6c5518885385	992	ALM_1[2]=ALM1[3];
dsuranr15	0:6c5518885385	993	ALM_1[3]=ALM1[4];
dsuranr15	0:6c5518885385	994
dsuranr15	0:6c5518885385	995	FEC_1[0]=FEC1[0];
dsuranr15	0:6c5518885385	996	FEC_1[1]=FEC1[1];
dsuranr15	0:6c5518885385	997	FEC_1[2]=FEC1[2];
dsuranr15	0:6c5518885385	998	FEC_1[3]=FEC1[3];
dsuranr15	0:6c5518885385	999	FEC_1[4]=FEC1[5];
dsuranr15	0:6c5518885385	1000	FEC_1[5]=FEC1[6];
dsuranr15	0:6c5518885385	1001	FEC_1[6]=FEC1[8];
dsuranr15	0:6c5518885385	1002	FEC_1[7]=FEC1[9];
dsuranr15	0:6c5518885385	1003
dsuranr15	0:6c5518885385	1004	sprintf(alm_1,"%d%d%d%d",ALM_1[0],ALM_1[1],ALM_1[2],ALM_1[3]);
dsuranr15	0:6c5518885385	1005	sprintf(fec_1,"%d%d%d%d%d%d%d%d",FEC_1[0],FEC_1[1],FEC_1[2],FEC_1[3],FEC_1[4],FEC_1[5],FEC_1[6],FEC_1[7]);
dsuranr15	0:6c5518885385	1006
dsuranr15	0:6c5518885385	1007	x=1;
dsuranr15	0:6c5518885385	1008	wait(1);
dsuranr15	0:6c5518885385	1009	al=1;
dsuranr15	0:6c5518885385	1010	con=2;
dsuranr15	0:6c5518885385	1011
dsuranr15	0:6c5518885385	1012
dsuranr15	0:6c5518885385	1013	x=1;
dsuranr15	0:6c5518885385	1014	wait(1);
dsuranr15	0:6c5518885385	1015	al=1;
dsuranr15	0:6c5518885385	1016	p=-1;
dsuranr15	0:6c5518885385	1017	}
dsuranr15	0:6c5518885385	1018
dsuranr15	0:6c5518885385	1019	wait(1);
dsuranr15	0:6c5518885385	1020	}
dsuranr15	0:6c5518885385	1021
dsuranr15	0:6c5518885385	1022	}
dsuranr15	0:6c5518885385	1023
dsuranr15	0:6c5518885385	1024	wait(1);
dsuranr15	0:6c5518885385	1025	nu=0;
dsuranr15	0:6c5518885385	1026	y=0;
dsuranr15	0:6c5518885385	1027	con=0;
dsuranr15	0:6c5518885385	1028	LCD.cls();
dsuranr15	0:6c5518885385	1029	LCD.printf("ALM1 PR0GRAMADA");
dsuranr15	0:6c5518885385	1030	wait(5);
dsuranr15	0:6c5518885385	1031	con=2;
dsuranr15	0:6c5518885385	1032
dsuranr15	0:6c5518885385	1033	//todas las alarmas se configuran igual, solo cambia el nombre de los vectores.
dsuranr15	0:6c5518885385	1034
dsuranr15	0:6c5518885385	1035	break;
dsuranr15	0:6c5518885385	1036	///////////////////////////////////////////////////////////////////////////////7777
dsuranr15	0:6c5518885385	1037	case 2:
dsuranr15	0:6c5518885385	1038	/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	1039	LCD.cls();
dsuranr15	0:6c5518885385	1040	LCD.printf(" ALM 2");
dsuranr15	0:6c5518885385	1041	al=0;
dsuranr15	0:6c5518885385	1042	con=0;
dsuranr15	0:6c5518885385	1043	wait(1);
dsuranr15	0:6c5518885385	1044	x=0;
dsuranr15	0:6c5518885385	1045	while(x==0) {
dsuranr15	0:6c5518885385	1046
dsuranr15	0:6c5518885385	1047	if(button4.falling()) {
dsuranr15	0:6c5518885385	1048	con++;
dsuranr15	0:6c5518885385	1049
dsuranr15	0:6c5518885385	1050	while(con==1) {
dsuranr15	0:6c5518885385	1051	if(button4.falling()) {
dsuranr15	0:6c5518885385	1052	con++;
dsuranr15	0:6c5518885385	1053	}
dsuranr15	0:6c5518885385	1054	m=wheel.getPulses();
dsuranr15	0:6c5518885385	1055	LCD.cls();
dsuranr15	0:6c5518885385	1056	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1057	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	1058
dsuranr15	0:6c5518885385	1059	wait(2);
dsuranr15	0:6c5518885385	1060	int j=0;
dsuranr15	0:6c5518885385	1061	LCD.cls();
dsuranr15	0:6c5518885385	1062	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1063	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	1064	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	1065	ALM2[2]=0;
dsuranr15	0:6c5518885385	1066	d=0;
dsuranr15	0:6c5518885385	1067	wheel.reset();
dsuranr15	0:6c5518885385	1068	while(d==0) {
dsuranr15	0:6c5518885385	1069	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1070	if(num>9) {
dsuranr15	0:6c5518885385	1071	num=9;
dsuranr15	0:6c5518885385	1072	}
dsuranr15	0:6c5518885385	1073	if(num<0) {
dsuranr15	0:6c5518885385	1074	num=0;
dsuranr15	0:6c5518885385	1075	}
dsuranr15	0:6c5518885385	1076	ALM2[j]=num;
dsuranr15	0:6c5518885385	1077	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1078	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1079	if(button4.falling()) {
dsuranr15	0:6c5518885385	1080	d=1;
dsuranr15	0:6c5518885385	1081	}
dsuranr15	0:6c5518885385	1082	}
dsuranr15	0:6c5518885385	1083	wait(1);
dsuranr15	0:6c5518885385	1084	}
dsuranr15	0:6c5518885385	1085
dsuranr15	0:6c5518885385	1086	wheel.reset();
dsuranr15	0:6c5518885385	1087	LCD.cls();
dsuranr15	0:6c5518885385	1088	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1089	LCD.printf("MIN");
dsuranr15	0:6c5518885385	1090
dsuranr15	0:6c5518885385	1091
dsuranr15	0:6c5518885385	1092
dsuranr15	0:6c5518885385	1093	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	1094	d=0;
dsuranr15	0:6c5518885385	1095	wheel.reset();
dsuranr15	0:6c5518885385	1096	while(d==0) {
dsuranr15	0:6c5518885385	1097	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1098	if(num>9) {
dsuranr15	0:6c5518885385	1099	num=9;
dsuranr15	0:6c5518885385	1100	}
dsuranr15	0:6c5518885385	1101	if(num<0) {
dsuranr15	0:6c5518885385	1102	num=0;
dsuranr15	0:6c5518885385	1103	}
dsuranr15	0:6c5518885385	1104	ALM2[j]=num;
dsuranr15	0:6c5518885385	1105	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	1106	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1107	if(button4.falling()) {
dsuranr15	0:6c5518885385	1108	d=1;
dsuranr15	0:6c5518885385	1109	}
dsuranr15	0:6c5518885385	1110	}
dsuranr15	0:6c5518885385	1111	wait(1);
dsuranr15	0:6c5518885385	1112	}
dsuranr15	0:6c5518885385	1113
dsuranr15	0:6c5518885385	1114
dsuranr15	0:6c5518885385	1115	///////////////////////////////
dsuranr15	0:6c5518885385	1116	j=0;
dsuranr15	0:6c5518885385	1117	LCD.cls();
dsuranr15	0:6c5518885385	1118	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1119	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	1120	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	1121	FEC2[4]=0;
dsuranr15	0:6c5518885385	1122	FEC2[7]=0;
dsuranr15	0:6c5518885385	1123	d=0;
dsuranr15	0:6c5518885385	1124	wheel.reset();
dsuranr15	0:6c5518885385	1125	while(d==0) {
dsuranr15	0:6c5518885385	1126	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1127	if(num>9) {
dsuranr15	0:6c5518885385	1128	num=9;
dsuranr15	0:6c5518885385	1129	}
dsuranr15	0:6c5518885385	1130	if(num<0) {
dsuranr15	0:6c5518885385	1131	num=0;
dsuranr15	0:6c5518885385	1132	}
dsuranr15	0:6c5518885385	1133	FEC2[j]=num;
dsuranr15	0:6c5518885385	1134	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1135	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1136	if(button4.falling()) {
dsuranr15	0:6c5518885385	1137	d=1;
dsuranr15	0:6c5518885385	1138	}
dsuranr15	0:6c5518885385	1139	}
dsuranr15	0:6c5518885385	1140	wait(1);
dsuranr15	0:6c5518885385	1141	}
dsuranr15	0:6c5518885385	1142
dsuranr15	0:6c5518885385	1143	j=0;
dsuranr15	0:6c5518885385	1144	LCD.cls();
dsuranr15	0:6c5518885385	1145	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1146	LCD.printf("MES");
dsuranr15	0:6c5518885385	1147	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	1148	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1149	d=0;
dsuranr15	0:6c5518885385	1150	wheel.reset();
dsuranr15	0:6c5518885385	1151	while(d==0) {
dsuranr15	0:6c5518885385	1152	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1153	if(num>9) {
dsuranr15	0:6c5518885385	1154	num=9;
dsuranr15	0:6c5518885385	1155	}
dsuranr15	0:6c5518885385	1156	if(num<0) {
dsuranr15	0:6c5518885385	1157	num=0;
dsuranr15	0:6c5518885385	1158	}
dsuranr15	0:6c5518885385	1159	FEC2[j]=num;
dsuranr15	0:6c5518885385	1160	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	1161	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1162	if(button4.falling()) {
dsuranr15	0:6c5518885385	1163	d=1;
dsuranr15	0:6c5518885385	1164	}
dsuranr15	0:6c5518885385	1165	}
dsuranr15	0:6c5518885385	1166	wait(1);
dsuranr15	0:6c5518885385	1167	}
dsuranr15	0:6c5518885385	1168
dsuranr15	0:6c5518885385	1169	j=0;
dsuranr15	0:6c5518885385	1170	LCD.cls();
dsuranr15	0:6c5518885385	1171	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1172	LCD.printf("DIA");
dsuranr15	0:6c5518885385	1173	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	1174	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1175	d=0;
dsuranr15	0:6c5518885385	1176	wheel.reset();
dsuranr15	0:6c5518885385	1177	while(d==0) {
dsuranr15	0:6c5518885385	1178	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1179	if(num>9) {
dsuranr15	0:6c5518885385	1180	num=9;
dsuranr15	0:6c5518885385	1181	}
dsuranr15	0:6c5518885385	1182	if(num<0) {
dsuranr15	0:6c5518885385	1183	num=0;
dsuranr15	0:6c5518885385	1184	}
dsuranr15	0:6c5518885385	1185	FEC2[j]=num;
dsuranr15	0:6c5518885385	1186	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	1187	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1188	if(button4.falling()) {
dsuranr15	0:6c5518885385	1189	d=1;
dsuranr15	0:6c5518885385	1190	}
dsuranr15	0:6c5518885385	1191	}
dsuranr15	0:6c5518885385	1192	wait(1);
dsuranr15	0:6c5518885385	1193	}
dsuranr15	0:6c5518885385	1194
dsuranr15	0:6c5518885385	1195	//////////////////////////////////
dsuranr15	0:6c5518885385	1196	LCD.cls();
dsuranr15	0:6c5518885385	1197	LCD.locate(14,0);
dsuranr15	0:6c5518885385	1198	LCD.printf("A2");
dsuranr15	0:6c5518885385	1199	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	1200	//
dsuranr15	0:6c5518885385	1201	LCD.locate(2,0);
dsuranr15	0:6c5518885385	1202	LCD.printf(":");
dsuranr15	0:6c5518885385	1203	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1204	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1205
dsuranr15	0:6c5518885385	1206
dsuranr15	0:6c5518885385	1207	}
dsuranr15	0:6c5518885385	1208
dsuranr15	0:6c5518885385	1209
dsuranr15	0:6c5518885385	1210	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	1211	//
dsuranr15	0:6c5518885385	1212	LCD.locate(4,1);
dsuranr15	0:6c5518885385	1213	LCD.printf("-");
dsuranr15	0:6c5518885385	1214	LCD.locate(7,1);
dsuranr15	0:6c5518885385	1215	LCD.printf("-");
dsuranr15	0:6c5518885385	1216	LCD.locate(j,1);
dsuranr15	0:6c5518885385	1217	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1218
dsuranr15	0:6c5518885385	1219
dsuranr15	0:6c5518885385	1220	}
dsuranr15	0:6c5518885385	1221	wait(5);
dsuranr15	0:6c5518885385	1222
dsuranr15	0:6c5518885385	1223
dsuranr15	0:6c5518885385	1224	ALM_2[0]=ALM2[0];
dsuranr15	0:6c5518885385	1225	ALM_2[1]=ALM2[1];
dsuranr15	0:6c5518885385	1226	ALM_2[2]=ALM2[3];
dsuranr15	0:6c5518885385	1227	ALM_2[3]=ALM2[4];
dsuranr15	0:6c5518885385	1228
dsuranr15	0:6c5518885385	1229	FEC_2[0]=FEC2[0];
dsuranr15	0:6c5518885385	1230	FEC_2[1]=FEC2[1];
dsuranr15	0:6c5518885385	1231	FEC_2[2]=FEC2[2];
dsuranr15	0:6c5518885385	1232	FEC_2[3]=FEC2[3];
dsuranr15	0:6c5518885385	1233	FEC_2[4]=FEC2[5];
dsuranr15	0:6c5518885385	1234	FEC_2[5]=FEC2[6];
dsuranr15	0:6c5518885385	1235	FEC_2[6]=FEC2[8];
dsuranr15	0:6c5518885385	1236	FEC_2[7]=FEC2[9];
dsuranr15	0:6c5518885385	1237
dsuranr15	0:6c5518885385	1238	sprintf(alm_2,"%d%d%d%d",ALM_2[0],ALM_2[1],ALM_2[2],ALM_2[3]);
dsuranr15	0:6c5518885385	1239	sprintf(fec_2,"%d%d%d%d%d%d%d%d",FEC_2[0],FEC_2[1],FEC_2[2],FEC_2[3],FEC_2[4],FEC_2[5],FEC_2[6],FEC_2[7]);
dsuranr15	0:6c5518885385	1240
dsuranr15	0:6c5518885385	1241	x=1;
dsuranr15	0:6c5518885385	1242	wait(1);
dsuranr15	0:6c5518885385	1243	al=1;
dsuranr15	0:6c5518885385	1244	con=2;
dsuranr15	0:6c5518885385	1245
dsuranr15	0:6c5518885385	1246	}
dsuranr15	0:6c5518885385	1247	wait(1);
dsuranr15	0:6c5518885385	1248	}
dsuranr15	0:6c5518885385	1249	al=0;
dsuranr15	0:6c5518885385	1250	wait(1);
dsuranr15	0:6c5518885385	1251	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	1252
dsuranr15	0:6c5518885385	1253	if(p!=-1) {
dsuranr15	0:6c5518885385	1254	while (al!=1) {
dsuranr15	0:6c5518885385	1255	LCD.cls();
dsuranr15	0:6c5518885385	1256	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1257	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	1258	wait(2);
dsuranr15	0:6c5518885385	1259	int j=0;
dsuranr15	0:6c5518885385	1260	LCD.cls();
dsuranr15	0:6c5518885385	1261	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1262	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	1263	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	1264	ALM2[2]=0;
dsuranr15	0:6c5518885385	1265	fflush( stdin );
dsuranr15	0:6c5518885385	1266	//wait(1);
dsuranr15	0:6c5518885385	1267	control();
dsuranr15	0:6c5518885385	1268	ALM2[j]=num;
dsuranr15	0:6c5518885385	1269	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1270	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1271	wait(1);
dsuranr15	0:6c5518885385	1272	}
dsuranr15	0:6c5518885385	1273	LCD.cls();
dsuranr15	0:6c5518885385	1274	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1275	LCD.printf("MIN");
dsuranr15	0:6c5518885385	1276
dsuranr15	0:6c5518885385	1277	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	1278	fflush( stdin );
dsuranr15	0:6c5518885385	1279	//wait(1);
dsuranr15	0:6c5518885385	1280	control();
dsuranr15	0:6c5518885385	1281	ALM2[j]=num;
dsuranr15	0:6c5518885385	1282	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	1283	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1284	wait(1);
dsuranr15	0:6c5518885385	1285	}
dsuranr15	0:6c5518885385	1286	////////////////////////
dsuranr15	0:6c5518885385	1287	j=0;
dsuranr15	0:6c5518885385	1288	LCD.cls();
dsuranr15	0:6c5518885385	1289	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1290	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	1291	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	1292	FEC2[4]=0;
dsuranr15	0:6c5518885385	1293	FEC2[7]=0;
dsuranr15	0:6c5518885385	1294
dsuranr15	0:6c5518885385	1295
dsuranr15	0:6c5518885385	1296	fflush( stdin );
dsuranr15	0:6c5518885385	1297	//wait(1);
dsuranr15	0:6c5518885385	1298	control();
dsuranr15	0:6c5518885385	1299	FEC2[j]=num;
dsuranr15	0:6c5518885385	1300	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1301	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1302	wait(1);
dsuranr15	0:6c5518885385	1303	}
dsuranr15	0:6c5518885385	1304
dsuranr15	0:6c5518885385	1305
dsuranr15	0:6c5518885385	1306	j=0;
dsuranr15	0:6c5518885385	1307	LCD.cls();
dsuranr15	0:6c5518885385	1308	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1309	LCD.printf("MES");
dsuranr15	0:6c5518885385	1310	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	1311	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1312	fflush( stdin );
dsuranr15	0:6c5518885385	1313	//wait(1);
dsuranr15	0:6c5518885385	1314	control();
dsuranr15	0:6c5518885385	1315	FEC2[j]=num;
dsuranr15	0:6c5518885385	1316	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	1317	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1318	wait(1);
dsuranr15	0:6c5518885385	1319	}
dsuranr15	0:6c5518885385	1320
dsuranr15	0:6c5518885385	1321
dsuranr15	0:6c5518885385	1322	j=0;
dsuranr15	0:6c5518885385	1323	LCD.cls();
dsuranr15	0:6c5518885385	1324	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1325	LCD.printf("DIA");
dsuranr15	0:6c5518885385	1326	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	1327	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1328	fflush( stdin );
dsuranr15	0:6c5518885385	1329	//wait(1);
dsuranr15	0:6c5518885385	1330	control();
dsuranr15	0:6c5518885385	1331	FEC2[j]=num;
dsuranr15	0:6c5518885385	1332	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	1333	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1334	wait(1);
dsuranr15	0:6c5518885385	1335	}
dsuranr15	0:6c5518885385	1336
dsuranr15	0:6c5518885385	1337
dsuranr15	0:6c5518885385	1338	////////////////////////
dsuranr15	0:6c5518885385	1339	LCD.cls();
dsuranr15	0:6c5518885385	1340	LCD.locate(14,0);
dsuranr15	0:6c5518885385	1341	LCD.printf("A2");
dsuranr15	0:6c5518885385	1342	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	1343	//
dsuranr15	0:6c5518885385	1344	LCD.locate(2,0);
dsuranr15	0:6c5518885385	1345	LCD.printf(":");
dsuranr15	0:6c5518885385	1346	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1347	LCD.printf("%i",ALM2[j]);
dsuranr15	0:6c5518885385	1348
dsuranr15	0:6c5518885385	1349
dsuranr15	0:6c5518885385	1350	}
dsuranr15	0:6c5518885385	1351
dsuranr15	0:6c5518885385	1352
dsuranr15	0:6c5518885385	1353	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	1354	//
dsuranr15	0:6c5518885385	1355	LCD.locate(4,1);
dsuranr15	0:6c5518885385	1356	LCD.printf("-");
dsuranr15	0:6c5518885385	1357	LCD.locate(7,1);
dsuranr15	0:6c5518885385	1358	LCD.printf("-");
dsuranr15	0:6c5518885385	1359	LCD.locate(j,1);
dsuranr15	0:6c5518885385	1360	LCD.printf("%i",FEC2[j]);
dsuranr15	0:6c5518885385	1361
dsuranr15	0:6c5518885385	1362
dsuranr15	0:6c5518885385	1363	}
dsuranr15	0:6c5518885385	1364	wait(5);
dsuranr15	0:6c5518885385	1365
dsuranr15	0:6c5518885385	1366
dsuranr15	0:6c5518885385	1367	ALM_2[0]=ALM2[0];
dsuranr15	0:6c5518885385	1368	ALM_2[1]=ALM2[1];
dsuranr15	0:6c5518885385	1369	ALM_2[2]=ALM2[3];
dsuranr15	0:6c5518885385	1370	ALM_2[3]=ALM2[4];
dsuranr15	0:6c5518885385	1371
dsuranr15	0:6c5518885385	1372	FEC_2[0]=FEC2[0];
dsuranr15	0:6c5518885385	1373	FEC_2[1]=FEC2[1];
dsuranr15	0:6c5518885385	1374	FEC_2[2]=FEC2[2];
dsuranr15	0:6c5518885385	1375	FEC_2[3]=FEC2[3];
dsuranr15	0:6c5518885385	1376	FEC_2[4]=FEC2[5];
dsuranr15	0:6c5518885385	1377	FEC_2[5]=FEC2[6];
dsuranr15	0:6c5518885385	1378	FEC_2[6]=FEC2[8];
dsuranr15	0:6c5518885385	1379	FEC_2[7]=FEC2[9];
dsuranr15	0:6c5518885385	1380
dsuranr15	0:6c5518885385	1381	sprintf(alm_2,"%d%d%d%d",ALM_2[0],ALM_2[1],ALM_2[2],ALM_2[3]);
dsuranr15	0:6c5518885385	1382	sprintf(fec_2,"%d%d%d%d%d%d%d%d",FEC_2[0],FEC_2[1],FEC_2[2],FEC_2[3],FEC_2[4],FEC_2[5],FEC_2[6],FEC_2[7]);
dsuranr15	0:6c5518885385	1383
dsuranr15	0:6c5518885385	1384	x=1;
dsuranr15	0:6c5518885385	1385	wait(1);
dsuranr15	0:6c5518885385	1386	al=1;
dsuranr15	0:6c5518885385	1387	con=2;
dsuranr15	0:6c5518885385	1388
dsuranr15	0:6c5518885385	1389
dsuranr15	0:6c5518885385	1390	x=1;
dsuranr15	0:6c5518885385	1391	wait(1);
dsuranr15	0:6c5518885385	1392	al=1;
dsuranr15	0:6c5518885385	1393	p=-1;
dsuranr15	0:6c5518885385	1394	}
dsuranr15	0:6c5518885385	1395
dsuranr15	0:6c5518885385	1396	wait(1);
dsuranr15	0:6c5518885385	1397	}
dsuranr15	0:6c5518885385	1398
dsuranr15	0:6c5518885385	1399	}
dsuranr15	0:6c5518885385	1400
dsuranr15	0:6c5518885385	1401	wait(1);
dsuranr15	0:6c5518885385	1402	nu=0;
dsuranr15	0:6c5518885385	1403	y=0;
dsuranr15	0:6c5518885385	1404	con=0;
dsuranr15	0:6c5518885385	1405	LCD.cls();
dsuranr15	0:6c5518885385	1406	LCD.printf("ALM2 PR0GRAMADA");
dsuranr15	0:6c5518885385	1407	wait(5);
dsuranr15	0:6c5518885385	1408	con=2;
dsuranr15	0:6c5518885385	1409
dsuranr15	0:6c5518885385	1410
dsuranr15	0:6c5518885385	1411	////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	1412	break;
dsuranr15	0:6c5518885385	1413	case 3:
dsuranr15	0:6c5518885385	1414	/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	1415	LCD.cls();
dsuranr15	0:6c5518885385	1416	LCD.printf(" ALM 3");
dsuranr15	0:6c5518885385	1417	al=0;
dsuranr15	0:6c5518885385	1418	con=0;
dsuranr15	0:6c5518885385	1419	wait(1);
dsuranr15	0:6c5518885385	1420	x=0;
dsuranr15	0:6c5518885385	1421	while(x==0) {
dsuranr15	0:6c5518885385	1422
dsuranr15	0:6c5518885385	1423	if(button4.falling()) {
dsuranr15	0:6c5518885385	1424	con++;
dsuranr15	0:6c5518885385	1425
dsuranr15	0:6c5518885385	1426	while(con==1) {
dsuranr15	0:6c5518885385	1427	if(button4.falling()) {
dsuranr15	0:6c5518885385	1428	con++;
dsuranr15	0:6c5518885385	1429	}
dsuranr15	0:6c5518885385	1430	m=wheel.getPulses();
dsuranr15	0:6c5518885385	1431	LCD.cls();
dsuranr15	0:6c5518885385	1432	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1433	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	1434
dsuranr15	0:6c5518885385	1435	wait(2);
dsuranr15	0:6c5518885385	1436	int j=0;
dsuranr15	0:6c5518885385	1437	LCD.cls();
dsuranr15	0:6c5518885385	1438	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1439	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	1440	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	1441	ALM3[2]=0;
dsuranr15	0:6c5518885385	1442	d=0;
dsuranr15	0:6c5518885385	1443	wheel.reset();
dsuranr15	0:6c5518885385	1444	while(d==0) {
dsuranr15	0:6c5518885385	1445	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1446	if(num>9) {
dsuranr15	0:6c5518885385	1447	num=9;
dsuranr15	0:6c5518885385	1448	}
dsuranr15	0:6c5518885385	1449	if(num<0) {
dsuranr15	0:6c5518885385	1450	num=0;
dsuranr15	0:6c5518885385	1451	}
dsuranr15	0:6c5518885385	1452	ALM3[j]=num;
dsuranr15	0:6c5518885385	1453	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1454	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1455	if(button4.falling()) {
dsuranr15	0:6c5518885385	1456	d=1;
dsuranr15	0:6c5518885385	1457	}
dsuranr15	0:6c5518885385	1458	}
dsuranr15	0:6c5518885385	1459	wait(1);
dsuranr15	0:6c5518885385	1460	}
dsuranr15	0:6c5518885385	1461
dsuranr15	0:6c5518885385	1462	wheel.reset();
dsuranr15	0:6c5518885385	1463	LCD.cls();
dsuranr15	0:6c5518885385	1464	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1465	LCD.printf("MIN");
dsuranr15	0:6c5518885385	1466
dsuranr15	0:6c5518885385	1467
dsuranr15	0:6c5518885385	1468
dsuranr15	0:6c5518885385	1469	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	1470	d=0;
dsuranr15	0:6c5518885385	1471	wheel.reset();
dsuranr15	0:6c5518885385	1472	while(d==0) {
dsuranr15	0:6c5518885385	1473	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1474	if(num>9) {
dsuranr15	0:6c5518885385	1475	num=9;
dsuranr15	0:6c5518885385	1476	}
dsuranr15	0:6c5518885385	1477	if(num<0) {
dsuranr15	0:6c5518885385	1478	num=0;
dsuranr15	0:6c5518885385	1479	}
dsuranr15	0:6c5518885385	1480	ALM3[j]=num;
dsuranr15	0:6c5518885385	1481	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	1482	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1483	if(button4.falling()) {
dsuranr15	0:6c5518885385	1484	d=1;
dsuranr15	0:6c5518885385	1485	}
dsuranr15	0:6c5518885385	1486	}
dsuranr15	0:6c5518885385	1487	wait(1);
dsuranr15	0:6c5518885385	1488	}
dsuranr15	0:6c5518885385	1489
dsuranr15	0:6c5518885385	1490
dsuranr15	0:6c5518885385	1491	///////////////////////////////
dsuranr15	0:6c5518885385	1492	j=0;
dsuranr15	0:6c5518885385	1493	LCD.cls();
dsuranr15	0:6c5518885385	1494	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1495	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	1496	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	1497	FEC3[4]=0;
dsuranr15	0:6c5518885385	1498	FEC3[7]=0;
dsuranr15	0:6c5518885385	1499	d=0;
dsuranr15	0:6c5518885385	1500	wheel.reset();
dsuranr15	0:6c5518885385	1501	while(d==0) {
dsuranr15	0:6c5518885385	1502	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1503	if(num>9) {
dsuranr15	0:6c5518885385	1504	num=9;
dsuranr15	0:6c5518885385	1505	}
dsuranr15	0:6c5518885385	1506	if(num<0) {
dsuranr15	0:6c5518885385	1507	num=0;
dsuranr15	0:6c5518885385	1508	}
dsuranr15	0:6c5518885385	1509	FEC3[j]=num;
dsuranr15	0:6c5518885385	1510	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1511	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1512	if(button4.falling()) {
dsuranr15	0:6c5518885385	1513	d=1;
dsuranr15	0:6c5518885385	1514	}
dsuranr15	0:6c5518885385	1515	}
dsuranr15	0:6c5518885385	1516	wait(1);
dsuranr15	0:6c5518885385	1517	}
dsuranr15	0:6c5518885385	1518
dsuranr15	0:6c5518885385	1519	j=0;
dsuranr15	0:6c5518885385	1520	LCD.cls();
dsuranr15	0:6c5518885385	1521	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1522	LCD.printf("MES");
dsuranr15	0:6c5518885385	1523	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	1524	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1525	d=0;
dsuranr15	0:6c5518885385	1526	wheel.reset();
dsuranr15	0:6c5518885385	1527	while(d==0) {
dsuranr15	0:6c5518885385	1528	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1529	if(num>9) {
dsuranr15	0:6c5518885385	1530	num=9;
dsuranr15	0:6c5518885385	1531	}
dsuranr15	0:6c5518885385	1532	if(num<0) {
dsuranr15	0:6c5518885385	1533	num=0;
dsuranr15	0:6c5518885385	1534	}
dsuranr15	0:6c5518885385	1535	FEC3[j]=num;
dsuranr15	0:6c5518885385	1536	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	1537	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1538	if(button4.falling()) {
dsuranr15	0:6c5518885385	1539	d=1;
dsuranr15	0:6c5518885385	1540	}
dsuranr15	0:6c5518885385	1541	}
dsuranr15	0:6c5518885385	1542	wait(1);
dsuranr15	0:6c5518885385	1543	}
dsuranr15	0:6c5518885385	1544
dsuranr15	0:6c5518885385	1545	j=0;
dsuranr15	0:6c5518885385	1546	LCD.cls();
dsuranr15	0:6c5518885385	1547	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1548	LCD.printf("DIA");
dsuranr15	0:6c5518885385	1549	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	1550	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1551	d=0;
dsuranr15	0:6c5518885385	1552	wheel.reset();
dsuranr15	0:6c5518885385	1553	while(d==0) {
dsuranr15	0:6c5518885385	1554	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1555	if(num>9) {
dsuranr15	0:6c5518885385	1556	num=9;
dsuranr15	0:6c5518885385	1557	}
dsuranr15	0:6c5518885385	1558	if(num<0) {
dsuranr15	0:6c5518885385	1559	num=0;
dsuranr15	0:6c5518885385	1560	}
dsuranr15	0:6c5518885385	1561	FEC3[j]=num;
dsuranr15	0:6c5518885385	1562	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	1563	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1564	if(button4.falling()) {
dsuranr15	0:6c5518885385	1565	d=1;
dsuranr15	0:6c5518885385	1566	}
dsuranr15	0:6c5518885385	1567	}
dsuranr15	0:6c5518885385	1568	wait(1);
dsuranr15	0:6c5518885385	1569	}
dsuranr15	0:6c5518885385	1570
dsuranr15	0:6c5518885385	1571	//////////////////////////////////
dsuranr15	0:6c5518885385	1572	LCD.cls();
dsuranr15	0:6c5518885385	1573	LCD.locate(14,0);
dsuranr15	0:6c5518885385	1574	LCD.printf("A3");
dsuranr15	0:6c5518885385	1575	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	1576	//
dsuranr15	0:6c5518885385	1577	LCD.locate(2,0);
dsuranr15	0:6c5518885385	1578	LCD.printf(":");
dsuranr15	0:6c5518885385	1579	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1580	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1581
dsuranr15	0:6c5518885385	1582
dsuranr15	0:6c5518885385	1583	}
dsuranr15	0:6c5518885385	1584
dsuranr15	0:6c5518885385	1585
dsuranr15	0:6c5518885385	1586	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	1587	//
dsuranr15	0:6c5518885385	1588	LCD.locate(4,1);
dsuranr15	0:6c5518885385	1589	LCD.printf("-");
dsuranr15	0:6c5518885385	1590	LCD.locate(7,1);
dsuranr15	0:6c5518885385	1591	LCD.printf("-");
dsuranr15	0:6c5518885385	1592	LCD.locate(j,1);
dsuranr15	0:6c5518885385	1593	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1594
dsuranr15	0:6c5518885385	1595
dsuranr15	0:6c5518885385	1596	}
dsuranr15	0:6c5518885385	1597	wait(5);
dsuranr15	0:6c5518885385	1598
dsuranr15	0:6c5518885385	1599
dsuranr15	0:6c5518885385	1600	ALM_3[0]=ALM3[0];
dsuranr15	0:6c5518885385	1601	ALM_3[1]=ALM3[1];
dsuranr15	0:6c5518885385	1602	ALM_3[2]=ALM3[3];
dsuranr15	0:6c5518885385	1603	ALM_3[3]=ALM3[4];
dsuranr15	0:6c5518885385	1604
dsuranr15	0:6c5518885385	1605	FEC_3[0]=FEC3[0];
dsuranr15	0:6c5518885385	1606	FEC_3[1]=FEC3[1];
dsuranr15	0:6c5518885385	1607	FEC_3[2]=FEC3[2];
dsuranr15	0:6c5518885385	1608	FEC_3[3]=FEC3[3];
dsuranr15	0:6c5518885385	1609	FEC_3[4]=FEC3[5];
dsuranr15	0:6c5518885385	1610	FEC_3[5]=FEC3[6];
dsuranr15	0:6c5518885385	1611	FEC_3[6]=FEC3[8];
dsuranr15	0:6c5518885385	1612	FEC_3[7]=FEC3[9];
dsuranr15	0:6c5518885385	1613
dsuranr15	0:6c5518885385	1614	sprintf(alm_3,"%d%d%d%d",ALM_3[0],ALM_3[1],ALM_3[2],ALM_3[3]);
dsuranr15	0:6c5518885385	1615	sprintf(fec_3,"%d%d%d%d%d%d%d%d",FEC_3[0],FEC_3[1],FEC_3[2],FEC_3[3],FEC_3[4],FEC_3[5],FEC_3[6],FEC_3[7]);
dsuranr15	0:6c5518885385	1616
dsuranr15	0:6c5518885385	1617	x=1;
dsuranr15	0:6c5518885385	1618	wait(1);
dsuranr15	0:6c5518885385	1619	al=1;
dsuranr15	0:6c5518885385	1620	con=2;
dsuranr15	0:6c5518885385	1621
dsuranr15	0:6c5518885385	1622	}
dsuranr15	0:6c5518885385	1623	wait(1);
dsuranr15	0:6c5518885385	1624	}
dsuranr15	0:6c5518885385	1625	al=0;
dsuranr15	0:6c5518885385	1626	wait(1);
dsuranr15	0:6c5518885385	1627	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	1628
dsuranr15	0:6c5518885385	1629	if(p!=-1) {
dsuranr15	0:6c5518885385	1630	while (al!=1) {
dsuranr15	0:6c5518885385	1631	LCD.cls();
dsuranr15	0:6c5518885385	1632	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1633	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	1634	wait(2);
dsuranr15	0:6c5518885385	1635	int j=0;
dsuranr15	0:6c5518885385	1636	LCD.cls();
dsuranr15	0:6c5518885385	1637	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1638	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	1639	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	1640	ALM3[2]=0;
dsuranr15	0:6c5518885385	1641	fflush( stdin );
dsuranr15	0:6c5518885385	1642	//wait(1);
dsuranr15	0:6c5518885385	1643	control();
dsuranr15	0:6c5518885385	1644	ALM3[j]=num;
dsuranr15	0:6c5518885385	1645	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1646	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1647	wait(1);
dsuranr15	0:6c5518885385	1648	}
dsuranr15	0:6c5518885385	1649	LCD.cls();
dsuranr15	0:6c5518885385	1650	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1651	LCD.printf("MIN");
dsuranr15	0:6c5518885385	1652
dsuranr15	0:6c5518885385	1653	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	1654	fflush( stdin );
dsuranr15	0:6c5518885385	1655	//wait(1);
dsuranr15	0:6c5518885385	1656	control();
dsuranr15	0:6c5518885385	1657	ALM3[j]=num;
dsuranr15	0:6c5518885385	1658	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	1659	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1660	wait(1);
dsuranr15	0:6c5518885385	1661	}
dsuranr15	0:6c5518885385	1662	////////////////////////
dsuranr15	0:6c5518885385	1663	j=0;
dsuranr15	0:6c5518885385	1664	LCD.cls();
dsuranr15	0:6c5518885385	1665	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1666	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	1667	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	1668	FEC3[4]=0;
dsuranr15	0:6c5518885385	1669	FEC3[7]=0;
dsuranr15	0:6c5518885385	1670
dsuranr15	0:6c5518885385	1671
dsuranr15	0:6c5518885385	1672	fflush( stdin );
dsuranr15	0:6c5518885385	1673	//wait(1);
dsuranr15	0:6c5518885385	1674	control();
dsuranr15	0:6c5518885385	1675	FEC3[j]=num;
dsuranr15	0:6c5518885385	1676	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1677	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1678	wait(1);
dsuranr15	0:6c5518885385	1679	}
dsuranr15	0:6c5518885385	1680
dsuranr15	0:6c5518885385	1681
dsuranr15	0:6c5518885385	1682	j=0;
dsuranr15	0:6c5518885385	1683	LCD.cls();
dsuranr15	0:6c5518885385	1684	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1685	LCD.printf("MES");
dsuranr15	0:6c5518885385	1686	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	1687	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1688	fflush( stdin );
dsuranr15	0:6c5518885385	1689	//wait(1);
dsuranr15	0:6c5518885385	1690	control();
dsuranr15	0:6c5518885385	1691	FEC3[j]=num;
dsuranr15	0:6c5518885385	1692	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	1693	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1694	wait(1);
dsuranr15	0:6c5518885385	1695	}
dsuranr15	0:6c5518885385	1696
dsuranr15	0:6c5518885385	1697
dsuranr15	0:6c5518885385	1698	j=0;
dsuranr15	0:6c5518885385	1699	LCD.cls();
dsuranr15	0:6c5518885385	1700	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1701	LCD.printf("DIA");
dsuranr15	0:6c5518885385	1702	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	1703	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1704	fflush( stdin );
dsuranr15	0:6c5518885385	1705	//wait(1);
dsuranr15	0:6c5518885385	1706	control();
dsuranr15	0:6c5518885385	1707	FEC3[j]=num;
dsuranr15	0:6c5518885385	1708	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	1709	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1710	wait(1);
dsuranr15	0:6c5518885385	1711	}
dsuranr15	0:6c5518885385	1712
dsuranr15	0:6c5518885385	1713
dsuranr15	0:6c5518885385	1714	////////////////////////
dsuranr15	0:6c5518885385	1715	LCD.cls();
dsuranr15	0:6c5518885385	1716	LCD.locate(14,0);
dsuranr15	0:6c5518885385	1717	LCD.printf("A3");
dsuranr15	0:6c5518885385	1718	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	1719	//
dsuranr15	0:6c5518885385	1720	LCD.locate(2,0);
dsuranr15	0:6c5518885385	1721	LCD.printf(":");
dsuranr15	0:6c5518885385	1722	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1723	LCD.printf("%i",ALM3[j]);
dsuranr15	0:6c5518885385	1724
dsuranr15	0:6c5518885385	1725
dsuranr15	0:6c5518885385	1726	}
dsuranr15	0:6c5518885385	1727
dsuranr15	0:6c5518885385	1728
dsuranr15	0:6c5518885385	1729	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	1730	//
dsuranr15	0:6c5518885385	1731	LCD.locate(4,1);
dsuranr15	0:6c5518885385	1732	LCD.printf("-");
dsuranr15	0:6c5518885385	1733	LCD.locate(7,1);
dsuranr15	0:6c5518885385	1734	LCD.printf("-");
dsuranr15	0:6c5518885385	1735	LCD.locate(j,1);
dsuranr15	0:6c5518885385	1736	LCD.printf("%i",FEC3[j]);
dsuranr15	0:6c5518885385	1737
dsuranr15	0:6c5518885385	1738
dsuranr15	0:6c5518885385	1739	}
dsuranr15	0:6c5518885385	1740	wait(5);
dsuranr15	0:6c5518885385	1741
dsuranr15	0:6c5518885385	1742
dsuranr15	0:6c5518885385	1743	ALM_3[0]=ALM3[0];
dsuranr15	0:6c5518885385	1744	ALM_3[1]=ALM3[1];
dsuranr15	0:6c5518885385	1745	ALM_3[2]=ALM3[3];
dsuranr15	0:6c5518885385	1746	ALM_3[3]=ALM3[4];
dsuranr15	0:6c5518885385	1747
dsuranr15	0:6c5518885385	1748	FEC_3[0]=FEC3[0];
dsuranr15	0:6c5518885385	1749	FEC_3[1]=FEC3[1];
dsuranr15	0:6c5518885385	1750	FEC_3[2]=FEC3[2];
dsuranr15	0:6c5518885385	1751	FEC_3[3]=FEC3[3];
dsuranr15	0:6c5518885385	1752	FEC_3[4]=FEC3[5];
dsuranr15	0:6c5518885385	1753	FEC_3[5]=FEC3[6];
dsuranr15	0:6c5518885385	1754	FEC_3[6]=FEC3[8];
dsuranr15	0:6c5518885385	1755	FEC_3[7]=FEC3[9];
dsuranr15	0:6c5518885385	1756
dsuranr15	0:6c5518885385	1757	sprintf(alm_3,"%d%d%d%d",ALM_3[0],ALM_3[1],ALM_3[2],ALM_3[3]);
dsuranr15	0:6c5518885385	1758	sprintf(fec_3,"%d%d%d%d%d%d%d%d",FEC_3[0],FEC_3[1],FEC_3[2],FEC_3[3],FEC_3[4],FEC_3[5],FEC_3[6],FEC_3[7]);
dsuranr15	0:6c5518885385	1759
dsuranr15	0:6c5518885385	1760	x=1;
dsuranr15	0:6c5518885385	1761	wait(1);
dsuranr15	0:6c5518885385	1762	al=1;
dsuranr15	0:6c5518885385	1763	con=2;
dsuranr15	0:6c5518885385	1764
dsuranr15	0:6c5518885385	1765
dsuranr15	0:6c5518885385	1766	x=1;
dsuranr15	0:6c5518885385	1767	wait(1);
dsuranr15	0:6c5518885385	1768	al=1;
dsuranr15	0:6c5518885385	1769	p=-1;
dsuranr15	0:6c5518885385	1770	}
dsuranr15	0:6c5518885385	1771
dsuranr15	0:6c5518885385	1772	wait(1);
dsuranr15	0:6c5518885385	1773	}
dsuranr15	0:6c5518885385	1774
dsuranr15	0:6c5518885385	1775	}
dsuranr15	0:6c5518885385	1776
dsuranr15	0:6c5518885385	1777	wait(1);
dsuranr15	0:6c5518885385	1778	nu=0;
dsuranr15	0:6c5518885385	1779	y=0;
dsuranr15	0:6c5518885385	1780	con=0;
dsuranr15	0:6c5518885385	1781	LCD.cls();
dsuranr15	0:6c5518885385	1782	LCD.printf("ALM3 PR0GRAMADA");
dsuranr15	0:6c5518885385	1783	wait(5);
dsuranr15	0:6c5518885385	1784	con=2;
dsuranr15	0:6c5518885385	1785
dsuranr15	0:6c5518885385	1786
dsuranr15	0:6c5518885385	1787	////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	1788	break;
dsuranr15	0:6c5518885385	1789	case 4:
dsuranr15	0:6c5518885385	1790	/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	1791	LCD.cls();
dsuranr15	0:6c5518885385	1792	LCD.printf(" ALM 4");
dsuranr15	0:6c5518885385	1793	al=0;
dsuranr15	0:6c5518885385	1794	con=0;
dsuranr15	0:6c5518885385	1795	wait(1);
dsuranr15	0:6c5518885385	1796	x=0;
dsuranr15	0:6c5518885385	1797	while(x==0) {
dsuranr15	0:6c5518885385	1798
dsuranr15	0:6c5518885385	1799	if(button4.falling()) {
dsuranr15	0:6c5518885385	1800	con++;
dsuranr15	0:6c5518885385	1801
dsuranr15	0:6c5518885385	1802	while(con==1) {
dsuranr15	0:6c5518885385	1803	if(button4.falling()) {
dsuranr15	0:6c5518885385	1804	con++;
dsuranr15	0:6c5518885385	1805	}
dsuranr15	0:6c5518885385	1806	m=wheel.getPulses();
dsuranr15	0:6c5518885385	1807	LCD.cls();
dsuranr15	0:6c5518885385	1808	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1809	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	1810
dsuranr15	0:6c5518885385	1811	wait(2);
dsuranr15	0:6c5518885385	1812	int j=0;
dsuranr15	0:6c5518885385	1813	LCD.cls();
dsuranr15	0:6c5518885385	1814	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1815	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	1816	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	1817	ALM4[2]=0;
dsuranr15	0:6c5518885385	1818	d=0;
dsuranr15	0:6c5518885385	1819	wheel.reset();
dsuranr15	0:6c5518885385	1820	while(d==0) {
dsuranr15	0:6c5518885385	1821	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1822	if(num>9) {
dsuranr15	0:6c5518885385	1823	num=9;
dsuranr15	0:6c5518885385	1824	}
dsuranr15	0:6c5518885385	1825	if(num<0) {
dsuranr15	0:6c5518885385	1826	num=0;
dsuranr15	0:6c5518885385	1827	}
dsuranr15	0:6c5518885385	1828	ALM4[j]=num;
dsuranr15	0:6c5518885385	1829	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1830	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	1831	if(button4.falling()) {
dsuranr15	0:6c5518885385	1832	d=1;
dsuranr15	0:6c5518885385	1833	}
dsuranr15	0:6c5518885385	1834	}
dsuranr15	0:6c5518885385	1835	wait(1);
dsuranr15	0:6c5518885385	1836	}
dsuranr15	0:6c5518885385	1837
dsuranr15	0:6c5518885385	1838	wheel.reset();
dsuranr15	0:6c5518885385	1839	LCD.cls();
dsuranr15	0:6c5518885385	1840	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1841	LCD.printf("MIN");
dsuranr15	0:6c5518885385	1842
dsuranr15	0:6c5518885385	1843
dsuranr15	0:6c5518885385	1844
dsuranr15	0:6c5518885385	1845	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	1846	d=0;
dsuranr15	0:6c5518885385	1847	wheel.reset();
dsuranr15	0:6c5518885385	1848	while(d==0) {
dsuranr15	0:6c5518885385	1849	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1850	if(num>9) {
dsuranr15	0:6c5518885385	1851	num=9;
dsuranr15	0:6c5518885385	1852	}
dsuranr15	0:6c5518885385	1853	if(num<0) {
dsuranr15	0:6c5518885385	1854	num=0;
dsuranr15	0:6c5518885385	1855	}
dsuranr15	0:6c5518885385	1856	ALM4[j]=num;
dsuranr15	0:6c5518885385	1857	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	1858	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	1859	if(button4.falling()) {
dsuranr15	0:6c5518885385	1860	d=1;
dsuranr15	0:6c5518885385	1861	}
dsuranr15	0:6c5518885385	1862	}
dsuranr15	0:6c5518885385	1863	wait(1);
dsuranr15	0:6c5518885385	1864	}
dsuranr15	0:6c5518885385	1865
dsuranr15	0:6c5518885385	1866
dsuranr15	0:6c5518885385	1867	///////////////////////////////
dsuranr15	0:6c5518885385	1868	j=0;
dsuranr15	0:6c5518885385	1869	LCD.cls();
dsuranr15	0:6c5518885385	1870	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1871	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	1872	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	1873	FEC4[4]=0;
dsuranr15	0:6c5518885385	1874	FEC4[7]=0;
dsuranr15	0:6c5518885385	1875	d=0;
dsuranr15	0:6c5518885385	1876	wheel.reset();
dsuranr15	0:6c5518885385	1877	while(d==0) {
dsuranr15	0:6c5518885385	1878	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1879	if(num>9) {
dsuranr15	0:6c5518885385	1880	num=9;
dsuranr15	0:6c5518885385	1881	}
dsuranr15	0:6c5518885385	1882	if(num<0) {
dsuranr15	0:6c5518885385	1883	num=0;
dsuranr15	0:6c5518885385	1884	}
dsuranr15	0:6c5518885385	1885	FEC4[j]=num;
dsuranr15	0:6c5518885385	1886	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1887	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	1888	if(button4.falling()) {
dsuranr15	0:6c5518885385	1889	d=1;
dsuranr15	0:6c5518885385	1890	}
dsuranr15	0:6c5518885385	1891	}
dsuranr15	0:6c5518885385	1892	wait(1);
dsuranr15	0:6c5518885385	1893	}
dsuranr15	0:6c5518885385	1894
dsuranr15	0:6c5518885385	1895	j=0;
dsuranr15	0:6c5518885385	1896	LCD.cls();
dsuranr15	0:6c5518885385	1897	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1898	LCD.printf("MES");
dsuranr15	0:6c5518885385	1899	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	1900	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1901	d=0;
dsuranr15	0:6c5518885385	1902	wheel.reset();
dsuranr15	0:6c5518885385	1903	while(d==0) {
dsuranr15	0:6c5518885385	1904	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1905	if(num>9) {
dsuranr15	0:6c5518885385	1906	num=9;
dsuranr15	0:6c5518885385	1907	}
dsuranr15	0:6c5518885385	1908	if(num<0) {
dsuranr15	0:6c5518885385	1909	num=0;
dsuranr15	0:6c5518885385	1910	}
dsuranr15	0:6c5518885385	1911	FEC4[j]=num;
dsuranr15	0:6c5518885385	1912	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	1913	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	1914	if(button4.falling()) {
dsuranr15	0:6c5518885385	1915	d=1;
dsuranr15	0:6c5518885385	1916	}
dsuranr15	0:6c5518885385	1917	}
dsuranr15	0:6c5518885385	1918	wait(1);
dsuranr15	0:6c5518885385	1919	}
dsuranr15	0:6c5518885385	1920
dsuranr15	0:6c5518885385	1921	j=0;
dsuranr15	0:6c5518885385	1922	LCD.cls();
dsuranr15	0:6c5518885385	1923	LCD.locate(0,1);
dsuranr15	0:6c5518885385	1924	LCD.printf("DIA");
dsuranr15	0:6c5518885385	1925	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	1926	//ALM1[2]=0;
dsuranr15	0:6c5518885385	1927	d=0;
dsuranr15	0:6c5518885385	1928	wheel.reset();
dsuranr15	0:6c5518885385	1929	while(d==0) {
dsuranr15	0:6c5518885385	1930	num=wheel.getPulses();
dsuranr15	0:6c5518885385	1931	if(num>9) {
dsuranr15	0:6c5518885385	1932	num=9;
dsuranr15	0:6c5518885385	1933	}
dsuranr15	0:6c5518885385	1934	if(num<0) {
dsuranr15	0:6c5518885385	1935	num=0;
dsuranr15	0:6c5518885385	1936	}
dsuranr15	0:6c5518885385	1937	FEC4[j]=num;
dsuranr15	0:6c5518885385	1938	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	1939	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	1940	if(button4.falling()) {
dsuranr15	0:6c5518885385	1941	d=1;
dsuranr15	0:6c5518885385	1942	}
dsuranr15	0:6c5518885385	1943	}
dsuranr15	0:6c5518885385	1944	wait(1);
dsuranr15	0:6c5518885385	1945	}
dsuranr15	0:6c5518885385	1946
dsuranr15	0:6c5518885385	1947	//////////////////////////////////
dsuranr15	0:6c5518885385	1948	LCD.cls();
dsuranr15	0:6c5518885385	1949	LCD.locate(14,0);
dsuranr15	0:6c5518885385	1950	LCD.printf("A4");
dsuranr15	0:6c5518885385	1951	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	1952	//
dsuranr15	0:6c5518885385	1953	LCD.locate(2,0);
dsuranr15	0:6c5518885385	1954	LCD.printf(":");
dsuranr15	0:6c5518885385	1955	LCD.locate(j,0);
dsuranr15	0:6c5518885385	1956	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	1957
dsuranr15	0:6c5518885385	1958
dsuranr15	0:6c5518885385	1959	}
dsuranr15	0:6c5518885385	1960
dsuranr15	0:6c5518885385	1961
dsuranr15	0:6c5518885385	1962	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	1963	//
dsuranr15	0:6c5518885385	1964	LCD.locate(4,1);
dsuranr15	0:6c5518885385	1965	LCD.printf("-");
dsuranr15	0:6c5518885385	1966	LCD.locate(7,1);
dsuranr15	0:6c5518885385	1967	LCD.printf("-");
dsuranr15	0:6c5518885385	1968	LCD.locate(j,1);
dsuranr15	0:6c5518885385	1969	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	1970
dsuranr15	0:6c5518885385	1971
dsuranr15	0:6c5518885385	1972	}
dsuranr15	0:6c5518885385	1973	wait(5);
dsuranr15	0:6c5518885385	1974
dsuranr15	0:6c5518885385	1975
dsuranr15	0:6c5518885385	1976	ALM_4[0]=ALM4[0];
dsuranr15	0:6c5518885385	1977	ALM_4[1]=ALM4[1];
dsuranr15	0:6c5518885385	1978	ALM_4[2]=ALM4[3];
dsuranr15	0:6c5518885385	1979	ALM_4[3]=ALM4[4];
dsuranr15	0:6c5518885385	1980
dsuranr15	0:6c5518885385	1981	FEC_4[0]=FEC4[0];
dsuranr15	0:6c5518885385	1982	FEC_4[1]=FEC4[1];
dsuranr15	0:6c5518885385	1983	FEC_4[2]=FEC4[2];
dsuranr15	0:6c5518885385	1984	FEC_4[3]=FEC4[3];
dsuranr15	0:6c5518885385	1985	FEC_4[4]=FEC4[5];
dsuranr15	0:6c5518885385	1986	FEC_4[5]=FEC4[6];
dsuranr15	0:6c5518885385	1987	FEC_4[6]=FEC4[8];
dsuranr15	0:6c5518885385	1988	FEC_4[7]=FEC4[9];
dsuranr15	0:6c5518885385	1989
dsuranr15	0:6c5518885385	1990	sprintf(alm_4,"%d%d%d%d",ALM_4[0],ALM_4[1],ALM_4[2],ALM_4[3]);
dsuranr15	0:6c5518885385	1991	sprintf(fec_4,"%d%d%d%d%d%d%d%d",FEC_4[0],FEC_4[1],FEC_4[2],FEC_4[3],FEC_4[4],FEC_4[5],FEC_4[6],FEC_4[7]);
dsuranr15	0:6c5518885385	1992
dsuranr15	0:6c5518885385	1993	x=1;
dsuranr15	0:6c5518885385	1994	wait(1);
dsuranr15	0:6c5518885385	1995	al=1;
dsuranr15	0:6c5518885385	1996	con=2;
dsuranr15	0:6c5518885385	1997
dsuranr15	0:6c5518885385	1998	}
dsuranr15	0:6c5518885385	1999	wait(1);
dsuranr15	0:6c5518885385	2000	}
dsuranr15	0:6c5518885385	2001	al=0;
dsuranr15	0:6c5518885385	2002	wait(1);
dsuranr15	0:6c5518885385	2003	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	2004
dsuranr15	0:6c5518885385	2005	if(p!=-1) {
dsuranr15	0:6c5518885385	2006	while (al!=1) {
dsuranr15	0:6c5518885385	2007	LCD.cls();
dsuranr15	0:6c5518885385	2008	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2009	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	2010	wait(2);
dsuranr15	0:6c5518885385	2011	int j=0;
dsuranr15	0:6c5518885385	2012	LCD.cls();
dsuranr15	0:6c5518885385	2013	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2014	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	2015	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	2016	ALM4[2]=0;
dsuranr15	0:6c5518885385	2017	fflush( stdin );
dsuranr15	0:6c5518885385	2018	//wait(1);
dsuranr15	0:6c5518885385	2019	control();
dsuranr15	0:6c5518885385	2020	ALM4[j]=num;
dsuranr15	0:6c5518885385	2021	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2022	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	2023	wait(1);
dsuranr15	0:6c5518885385	2024	}
dsuranr15	0:6c5518885385	2025	LCD.cls();
dsuranr15	0:6c5518885385	2026	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2027	LCD.printf("MIN");
dsuranr15	0:6c5518885385	2028
dsuranr15	0:6c5518885385	2029	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	2030	fflush( stdin );
dsuranr15	0:6c5518885385	2031	//wait(1);
dsuranr15	0:6c5518885385	2032	control();
dsuranr15	0:6c5518885385	2033	ALM4[j]=num;
dsuranr15	0:6c5518885385	2034	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	2035	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	2036	wait(1);
dsuranr15	0:6c5518885385	2037	}
dsuranr15	0:6c5518885385	2038	////////////////////////
dsuranr15	0:6c5518885385	2039	j=0;
dsuranr15	0:6c5518885385	2040	LCD.cls();
dsuranr15	0:6c5518885385	2041	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2042	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	2043	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	2044	FEC4[4]=0;
dsuranr15	0:6c5518885385	2045	FEC4[7]=0;
dsuranr15	0:6c5518885385	2046
dsuranr15	0:6c5518885385	2047
dsuranr15	0:6c5518885385	2048	fflush( stdin );
dsuranr15	0:6c5518885385	2049	//wait(1);
dsuranr15	0:6c5518885385	2050	control();
dsuranr15	0:6c5518885385	2051	FEC4[j]=num;
dsuranr15	0:6c5518885385	2052	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2053	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	2054	wait(1);
dsuranr15	0:6c5518885385	2055	}
dsuranr15	0:6c5518885385	2056
dsuranr15	0:6c5518885385	2057
dsuranr15	0:6c5518885385	2058	j=0;
dsuranr15	0:6c5518885385	2059	LCD.cls();
dsuranr15	0:6c5518885385	2060	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2061	LCD.printf("MES");
dsuranr15	0:6c5518885385	2062	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	2063	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2064	fflush( stdin );
dsuranr15	0:6c5518885385	2065	//wait(1);
dsuranr15	0:6c5518885385	2066	control();
dsuranr15	0:6c5518885385	2067	FEC4[j]=num;
dsuranr15	0:6c5518885385	2068	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	2069	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	2070	wait(1);
dsuranr15	0:6c5518885385	2071	}
dsuranr15	0:6c5518885385	2072
dsuranr15	0:6c5518885385	2073
dsuranr15	0:6c5518885385	2074	j=0;
dsuranr15	0:6c5518885385	2075	LCD.cls();
dsuranr15	0:6c5518885385	2076	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2077	LCD.printf("DIA");
dsuranr15	0:6c5518885385	2078	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	2079	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2080	fflush( stdin );
dsuranr15	0:6c5518885385	2081	//wait(1);
dsuranr15	0:6c5518885385	2082	control();
dsuranr15	0:6c5518885385	2083	FEC4[j]=num;
dsuranr15	0:6c5518885385	2084	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	2085	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	2086	wait(1);
dsuranr15	0:6c5518885385	2087	}
dsuranr15	0:6c5518885385	2088
dsuranr15	0:6c5518885385	2089
dsuranr15	0:6c5518885385	2090	////////////////////////
dsuranr15	0:6c5518885385	2091	LCD.cls();
dsuranr15	0:6c5518885385	2092	LCD.locate(14,0);
dsuranr15	0:6c5518885385	2093	LCD.printf("A4");
dsuranr15	0:6c5518885385	2094	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	2095	//
dsuranr15	0:6c5518885385	2096	LCD.locate(2,0);
dsuranr15	0:6c5518885385	2097	LCD.printf(":");
dsuranr15	0:6c5518885385	2098	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2099	LCD.printf("%i",ALM4[j]);
dsuranr15	0:6c5518885385	2100
dsuranr15	0:6c5518885385	2101
dsuranr15	0:6c5518885385	2102	}
dsuranr15	0:6c5518885385	2103
dsuranr15	0:6c5518885385	2104
dsuranr15	0:6c5518885385	2105	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	2106	//
dsuranr15	0:6c5518885385	2107	LCD.locate(4,1);
dsuranr15	0:6c5518885385	2108	LCD.printf("-");
dsuranr15	0:6c5518885385	2109	LCD.locate(7,1);
dsuranr15	0:6c5518885385	2110	LCD.printf("-");
dsuranr15	0:6c5518885385	2111	LCD.locate(j,1);
dsuranr15	0:6c5518885385	2112	LCD.printf("%i",FEC4[j]);
dsuranr15	0:6c5518885385	2113
dsuranr15	0:6c5518885385	2114
dsuranr15	0:6c5518885385	2115	}
dsuranr15	0:6c5518885385	2116	wait(5);
dsuranr15	0:6c5518885385	2117
dsuranr15	0:6c5518885385	2118
dsuranr15	0:6c5518885385	2119	ALM_4[0]=ALM4[0];
dsuranr15	0:6c5518885385	2120	ALM_4[1]=ALM4[1];
dsuranr15	0:6c5518885385	2121	ALM_4[2]=ALM4[3];
dsuranr15	0:6c5518885385	2122	ALM_4[3]=ALM4[4];
dsuranr15	0:6c5518885385	2123
dsuranr15	0:6c5518885385	2124	FEC_4[0]=FEC4[0];
dsuranr15	0:6c5518885385	2125	FEC_4[1]=FEC4[1];
dsuranr15	0:6c5518885385	2126	FEC_4[2]=FEC4[2];
dsuranr15	0:6c5518885385	2127	FEC_4[3]=FEC4[3];
dsuranr15	0:6c5518885385	2128	FEC_4[4]=FEC4[5];
dsuranr15	0:6c5518885385	2129	FEC_4[5]=FEC4[6];
dsuranr15	0:6c5518885385	2130	FEC_4[6]=FEC4[8];
dsuranr15	0:6c5518885385	2131	FEC_4[7]=FEC4[9];
dsuranr15	0:6c5518885385	2132
dsuranr15	0:6c5518885385	2133	sprintf(alm_4,"%d%d%d%d",ALM_4[0],ALM_4[1],ALM_4[2],ALM_4[3]);
dsuranr15	0:6c5518885385	2134	sprintf(fec_4,"%d%d%d%d%d%d%d%d",FEC_4[0],FEC_4[1],FEC_4[2],FEC_4[3],FEC_4[4],FEC_4[5],FEC_4[6],FEC_4[7]);
dsuranr15	0:6c5518885385	2135
dsuranr15	0:6c5518885385	2136	x=1;
dsuranr15	0:6c5518885385	2137	wait(1);
dsuranr15	0:6c5518885385	2138	al=1;
dsuranr15	0:6c5518885385	2139	con=2;
dsuranr15	0:6c5518885385	2140
dsuranr15	0:6c5518885385	2141
dsuranr15	0:6c5518885385	2142	x=1;
dsuranr15	0:6c5518885385	2143	wait(1);
dsuranr15	0:6c5518885385	2144	al=1;
dsuranr15	0:6c5518885385	2145	p=-1;
dsuranr15	0:6c5518885385	2146	}
dsuranr15	0:6c5518885385	2147
dsuranr15	0:6c5518885385	2148	wait(1);
dsuranr15	0:6c5518885385	2149	}
dsuranr15	0:6c5518885385	2150
dsuranr15	0:6c5518885385	2151	}
dsuranr15	0:6c5518885385	2152
dsuranr15	0:6c5518885385	2153	wait(1);
dsuranr15	0:6c5518885385	2154	nu=0;
dsuranr15	0:6c5518885385	2155	y=0;
dsuranr15	0:6c5518885385	2156	con=0;
dsuranr15	0:6c5518885385	2157	LCD.cls();
dsuranr15	0:6c5518885385	2158	LCD.printf("ALM4 PR0GRAMADA");
dsuranr15	0:6c5518885385	2159	wait(5);
dsuranr15	0:6c5518885385	2160	con=2;
dsuranr15	0:6c5518885385	2161
dsuranr15	0:6c5518885385	2162
dsuranr15	0:6c5518885385	2163	////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
dsuranr15	0:6c5518885385	2164
dsuranr15	0:6c5518885385	2165	break;
dsuranr15	0:6c5518885385	2166	case 5:
dsuranr15	0:6c5518885385	2167	LCD.cls();
dsuranr15	0:6c5518885385	2168	LCD.printf(" ALM 5");
dsuranr15	0:6c5518885385	2169	al=0;
dsuranr15	0:6c5518885385	2170	con=0;
dsuranr15	0:6c5518885385	2171	wait(1);
dsuranr15	0:6c5518885385	2172	x=0;
dsuranr15	0:6c5518885385	2173	while(x==0) {
dsuranr15	0:6c5518885385	2174
dsuranr15	0:6c5518885385	2175	if(button4.falling()) {
dsuranr15	0:6c5518885385	2176	con++;
dsuranr15	0:6c5518885385	2177
dsuranr15	0:6c5518885385	2178	while(con==1) {
dsuranr15	0:6c5518885385	2179	if(button4.falling()) {
dsuranr15	0:6c5518885385	2180	con++;
dsuranr15	0:6c5518885385	2181	}
dsuranr15	0:6c5518885385	2182	m=wheel.getPulses();
dsuranr15	0:6c5518885385	2183	LCD.cls();
dsuranr15	0:6c5518885385	2184	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2185	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	2186
dsuranr15	0:6c5518885385	2187	wait(2);
dsuranr15	0:6c5518885385	2188	int j=0;
dsuranr15	0:6c5518885385	2189	LCD.cls();
dsuranr15	0:6c5518885385	2190	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2191	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	2192	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	2193	ALM5[2]=0;
dsuranr15	0:6c5518885385	2194	d=0;
dsuranr15	0:6c5518885385	2195	wheel.reset();
dsuranr15	0:6c5518885385	2196	while(d==0) {
dsuranr15	0:6c5518885385	2197	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2198	if(num>9) {
dsuranr15	0:6c5518885385	2199	num=9;
dsuranr15	0:6c5518885385	2200	}
dsuranr15	0:6c5518885385	2201	if(num<0) {
dsuranr15	0:6c5518885385	2202	num=0;
dsuranr15	0:6c5518885385	2203	}
dsuranr15	0:6c5518885385	2204	ALM5[j]=num;
dsuranr15	0:6c5518885385	2205	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2206	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2207	if(button4.falling()) {
dsuranr15	0:6c5518885385	2208	d=1;
dsuranr15	0:6c5518885385	2209	}
dsuranr15	0:6c5518885385	2210	}
dsuranr15	0:6c5518885385	2211	wait(1);
dsuranr15	0:6c5518885385	2212	}
dsuranr15	0:6c5518885385	2213
dsuranr15	0:6c5518885385	2214	wheel.reset();
dsuranr15	0:6c5518885385	2215	LCD.cls();
dsuranr15	0:6c5518885385	2216	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2217	LCD.printf("MIN");
dsuranr15	0:6c5518885385	2218
dsuranr15	0:6c5518885385	2219
dsuranr15	0:6c5518885385	2220
dsuranr15	0:6c5518885385	2221	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	2222	d=0;
dsuranr15	0:6c5518885385	2223	wheel.reset();
dsuranr15	0:6c5518885385	2224	while(d==0) {
dsuranr15	0:6c5518885385	2225	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2226	if(num>9) {
dsuranr15	0:6c5518885385	2227	num=9;
dsuranr15	0:6c5518885385	2228	}
dsuranr15	0:6c5518885385	2229	if(num<0) {
dsuranr15	0:6c5518885385	2230	num=0;
dsuranr15	0:6c5518885385	2231	}
dsuranr15	0:6c5518885385	2232	ALM5[j]=num;
dsuranr15	0:6c5518885385	2233	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	2234	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2235	if(button4.falling()) {
dsuranr15	0:6c5518885385	2236	d=1;
dsuranr15	0:6c5518885385	2237	}
dsuranr15	0:6c5518885385	2238	}
dsuranr15	0:6c5518885385	2239	wait(1);
dsuranr15	0:6c5518885385	2240	}
dsuranr15	0:6c5518885385	2241
dsuranr15	0:6c5518885385	2242
dsuranr15	0:6c5518885385	2243	///////////////////////////////
dsuranr15	0:6c5518885385	2244	j=0;
dsuranr15	0:6c5518885385	2245	LCD.cls();
dsuranr15	0:6c5518885385	2246	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2247	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	2248	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	2249	FEC5[4]=0;
dsuranr15	0:6c5518885385	2250	FEC5[7]=0;
dsuranr15	0:6c5518885385	2251	d=0;
dsuranr15	0:6c5518885385	2252	wheel.reset();
dsuranr15	0:6c5518885385	2253	while(d==0) {
dsuranr15	0:6c5518885385	2254	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2255	if(num>9) {
dsuranr15	0:6c5518885385	2256	num=9;
dsuranr15	0:6c5518885385	2257	}
dsuranr15	0:6c5518885385	2258	if(num<0) {
dsuranr15	0:6c5518885385	2259	num=0;
dsuranr15	0:6c5518885385	2260	}
dsuranr15	0:6c5518885385	2261	FEC5[j]=num;
dsuranr15	0:6c5518885385	2262	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2263	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2264	if(button4.falling()) {
dsuranr15	0:6c5518885385	2265	d=1;
dsuranr15	0:6c5518885385	2266	}
dsuranr15	0:6c5518885385	2267	}
dsuranr15	0:6c5518885385	2268	wait(1);
dsuranr15	0:6c5518885385	2269	}
dsuranr15	0:6c5518885385	2270
dsuranr15	0:6c5518885385	2271	j=0;
dsuranr15	0:6c5518885385	2272	LCD.cls();
dsuranr15	0:6c5518885385	2273	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2274	LCD.printf("MES");
dsuranr15	0:6c5518885385	2275	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	2276	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2277	d=0;
dsuranr15	0:6c5518885385	2278	wheel.reset();
dsuranr15	0:6c5518885385	2279	while(d==0) {
dsuranr15	0:6c5518885385	2280	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2281	if(num>9) {
dsuranr15	0:6c5518885385	2282	num=9;
dsuranr15	0:6c5518885385	2283	}
dsuranr15	0:6c5518885385	2284	if(num<0) {
dsuranr15	0:6c5518885385	2285	num=0;
dsuranr15	0:6c5518885385	2286	}
dsuranr15	0:6c5518885385	2287	FEC5[j]=num;
dsuranr15	0:6c5518885385	2288	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	2289	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2290	if(button4.falling()) {
dsuranr15	0:6c5518885385	2291	d=1;
dsuranr15	0:6c5518885385	2292	}
dsuranr15	0:6c5518885385	2293	}
dsuranr15	0:6c5518885385	2294	wait(1);
dsuranr15	0:6c5518885385	2295	}
dsuranr15	0:6c5518885385	2296
dsuranr15	0:6c5518885385	2297	j=0;
dsuranr15	0:6c5518885385	2298	LCD.cls();
dsuranr15	0:6c5518885385	2299	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2300	LCD.printf("DIA");
dsuranr15	0:6c5518885385	2301	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	2302	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2303	d=0;
dsuranr15	0:6c5518885385	2304	wheel.reset();
dsuranr15	0:6c5518885385	2305	while(d==0) {
dsuranr15	0:6c5518885385	2306	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2307	if(num>9) {
dsuranr15	0:6c5518885385	2308	num=9;
dsuranr15	0:6c5518885385	2309	}
dsuranr15	0:6c5518885385	2310	if(num<0) {
dsuranr15	0:6c5518885385	2311	num=0;
dsuranr15	0:6c5518885385	2312	}
dsuranr15	0:6c5518885385	2313	FEC5[j]=num;
dsuranr15	0:6c5518885385	2314	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	2315	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2316	if(button4.falling()) {
dsuranr15	0:6c5518885385	2317	d=1;
dsuranr15	0:6c5518885385	2318	}
dsuranr15	0:6c5518885385	2319	}
dsuranr15	0:6c5518885385	2320	wait(1);
dsuranr15	0:6c5518885385	2321	}
dsuranr15	0:6c5518885385	2322
dsuranr15	0:6c5518885385	2323	//////////////////////////////////
dsuranr15	0:6c5518885385	2324	LCD.cls();
dsuranr15	0:6c5518885385	2325	LCD.locate(14,0);
dsuranr15	0:6c5518885385	2326	LCD.printf("A5");
dsuranr15	0:6c5518885385	2327	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	2328	//
dsuranr15	0:6c5518885385	2329	LCD.locate(2,0);
dsuranr15	0:6c5518885385	2330	LCD.printf(":");
dsuranr15	0:6c5518885385	2331	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2332	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2333
dsuranr15	0:6c5518885385	2334
dsuranr15	0:6c5518885385	2335	}
dsuranr15	0:6c5518885385	2336
dsuranr15	0:6c5518885385	2337
dsuranr15	0:6c5518885385	2338	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	2339	//
dsuranr15	0:6c5518885385	2340	LCD.locate(4,1);
dsuranr15	0:6c5518885385	2341	LCD.printf("-");
dsuranr15	0:6c5518885385	2342	LCD.locate(7,1);
dsuranr15	0:6c5518885385	2343	LCD.printf("-");
dsuranr15	0:6c5518885385	2344	LCD.locate(j,1);
dsuranr15	0:6c5518885385	2345	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2346
dsuranr15	0:6c5518885385	2347
dsuranr15	0:6c5518885385	2348	}
dsuranr15	0:6c5518885385	2349	wait(5);
dsuranr15	0:6c5518885385	2350
dsuranr15	0:6c5518885385	2351
dsuranr15	0:6c5518885385	2352	ALM_5[0]=ALM5[0];
dsuranr15	0:6c5518885385	2353	ALM_5[1]=ALM5[1];
dsuranr15	0:6c5518885385	2354	ALM_5[2]=ALM5[3];
dsuranr15	0:6c5518885385	2355	ALM_5[3]=ALM5[4];
dsuranr15	0:6c5518885385	2356
dsuranr15	0:6c5518885385	2357	FEC_5[0]=FEC5[0];
dsuranr15	0:6c5518885385	2358	FEC_5[1]=FEC5[1];
dsuranr15	0:6c5518885385	2359	FEC_5[2]=FEC5[2];
dsuranr15	0:6c5518885385	2360	FEC_5[3]=FEC5[3];
dsuranr15	0:6c5518885385	2361	FEC_5[4]=FEC5[5];
dsuranr15	0:6c5518885385	2362	FEC_5[5]=FEC5[6];
dsuranr15	0:6c5518885385	2363	FEC_5[6]=FEC5[8];
dsuranr15	0:6c5518885385	2364	FEC_5[7]=FEC5[9];
dsuranr15	0:6c5518885385	2365
dsuranr15	0:6c5518885385	2366	sprintf(alm_5,"%d%d%d%d",ALM_5[0],ALM_5[1],ALM_5[2],ALM_5[3]);
dsuranr15	0:6c5518885385	2367	sprintf(fec_5,"%d%d%d%d%d%d%d%d",FEC_5[0],FEC_5[1],FEC_5[2],FEC_5[3],FEC_5[4],FEC_5[5],FEC_5[6],FEC_5[7]);
dsuranr15	0:6c5518885385	2368
dsuranr15	0:6c5518885385	2369	x=1;
dsuranr15	0:6c5518885385	2370	wait(1);
dsuranr15	0:6c5518885385	2371	al=1;
dsuranr15	0:6c5518885385	2372	con=2;
dsuranr15	0:6c5518885385	2373
dsuranr15	0:6c5518885385	2374	}
dsuranr15	0:6c5518885385	2375	wait(1);
dsuranr15	0:6c5518885385	2376	}
dsuranr15	0:6c5518885385	2377	al=0;
dsuranr15	0:6c5518885385	2378	wait(1);
dsuranr15	0:6c5518885385	2379	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	2380
dsuranr15	0:6c5518885385	2381	if(p!=-1) {
dsuranr15	0:6c5518885385	2382	while (al!=1) {
dsuranr15	0:6c5518885385	2383	LCD.cls();
dsuranr15	0:6c5518885385	2384	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2385	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	2386	wait(2);
dsuranr15	0:6c5518885385	2387	int j=0;
dsuranr15	0:6c5518885385	2388	LCD.cls();
dsuranr15	0:6c5518885385	2389	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2390	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	2391	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	2392	ALM5[2]=0;
dsuranr15	0:6c5518885385	2393	fflush( stdin );
dsuranr15	0:6c5518885385	2394	//wait(1);
dsuranr15	0:6c5518885385	2395	control();
dsuranr15	0:6c5518885385	2396	ALM5[j]=num;
dsuranr15	0:6c5518885385	2397	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2398	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2399	wait(1);
dsuranr15	0:6c5518885385	2400	}
dsuranr15	0:6c5518885385	2401	LCD.cls();
dsuranr15	0:6c5518885385	2402	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2403	LCD.printf("MIN");
dsuranr15	0:6c5518885385	2404
dsuranr15	0:6c5518885385	2405	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	2406	fflush( stdin );
dsuranr15	0:6c5518885385	2407	//wait(1);
dsuranr15	0:6c5518885385	2408	control();
dsuranr15	0:6c5518885385	2409	ALM5[j]=num;
dsuranr15	0:6c5518885385	2410	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	2411	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2412	wait(1);
dsuranr15	0:6c5518885385	2413	}
dsuranr15	0:6c5518885385	2414	////////////////////////
dsuranr15	0:6c5518885385	2415	j=0;
dsuranr15	0:6c5518885385	2416	LCD.cls();
dsuranr15	0:6c5518885385	2417	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2418	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	2419	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	2420	FEC5[4]=0;
dsuranr15	0:6c5518885385	2421	FEC5[7]=0;
dsuranr15	0:6c5518885385	2422
dsuranr15	0:6c5518885385	2423
dsuranr15	0:6c5518885385	2424	fflush( stdin );
dsuranr15	0:6c5518885385	2425	//wait(1);
dsuranr15	0:6c5518885385	2426	control();
dsuranr15	0:6c5518885385	2427	FEC5[j]=num;
dsuranr15	0:6c5518885385	2428	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2429	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2430	wait(1);
dsuranr15	0:6c5518885385	2431	}
dsuranr15	0:6c5518885385	2432
dsuranr15	0:6c5518885385	2433
dsuranr15	0:6c5518885385	2434	j=0;
dsuranr15	0:6c5518885385	2435	LCD.cls();
dsuranr15	0:6c5518885385	2436	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2437	LCD.printf("MES");
dsuranr15	0:6c5518885385	2438	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	2439	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2440	fflush( stdin );
dsuranr15	0:6c5518885385	2441	//wait(1);
dsuranr15	0:6c5518885385	2442	control();
dsuranr15	0:6c5518885385	2443	FEC5[j]=num;
dsuranr15	0:6c5518885385	2444	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	2445	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2446	wait(1);
dsuranr15	0:6c5518885385	2447	}
dsuranr15	0:6c5518885385	2448
dsuranr15	0:6c5518885385	2449
dsuranr15	0:6c5518885385	2450	j=0;
dsuranr15	0:6c5518885385	2451	LCD.cls();
dsuranr15	0:6c5518885385	2452	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2453	LCD.printf("DIA");
dsuranr15	0:6c5518885385	2454	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	2455	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2456	fflush( stdin );
dsuranr15	0:6c5518885385	2457	//wait(1);
dsuranr15	0:6c5518885385	2458	control();
dsuranr15	0:6c5518885385	2459	FEC5[j]=num;
dsuranr15	0:6c5518885385	2460	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	2461	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2462	wait(1);
dsuranr15	0:6c5518885385	2463	}
dsuranr15	0:6c5518885385	2464
dsuranr15	0:6c5518885385	2465
dsuranr15	0:6c5518885385	2466	////////////////////////
dsuranr15	0:6c5518885385	2467	LCD.cls();
dsuranr15	0:6c5518885385	2468	LCD.locate(14,0);
dsuranr15	0:6c5518885385	2469	LCD.printf("A5");
dsuranr15	0:6c5518885385	2470	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	2471	//
dsuranr15	0:6c5518885385	2472	LCD.locate(2,0);
dsuranr15	0:6c5518885385	2473	LCD.printf(":");
dsuranr15	0:6c5518885385	2474	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2475	LCD.printf("%i",ALM5[j]);
dsuranr15	0:6c5518885385	2476
dsuranr15	0:6c5518885385	2477
dsuranr15	0:6c5518885385	2478	}
dsuranr15	0:6c5518885385	2479
dsuranr15	0:6c5518885385	2480
dsuranr15	0:6c5518885385	2481	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	2482	//
dsuranr15	0:6c5518885385	2483	LCD.locate(4,1);
dsuranr15	0:6c5518885385	2484	LCD.printf("-");
dsuranr15	0:6c5518885385	2485	LCD.locate(7,1);
dsuranr15	0:6c5518885385	2486	LCD.printf("-");
dsuranr15	0:6c5518885385	2487	LCD.locate(j,1);
dsuranr15	0:6c5518885385	2488	LCD.printf("%i",FEC5[j]);
dsuranr15	0:6c5518885385	2489
dsuranr15	0:6c5518885385	2490
dsuranr15	0:6c5518885385	2491	}
dsuranr15	0:6c5518885385	2492	wait(5);
dsuranr15	0:6c5518885385	2493
dsuranr15	0:6c5518885385	2494
dsuranr15	0:6c5518885385	2495	ALM_5[0]=ALM5[0];
dsuranr15	0:6c5518885385	2496	ALM_5[1]=ALM5[1];
dsuranr15	0:6c5518885385	2497	ALM_5[2]=ALM5[3];
dsuranr15	0:6c5518885385	2498	ALM_5[3]=ALM5[4];
dsuranr15	0:6c5518885385	2499
dsuranr15	0:6c5518885385	2500	FEC_5[0]=FEC5[0];
dsuranr15	0:6c5518885385	2501	FEC_5[1]=FEC5[1];
dsuranr15	0:6c5518885385	2502	FEC_5[2]=FEC5[2];
dsuranr15	0:6c5518885385	2503	FEC_5[3]=FEC5[3];
dsuranr15	0:6c5518885385	2504	FEC_5[4]=FEC5[5];
dsuranr15	0:6c5518885385	2505	FEC_5[5]=FEC5[6];
dsuranr15	0:6c5518885385	2506	FEC_5[6]=FEC5[8];
dsuranr15	0:6c5518885385	2507	FEC_5[7]=FEC5[9];
dsuranr15	0:6c5518885385	2508
dsuranr15	0:6c5518885385	2509	sprintf(alm_5,"%d%d%d%d",ALM_5[0],ALM_5[1],ALM_5[2],ALM_5[3]);
dsuranr15	0:6c5518885385	2510	sprintf(fec_5,"%d%d%d%d%d%d%d%d",FEC_5[0],FEC_5[1],FEC_5[2],FEC_5[3],FEC_5[4],FEC_5[5],FEC_5[6],FEC_5[7]);
dsuranr15	0:6c5518885385	2511
dsuranr15	0:6c5518885385	2512	x=1;
dsuranr15	0:6c5518885385	2513	wait(1);
dsuranr15	0:6c5518885385	2514	al=1;
dsuranr15	0:6c5518885385	2515	con=2;
dsuranr15	0:6c5518885385	2516
dsuranr15	0:6c5518885385	2517
dsuranr15	0:6c5518885385	2518	x=1;
dsuranr15	0:6c5518885385	2519	wait(1);
dsuranr15	0:6c5518885385	2520	al=1;
dsuranr15	0:6c5518885385	2521	p=-1;
dsuranr15	0:6c5518885385	2522	}
dsuranr15	0:6c5518885385	2523
dsuranr15	0:6c5518885385	2524	wait(1);
dsuranr15	0:6c5518885385	2525	}
dsuranr15	0:6c5518885385	2526
dsuranr15	0:6c5518885385	2527	}
dsuranr15	0:6c5518885385	2528
dsuranr15	0:6c5518885385	2529	wait(1);
dsuranr15	0:6c5518885385	2530	nu=0;
dsuranr15	0:6c5518885385	2531	y=0;
dsuranr15	0:6c5518885385	2532	con=0;
dsuranr15	0:6c5518885385	2533	LCD.cls();
dsuranr15	0:6c5518885385	2534	LCD.printf("ALM5 PR0GRAMADA");
dsuranr15	0:6c5518885385	2535	wait(5);
dsuranr15	0:6c5518885385	2536	con=2;
dsuranr15	0:6c5518885385	2537
dsuranr15	0:6c5518885385	2538	break;
dsuranr15	0:6c5518885385	2539	case 6:
dsuranr15	0:6c5518885385	2540	LCD.cls();
dsuranr15	0:6c5518885385	2541	LCD.printf(" ALM 6");
dsuranr15	0:6c5518885385	2542	al=0;
dsuranr15	0:6c5518885385	2543	con=0;
dsuranr15	0:6c5518885385	2544	wait(1);
dsuranr15	0:6c5518885385	2545	x=0;
dsuranr15	0:6c5518885385	2546	while(x==0) {
dsuranr15	0:6c5518885385	2547
dsuranr15	0:6c5518885385	2548	if(button4.falling()) {
dsuranr15	0:6c5518885385	2549	con++;
dsuranr15	0:6c5518885385	2550
dsuranr15	0:6c5518885385	2551	while(con==1) {
dsuranr15	0:6c5518885385	2552	if(button4.falling()) {
dsuranr15	0:6c5518885385	2553	con++;
dsuranr15	0:6c5518885385	2554	}
dsuranr15	0:6c5518885385	2555	m=wheel.getPulses();
dsuranr15	0:6c5518885385	2556	LCD.cls();
dsuranr15	0:6c5518885385	2557	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2558	LCD.printf("M0D0 ENC0DER");
dsuranr15	0:6c5518885385	2559
dsuranr15	0:6c5518885385	2560	wait(2);
dsuranr15	0:6c5518885385	2561	int j=0;
dsuranr15	0:6c5518885385	2562	LCD.cls();
dsuranr15	0:6c5518885385	2563	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2564	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	2565	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	2566	ALM6[2]=0;
dsuranr15	0:6c5518885385	2567	d=0;
dsuranr15	0:6c5518885385	2568	wheel.reset();
dsuranr15	0:6c5518885385	2569	while(d==0) {
dsuranr15	0:6c5518885385	2570	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2571	if(num>9) {
dsuranr15	0:6c5518885385	2572	num=9;
dsuranr15	0:6c5518885385	2573	}
dsuranr15	0:6c5518885385	2574	if(num<0) {
dsuranr15	0:6c5518885385	2575	num=0;
dsuranr15	0:6c5518885385	2576	}
dsuranr15	0:6c5518885385	2577	ALM6[j]=num;
dsuranr15	0:6c5518885385	2578	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2579	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2580	if(button4.falling()) {
dsuranr15	0:6c5518885385	2581	d=1;
dsuranr15	0:6c5518885385	2582	}
dsuranr15	0:6c5518885385	2583	}
dsuranr15	0:6c5518885385	2584	wait(1);
dsuranr15	0:6c5518885385	2585	}
dsuranr15	0:6c5518885385	2586
dsuranr15	0:6c5518885385	2587	wheel.reset();
dsuranr15	0:6c5518885385	2588	LCD.cls();
dsuranr15	0:6c5518885385	2589	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2590	LCD.printf("MIN");
dsuranr15	0:6c5518885385	2591
dsuranr15	0:6c5518885385	2592
dsuranr15	0:6c5518885385	2593
dsuranr15	0:6c5518885385	2594	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	2595	d=0;
dsuranr15	0:6c5518885385	2596	wheel.reset();
dsuranr15	0:6c5518885385	2597	while(d==0) {
dsuranr15	0:6c5518885385	2598	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2599	if(num>9) {
dsuranr15	0:6c5518885385	2600	num=9;
dsuranr15	0:6c5518885385	2601	}
dsuranr15	0:6c5518885385	2602	if(num<0) {
dsuranr15	0:6c5518885385	2603	num=0;
dsuranr15	0:6c5518885385	2604	}
dsuranr15	0:6c5518885385	2605	ALM6[j]=num;
dsuranr15	0:6c5518885385	2606	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	2607	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2608	if(button4.falling()) {
dsuranr15	0:6c5518885385	2609	d=1;
dsuranr15	0:6c5518885385	2610	}
dsuranr15	0:6c5518885385	2611	}
dsuranr15	0:6c5518885385	2612	wait(1);
dsuranr15	0:6c5518885385	2613	}
dsuranr15	0:6c5518885385	2614
dsuranr15	0:6c5518885385	2615
dsuranr15	0:6c5518885385	2616	///////////////////////////////
dsuranr15	0:6c5518885385	2617	j=0;
dsuranr15	0:6c5518885385	2618	LCD.cls();
dsuranr15	0:6c5518885385	2619	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2620	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	2621	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	2622	FEC6[4]=0;
dsuranr15	0:6c5518885385	2623	FEC6[7]=0;
dsuranr15	0:6c5518885385	2624	d=0;
dsuranr15	0:6c5518885385	2625	wheel.reset();
dsuranr15	0:6c5518885385	2626	while(d==0) {
dsuranr15	0:6c5518885385	2627	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2628	if(num>9) {
dsuranr15	0:6c5518885385	2629	num=9;
dsuranr15	0:6c5518885385	2630	}
dsuranr15	0:6c5518885385	2631	if(num<0) {
dsuranr15	0:6c5518885385	2632	num=0;
dsuranr15	0:6c5518885385	2633	}
dsuranr15	0:6c5518885385	2634	FEC6[j]=num;
dsuranr15	0:6c5518885385	2635	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2636	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2637	if(button4.falling()) {
dsuranr15	0:6c5518885385	2638	d=1;
dsuranr15	0:6c5518885385	2639	}
dsuranr15	0:6c5518885385	2640	}
dsuranr15	0:6c5518885385	2641	wait(1);
dsuranr15	0:6c5518885385	2642	}
dsuranr15	0:6c5518885385	2643
dsuranr15	0:6c5518885385	2644	j=0;
dsuranr15	0:6c5518885385	2645	LCD.cls();
dsuranr15	0:6c5518885385	2646	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2647	LCD.printf("MES");
dsuranr15	0:6c5518885385	2648	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	2649	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2650	d=0;
dsuranr15	0:6c5518885385	2651	wheel.reset();
dsuranr15	0:6c5518885385	2652	while(d==0) {
dsuranr15	0:6c5518885385	2653	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2654	if(num>9) {
dsuranr15	0:6c5518885385	2655	num=9;
dsuranr15	0:6c5518885385	2656	}
dsuranr15	0:6c5518885385	2657	if(num<0) {
dsuranr15	0:6c5518885385	2658	num=0;
dsuranr15	0:6c5518885385	2659	}
dsuranr15	0:6c5518885385	2660	FEC6[j]=num;
dsuranr15	0:6c5518885385	2661	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	2662	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2663	if(button4.falling()) {
dsuranr15	0:6c5518885385	2664	d=1;
dsuranr15	0:6c5518885385	2665	}
dsuranr15	0:6c5518885385	2666	}
dsuranr15	0:6c5518885385	2667	wait(1);
dsuranr15	0:6c5518885385	2668	}
dsuranr15	0:6c5518885385	2669
dsuranr15	0:6c5518885385	2670	j=0;
dsuranr15	0:6c5518885385	2671	LCD.cls();
dsuranr15	0:6c5518885385	2672	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2673	LCD.printf("DIA");
dsuranr15	0:6c5518885385	2674	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	2675	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2676	d=0;
dsuranr15	0:6c5518885385	2677	wheel.reset();
dsuranr15	0:6c5518885385	2678	while(d==0) {
dsuranr15	0:6c5518885385	2679	num=wheel.getPulses();
dsuranr15	0:6c5518885385	2680	if(num>9) {
dsuranr15	0:6c5518885385	2681	num=9;
dsuranr15	0:6c5518885385	2682	}
dsuranr15	0:6c5518885385	2683	if(num<0) {
dsuranr15	0:6c5518885385	2684	num=0;
dsuranr15	0:6c5518885385	2685	}
dsuranr15	0:6c5518885385	2686	FEC6[j]=num;
dsuranr15	0:6c5518885385	2687	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	2688	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2689	if(button4.falling()) {
dsuranr15	0:6c5518885385	2690	d=1;
dsuranr15	0:6c5518885385	2691	}
dsuranr15	0:6c5518885385	2692	}
dsuranr15	0:6c5518885385	2693	wait(1);
dsuranr15	0:6c5518885385	2694	}
dsuranr15	0:6c5518885385	2695
dsuranr15	0:6c5518885385	2696	//////////////////////////////////
dsuranr15	0:6c5518885385	2697	LCD.cls();
dsuranr15	0:6c5518885385	2698	LCD.locate(14,0);
dsuranr15	0:6c5518885385	2699	LCD.printf("A6");
dsuranr15	0:6c5518885385	2700	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	2701	//
dsuranr15	0:6c5518885385	2702	LCD.locate(2,0);
dsuranr15	0:6c5518885385	2703	LCD.printf(":");
dsuranr15	0:6c5518885385	2704	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2705	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2706
dsuranr15	0:6c5518885385	2707
dsuranr15	0:6c5518885385	2708	}
dsuranr15	0:6c5518885385	2709
dsuranr15	0:6c5518885385	2710
dsuranr15	0:6c5518885385	2711	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	2712	//
dsuranr15	0:6c5518885385	2713	LCD.locate(4,1);
dsuranr15	0:6c5518885385	2714	LCD.printf("-");
dsuranr15	0:6c5518885385	2715	LCD.locate(7,1);
dsuranr15	0:6c5518885385	2716	LCD.printf("-");
dsuranr15	0:6c5518885385	2717	LCD.locate(j,1);
dsuranr15	0:6c5518885385	2718	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2719
dsuranr15	0:6c5518885385	2720
dsuranr15	0:6c5518885385	2721	}
dsuranr15	0:6c5518885385	2722	wait(5);
dsuranr15	0:6c5518885385	2723
dsuranr15	0:6c5518885385	2724	// como se dijo anteriormente solo cambian las variables
dsuranr15	0:6c5518885385	2725
dsuranr15	0:6c5518885385	2726	ALM_6[0]=ALM6[0];
dsuranr15	0:6c5518885385	2727	ALM_6[1]=ALM6[1];
dsuranr15	0:6c5518885385	2728	ALM_6[2]=ALM6[3];
dsuranr15	0:6c5518885385	2729	ALM_6[3]=ALM6[4];
dsuranr15	0:6c5518885385	2730
dsuranr15	0:6c5518885385	2731	FEC_6[0]=FEC6[0];
dsuranr15	0:6c5518885385	2732	FEC_6[1]=FEC6[1];
dsuranr15	0:6c5518885385	2733	FEC_6[2]=FEC6[2];
dsuranr15	0:6c5518885385	2734	FEC_6[3]=FEC6[3];
dsuranr15	0:6c5518885385	2735	FEC_6[4]=FEC6[5];
dsuranr15	0:6c5518885385	2736	FEC_6[5]=FEC6[6];
dsuranr15	0:6c5518885385	2737	FEC_6[6]=FEC6[8];
dsuranr15	0:6c5518885385	2738	FEC_6[7]=FEC6[9];
dsuranr15	0:6c5518885385	2739
dsuranr15	0:6c5518885385	2740	sprintf(alm_6,"%d%d%d%d",ALM_6[0],ALM_6[1],ALM_6[2],ALM_6[3]);
dsuranr15	0:6c5518885385	2741	sprintf(fec_6,"%d%d%d%d%d%d%d%d",FEC_6[0],FEC_6[1],FEC_6[2],FEC_6[3],FEC_6[4],FEC_6[5],FEC_6[6],FEC_6[7]);
dsuranr15	0:6c5518885385	2742
dsuranr15	0:6c5518885385	2743	x=1;
dsuranr15	0:6c5518885385	2744	wait(1);
dsuranr15	0:6c5518885385	2745	al=1;
dsuranr15	0:6c5518885385	2746	con=2;
dsuranr15	0:6c5518885385	2747
dsuranr15	0:6c5518885385	2748	}
dsuranr15	0:6c5518885385	2749	wait(1);
dsuranr15	0:6c5518885385	2750	}
dsuranr15	0:6c5518885385	2751	al=0;
dsuranr15	0:6c5518885385	2752	wait(1);
dsuranr15	0:6c5518885385	2753	p=irda.read_high_us(4000);
dsuranr15	0:6c5518885385	2754
dsuranr15	0:6c5518885385	2755	if(p!=-1) {
dsuranr15	0:6c5518885385	2756	while (al!=1) {
dsuranr15	0:6c5518885385	2757	LCD.cls();
dsuranr15	0:6c5518885385	2758	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2759	LCD.printf("M0D0 C0NTR0L");
dsuranr15	0:6c5518885385	2760	wait(2);
dsuranr15	0:6c5518885385	2761	int j=0;
dsuranr15	0:6c5518885385	2762	LCD.cls();
dsuranr15	0:6c5518885385	2763	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2764	LCD.printf("H0RA");
dsuranr15	0:6c5518885385	2765	for(j=0; j<2; ++j) {
dsuranr15	0:6c5518885385	2766	ALM6[2]=0;
dsuranr15	0:6c5518885385	2767	fflush( stdin );
dsuranr15	0:6c5518885385	2768	//wait(1);
dsuranr15	0:6c5518885385	2769	control();
dsuranr15	0:6c5518885385	2770	ALM6[j]=num;
dsuranr15	0:6c5518885385	2771	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2772	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2773	wait(1);
dsuranr15	0:6c5518885385	2774	}
dsuranr15	0:6c5518885385	2775	LCD.cls();
dsuranr15	0:6c5518885385	2776	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2777	LCD.printf("MIN");
dsuranr15	0:6c5518885385	2778
dsuranr15	0:6c5518885385	2779	for(j=3; j<5; ++j) {
dsuranr15	0:6c5518885385	2780	fflush( stdin );
dsuranr15	0:6c5518885385	2781	//wait(1);
dsuranr15	0:6c5518885385	2782	control();
dsuranr15	0:6c5518885385	2783	ALM6[j]=num;
dsuranr15	0:6c5518885385	2784	LCD.locate(j-3,0);
dsuranr15	0:6c5518885385	2785	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2786	wait(1);
dsuranr15	0:6c5518885385	2787	}
dsuranr15	0:6c5518885385	2788	////////////////////////
dsuranr15	0:6c5518885385	2789	j=0;
dsuranr15	0:6c5518885385	2790	LCD.cls();
dsuranr15	0:6c5518885385	2791	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2792	LCD.printf("YEAR");
dsuranr15	0:6c5518885385	2793	for(j=0; j<4; ++j) {
dsuranr15	0:6c5518885385	2794	FEC6[4]=0;
dsuranr15	0:6c5518885385	2795	FEC6[7]=0;
dsuranr15	0:6c5518885385	2796
dsuranr15	0:6c5518885385	2797
dsuranr15	0:6c5518885385	2798	fflush( stdin );
dsuranr15	0:6c5518885385	2799	//wait(1);
dsuranr15	0:6c5518885385	2800	control();
dsuranr15	0:6c5518885385	2801	FEC6[j]=num;
dsuranr15	0:6c5518885385	2802	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2803	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2804	wait(1);
dsuranr15	0:6c5518885385	2805	}
dsuranr15	0:6c5518885385	2806
dsuranr15	0:6c5518885385	2807
dsuranr15	0:6c5518885385	2808	j=0;
dsuranr15	0:6c5518885385	2809	LCD.cls();
dsuranr15	0:6c5518885385	2810	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2811	LCD.printf("MES");
dsuranr15	0:6c5518885385	2812	for(j=5; j<7; ++j) {
dsuranr15	0:6c5518885385	2813	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2814	fflush( stdin );
dsuranr15	0:6c5518885385	2815	//wait(1);
dsuranr15	0:6c5518885385	2816	control();
dsuranr15	0:6c5518885385	2817	FEC6[j]=num;
dsuranr15	0:6c5518885385	2818	LCD.locate(j-5,0);
dsuranr15	0:6c5518885385	2819	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2820	wait(1);
dsuranr15	0:6c5518885385	2821	}
dsuranr15	0:6c5518885385	2822
dsuranr15	0:6c5518885385	2823
dsuranr15	0:6c5518885385	2824	j=0;
dsuranr15	0:6c5518885385	2825	LCD.cls();
dsuranr15	0:6c5518885385	2826	LCD.locate(0,1);
dsuranr15	0:6c5518885385	2827	LCD.printf("DIA");
dsuranr15	0:6c5518885385	2828	for(j=8; j<10; ++j) {
dsuranr15	0:6c5518885385	2829	//ALM1[2]=0;
dsuranr15	0:6c5518885385	2830	fflush( stdin );
dsuranr15	0:6c5518885385	2831	//wait(1);
dsuranr15	0:6c5518885385	2832	control();
dsuranr15	0:6c5518885385	2833	FEC6[j]=num;
dsuranr15	0:6c5518885385	2834	LCD.locate(j-8,0);
dsuranr15	0:6c5518885385	2835	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2836	wait(1);
dsuranr15	0:6c5518885385	2837	}
dsuranr15	0:6c5518885385	2838
dsuranr15	0:6c5518885385	2839
dsuranr15	0:6c5518885385	2840	////////////////////////
dsuranr15	0:6c5518885385	2841	LCD.cls();
dsuranr15	0:6c5518885385	2842	LCD.locate(14,0);
dsuranr15	0:6c5518885385	2843	LCD.printf("A6");
dsuranr15	0:6c5518885385	2844	for(j=0; j<5; ++j) {
dsuranr15	0:6c5518885385	2845	//
dsuranr15	0:6c5518885385	2846	LCD.locate(2,0);
dsuranr15	0:6c5518885385	2847	LCD.printf(":");
dsuranr15	0:6c5518885385	2848	LCD.locate(j,0);
dsuranr15	0:6c5518885385	2849	LCD.printf("%i",ALM6[j]);
dsuranr15	0:6c5518885385	2850
dsuranr15	0:6c5518885385	2851
dsuranr15	0:6c5518885385	2852	}
dsuranr15	0:6c5518885385	2853
dsuranr15	0:6c5518885385	2854
dsuranr15	0:6c5518885385	2855	for(j=0; j<10; ++j) {
dsuranr15	0:6c5518885385	2856	//
dsuranr15	0:6c5518885385	2857	LCD.locate(4,1);
dsuranr15	0:6c5518885385	2858	LCD.printf("-");
dsuranr15	0:6c5518885385	2859	LCD.locate(7,1);
dsuranr15	0:6c5518885385	2860	LCD.printf("-");
dsuranr15	0:6c5518885385	2861	LCD.locate(j,1);
dsuranr15	0:6c5518885385	2862	LCD.printf("%i",FEC6[j]);
dsuranr15	0:6c5518885385	2863
dsuranr15	0:6c5518885385	2864
dsuranr15	0:6c5518885385	2865	}
dsuranr15	0:6c5518885385	2866	wait(5);
dsuranr15	0:6c5518885385	2867
dsuranr15	0:6c5518885385	2868
dsuranr15	0:6c5518885385	2869	ALM_6[0]=ALM6[0];
dsuranr15	0:6c5518885385	2870	ALM_6[1]=ALM6[1];
dsuranr15	0:6c5518885385	2871	ALM_6[2]=ALM6[3];
dsuranr15	0:6c5518885385	2872	ALM_6[3]=ALM6[4];
dsuranr15	0:6c5518885385	2873
dsuranr15	0:6c5518885385	2874	FEC_6[0]=FEC6[0];
dsuranr15	0:6c5518885385	2875	FEC_6[1]=FEC6[1];
dsuranr15	0:6c5518885385	2876	FEC_6[2]=FEC6[2];
dsuranr15	0:6c5518885385	2877	FEC_6[3]=FEC6[3];
dsuranr15	0:6c5518885385	2878	FEC_6[4]=FEC6[5];
dsuranr15	0:6c5518885385	2879	FEC_6[5]=FEC6[6];
dsuranr15	0:6c5518885385	2880	FEC_6[6]=FEC6[8];
dsuranr15	0:6c5518885385	2881	FEC_6[7]=FEC6[9];
dsuranr15	0:6c5518885385	2882
dsuranr15	0:6c5518885385	2883	sprintf(alm_6,"%d%d%d%d",ALM_6[0],ALM_6[1],ALM_6[2],ALM_6[3]);
dsuranr15	0:6c5518885385	2884	sprintf(fec_6,"%d%d%d%d%d%d%d%d",FEC_6[0],FEC_6[1],FEC_6[2],FEC_6[3],FEC_6[4],FEC_6[5],FEC_6[6],FEC_6[7]);
dsuranr15	0:6c5518885385	2885
dsuranr15	0:6c5518885385	2886	x=1;
dsuranr15	0:6c5518885385	2887	wait(1);
dsuranr15	0:6c5518885385	2888	al=1;
dsuranr15	0:6c5518885385	2889	con=2;
dsuranr15	0:6c5518885385	2890
dsuranr15	0:6c5518885385	2891
dsuranr15	0:6c5518885385	2892	x=1;
dsuranr15	0:6c5518885385	2893	wait(1);
dsuranr15	0:6c5518885385	2894	al=1;
dsuranr15	0:6c5518885385	2895	p=-1;
dsuranr15	0:6c5518885385	2896	}
dsuranr15	0:6c5518885385	2897
dsuranr15	0:6c5518885385	2898	wait(1);
dsuranr15	0:6c5518885385	2899	}
dsuranr15	0:6c5518885385	2900
dsuranr15	0:6c5518885385	2901	}
dsuranr15	0:6c5518885385	2902
dsuranr15	0:6c5518885385	2903	wait(1);
dsuranr15	0:6c5518885385	2904	nu=0;
dsuranr15	0:6c5518885385	2905	y=0;
dsuranr15	0:6c5518885385	2906	con=0;
dsuranr15	0:6c5518885385	2907	LCD.cls();
dsuranr15	0:6c5518885385	2908	LCD.printf("ALM6 PR0GRAMADA");
dsuranr15	0:6c5518885385	2909	wait(5);
dsuranr15	0:6c5518885385	2910	con=2;
dsuranr15	0:6c5518885385	2911
dsuranr15	0:6c5518885385	2912	break;
dsuranr15	0:6c5518885385	2913
dsuranr15	0:6c5518885385	2914	}
dsuranr15	0:6c5518885385	2915
dsuranr15	0:6c5518885385	2916
dsuranr15	0:6c5518885385	2917	break;
dsuranr15	0:6c5518885385	2918
dsuranr15	0:6c5518885385	2919	// todas las anteriores alarmas fueron programadas de la misma manera que la 1, solo se cambiaron las variables dependiendo de que alarma estaba.
dsuranr15	0:6c5518885385	2920
dsuranr15	0:6c5518885385	2921
dsuranr15	0:6c5518885385	2922	} //del switch
dsuranr15	0:6c5518885385	2923	pos=0;// variable de control
dsuranr15	0:6c5518885385	2924	}
dsuranr15	0:6c5518885385	2925
dsuranr15	0:6c5518885385	2926
dsuranr15	0:6c5518885385	2927
dsuranr15	0:6c5518885385	2928	}

Repository toolbox

Export to desktop IDE

Repository details

Type:	Library
Created:	30 Aug 2019
Imports:	8
Forks:	0
Commits:	1
Dependents:	0
Dependencies:	6
Followers:	1

The code in this repository is Apache licensed.

main.cpp@0:6c5518885385, 2019-08-30 (annotated)

Who changed what in which revision?

Repository toolbox

Repository details

Important Information for this Arm website

Access Warning