Red de conocimiento informático - Material del sitio web - ¿Cómo hacer un programa en lenguaje sencillo que deba ingresar XXXX o cerrarse después de 30 segundos? ¡Gracias por proporcionar el código fuente!

¿Cómo hacer un programa en lenguaje sencillo que deba ingresar XXXX o cerrarse después de 30 segundos? ¡Gracias por proporcionar el código fuente!

.Versión 2

.Soporte de shell de biblioteca

.Ensamblaje de ventana Ensamblaje 1

.Subrutina __Iniciar ventana_Creación completa

Reloj 1. Ciclo de reloj = 1000

Etiqueta 1. Título = "30"

.Subroutine_Clock1_CycleEvent

Etiqueta1.Title = a texto (a entero (label1.title) - 1)

.If (editbox1.content = "xxxx")

End()

En caso contrario

. Si es verdadero (label1.title = "0")

Apagar el sistema (#shutdown, true)

Salida de depuración ("apagar el sistema")

reloj1 .periodo de reloj = 0

.si verdadero fin

.si final

.