Cómo editar la cuenta regresiva y el tiempo en Easy Language

Código de referencia de cuenta regresiva:

.¿Versión?2

.¿Ensamblaje?Ensamblaje de ventana 1

.Subrutina?_Botón 1_Clic

Reloj 1. ¿Periodo del reloj?=?1000

.Subrutina?_Evento del Reloj 1_Periodo

.¿Variable local?Número,?Tipo entero

Número ?=?al valor numérico?(cuadro de edición 1. contenido)

Número?=?Número?-?1

Cuadro de edición 1. ¿Contenido?=?al texto?(número )

Código de referencia de temporización:

.Versión 2

.Ensamblaje de ventana de ensamblaje 1

.Temporización variable de ensamblaje, tipo entero

.Se hizo clic en el botón_subrutina 1

Tiempo = valorar (cuadro de edición 1. contenido)

.Si es verdadero (tiempo < 1)

Información box("Error", 0,)

Return()

.Si es verdadero Fin

Reloj 1. Período de reloj = 1000

. Subroutine_Clock 1_Period Event

Timing = Timing - 1

Cuadro de edición 1. Contenido = "Cuenta regresiva también:" + al texto (timing) + "segundos"

Si es verdadero (tiempo = 15)

Reproducir música ("música", )

Si es verdadero final

. 0)

Reloj 1. Período de reloj = 0

Cuadro de información ("El cronómetro ha terminado", botón #Confirmación + icono #Información, "Aviso")

. Si realmente se acabó