Registro de posicionamiento de lenguaje simple

2

. Biblioteca de soporte

iext2

.Biblioteca de soporte

iext

.Assembly

Ensamblaje de Windows 1

.Variable de ensamblaje

Valor del identificador del cañón,

tipo entero

. Variable de ensamblaje

recuento de incendios,

tipo entero

. Variable ensambladora

Número de visitas,

Tipo entero

. Subrutina

_MotionFrame1_Collision_into_Object

. Parámetros

Valor de identificación del objeto de colisión,

entero

. Parámetros

coordenada horizontal,

entero

. Parámetros

coordenada vertical,

entero

. Parámetros

Identificador de objeto de colisión,

Entero

Cuadro de movimiento 1. Crear objeto

(explosión,

Cuadro de movimiento 1.

(identificador de objeto de colisión),

,

)

Mover fotograma 1. Destruir objeto

(Valor de identificador de objeto de colisión,

Valor de identificador de objeto de colisión)

Crear avión

()

golpear

=

golpear

+

1

. Subrutina

_MotionFrame1_Tecla de monitoreo presionada

. Parámetros

código clave,

tipo entero

. Parámetros

Estado de la tecla de función,

Tipo de número entero

Cuadro de movimiento 1. Avanzar automáticamente

(Cuadro de movimiento 1. Crear objeto p>

(bala de cañón,

Cuadro de movimiento 1. Toma el lado izquierdo del objeto

(valor del logotipo del cañón)

+

Cañón Obtener el ancho del contenido

()

÷

2,

Mover fotograma 1. Obtener el borde superior del objeto

(valor del logotipo del cañón)

-

Obtener la altura del contenido

(),

,

),

10,

20,

,

,

verdadero,

,

verdadero,

,

)

Número de despidos

=

Número de despidos

+

1

Etiqueta transparente 1. Título

=

"Disparaste"

+

Para enviar mensajes de texto

(Número de incendios)

+

p> "Conchas enviadas, presiona

"

+

Para enviar mensajes de texto

(Número de aciertos)

+

"Sólo aviones"