scrHoy DisposiciónVerticalConfigurar BackgroundColor #ffc800 DisposiciónVerticalAyuda BackgroundColor #ffc800 VerticalScrollArrangementConfigurar Visible FALSE VerticalScrollArrangementHoy Visible TRUE VerticalScrollArrangementMasMedicam Visible FALSE DisposiciónVerticalHoy BackgroundColor #ffffff DisposiciónVerticalMasMedicam BackgroundColor #ffc800 NomMed 0 listaNomMedicamentos shDesayuno TinyBD1 HDesayuno shDesayuno Instant lblTítuloApp Text TinyBD1 HDesayuno 0 Posologia 0 Periodicidad 0 listaDatosMed listaMedDesayuno listaMedComida listaMedCena shComida TinyBD1 HComida shDesayuno Instant shCena TinyBD1 HCena shDesayuno Instant btnHoy DisposiciónVerticalHoy BackgroundColor #ffffff DisposiciónVerticalMasMedicam BackgroundColor #ffc800 DisposiciónVerticalConfigurar BackgroundColor #ffc800 DisposiciónVerticalAyuda BackgroundColor #ffc800 VerticalScrollArrangementConfigurar Visible FALSE VerticalScrollArrangementHoy Visible TRUE VerticalScrollArrangementMasMedicam Visible FALSE global listaNomMedicamentos TinyBD1 elemento global listaNomMedicamentos contador 1 global listaDatosMed TinyBD1 elemento contador Este medicamento no tiene más datos. contador contador 1 pos global listaDatosMed 1 GT pos 3 global listaMedDesayuno elemento NEQ MODULO pos 2 0 global listaMedCena elemento OR OR EQ pos 6 EQ pos 7 OR EQ pos 2 EQ pos 3 global listaMedComida elemento VisorDeListaDesayuno Elements global listaMedDesayuno VisorDeListaComida Elements global listaMedComida VisorDeListaCena Elements global listaMedCena btnBorrar procLimpiarPantalla lstPeriodicidad global Periodicidad selection btnMasMedicam DisposiciónVerticalHoy BackgroundColor #ffc800 DisposiciónVerticalMasMedicam BackgroundColor #ffffff DisposiciónVerticalConfigurar BackgroundColor #ffc800 DisposiciónVerticalAyuda BackgroundColor #ffc800 VerticalScrollArrangementConfigurar Visible FALSE VerticalScrollArrangementMasMedicam Visible TRUE VerticalScrollArrangementHoy Visible FALSE procLimpiarPantalla txtNomMed Text csDesayuno Checked FALSE cvComida Checked FALSE csCena Checked FALSE lstPeriodicidad ElementsFromString Desplegar lista, Diario, Semanal, Quinceal, Mensual lstPeriodicidad SelectionIndex 1 global listaDatosMed btnConfigurar DisposiciónVerticalHoy BackgroundColor #ffc800 DisposiciónVerticalMasMedicam BackgroundColor #ffc800 DisposiciónVerticalConfigurar BackgroundColor #ffffff DisposiciónVerticalAyuda BackgroundColor #ffc800 VerticalScrollArrangementConfigurar Visible TRUE VerticalScrollArrangementHoy Visible FALSE VerticalScrollArrangementMasMedicam Visible FALSE btnAyuda DisposiciónVerticalHoy BackgroundColor #ffc800 DisposiciónVerticalMasMedicam BackgroundColor #ffc800 DisposiciónVerticalConfigurar BackgroundColor #ffc800 DisposiciónVerticalAyuda BackgroundColor #ffffff VerticalScrollArrangementConfigurar Visible FALSE VerticalScrollArrangementConfigurar Visible FALSE VerticalScrollArrangementConfigurar Visible FALSE btnAnadir global NomMed txtNomMed Text EQ global NomMed Notificador1 Introduza el nombre del medicamento. procPosologia global listaDatosMed global Posologia global Periodicidad TinyBD1 global NomMed global listaDatosMed Notificador1 Guardado. procLimpiarPantalla global listaDatosMed procPosologia Pasamos a decimal desde el binario la Posologia indicada en las cs "casillas de verificaión" csDesayuno, csComida y csCena. Ejemplos: 100 Solo desayuno = 4 111 A las 3 comidas = 7 ... csDesayuno Checked cvComida Checked csCena Checked global Posologia 7 global Posologia 6 csCena Checked global Posologia 5 global Posologia 4 cvComida Checked csCena Checked global Posologia 3 global Posologia 1 global Posologia 2 procMostrarPosologia p GT p 3 GT p 5 GT p 6 csDesayuno Checked TRUE cvComida Checked TRUE csCena Checked TRUE csDesayuno Checked TRUE cvComida Checked TRUE csCena Checked FALSE EQ p 5 csDesayuno Checked TRUE cvComida Checked FALSE csCena Checked TRUE csDesayuno Checked TRUE cvComida Checked FALSE csCena Checked FALSE LT p 2 csDesayuno Checked FALSE cvComida Checked TRUE csCena Checked FALSE EQ p 3 csDesayuno Checked FALSE cvComida Checked TRUE csCena Checked TRUE csDesayuno Checked FALSE cvComida Checked FALSE csCena Checked TRUE btnBuscarMed global NomMed txtNomMed Text global listaDatosMed TinyBD1 global NomMed Medicamento inexistente pos global listaDatosMed 1 procMostrarPosologia pos per global listaDatosMed 2 lstPeriodicidad Selection per