Un cronómetro de cuenta regresiva en lenguaje simple para exámenes, con precisión de día, hora, minuto y segundo, preferiblemente con código fuente.
.¿Versión? ¿Asamblea? Conjunto de ventana 1
. ¿Variables del conjunto de programas? ¿Hora de finalización? Tipo de texto
¿Variables de configuración del programa? Tipos de hora, fecha y hora
. ¿Variables de montaje? Fecha, tipo de texto
. ¿Variables de configuración del programa? ¿Tipo de texto?
¿Variables de configuración del programa? Cuando un programa establece una variable?
.¿Un programa establece una variable? Segundo,? Tipo de texto
¿Variables de configuración del programa? ¿Fin,? Entero
¿Subrutina? ___Iniciar ventana_creada
. ¿Primer ciclo de conteo? (60,? Fin)
. Si es cierto, entonces no lo es. (final? ≤?24)
Cuadro combinado 1. ¿Cambiar el elemento?( ¿a texto?(¿final? -?1)?+?"时",? (final? -?1) + "时" ,?-?1)
.Si es verdadero, finalice
Cuadro combinado 2. ¿Agregar elemento?(¿al texto?(fin
.)+?"puntos",? (final? -?1)
Cuadro combinado 3. ¿Agregar elemento?(al texto?( ¿final? -?1)?+?"segundos",? (final? -?1)
¿Fin del ciclo de conteo? ()
Casilla de verificación 1. Selección actual =. ?0
Casilla de verificación múltiple 2.= ?0
Casilla de verificación 3.= ?0
Botón 1. Título= ?"Iniciar cuenta regresiva"
Evento subrutina _clock1_cycle
¿Hora? =?¿Obtener la hora actual? ()
Día =?(¿Obtener el intervalo de tiempo?(¿A la hora?(Fin) tiempo),? tiempo,?5))
Tiempo=? (tomar entero (tomar intervalo de tiempo? (¿a tiempo? (hora de finalización),? tiempo,?6)?%?24))
¿Sub?(Tomar un número entero(¿Tomar el intervalo de tiempo?(¿a tiempo?(Hora de finalización),?Tiempo,?)%?60))
Segundos?(Tomar un número entero (Tómate el tiempo) ¿Intervalo? (¿A la hora? (hora de finalización),?)%?60))
Etiqueta 2.título?"Quedan exámenes de mitad de período:"?+?Días?+?"Días " ?+?hora?+?minuto?+?segundo?
. 0" y minuto = "0" y segundo = "0")
Reloj 1. periodo de reloj = 0
Reproducir música (#mp3, )
Finalizar ()
.Finalizar si es verdadero
.¿Subrutina?_Se hizo clic en el botón 1
¿Hora de finalización?(¿fecha de tomar? (cuadro de fecha 1.hoy) )?+?ComboBox1.FetchItemText?(ComboBox1.FetchItemText?)+?ComboBox2.FetchItemText?+?ComboBox3.(ComboBox 3. Selección actual)
.Si?(a la hora)? (hora de finalización) )?