Juicio del ciclo del lenguaje simple
.Versión 2. Especificaciones de biblioteca de soporte
.¿Subrutina? _label1_feedback_event, ? Entero
. Parámetro 1, número entero
. Parámetro dos,?Parámetro dos, entero
.Si (parámetro uno = F1)
Variable temporal?Verdadero
.De lo contrario
Variable temporal = ?False.If end
Subrutina 1()
.Subrutina 1 Subrutina 1
. ¿Determinar el primero en el bucle? (variable temporal = Verdadero)
Etiqueta 1.título = texto? (¿a un número entero? (label1.title)?+ ?1)
¿Manejar eventos? (10)
Retraso. ¿Estás seguro de que el ciclo ha terminado? () .