Código fuente de tiempo en lenguaje fácil

Versión 2

. Conjunto ventana conjunto 1

. Variable ensambladora x, tipo entero

. Variable ensambladora y, tipo entero

. Subrutina_ _Ventana de inicio_ Creada

X = Obtener la hora (obtener la hora actual ())

Y = Obtener los minutos (obtener la hora actual ())

Reloj 1. período de reloj = 1000.

Subroutine_Clock1_PeriodicEvent

Si es verdadero (x = 23)

. if true(x>tomar horas(tomar la hora actual()))

if true(y =tomar minutos(tomar la hora actual()))

destruir()

Si realmente se acabó.

Si es verdadero(x