Igal Salazar / Mbed 2 deprecated Bluepill_Reloj_copy

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   mbed

main.cpp@0:53bf87d68a12, 2022-03-11 (annotated)

Committer:
igalsalazars
Date:
Fri Mar 11 00:13:29 2022 +0000
Revision:
0:53bf87d68a12
reloj fechador con lcd ;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
igalsalazars 0:53bf87d68a12 1 /* ###########################################################################
igalsalazars 0:53bf87d68a12 2 ** Archivo : main.c
igalsalazars 0:53bf87d68a12 3 ** Proyecto : STM32-F103C8_Reloj
igalsalazars 0:53bf87d68a12 4 ** Procesador : STM32F103C8T6
igalsalazars 0:53bf87d68a12 5 ** Plataforma : Blue Pill
igalsalazars 0:53bf87d68a12 6 ** Herramienta : Mbed
igalsalazars 0:53bf87d68a12 7 ** Plataforma : Blue Pill
igalsalazars 0:53bf87d68a12 8 ** Herramienta : Mbed Compiler
igalsalazars 0:53bf87d68a12 9 ** Compilador : Mbed Online C Compiler
igalsalazars 0:53bf87d68a12 10 ** Version : Mbed-OS 5.15.0
igalsalazars 0:53bf87d68a12 11 ** Fecha/Hora :07-12-2021, 16:03
igalsalazars 0:53bf87d68a12 12 ** Descripción :Reloj fechador automatico con varios ajustes
igalsalazars 0:53bf87d68a12 13 ** Componentes : GPIO, Timer, Buzzer.
igalsalazars 0:53bf87d68a12 14 ** Configuraciones : Includes, Stacks y Drivers externos
igalsalazars 0:53bf87d68a12 15 ** Autores :Salazar Servin Igal
igalsalazars 0:53bf87d68a12 16 **
igalsalazars 0:53bf87d68a12 17 **
igalsalazars 0:53bf87d68a12 18 ** Versión : Beta
igalsalazars 0:53bf87d68a12 19 ** Revisión : A
igalsalazars 0:53bf87d68a12 20 ** Release : 0
igalsalazars 0:53bf87d68a12 21 ** Bugs & Fixes :
igalsalazars 0:53bf87d68a12 22 ** Date : 00/00/2021
igalsalazars 0:53bf87d68a12 23 **
igalsalazars 0:53bf87d68a12 24 **
igalsalazars 0:53bf87d68a12 25 ** ###########################################################################*/
igalsalazars 0:53bf87d68a12 26 /*
igalsalazars 0:53bf87d68a12 27 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
igalsalazars 0:53bf87d68a12 28 : Includes
igalsalazars 0:53bf87d68a12 29 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
igalsalazars 0:53bf87d68a12 30 */
igalsalazars 0:53bf87d68a12 31 #include "stm32f103c8t6.h"
igalsalazars 0:53bf87d68a12 32 #include "mbed.h"
igalsalazars 0:53bf87d68a12 33 #include "Serial.h"
igalsalazars 0:53bf87d68a12 34 #include "iostream"
igalsalazars 0:53bf87d68a12 35 #include "stdio.h"
igalsalazars 0:53bf87d68a12 36
igalsalazars 0:53bf87d68a12 37
igalsalazars 0:53bf87d68a12 38 /*
igalsalazars 0:53bf87d68a12 39 :...............................................................................
igalsalazars 0:53bf87d68a12 40 : Definiciones
igalsalazars 0:53bf87d68a12 41 :...............................................................................
igalsalazars 0:53bf87d68a12 42 */
igalsalazars 0:53bf87d68a12 43
igalsalazars 0:53bf87d68a12 44 #define FALSE 0 // Estado FALSO
igalsalazars 0:53bf87d68a12 45 #define TRUE 1 // Estado VERDADERO
igalsalazars 0:53bf87d68a12 46 #define Ticker_Rate 1000 // Periodo de interrupción (us)=1ms
igalsalazars 0:53bf87d68a12 47 #define Baud_Rate 115200 // Velocidad de Transmisión (Bauds)
igalsalazars 0:53bf87d68a12 48 #define Inicio_segundos 10
igalsalazars 0:53bf87d68a12 49 #define Inicio_minutos 16
igalsalazars 0:53bf87d68a12 50 #define Inicio_horas 16
igalsalazars 0:53bf87d68a12 51 #define Inicio_dia 12
igalsalazars 0:53bf87d68a12 52 #define Inicio_mes 12
igalsalazars 0:53bf87d68a12 53 #define Inicio_anio 2021
igalsalazars 0:53bf87d68a12 54 #define inicio_dia 1
igalsalazars 0:53bf87d68a12 55 #define Contador 0
igalsalazars 0:53bf87d68a12 56 #define Cuenta_regresiva 364
igalsalazars 0:53bf87d68a12 57 #define Semana 1
igalsalazars 0:53bf87d68a12 58 #define TDC 1
igalsalazars 0:53bf87d68a12 59 #define AMPM 0
igalsalazars 0:53bf87d68a12 60 #define FormatoH 1
igalsalazars 0:53bf87d68a12 61 #define Verano 1
igalsalazars 0:53bf87d68a12 62
igalsalazars 0:53bf87d68a12 63 /*
igalsalazars 0:53bf87d68a12 64 +-------------------------------------------------------------------------------
igalsalazars 0:53bf87d68a12 65 | Configuración de Puertos
igalsalazars 0:53bf87d68a12 66 +-------------------------------------------------------------------------------
igalsalazars 0:53bf87d68a12 67 */
igalsalazars 0:53bf87d68a12 68 //confSysClock(); // Configure system clock (72MHz HSE clock, 48MHz USB clock)
igalsalazars 0:53bf87d68a12 69 Ticker TimerInt; // Inicializa la Interrupción por Timer
igalsalazars 0:53bf87d68a12 70 DigitalOut led_monitor(LED1); // Inicializa el LED Monitor (Interno)
igalsalazars 0:53bf87d68a12 71 DigitalOut led_testigo(PB_1); // Inicializa el LED Testigo (Externo)
igalsalazars 0:53bf87d68a12 72 PwmOut servo(PA_7); // Inicializa el PWM
igalsalazars 0:53bf87d68a12 73 AnalogIn sensor1 (PB_0); // Inicializa Canal Analógico para sensor 1
igalsalazars 0:53bf87d68a12 74 Serial terminal(PA_2, PA_3); // Inicializa la Comunicación Serial a la PC
igalsalazars 0:53bf87d68a12 75 /*
igalsalazars 0:53bf87d68a12 76 +-------------------------------------------------------------------------------
igalsalazars 0:53bf87d68a12 77 | Variables Globales de Usuario
igalsalazars 0:53bf87d68a12 78 +-------------------------------------------------------------------------------
igalsalazars 0:53bf87d68a12 79 */
igalsalazars 0:53bf87d68a12 80 char Opcion;
igalsalazars 0:53bf87d68a12 81 bool Bandera1,Bandera2= TDC,Bandera3= FormatoH,Bandera4= AMPM,Bandera5=Verano;
igalsalazars 0:53bf87d68a12 82 /*Bandera Num= BN
igalsalazars 0:53bf87d68a12 83 B1=Año bisiesto ----->> 1=año bisiesto 0=año no bisiesto
igalsalazars 0:53bf87d68a12 84 B2=Tipo de calendario ----->> tipo de calendario 1=julioano 0=gregoriano
igalsalazars 0:53bf87d68a12 85 B3=FORMATO DE 12 O 24 HRS ----->> formato de 0=24hrs 1=12 horas AM/PM
igalsalazars 0:53bf87d68a12 86 B4=Formato de la hora AM-PM ----->> inicio de medio dia 0=am 1=pm
igalsalazars 0:53bf87d68a12 87 B5=Cambio de horario de verano ----->> Cambia De Horario 0=horario de verana 1=horario de invierno
igalsalazars 0:53bf87d68a12 88 */
igalsalazars 0:53bf87d68a12 89 int8_t dia= inicio_dia,Dia= Inicio_dia,Mes= Inicio_mes,SemanaN= Semana;
igalsalazars 0:53bf87d68a12 90
igalsalazars 0:53bf87d68a12 91 /*
igalsalazars 0:53bf87d68a12 92 dia=inicio_dia -->>inicializa la variable a un valor definido de 1-30 o 31
igalsalazars 0:53bf87d68a12 93 Dia= Inicio_dia -->>inicializa la variable 0=lunes 1=martes 2=miercoles 3=jueves 4=viernes 5=sabado 6=domingo
igalsalazars 0:53bf87d68a12 94 Mes=Inicio_Mes -->>inicializa la variable a un valor definido de 1-12
igalsalazars 0:53bf87d68a12 95 SemanaN -->>Auxiliar para saber el numero de semanas transcurridas
igalsalazars 0:53bf87d68a12 96 */
igalsalazars 0:53bf87d68a12 97
igalsalazars 0:53bf87d68a12 98 uint8_t Segundos= Inicio_segundos ,Minutos= Inicio_minutos,Horas= Inicio_horas;
igalsalazars 0:53bf87d68a12 99 /*
igalsalazars 0:53bf87d68a12 100 Segundos= Inicio_segundos -->> Inicializamos los segundo [0-60]
igalsalazars 0:53bf87d68a12 101 Minutos= Inicio_minutos -->> Inicializamos los minutos [0-60]
igalsalazars 0:53bf87d68a12 102 Horas= Inicio_horas -->> Inicializamos las horas [1-24 o 1-12]segun el formato
igalsalazars 0:53bf87d68a12 103 */
igalsalazars 0:53bf87d68a12 104 uint16_t Anio= Inicio_anio,DiasT= Contador,DiasF= Cuenta_regresiva ;
igalsalazars 0:53bf87d68a12 105
igalsalazars 0:53bf87d68a12 106 /*
igalsalazars 0:53bf87d68a12 107 Anio= Inicio_anio -->> Inicializamos la variable de años
igalsalazars 0:53bf87d68a12 108 DiasT= Contador -->> Contador que utilizartemos para ver los dias que han pasado desde 1-365 o 1-366
igalsalazars 0:53bf87d68a12 109 DiasF= Cuenta_regresiva -->> Cntador que utilizartemos para ver los dias que han pasado desde 365- o 366-1
igalsalazars 0:53bf87d68a12 110 */
igalsalazars 0:53bf87d68a12 111
igalsalazars 0:53bf87d68a12 112 string MES[12]={"ENERO","FEBRERO","MARZO","ABRIL","MAYO","JUNIO","JULIO","AGOSTO","SEPTIEMBRE","OCTUBRE","NOVIEMBRE","DICIEMBRE"};
igalsalazars 0:53bf87d68a12 113 string DIA[7]={"LUNES","MARTES","MIERCOLES","JUEVES","VIERNES","SABADO","DOMINGO"};
igalsalazars 0:53bf87d68a12 114
igalsalazars 0:53bf87d68a12 115 /* END variables */
igalsalazars 0:53bf87d68a12 116 /*
igalsalazars 0:53bf87d68a12 117 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
igalsalazars 0:53bf87d68a12 118 | Definición de Funciones Prototipo y Rutinas de los Vectores de Interrupción
igalsalazars 0:53bf87d68a12 119 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
igalsalazars 0:53bf87d68a12 120 */
igalsalazars 0:53bf87d68a12 121 // Las Definiciones de Funciones Prototipo
igalsalazars 0:53bf87d68a12 122 // y Apuntadores a Vectores de Interrupciones van aquí !
igalsalazars 0:53bf87d68a12 123
igalsalazars 0:53bf87d68a12 124 void clear_screen(void);
igalsalazars 0:53bf87d68a12 125 void Portada(void);
igalsalazars 0:53bf87d68a12 126 void Reloj(void);
igalsalazars 0:53bf87d68a12 127 void Fecha(void);
igalsalazars 0:53bf87d68a12 128 void Imprimir_reloj(void);
igalsalazars 0:53bf87d68a12 129 void Imprimir_fecha(void);
igalsalazars 0:53bf87d68a12 130 void Menu(void);
igalsalazars 0:53bf87d68a12 131 void Cont(void);
igalsalazars 0:53bf87d68a12 132 void reg(void);
igalsalazars 0:53bf87d68a12 133 void Horario_Invierno_Verano(void);
igalsalazars 0:53bf87d68a12 134 void Config_Hora();
igalsalazars 0:53bf87d68a12 135 void Config_Fecha();
igalsalazars 0:53bf87d68a12 136
igalsalazars 0:53bf87d68a12 137 /* END prototypes */
igalsalazars 0:53bf87d68a12 138
igalsalazars 0:53bf87d68a12 139 /* END definitions */
igalsalazars 0:53bf87d68a12 140 /*
igalsalazars 0:53bf87d68a12 141 #===============================================================================
igalsalazars 0:53bf87d68a12 142 |
igalsalazars 0:53bf87d68a12 143 | P R O G R A M A P R I N C I P A L
igalsalazars 0:53bf87d68a12 144 |
igalsalazars 0:53bf87d68a12 145 #===============================================================================
igalsalazars 0:53bf87d68a12 146 */
igalsalazars 0:53bf87d68a12 147 int main()
igalsalazars 0:53bf87d68a12 148 {
igalsalazars 0:53bf87d68a12 149 terminal.baud(Baud_Rate);
igalsalazars 0:53bf87d68a12 150 Portada();
igalsalazars 0:53bf87d68a12 151 while(1)
igalsalazars 0:53bf87d68a12 152 {
igalsalazars 0:53bf87d68a12 153 while(!terminal.readable())
igalsalazars 0:53bf87d68a12 154 {
igalsalazars 0:53bf87d68a12 155 clear_screen();
igalsalazars 0:53bf87d68a12 156 Reloj();
igalsalazars 0:53bf87d68a12 157 Fecha();
igalsalazars 0:53bf87d68a12 158 Imprimir_reloj();
igalsalazars 0:53bf87d68a12 159 Imprimir_fecha();
igalsalazars 0:53bf87d68a12 160 wait(1);
igalsalazars 0:53bf87d68a12 161 }
igalsalazars 0:53bf87d68a12 162 terminal.getc();
igalsalazars 0:53bf87d68a12 163 Menu();
igalsalazars 0:53bf87d68a12 164 }
igalsalazars 0:53bf87d68a12 165 }
igalsalazars 0:53bf87d68a12 166 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 167 void Menu()
igalsalazars 0:53bf87d68a12 168 {
igalsalazars 0:53bf87d68a12 169 clear_screen();
igalsalazars 0:53bf87d68a12 170 terminal.printf("\n\n\r\t\t ------------------MENU------------------");
igalsalazars 0:53bf87d68a12 171 terminal.printf("\n\n\r\t\t | 1)Configuracion Hora |");
igalsalazars 0:53bf87d68a12 172 terminal.printf("\n\n\r\t\t | 2)Configuracion fecha |");
igalsalazars 0:53bf87d68a12 173 terminal.printf("\n\n\r\t\t | 3)Configuracion de horario |");
igalsalazars 0:53bf87d68a12 174 terminal.printf("\n\n\r\t\t | 4)Retornar |");
igalsalazars 0:53bf87d68a12 175 terminal.printf("\n\n\r\t\t ------------------\e[0;37;41mIPN\e[0m ------------------");
igalsalazars 0:53bf87d68a12 176 Opcion = terminal.getc();
igalsalazars 0:53bf87d68a12 177 if(Opcion=='1')Config_Hora();
igalsalazars 0:53bf87d68a12 178 if(Opcion=='2')Config_Fecha();
igalsalazars 0:53bf87d68a12 179 if(Opcion=='3')Horario_Invierno_Verano();
igalsalazars 0:53bf87d68a12 180 }
igalsalazars 0:53bf87d68a12 181 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 182 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 183
igalsalazars 0:53bf87d68a12 184 void Portada()
igalsalazars 0:53bf87d68a12 185 {
igalsalazars 0:53bf87d68a12 186
igalsalazars 0:53bf87d68a12 187 clear_screen();
igalsalazars 0:53bf87d68a12 188 terminal.printf ("\e[0;30;42m100110010 00110000 00110001 00111001 00110011 00110101 00110000 00110010 00110101 00110110\e[0m\n\r");
igalsalazars 0:53bf87d68a12 189 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 190 terminal.printf ("\e[0;30;42m \e[0m\e[1;37;41m\t\t\t Instituto Politecnico Nacional \e[0m\n\r");
igalsalazars 0:53bf87d68a12 191 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 192 terminal.printf ("\e[0;30;42m \e[0m\e[1;37;42m\t\t ESCUELA SUPERIOR DE INGENIERIA MECANICA Y ELECTRICA \e[0m\n\r");
igalsalazars 0:53bf87d68a12 193 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 194 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 195 terminal.printf ("\e[0;30;42m \e[0m\e[1;37;43m\t\t\t\t Salazar Servin Igal \e[0m\n\r");
igalsalazars 0:53bf87d68a12 196 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 197 terminal.printf ("\e[0;30;42m \e[0m\e[1;37;45m\t\t\t\t\t 4CV6 \e[0m\n\r");
igalsalazars 0:53bf87d68a12 198 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 199 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 200 terminal.printf ("\e[0;30;42m \e[0m\e[1;37;46m\t\t\t\t Analisis Numerico \e[0m\n\r");
igalsalazars 0:53bf87d68a12 201 terminal.printf ("\e[0;30;42m \e[0m\r \e[0;30;42m \e[0m\r");
igalsalazars 0:53bf87d68a12 202 terminal.printf ("\e[0;30;42m100110010 00110000 00110001 00111001 00110011 00110101 00110000 00110010 00110101 00110110\e[0m\n\r");
igalsalazars 0:53bf87d68a12 203
igalsalazars 0:53bf87d68a12 204 wait(5);
igalsalazars 0:53bf87d68a12 205
igalsalazars 0:53bf87d68a12 206 terminal.printf ("\e[0;30;42m::: ::: ::: ::: ::: ::: ::. f#tW ::: :#E#L :: ::: ::: ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 207 terminal.printf ("\e[0;30;42m::: ::: ::: ::: ::: ::: ::: ,,:, ::: :,,,::: ::: ::: ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 208 terminal.printf ("\e[0;30;42m::: .:: ::: ::: ::: ::: :: ,,,,,K ::: #;,,,::: ::: ::: .:. ::: ::: ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 209 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ::: ::: K,,,,,,.: :: :,,,,, ::: ::: :: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 210 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ::: ::: #:,,,,,#: ::#,,,,,, ::: ::: :: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 211 terminal.printf ("\e[0;30;42m::: :: .:: ::: :. ,f. ::: #,,,,,:.: ::t,,,,,,: ::: , tL :: ::: ::: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 212 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: ,t,,,:K.: ::#,,,,,,: ::: :,,,,,, : ::.#,,,,# ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 213 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: t,,,,,,,: ::W,,,,,,, ::: ;,,,,,: : :.f,,,,,, ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 214 terminal.printf ("\e[0;30;42m :: .:: .:: .:: ,,,,,, . .: ,,,,,,, ::. f,,,,,,.:: . .,,,,:: .:: .:: ::: :. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 215 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ,,,,,,..:: ,,,,,,,:::iW,,,,,,K ::: ,,,,,,;:: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 216 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: K,,,,,,:#:: #,,,,,,,,,,::,,,,,,f :::#,,,,,,,#.: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 217 terminal.printf ("\e[0;30;42m ::. .:: .:: .:: .j,,,,,,,: : #i,,,,,,,,,,,,,,,,,,,Lj .,,,,,,, .:: .:: .:: .:. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 218 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: :.,,,,,,,, tE:,,,:,::,::.:,,,,,,,,,,,;E ,,,,,,,j: ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 219 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: :.,:,,,,,,,,,,,,.#E :,;,,,,,,:;#j:,,,,,,,,,,,,, : ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 220 terminal.printf ("\e[0;30;42m::: :: .:: ##:: :: i:,,,,,,,,.#.;,,,,..,ii..:,:,,:LD.,,,,,,,,,K :. :: D: ::: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 221 terminal.printf ("\e[0;30;42m::: :: ::: f,,,t. :: . ,,,,,;;G,,,.G#,:,,,,,,,:.t# ,,,.#..,,,,,: :: ff,,: ,:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 222 terminal.printf ("\e[0;30;42m::: :: ::: :,,:::W :: :#,,,,:;,,:Dt,,,,,,,,,,,,,,,:, #:,::#:,,,,# :: t,,,,:;::: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 223 terminal.printf ("\e[0;30;42m... t############:,:. W#######W#######,,,,W##WK#,,,,#WKEEG #.,,#:,.WW### G.,;############ :.: . \e[0m\n\r");
igalsalazars 0:53bf87d68a12 224 terminal.printf ("\e[0;30;42m ::: LGGGGGGGGGGGG,,,:jGGGGGGGGGGGGGGGG,,,,#GGGG#,,,,LGGGGG.,.#,,:.KGGGGGf:,,,GGGGGGGGGGGGE,:: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 225 terminal.printf ("\e[0;30;42m :::#GGGGGGGGGGGGG,,,, GGGGGGGGGGGGGGGG,,,,#GGGG#,,,,LGGGGGW,:,G.:EGGGGGG ,,,,GGGGGGGGGGGGGW.. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 226 terminal.printf ("\e[0;30;42m::: LGGGGGGGGGGGGG,,,,:GGGGGGGGGGGGGGGG,,,,#GGGG#,,,,LGGGGGG:,,:.EGGGGGGG ,,,,GGGGGGGGGGGGGL ::. \e[0m\n\r");
igalsalazars 0:53bf87d68a12 227 terminal.printf ("\e[0;30;42m::: EGGGGGGGGGGGGGG,,,,:GGGGGGGGGGGGGGGG,:,;#GGGG#,,:,LGGGGGGL:,:,WGGGGGGG ,,,,GGGGGGGGGGGGGG# ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 228 terminal.printf ("\e[0;30;42m::: GGGGGW#######ED,,,,:GGGGD###########W #GGGG#,,: fGGGGGGGW,,KGGGGGGGG.,,,,GGGGG#########W ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 229 terminal.printf ("\e[0;30;42m .#GGGGL. .:: .:,,,,:GGGGD,,,,,,,:f; :::#GGGG#,,#:LGGGGGGGGD.GGGGGGGGG.,,,,GGGGG .:: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 230 terminal.printf ("\e[0;30;42m GGGGG, . #::,.GGGGG::::::,i.. :.:#GGGG#,,#:GGGGGGGGGGDGGGGGGGGG:,,:#GGGGG . : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 231 terminal.printf ("\e[0;30;42m #GGGGGGGGGGGGGGGG,,,,KGGGGGGGGGGGGGGGG .:.#GGGG#,,#.GGGGGGGGGGGGGGGGGGGGi,,.:GGGGGGGGGGGGGGGGW : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 232 terminal.printf ("\e[0;30;42m:::LGGGGGGGGGGGGGGGGt,,K:GGGGGGGGGGGGGGGG: #GGGG#,,# LGGGGGGGGGGGGGGGGGGG .,,DGGGGGGGGGGGGGGGGG:: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 233 terminal.printf ("\e[0;30;42m::DGGGGGGGGGGGGGGGGG,,.::GGGGGGGGGGGGGGGG: #GGGG#,,# LGGGGGGGGGGGGGGGGGGG:E,,,GGGGGGGGGGGGGGGGGj: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 234 terminal.printf ("\e[0;30;42m DGGGGGGGGGGGGGGGGG,,,,tGGGGGGGGGGGGGGGG .:.#GGGG#,,#.LGGGGGGGGGGGGGGGGGGG,,W,,GGGGGGGGGGGGGGGGG# : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 235 terminal.printf ("\e[0;30;42m GGGGGGGGGGGGGGGGGG,;,,;GGGDGGGGGGGGGGGG :::#GGGG#,,#:GGGGGGGGGGGGGGGGGGGG#: :,GGGGGGGGGGGGGGGGGL : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 236 terminal.printf ("\e[0;30;42m GGGGG ::::........;;,#,:::::::; jGGGGG ...#GGGG#,, #GGGGGWGGGGGGGGLGGGGG.:,G;GGGGG::::::: .. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 237 terminal.printf ("\e[0;30;42m:#GGGG##,,,,,,,,,,,,,,, ,,,,,,,,,# fGGGGG: W:#GGGG#,,,,LGGGG LGGGGGGG:LGGGG:#, ,GGGGG,,,,,,,E .:: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 238 terminal.printf ("\e[0;30;42m:LGGGG##############i:#::###########GGGGGW,,,#GGGG#j.,:LGGGG .GGGGGGL,GGGGG,,.,KGGGGG#######W###### \e[0m\n\r");
igalsalazars 0:53bf87d68a12 239 terminal.printf ("\e[0;30;42m LGGGGGGGGGGGGGGGGGG,,.,.GGGGGGGGGGGGGGGL,,,.#GGGG#,,,#LGGGG #GGGGD,,GGGGG,,#,,GGGGGGGGGGGGGGGGGGG \e[0m\n\r");
igalsalazars 0:53bf87d68a12 240 terminal.printf ("\e[0;30;42mfGGGGGGGGGGGGGGGGGGG,.,,.GGGGGGGGGGGGGGGL,.W,#GGGG#:,,,GGGGG ::GGGG.,,GGGGG,, ,,GGGGGGGGGGGGGGGGGGG \e[0m\n\r");
igalsalazars 0:53bf87d68a12 241 terminal.printf ("\e[0;30;42m#GGGGGGGGGGGGGGGGGGG:#,,.GGGGGGGGGGGGGGGG.,::WGGGGW:LD,LGGGG ,:;GDE,,,GGGGG,,,.,GGGGGGGGGGGGGGGGGGG# \e[0m\n\r");
igalsalazars 0:53bf87d68a12 242 terminal.printf ("\e[0;30;42mLGGGGGGGGGGGGGGGDGGL, ,, GGGGGGGGGGGGGGGL.;.L#DDGG#:,,:GGGGG.,,,E#,,,,GGGGG,,,#;GGGGGGGGGGGGGGGGGGDW \e[0m\n\r");
igalsalazars 0:53bf87d68a12 243 terminal.printf ("\e[0;30;42mWWWWWWWWW######W#WW# ,,,:##W##########WWW::.,###WW#W:,,####K ,,,,:,,,WW####,,:i;###WWWKKEDDDDDGGGGGf \e[0m\n\r");
igalsalazars 0:53bf87d68a12 244 terminal.printf ("\e[0;30;42m::: :: ::: #:,j,E,,,,,, .::f.:,,,iGGGGW,:,,: .,,,:#LGGL:,,,: j:: ,,,,,:::j,,..:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 245 terminal.printf ("\e[0;30;42m::: :: .:: #,,:,#,,,,,L ::: W:, GGGGGGGE: K :#,:#GGGGGGG.,:# ::: ,,,,, ,#,,:,:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 246 terminal.printf ("\e[0;30;42m ::: .:: :t,,:,,,,,,,W: ::: .WGGGGGGGLE ::: GKGGGGGGGG#t :: :.#,,,,,E,j:,: ::: .:: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 247 terminal.printf ("\e[0;30;42m ::: ##ftL##.,:,,.,,,,, : ::: LGGGLW,#LLGD ::: LGGGL#WGGGLj::: ::E,,,,,#,.,,,##EE## :. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 248 terminal.printf ("\e[0;30;42m ::tf,,,,,,,,,:,,,:,,,,, : ::: GGGi:,::WGGL::: fGGGE,,#:GGG:::: :. ,,,,,#,:,,,,,,,,:,.# . : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 249 terminal.printf ("\e[0;30;42m::: ;,,,,,,,,,,,:,:,,,,,. ::. :jGGW.,,,: #GGD GGG#W,,,K:#GG; :.: :,,,,L,,,,,,,,,,,,,,. ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 250 terminal.printf ("\e[0;30;42m::: ,,,,:,:,,,,,,,.,,,,,. ::: :KGGKi:,,: .WDGWLGG# ,,,f,jGGE ::: :,,,,i,,,,,,,,,,:,,,: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 251 terminal.printf ("\e[0;30;42m::: ,,,,,W:,,,,,,,.,,,,,. ::: :#GG.;,,:: :.#GDGG#. :,,f,tGGG ::: :,,,,i,,,,,,,,L,:,,,, .:: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 252 terminal.printf ("\e[0;30;42m :::,,,:,WL,:,,:,:,,,,,:.: ::: #GG..;,,,. WGGW :f,,,#:WGGi::: ::.,,,,,G,,,,,, #::,,,,,. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 253 terminal.printf ("\e[0;30;42m :: #:;,,,:G#:,.,,:,,,,, . ::: DGG.,.,,,L fGG#G .i,,,f,KGG ::: :: ,,,,,#,::,.DW;,:,,.# . : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 254 terminal.printf ("\e[0;30;42m::: .: j##G #LG ,,:,,,,, ::: :iGG.,#,,,, .GGKLGK: ;,,,:, GGi ::: t,,,,:#,.:#Gi####L : ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 255 terminal.printf ("\e[0;30;42m::: :: ::: WDG::;,,,,,# ::: i GG#,..,,,:KGL GGGW:,,:#,:tGG,. ::: #,,,,,D,WGD#.:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 256 terminal.printf ("\e[0;30;42m::: :: .:: KiLGWK::,,,D ::. W:.GG.:,#,,,fGG; WDG.,,.,,D#GL,,# :.: f,,,;ifGG#:#::: :. ::. \e[0m\n\r");
igalsalazars 0:53bf87d68a12 257 terminal.printf ("\e[0;30;42m ::. .:: :#,,KGGD.,,,. E,,,,GG##::E,;GG#,,,;GGL:..:G:WG#,,,,# :W;,,,LGLGD,:: ::: ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 258 terminal.printf ("\e[0;30;42m ::: ::: : ,,#WGGG#.,,:WLG,,,,,KD#;G,;#WGG,,,,,fGGi:,. ,LG#,,,,,,,#,:,,DGGE: ,:. ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 259 terminal.printf ("\e[0;30;42m ::. ::: : ,j,;LGGG#.,:,,,K.:,#GG,.t:,LGt,,,,:,WGD,,,,.GG:,,;#,,,,,:#GGG#,.,,., ::: .:: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 260 terminal.printf ("\e[0;30;42m::: :: :Ef:,,,,:,#WGGGGW:,,,GG#,.GG:,,E#G# #Kif#i:GG# ;,#GG,,GLG,,,.EGGGL,:,#,,,:,# :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 261 terminal.printf ("\e[0;30;42m::: :: .f::,,,,,:W,.,#GGGGG#.:GGG#:GG;,, DL,:,:,,,:,jGD.,,KGW,#GGG,.#LGGGW. ,,,,,,,,,,W :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 262 terminal.printf ("\e[0;30;42m::: :: G,,,,,,,,,i,, ,,LGGGGGKGGGGGWG#W;#G#W,:,:,,.#,LG#,#GG#DGGGGWGGGGG#,:#,:,,,,,,,,,:#,: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 263 terminal.printf ("\e[0;30;42m ::. ,:,,,,,,,,,.,#:,.DGGGDGLGGGGGWG iGL.;,, :,,:jGGL:GKGGGGGGGGGGLD,,:.:#,,,,,,,,,,,L ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 264 terminal.printf ("\e[0;30;42m ::: ,,,,,,,,,,,,G,, ,,;DGGGGGGGGGGGD,#G# ,,,,,,,,,;;#G##GGGGGGGGGGGD:,,:#,.:,,,,,,,,,,,,i::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 265 terminal.printf ("\e[0;30;42m ::. #,,,,,,,:,,,:,::K,,,,tLGGGGGGGGGGG#G:.#:,,,,,,.i: GWLGGGGGGGGGG#,,,,..,#:,:.,,,,,,,,,#::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 266 terminal.printf ("\e[0;30;42m::: . ,,,,,,,,:#K:,D,,;,,,, EGGGGGGGGGGD# ,K,,,,,,# WGGGGGGGGGGGL::,,:K:,,:,f#.,,,,,,,, ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 267 terminal.printf ("\e[0;30;42m::: ::,,:,::iG : :,;.,,,,,,,;#GGGGGGGGGGGG,:K,,,,,,# tLGGGGGGGGGLG.,,,,,.,,#,,D: W:,:,,,.: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 268 terminal.printf ("\e[0;30;42m... .. .: ..W::i,,#:,,,,,iLGGGGGGGGGGG#D,,,,:,#WGGGGGGGGGGD#,,,,,::;;;::. . :: .. ... \e[0m\n\r");
igalsalazars 0:53bf87d68a12 269 terminal.printf ("\e[0;30;42m ::: .:: ... t::W:,;::::::.KGGGGLDGGGGLD,,,,:ifGGGGGDGGGGLt,:,,,,:K::,,:D .. .. ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 270 terminal.printf ("\e[0;30;42m ::: :::E ;#GGGGGWLGGGGGj,,#GGGGGLEWGGGG.::# .. ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 271 terminal.printf ("\e[0;30;42m :: :: ,DGGL#GK#LGDGG#KGGGGGWLGDGG#,,,# i.: :. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 272 terminal.printf ("\e[0;30;42m::: :: :E :,:DL #G, DGGGGGGGDj GGWELW,,,# K :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 273 terminal.printf ("\e[0;30;42m::: :: :. :::K.,KW i,:GKiWGE #:KGGGG#;D DL# GG:,G .#E###W , :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 274 terminal.printf ("\e[0;30;42m ::: ::: :.#,,,,,G W#G#j:GLELGLGGLGGD.LGG,,GG : #,,,,::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 275 terminal.printf ("\e[0;30;42m ::: ::: :j,,,,,,,,, ,,tD DG G#GGE :,;GGDWGW #G# K,:.,;,,,,,,. ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 276 terminal.printf ("\e[0;30;42m ::. ::: ,:,,,,,,,: E,,:# GL iLDK. DLG# :GE .E;:L :,,,,,,,,K ::: .:: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 277 terminal.printf ("\e[0;30;42m::: :: :::t,,,,,,,,.. #:,:# ;G# EGGEL LWGG DG ;,,# .f:,,,,,,,, :: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 278 terminal.printf ("\e[0;30;42m::: :: :::#,,,,,,,; : W,,,D #DK WGf #GK #GE #Li LG ,;,# :...,,,,,,,#:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 279 terminal.printf ("\e[0;30;42m..: .. ... :,,,,.# .. :#,,,# GGWE.: GG. #GD #WWGK ,;t .: #:,,,:G,.. .: :.: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 280 terminal.printf ("\e[0;30;42m ::: ::: :::.:# :: ::: :,,,,:iL#:,,,;#LWGG GL# # ,,:#L#..,,,,. :: ::: #.,i. ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 281 terminal.printf ("\e[0;30;42m ::: ::: :.W# ::: ::::,,,,,,,EG#;:,:,,iDGi KGEW,,,,:WWGW,:,,,,:G:: ::: G.: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 282 terminal.printf ("\e[0;30;42m ::. ::: ::: ::: ::i:,,,,,, GG,,.Kf.,,;Df #GG,,, #i:,,GL,,,,,,,,.: ::: ::: .:: ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 283 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ,,,,,,:,iGG:,:,,,,:.KL#GG,.,,,,,,::GGt,,,,,,,: :: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 284 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: G,,,,,,,LjGG W;,,,,,,,KDG#.,,,,,,LL GG..,,,,,,,.:: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 285 terminal.printf ("\e[0;30;42m::: :: .:: ::: :: G,,,,,,,.fGG #,,,,,,.LGK#;,,,,,,; .GG #,,,,,,,#:: ::: ::: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 286 terminal.printf ("\e[0;30;42m ::. ::: .:: ::: ::,,,,,,# jGG.: ,,,,,:LGDLL#,,,,,,#:fGG .,,,,,, ::: ::: ::: ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 287 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: ,,,,,,D: GG# ,,,,,fLGD fGGD.,,,,..#GG : .,,,,,, ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 288 terminal.printf ("\e[0;30;42m ::. .:: .:: ::: ,,,,,: : GGL ,,,,DLGL .:GGGLi:,,: GGG :.L;,,,,, .:: ::: .:: .:. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 289 terminal.printf ("\e[0;30;42m::: :: ::: .:: :: L,,,:i ::GGGW.,,KDGG: .#GGGEf.,GDGL: #,,,,# : ::: ::: :. ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 290 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ,:. :.#GGGGGGGGK#: :..GGGGGGGGG#: ..j# :: ::: .:: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 291 terminal.printf ("\e[0;30;42m ... ... ... ... .. ... :DGGGGDGW:: ... #:EGGGGGGD ... .:. ... ... ... .: . \e[0m\n\r");
igalsalazars 0:53bf87d68a12 292 terminal.printf ("\e[0;30;42m ::: .:: ::: ::: ::. ::: #GGGGLK;: ::. :;DGGGGG# ::: ::: .:. ::: .:: ::: : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 293 terminal.printf ("\e[0;30;42m ::: ::: ::: ::: ::: ::: :#DD#.::# ::: K,,;j##G ::: ::: ::: ::: ::: ::. : \e[0m\n\r");
igalsalazars 0:53bf87d68a12 294 terminal.printf ("\e[0;30;42m::: :: ::: ::: :: ::: ::: ,,,,..:: ::: :;,, ::: ::: :: ::: ::: :: ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 295 terminal.printf ("\e[0;30;42m::: :: ::: ::: :. ::: ::: .:###:.: ::. ##K. ::: ::: :: ::: ::: :. ::: \e[0m\n\r");
igalsalazars 0:53bf87d68a12 296
igalsalazars 0:53bf87d68a12 297 wait(5);
igalsalazars 0:53bf87d68a12 298 }
igalsalazars 0:53bf87d68a12 299
igalsalazars 0:53bf87d68a12 300 /*-------------------------------------------------
igalsalazars 0:53bf87d68a12 301 ---------------------------------------------------*/
igalsalazars 0:53bf87d68a12 302 void clear_screen() //esta funcion te limpia la pantalla
igalsalazars 0:53bf87d68a12 303 {
igalsalazars 0:53bf87d68a12 304 terminal.printf("\x1B[2J");
igalsalazars 0:53bf87d68a12 305 terminal.printf("\x1B[H");
igalsalazars 0:53bf87d68a12 306 }
igalsalazars 0:53bf87d68a12 307 /*-------------------------------------------------
igalsalazars 0:53bf87d68a12 308 ---------------------------------------------------*/
igalsalazars 0:53bf87d68a12 309 void Reloj() // esta funcion te cuenta los minutoos al igual que te hace los cambios de hora
igalsalazars 0:53bf87d68a12 310 {
igalsalazars 0:53bf87d68a12 311 Segundos++;
igalsalazars 0:53bf87d68a12 312 if(Segundos>=60)
igalsalazars 0:53bf87d68a12 313 {
igalsalazars 0:53bf87d68a12 314 Minutos++;
igalsalazars 0:53bf87d68a12 315 Segundos= 0;
igalsalazars 0:53bf87d68a12 316 }
igalsalazars 0:53bf87d68a12 317 if(Minutos>=60)
igalsalazars 0:53bf87d68a12 318 {
igalsalazars 0:53bf87d68a12 319 Horas++;
igalsalazars 0:53bf87d68a12 320 Minutos=0;
igalsalazars 0:53bf87d68a12 321 }
igalsalazars 0:53bf87d68a12 322 if(Horas>=24 && Bandera3==0) //Formato de 24 hrs
igalsalazars 0:53bf87d68a12 323 {
igalsalazars 0:53bf87d68a12 324 Horas=1;
igalsalazars 0:53bf87d68a12 325 Dia++;
igalsalazars 0:53bf87d68a12 326 dia++;
igalsalazars 0:53bf87d68a12 327 DiasT++;
igalsalazars 0:53bf87d68a12 328 DiasF--;
igalsalazars 0:53bf87d68a12 329 if(dia>=7)dia=0;
igalsalazars 0:53bf87d68a12 330 if(Bandera2==1&& dia==0)SemanaN++;
igalsalazars 0:53bf87d68a12 331 if(Bandera2==0&& dia==6)SemanaN++;
igalsalazars 0:53bf87d68a12 332 }
igalsalazars 0:53bf87d68a12 333 if(Horas>=13 && Bandera3==1)Horas=1; //Formato de 12 hrs //si la hora es mayor o igual a 13 y la bandera de formato de hora es 1 la variable horas la erestablecea a 1
igalsalazars 0:53bf87d68a12 334 if(Horas==12&& Minutos==0 && Segundos==0 && Bandera3==1) // PM
igalsalazars 0:53bf87d68a12 335 {
igalsalazars 0:53bf87d68a12 336 Bandera4=!Bandera4;
igalsalazars 0:53bf87d68a12 337 if(Bandera4==1) // BANDERA4: 0=AM 1=PM
igalsalazars 0:53bf87d68a12 338 {
igalsalazars 0:53bf87d68a12 339 Dia++;
igalsalazars 0:53bf87d68a12 340 dia++;
igalsalazars 0:53bf87d68a12 341 DiasT++;
igalsalazars 0:53bf87d68a12 342 DiasF--;
igalsalazars 0:53bf87d68a12 343 if(dia>=7)dia=1;
igalsalazars 0:53bf87d68a12 344 if(Bandera2==1&& Dia==0)SemanaN++;
igalsalazars 0:53bf87d68a12 345 if(Bandera2==0&& Dia==6)SemanaN++;
igalsalazars 0:53bf87d68a12 346 }
igalsalazars 0:53bf87d68a12 347 }
igalsalazars 0:53bf87d68a12 348
igalsalazars 0:53bf87d68a12 349 }
igalsalazars 0:53bf87d68a12 350 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 351
igalsalazars 0:53bf87d68a12 352 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 353 void Horario_Invierno_Verano()// esta funcion se usa para el cambio de hora en la semana 14 y semana 44
igalsalazars 0:53bf87d68a12 354 {
igalsalazars 0:53bf87d68a12 355 int opcion;
igalsalazars 0:53bf87d68a12 356 intento:
igalsalazars 0:53bf87d68a12 357 clear_screen();
igalsalazars 0:53bf87d68a12 358 terminal.printf("\n\t 0.-ACTIVAR HORARIO DE INVIERNO\n\r");
igalsalazars 0:53bf87d68a12 359 terminal.printf("\t 1.-ACTIVAR HORARIO DE VERANO\n\r");
igalsalazars 0:53bf87d68a12 360 terminal.printf("\t 2.-SALIR\n\r");
igalsalazars 0:53bf87d68a12 361 opcion=terminal.putc(terminal.getc())-48;
igalsalazars 0:53bf87d68a12 362
igalsalazars 0:53bf87d68a12 363 if(opcion==0&&Bandera5==0)
igalsalazars 0:53bf87d68a12 364 {
igalsalazars 0:53bf87d68a12 365 clear_screen();
igalsalazars 0:53bf87d68a12 366 terminal.printf("\n\tACTIVADO HORARIO DE INVIERNO");
igalsalazars 0:53bf87d68a12 367 Bandera5=0;
igalsalazars 0:53bf87d68a12 368 Horas--;
igalsalazars 0:53bf87d68a12 369 wait(1.5);
igalsalazars 0:53bf87d68a12 370 return;
igalsalazars 0:53bf87d68a12 371 }
igalsalazars 0:53bf87d68a12 372 if(opcion==1&&Bandera5==1)
igalsalazars 0:53bf87d68a12 373 {
igalsalazars 0:53bf87d68a12 374 clear_screen();
igalsalazars 0:53bf87d68a12 375 terminal.printf("\n\tACTIVADO HORARIO DE VERANO");
igalsalazars 0:53bf87d68a12 376 Bandera5=0;
igalsalazars 0:53bf87d68a12 377 Horas++;
igalsalazars 0:53bf87d68a12 378 wait(1.5);
igalsalazars 0:53bf87d68a12 379 return;
igalsalazars 0:53bf87d68a12 380 }
igalsalazars 0:53bf87d68a12 381 if(opcion>2)
igalsalazars 0:53bf87d68a12 382 {
igalsalazars 0:53bf87d68a12 383 clear_screen();
igalsalazars 0:53bf87d68a12 384 terminal.printf("\n\r\tintente de nuevo, valor ingresado incorrercto");
igalsalazars 0:53bf87d68a12 385 wait(1.5);
igalsalazars 0:53bf87d68a12 386 goto intento;
igalsalazars 0:53bf87d68a12 387 }
igalsalazars 0:53bf87d68a12 388 if(opcion==2)return;
igalsalazars 0:53bf87d68a12 389 }
igalsalazars 0:53bf87d68a12 390
igalsalazars 0:53bf87d68a12 391 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 392
igalsalazars 0:53bf87d68a12 393 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 394
igalsalazars 0:53bf87d68a12 395 void Imprimir_reloj()
igalsalazars 0:53bf87d68a12 396 {
igalsalazars 0:53bf87d68a12 397 if(Bandera3==0)terminal.printf ("\r\n\t\t\e[31m %i:%i:%i hrs\e[0m\n\r",Horas,Minutos,Segundos);
igalsalazars 0:53bf87d68a12 398 if(Bandera3==1 && Bandera4==1)terminal.printf("\r\n\t\t\e[31m %i:%i:%i AM \e[0m\n\r",Horas,Minutos,Segundos);
igalsalazars 0:53bf87d68a12 399 if(Bandera3==1 && Bandera4==0)terminal.printf("\r\n\t\t\e[31m %i:%i:%i PM \e[0m\n\r",Horas,Minutos,Segundos);
igalsalazars 0:53bf87d68a12 400 }
igalsalazars 0:53bf87d68a12 401 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 402 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 403 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 404 void Imprimir_fecha(){
igalsalazars 0:53bf87d68a12 405
igalsalazars 0:53bf87d68a12 406 terminal.printf("\n\r\tHOY ES %s %i/%s/%i ",DIA[dia],Dia,MES[Mes-1],Anio);
igalsalazars 0:53bf87d68a12 407 terminal.printf("\n\r\t\e[1;36m Semana en curso: %i , Los dias transcurridos son: %i , Los dias faltantes son: %i\e[42m" , SemanaN,DiasT,DiasF);
igalsalazars 0:53bf87d68a12 408 if (Bandera1==1)terminal.printf("\n\r\t\e[1;31;40m Este anio es bisiesto\e[42m");
igalsalazars 0:53bf87d68a12 409 if (Bandera1==0)terminal.printf("\n\r\t\e[1;34;40m Este anio no es bisiesto\e[42m");
igalsalazars 0:53bf87d68a12 410 if (Bandera2==1)terminal.printf("\n\r\t\e[0;37;40m Calendario Juliano\e[42m");
igalsalazars 0:53bf87d68a12 411 if (Bandera2==0)terminal.printf("\n\r\t\e[1;32;40m Calendario Gregoriano\e[42m");
igalsalazars 0:53bf87d68a12 412 if (Bandera5==0)terminal.printf("\n\r\t\e[1;36;48m HORARIO DE Invierno:\e[0m \e[41mSI\e[0m\n\r");
igalsalazars 0:53bf87d68a12 413 if (Bandera5==1)terminal.printf("\n\r\t\e[0;31;40m HORARIO DE Verano:\e[0m \e[42mSI\e[0m\n\r");
igalsalazars 0:53bf87d68a12 414 }
igalsalazars 0:53bf87d68a12 415 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 416 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 417 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 418
igalsalazars 0:53bf87d68a12 419 void Fecha(){
igalsalazars 0:53bf87d68a12 420
igalsalazars 0:53bf87d68a12 421 if(Dia>=32 && Mes!=2 && Mes!=4 && Mes!=6 && Mes!=9 && Mes!=11)
igalsalazars 0:53bf87d68a12 422 {
igalsalazars 0:53bf87d68a12 423 Mes++;
igalsalazars 0:53bf87d68a12 424 Dia=1;
igalsalazars 0:53bf87d68a12 425 }
igalsalazars 0:53bf87d68a12 426 if(Dia==31 && Mes!=1 && Mes!=2 && Mes!=3 && Mes!=5 && Mes!=7 && Mes!=8 && Mes!=10 && Mes!=12) //si el dia es igu
igalsalazars 0:53bf87d68a12 427 {
igalsalazars 0:53bf87d68a12 428 Dia=1;
igalsalazars 0:53bf87d68a12 429 Mes++;
igalsalazars 0:53bf87d68a12 430
igalsalazars 0:53bf87d68a12 431 }
igalsalazars 0:53bf87d68a12 432 if(Dia==30 && Mes==2 && Bandera1==1) //si el dia es igual a 30 y la variable mes es igual al mes 2 y la bandera de año bisiesto es igual a 1 entra
igalsalazars 0:53bf87d68a12 433 {
igalsalazars 0:53bf87d68a12 434 Dia=1; //restablece la variable dia a 1
igalsalazars 0:53bf87d68a12 435 Mes++; //incrementa una unidad la Variable mes
igalsalazars 0:53bf87d68a12 436 }
igalsalazars 0:53bf87d68a12 437 if(Dia==29 && Mes==2 && Bandera1==0) //si el dia es igual a 29 y la variable mes es igual al mes 2 y la bandera de año bisiesto es igual a 0 entra
igalsalazars 0:53bf87d68a12 438 {
igalsalazars 0:53bf87d68a12 439 Dia=1; //restablece la variable dia a 1
igalsalazars 0:53bf87d68a12 440 Mes++; //incrementa una unidad la Variable mes
igalsalazars 0:53bf87d68a12 441 }
igalsalazars 0:53bf87d68a12 442 if(Mes>=13) //si la Variable mes es mayor igual a 13 entra
igalsalazars 0:53bf87d68a12 443 {
igalsalazars 0:53bf87d68a12 444 Mes=1; //restablece la variable mes a 1
igalsalazars 0:53bf87d68a12 445 Anio++; //incrementa la variable año una unidad
igalsalazars 0:53bf87d68a12 446 SemanaN=1; //restablece la variable semana a 1
igalsalazars 0:53bf87d68a12 447 if(Anio%4==0||Anio%400==0)Bandera1=1; //si el residuo del año dividido entre 4 es 0 o el residuo de ano dividido entre 400 es 0 es un año bisiesto
igalsalazars 0:53bf87d68a12 448 if(Anio%4!=0||(Anio%100==0&&Anio%400!=0))Bandera1=0;
igalsalazars 0:53bf87d68a12 449 DiasT=0; //restablece la variable DIAS TRANSCURRIDOS A 0
igalsalazars 0:53bf87d68a12 450 if(Bandera3==0)DiasT=364; //si el año no es bisiesto la variable Dias Por Transcurrir la iguala a 364
igalsalazars 0:53bf87d68a12 451 if(Bandera3==1)DiasT=365; //si el año es bisiesto la variable Dias Por Transcurrir la iguala a 365
igalsalazars 0:53bf87d68a12 452 }
igalsalazars 0:53bf87d68a12 453 }
igalsalazars 0:53bf87d68a12 454
igalsalazars 0:53bf87d68a12 455 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 456 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 457 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 458
igalsalazars 0:53bf87d68a12 459
igalsalazars 0:53bf87d68a12 460 void Config_Hora() // configura la hora tanto en formato de 24hrs y 12hrs am/pm
igalsalazars 0:53bf87d68a12 461 {
igalsalazars 0:53bf87d68a12 462 int op; //variable para guardar la opcion qe eligamos
igalsalazars 0:53bf87d68a12 463 uint8_t Thora; //variable temporal cdonde se guardara la hora para despues asignarla a nnuestra varaiable Horas
igalsalazars 0:53bf87d68a12 464 uint8_t Tminutos;
igalsalazars 0:53bf87d68a12 465 uint8_t Tsegundos;
igalsalazars 0:53bf87d68a12 466 bool TBandera3; //Configuracion de Formato 12hrs y 24hrs
igalsalazars 0:53bf87d68a12 467 bool TBandera4; //Configuracion de Meridiano (PM/AM)
igalsalazars 0:53bf87d68a12 468
igalsalazars 0:53bf87d68a12 469 inicio_configuracion:
igalsalazars 0:53bf87d68a12 470 clear_screen();
igalsalazars 0:53bf87d68a12 471
igalsalazars 0:53bf87d68a12 472 terminal.printf("\n\r\e[33mFormato\e[0m");
igalsalazars 0:53bf87d68a12 473 terminal.printf("\n\r\e[31m 1)24hrs\e[0m");
igalsalazars 0:53bf87d68a12 474 terminal.printf("\n\r\e[31m 2)12hrs\e[0m");
igalsalazars 0:53bf87d68a12 475 terminal.printf("\n\r\e[33m 3)Regresar\e[0m");
igalsalazars 0:53bf87d68a12 476 op = terminal.getc();
igalsalazars 0:53bf87d68a12 477 if(op=='1')
igalsalazars 0:53bf87d68a12 478 {
igalsalazars 0:53bf87d68a12 479 intento:
igalsalazars 0:53bf87d68a12 480 clear_screen();
igalsalazars 0:53bf87d68a12 481 TBandera3=0;
igalsalazars 0:53bf87d68a12 482 terminal.printf("\n\r\tDigite la hora para el formato de 24hrs: HH:MM:SS\n");
igalsalazars 0:53bf87d68a12 483 Thora = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 484 Thora = terminal.putc(terminal.getc())-48+Thora;
igalsalazars 0:53bf87d68a12 485 terminal.printf(":");
igalsalazars 0:53bf87d68a12 486 Tminutos = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 487 Tminutos = terminal.putc(terminal.getc())-48+Tminutos;
igalsalazars 0:53bf87d68a12 488 terminal.printf(":");
igalsalazars 0:53bf87d68a12 489 Tsegundos = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 490 Tsegundos = terminal.putc(terminal.getc())-48+Tsegundos;
igalsalazars 0:53bf87d68a12 491 Horas= Thora;
igalsalazars 0:53bf87d68a12 492 Minutos= Tminutos;
igalsalazars 0:53bf87d68a12 493 Segundos= Tsegundos;
igalsalazars 0:53bf87d68a12 494 wait(.5);
igalsalazars 0:53bf87d68a12 495
igalsalazars 0:53bf87d68a12 496 if(Thora>=24||Tminutos>=60||Tsegundos>=60)
igalsalazars 0:53bf87d68a12 497 {
igalsalazars 0:53bf87d68a12 498 clear_screen();
igalsalazars 0:53bf87d68a12 499 terminal.printf("\n\r\t ERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 500 wait(2);
igalsalazars 0:53bf87d68a12 501 goto intento;
igalsalazars 0:53bf87d68a12 502 }
igalsalazars 0:53bf87d68a12 503 Bandera3=TBandera3;
igalsalazars 0:53bf87d68a12 504 }
igalsalazars 0:53bf87d68a12 505
igalsalazars 0:53bf87d68a12 506 if(op=='2')
igalsalazars 0:53bf87d68a12 507 {
igalsalazars 0:53bf87d68a12 508 intento2:
igalsalazars 0:53bf87d68a12 509 clear_screen();
igalsalazars 0:53bf87d68a12 510
igalsalazars 0:53bf87d68a12 511 TBandera3=1;
igalsalazars 0:53bf87d68a12 512 terminal.printf("\n\r\tDigite la hora en formato de 12hrs: HH:MM:SS AM/PM\n");
igalsalazars 0:53bf87d68a12 513 Thora = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 514 Thora = terminal.putc(terminal.getc())-48+Thora;
igalsalazars 0:53bf87d68a12 515 terminal.printf(":");
igalsalazars 0:53bf87d68a12 516 Tminutos = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 517 Tminutos = terminal.putc(terminal.getc())-48+Tminutos;
igalsalazars 0:53bf87d68a12 518 terminal.printf(":");
igalsalazars 0:53bf87d68a12 519 Tsegundos = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 520 Tsegundos = terminal.putc(terminal.getc())-48+Tsegundos;
igalsalazars 0:53bf87d68a12 521 Segundos= Tsegundos;
igalsalazars 0:53bf87d68a12 522 Horas= Thora;
igalsalazars 0:53bf87d68a12 523 Minutos= Tminutos;
igalsalazars 0:53bf87d68a12 524 wait(.5);
igalsalazars 0:53bf87d68a12 525 if(Thora<1||Thora>=13||Tminutos>=60||Tsegundos>=60)
igalsalazars 0:53bf87d68a12 526 {
igalsalazars 0:53bf87d68a12 527 clear_screen();
igalsalazars 0:53bf87d68a12 528 terminal.printf("\n\r\ERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 529 wait(.5);
igalsalazars 0:53bf87d68a12 530 goto intento2;
igalsalazars 0:53bf87d68a12 531 }
igalsalazars 0:53bf87d68a12 532
igalsalazars 0:53bf87d68a12 533 AMPM1:
igalsalazars 0:53bf87d68a12 534 clear_screen();
igalsalazars 0:53bf87d68a12 535 terminal.printf("\n\r0)PM");
igalsalazars 0:53bf87d68a12 536 terminal.printf("\n\r1)AM");
igalsalazars 0:53bf87d68a12 537 terminal.printf("\n\r2)SALIR");
igalsalazars 0:53bf87d68a12 538 TBandera4=terminal.putc(terminal.getc())-48;
igalsalazars 0:53bf87d68a12 539 if(TBandera4>=3)
igalsalazars 0:53bf87d68a12 540 {
igalsalazars 0:53bf87d68a12 541 clear_screen();
igalsalazars 0:53bf87d68a12 542 terminal.printf("\n\r\tERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 543 wait(2);
igalsalazars 0:53bf87d68a12 544 goto AMPM1;
igalsalazars 0:53bf87d68a12 545 }
igalsalazars 0:53bf87d68a12 546 Bandera3= TBandera3;
igalsalazars 0:53bf87d68a12 547 Bandera4= TBandera4;
igalsalazars 0:53bf87d68a12 548 }
igalsalazars 0:53bf87d68a12 549 if(op>'4')
igalsalazars 0:53bf87d68a12 550 {
igalsalazars 0:53bf87d68a12 551 clear_screen();
igalsalazars 0:53bf87d68a12 552 terminal.printf("\n\r\tERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 553 wait(2);
igalsalazars 0:53bf87d68a12 554 goto inicio_configuracion;
igalsalazars 0:53bf87d68a12 555 }
igalsalazars 0:53bf87d68a12 556 }
igalsalazars 0:53bf87d68a12 557
igalsalazars 0:53bf87d68a12 558
igalsalazars 0:53bf87d68a12 559
igalsalazars 0:53bf87d68a12 560 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 561 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 562 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 563
igalsalazars 0:53bf87d68a12 564 void Cont()
igalsalazars 0:53bf87d68a12 565 {
igalsalazars 0:53bf87d68a12 566 Dia++;
igalsalazars 0:53bf87d68a12 567 dia++;
igalsalazars 0:53bf87d68a12 568 DiasT++;
igalsalazars 0:53bf87d68a12 569 DiasF--;
igalsalazars 0:53bf87d68a12 570 if(dia>=7)dia=0;
igalsalazars 0:53bf87d68a12 571 if(Bandera2==1&& dia==0)SemanaN++;
igalsalazars 0:53bf87d68a12 572 if(Bandera2==0&& dia==6)SemanaN++;
igalsalazars 0:53bf87d68a12 573
igalsalazars 0:53bf87d68a12 574 if(Dia>31&& (Mes==1||Mes==3||Mes==5||Mes==7||Mes==8||Mes==10||Mes==12))
igalsalazars 0:53bf87d68a12 575 {
igalsalazars 0:53bf87d68a12 576 Mes++;
igalsalazars 0:53bf87d68a12 577 Dia=1;
igalsalazars 0:53bf87d68a12 578 }
igalsalazars 0:53bf87d68a12 579 if(Dia>=31 && Mes!=1&&Mes!=2&&Mes!=3&& Mes!=5&&Mes!=7&&Mes!=8&&Mes!=10&& Mes!=12)
igalsalazars 0:53bf87d68a12 580 {
igalsalazars 0:53bf87d68a12 581 Dia=1;
igalsalazars 0:53bf87d68a12 582 Mes++;
igalsalazars 0:53bf87d68a12 583
igalsalazars 0:53bf87d68a12 584 }
igalsalazars 0:53bf87d68a12 585 if(Dia>28 && Mes==2 && Bandera1==0)
igalsalazars 0:53bf87d68a12 586 {
igalsalazars 0:53bf87d68a12 587 Dia=1;
igalsalazars 0:53bf87d68a12 588 Mes++;
igalsalazars 0:53bf87d68a12 589
igalsalazars 0:53bf87d68a12 590 }
igalsalazars 0:53bf87d68a12 591 if(Dia>29 && Mes==2 && Bandera1==1)
igalsalazars 0:53bf87d68a12 592 {
igalsalazars 0:53bf87d68a12 593 Dia=1;
igalsalazars 0:53bf87d68a12 594 Mes++;
igalsalazars 0:53bf87d68a12 595
igalsalazars 0:53bf87d68a12 596 }
igalsalazars 0:53bf87d68a12 597 if(Mes>12)
igalsalazars 0:53bf87d68a12 598 {
igalsalazars 0:53bf87d68a12 599 Anio++;
igalsalazars 0:53bf87d68a12 600 SemanaN=1;
igalsalazars 0:53bf87d68a12 601 Mes=1;
igalsalazars 0:53bf87d68a12 602
igalsalazars 0:53bf87d68a12 603 if(Anio%4==0||Anio%400==0)Bandera1=1;
igalsalazars 0:53bf87d68a12 604 if(Anio%4!=0||(Anio%100==0&&Anio%400!=0))Bandera1=0;
igalsalazars 0:53bf87d68a12 605
igalsalazars 0:53bf87d68a12 606 if(Bandera1==1) DiasF=365;
igalsalazars 0:53bf87d68a12 607 if(Bandera1==0) DiasF=364;
igalsalazars 0:53bf87d68a12 608 DiasT=0;
igalsalazars 0:53bf87d68a12 609 }
igalsalazars 0:53bf87d68a12 610
igalsalazars 0:53bf87d68a12 611 }
igalsalazars 0:53bf87d68a12 612 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 613 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 614 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 615 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 616
igalsalazars 0:53bf87d68a12 617 void reg()
igalsalazars 0:53bf87d68a12 618 {
igalsalazars 0:53bf87d68a12 619 Dia--;
igalsalazars 0:53bf87d68a12 620 dia--;
igalsalazars 0:53bf87d68a12 621 DiasT--;
igalsalazars 0:53bf87d68a12 622 DiasF++;
igalsalazars 0:53bf87d68a12 623 if(dia<0)dia=6;
igalsalazars 0:53bf87d68a12 624 if(Bandera2==1&& dia==6)SemanaN--;
igalsalazars 0:53bf87d68a12 625 if(Bandera2==0&& dia==5)SemanaN--;
igalsalazars 0:53bf87d68a12 626
igalsalazars 0:53bf87d68a12 627 if(Dia<=0&& (Mes==2||Mes==4||Mes==6||Mes==8||Mes==9||Mes==11||Mes==1))
igalsalazars 0:53bf87d68a12 628 {
igalsalazars 0:53bf87d68a12 629 Mes--;
igalsalazars 0:53bf87d68a12 630 Dia=31;
igalsalazars 0:53bf87d68a12 631 }
igalsalazars 0:53bf87d68a12 632 if(Dia<=0 && Mes!=2&&Mes!=3&&Mes!=4&&Mes!=6&& Mes!=8&&Mes!=9&&Mes!=11&&Mes!=1)
igalsalazars 0:53bf87d68a12 633 {
igalsalazars 0:53bf87d68a12 634 Dia=30;
igalsalazars 0:53bf87d68a12 635 Mes--;
igalsalazars 0:53bf87d68a12 636
igalsalazars 0:53bf87d68a12 637 }
igalsalazars 0:53bf87d68a12 638 if(Dia<=0 && Mes==3 && Bandera1==0)
igalsalazars 0:53bf87d68a12 639 {
igalsalazars 0:53bf87d68a12 640 Dia=28;
igalsalazars 0:53bf87d68a12 641 Mes--;
igalsalazars 0:53bf87d68a12 642
igalsalazars 0:53bf87d68a12 643 }
igalsalazars 0:53bf87d68a12 644 if(Dia<=0 && Mes==3 && Bandera1==1)
igalsalazars 0:53bf87d68a12 645 {
igalsalazars 0:53bf87d68a12 646 Dia=29;
igalsalazars 0:53bf87d68a12 647 Mes--;
igalsalazars 0:53bf87d68a12 648
igalsalazars 0:53bf87d68a12 649 }
igalsalazars 0:53bf87d68a12 650 if(Mes<=0)
igalsalazars 0:53bf87d68a12 651 {
igalsalazars 0:53bf87d68a12 652 Anio--;
igalsalazars 0:53bf87d68a12 653 SemanaN=53;
igalsalazars 0:53bf87d68a12 654 Mes=12;
igalsalazars 0:53bf87d68a12 655 if(Anio%4==0||Anio%400==0)Bandera1=1;
igalsalazars 0:53bf87d68a12 656 if(Anio%4!=0||(Anio%100==0&&Anio%400!=0))Bandera1=0;
igalsalazars 0:53bf87d68a12 657
igalsalazars 0:53bf87d68a12 658 if(Bandera1==1) DiasT=365;
igalsalazars 0:53bf87d68a12 659 if(Bandera1==0) DiasT=364;
igalsalazars 0:53bf87d68a12 660 DiasF=0;
igalsalazars 0:53bf87d68a12 661 }
igalsalazars 0:53bf87d68a12 662 }
igalsalazars 0:53bf87d68a12 663
igalsalazars 0:53bf87d68a12 664 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 665 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 666 void Config_Fecha()//configura la fecha tanto el dia mes y año con el calendario gregoriano y juliano
igalsalazars 0:53bf87d68a12 667 {
igalsalazars 0:53bf87d68a12 668 int op2,op3;
igalsalazars 0:53bf87d68a12 669 uint8_t TDia;
igalsalazars 0:53bf87d68a12 670 uint8_t TMes;
igalsalazars 0:53bf87d68a12 671 uint16_t TAnio;
igalsalazars 0:53bf87d68a12 672 bool TBandera1; //Configuracion del año Bisiesto
igalsalazars 0:53bf87d68a12 673 bool TBandera2; //Configuracion de Calendario 0)Gregoriano o 1)juliano
igalsalazars 0:53bf87d68a12 674
igalsalazars 0:53bf87d68a12 675 inicio_configuracion:
igalsalazars 0:53bf87d68a12 676 clear_screen();
igalsalazars 0:53bf87d68a12 677
igalsalazars 0:53bf87d68a12 678 terminal.printf("\n\rIngresa la Fecha:");
igalsalazars 0:53bf87d68a12 679 terminal.printf("\n\r1)Cambiar" );
igalsalazars 0:53bf87d68a12 680 terminal.printf("\n\r2)Regresar");
igalsalazars 0:53bf87d68a12 681
igalsalazars 0:53bf87d68a12 682 op2 = terminal.getc();
igalsalazars 0:53bf87d68a12 683 if(op2=='1')
igalsalazars 0:53bf87d68a12 684 {
igalsalazars 0:53bf87d68a12 685
igalsalazars 0:53bf87d68a12 686 clear_screen();
igalsalazars 0:53bf87d68a12 687 TBandera1=1;
igalsalazars 0:53bf87d68a12 688 TBandera2=1;
igalsalazars 0:53bf87d68a12 689 terminal.printf("\n\rTipo de Calendario:");
igalsalazars 0:53bf87d68a12 690 terminal.printf("\n\r0)Gregoriano");
igalsalazars 0:53bf87d68a12 691 terminal.printf("\n\r1)Juliano");
igalsalazars 0:53bf87d68a12 692 terminal.printf("\n\r2)Regresar");
igalsalazars 0:53bf87d68a12 693 op3 = terminal.getc();
igalsalazars 0:53bf87d68a12 694
igalsalazars 0:53bf87d68a12 695 if(op3=='1')
igalsalazars 0:53bf87d68a12 696 {
igalsalazars 0:53bf87d68a12 697 TBandera2=1;
igalsalazars 0:53bf87d68a12 698 Inicio:
igalsalazars 0:53bf87d68a12 699 clear_screen();
igalsalazars 0:53bf87d68a12 700 terminal.printf("\n\r\tDame tu fecha en formato de DD/MM/AAAA");
igalsalazars 0:53bf87d68a12 701 terminal.printf("\n\r\tDame la Fecha: ");
igalsalazars 0:53bf87d68a12 702 TDia = (terminal.putc(terminal.getc())-48)*10; ///////////////
igalsalazars 0:53bf87d68a12 703 TDia = terminal.putc(terminal.getc())-48+TDia;
igalsalazars 0:53bf87d68a12 704 terminal.printf("/");
igalsalazars 0:53bf87d68a12 705 TMes = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 706 TMes = terminal.putc(terminal.getc())-48+TMes;
igalsalazars 0:53bf87d68a12 707 terminal.printf("/");
igalsalazars 0:53bf87d68a12 708 TAnio = (terminal.putc(terminal.getc())-48)*1000;
igalsalazars 0:53bf87d68a12 709 TAnio = (terminal.putc(terminal.getc())-48)*100+TAnio;
igalsalazars 0:53bf87d68a12 710 TAnio = (terminal.putc(terminal.getc())-48)*10+TAnio;
igalsalazars 0:53bf87d68a12 711 TAnio = (terminal.putc(terminal.getc())-48)+TAnio;
igalsalazars 0:53bf87d68a12 712
igalsalazars 0:53bf87d68a12 713 if(TAnio%4==0||TAnio%400==0)TBandera1=1;
igalsalazars 0:53bf87d68a12 714 if(TAnio%4!=0||(TAnio%100==0&&TAnio%400!=0))TBandera1=0;
igalsalazars 0:53bf87d68a12 715
igalsalazars 0:53bf87d68a12 716
igalsalazars 0:53bf87d68a12 717 if((TDia>31&& (TMes==1||TMes==3||TMes==5||TMes==7||TMes==8||TMes==10||TMes==12))||
igalsalazars 0:53bf87d68a12 718 (TDia>=31 && TMes!=1&&TMes!=2&&TMes!=3&& TMes!=5&&TMes!=7&&TMes!=8&&TMes!=10&&TMes!=12)||
igalsalazars 0:53bf87d68a12 719 (TDia>28 && TMes==2 && TBandera1==0)||
igalsalazars 0:53bf87d68a12 720 (TDia>29 && TMes==2 && TBandera1==1)||
igalsalazars 0:53bf87d68a12 721 (TMes>=13||TMes<=0))
igalsalazars 0:53bf87d68a12 722 {
igalsalazars 0:53bf87d68a12 723 terminal.printf("\n\r\tERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 724 terminal.getc();
igalsalazars 0:53bf87d68a12 725 goto Inicio;
igalsalazars 0:53bf87d68a12 726 }
igalsalazars 0:53bf87d68a12 727 if((TAnio>Anio)||(TAnio==Anio && TMes>Mes)||(TAnio==Anio && TMes==Mes && TDia>Dia))
igalsalazars 0:53bf87d68a12 728 while(Anio!=TAnio||Mes!=TMes||Dia!=TDia)Cont();
igalsalazars 0:53bf87d68a12 729 if((TAnio<Anio)||(TAnio==Anio && TMes<Mes)||(TAnio==Anio && TMes==Mes && TDia<Dia))
igalsalazars 0:53bf87d68a12 730 while(Anio!=TAnio||Mes!=TMes||Dia!=TDia)reg();
igalsalazars 0:53bf87d68a12 731 }
igalsalazars 0:53bf87d68a12 732
igalsalazars 0:53bf87d68a12 733 if(op3=='0') //Calendario Gregoriano
igalsalazars 0:53bf87d68a12 734 {
igalsalazars 0:53bf87d68a12 735 TBandera2=0;
igalsalazars 0:53bf87d68a12 736 Bandera2=TBandera2;
igalsalazars 0:53bf87d68a12 737 Inicio2:
igalsalazars 0:53bf87d68a12 738 clear_screen();
igalsalazars 0:53bf87d68a12 739 terminal.printf("\n\r\tDame la fecha en formato de DD/MM/AAAA");
igalsalazars 0:53bf87d68a12 740 terminal.printf("\n\r\tDame la Fecha: ");
igalsalazars 0:53bf87d68a12 741 TDia = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 742 TDia = terminal.putc(terminal.getc())-48+TDia;
igalsalazars 0:53bf87d68a12 743 terminal.printf("/");
igalsalazars 0:53bf87d68a12 744 TMes = (terminal.putc(terminal.getc())-48)*10;
igalsalazars 0:53bf87d68a12 745 TMes = terminal.putc(terminal.getc())-48+TMes;
igalsalazars 0:53bf87d68a12 746 terminal.printf("/");
igalsalazars 0:53bf87d68a12 747 TAnio = (terminal.putc(terminal.getc())-48)*1000;
igalsalazars 0:53bf87d68a12 748 TAnio = (terminal.putc(terminal.getc())-48)*100+TAnio;
igalsalazars 0:53bf87d68a12 749 TAnio = (terminal.putc(terminal.getc())-48)*10+TAnio;
igalsalazars 0:53bf87d68a12 750 TAnio = (terminal.putc(terminal.getc())-48)+TAnio;
igalsalazars 0:53bf87d68a12 751
igalsalazars 0:53bf87d68a12 752 if(TAnio%4==0||TAnio%400==0)TBandera1=1;
igalsalazars 0:53bf87d68a12 753 if(TAnio%4!=0||(TAnio%100==0&&TAnio%400!=0))TBandera1=0;
igalsalazars 0:53bf87d68a12 754
igalsalazars 0:53bf87d68a12 755
igalsalazars 0:53bf87d68a12 756 if((TDia>31&& (TMes==1||TMes==3||TMes==5||TMes==7||TMes==8||TMes==10||TMes==12))||
igalsalazars 0:53bf87d68a12 757 (TDia>=31 && TMes!=1&&TMes!=2&&TMes!=3&& TMes!=5&&TMes!=7&&TMes!=8&&TMes!=10&&TMes!=12)||
igalsalazars 0:53bf87d68a12 758 (TDia>28 && TMes==2 && TBandera1==0)||
igalsalazars 0:53bf87d68a12 759 (TDia>29 && TMes==2 && TBandera1==1)||
igalsalazars 0:53bf87d68a12 760 (TMes>=13||TMes<=0))
igalsalazars 0:53bf87d68a12 761 {
igalsalazars 0:53bf87d68a12 762 terminal.printf("\n\r\tERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 763 terminal.getc();
igalsalazars 0:53bf87d68a12 764 goto Inicio2;
igalsalazars 0:53bf87d68a12 765 }
igalsalazars 0:53bf87d68a12 766 if((TAnio>Anio)||(TAnio==Anio && TMes>Mes)||(TAnio==Anio && TMes==Mes && TDia>Dia))
igalsalazars 0:53bf87d68a12 767 while(Anio!=TAnio||Mes!=TMes||Dia!=TDia)Cont();
igalsalazars 0:53bf87d68a12 768 if((TAnio<Anio)||(TAnio==Anio && TMes<Mes)||(TAnio==Anio && TMes==Mes && TDia<Dia))
igalsalazars 0:53bf87d68a12 769 while(Anio!=TAnio||Mes!=TMes||Dia!=TDia)reg();
igalsalazars 0:53bf87d68a12 770 }
igalsalazars 0:53bf87d68a12 771 if(op3=='2')return;
igalsalazars 0:53bf87d68a12 772 }
igalsalazars 0:53bf87d68a12 773 if(op2=='2')return;
igalsalazars 0:53bf87d68a12 774 if(op2>'3')
igalsalazars 0:53bf87d68a12 775 {
igalsalazars 0:53bf87d68a12 776 clear_screen();
igalsalazars 0:53bf87d68a12 777 terminal.printf("\n\r\tERROR , TRY AGAIN");
igalsalazars 0:53bf87d68a12 778 wait(2);
igalsalazars 0:53bf87d68a12 779 goto inicio_configuracion;
igalsalazars 0:53bf87d68a12 780 }
igalsalazars 0:53bf87d68a12 781 }
igalsalazars 0:53bf87d68a12 782
igalsalazars 0:53bf87d68a12 783 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 784 /*----------------------------------------------------------------------------------------------------*/
igalsalazars 0:53bf87d68a12 785
igalsalazars 0:53bf87d68a12 786 /* END Mbed */