Efecto de ventana de lenguaje simple
No importa si no usas un módulo, ¡solo usa el mío! ! ! ! ! ! .¿Versión? 2
. ¿Biblioteca de soporte? eAPI
. ¿Asamblea? Ensamblaje de Windows 1
. ¿Variables de montaje? Pulsa, número entero
. ¿Subrutina? evento _clock1_cycle
. Si (presione = ?1)
Cuadro de imagen 1.Cuadro de imagen 1.izquierda?+?20
.Si es verdadero?(cuadro de imagen 1.izquierda = ? -40)
Reloj 1. Si es verdadero, finaliza
. De lo contrario
Picturebox1.left? = ?Picturebox1.left?-?20
. Si es verdadero, valor(picturebox1.left = -260)
clock1.clock period = 0
. Terminar si es verdadero
. si final
. Subrutina_Label 1_Botón izquierdo del ratón presionado,?Tipo lógico
.¿Parámetros? Posición horizontal, ?entero
. ¿parámetro? Posición vertical, ? Tipo entero
. ¿parámetro? ¿Estado de la tecla de función? Tipo entero
Reloj 1. ¿Período de reloj? = período de reloj = 1
Presione = 0
Etiqueta de subrutina 2_Botón izquierdo del mouse presionado, ?Tipo lógico
. p>. Posición horizontal del parámetro, ?entero
.¿Parámetro? Posición vertical, ? Tipo entero
. ¿parámetro? ¿Estado de la tecla de función? Tipo entero
Reloj 1. ¿Ciclo de reloj? = ciclo de reloj = 1
Presione = 1
¿Iniciar ventana_puede_cerrarse?
. Baidu sabe la variable local, ? entero
Baidu sabe?= 255
. ¿El número uno en el ciclo de conteo? (51,?)
¿Lo sabe Baidu?
Baidu sabe = ?Baidu sabe? -?5
¿Establecer transparencia de ventana? (_Iniciar la ventana. ¿Obtener el identificador de la ventana? (),? Baidu lo sabe)
¿Retraso? (10)
. ¿Fin del ciclo de conteo? ()
¿Fin? ()
¿Devolución?(falso)
La imagen está un poco atascada (>_<).