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

. 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 (>_<).