Cómo crear scripts combinados a través de sprites clave
g = Plugin.Sys.GetScRX()
h = Plugin.Sys.GetScRY()
Si e gt 0 Entonces
Si f = e Entonces
i = Plugin.Window.GetWindowRect(e) leftz=left2
De lo contrario
leftz=left1
Finalizar si
Si right1 lt;right2 Entonces
lefty=right1
Si no
lefty=right2
Terminar si
w=0
Mientras que lefty-leftz 1
y1=smallly
Mientras se(leftz w , y1 1)=bj
y1=y1 1
Wend
Si y1 gt;= bigy Entonces
Llamar a Eliminar() :b=up1
Salir para
Finalizar si
w=w 1
Terminar
Si abajo1 lt; abajo2 Entonces
leftx=down2
Else
leftx=down1
Finalizar si
Si arriba1 lt; up2 Entonces
leftw=up1
De lo contrario
leftw=up2
Finalizar si
w= 0
Mientras wlt; leftw-leftx 1
x1=a
Mientras se(x1 1, leftx w)=bj
x1=x1 1
Wend
Si x1 gt; = c Entonces
Llama a eliminar.p>
Llama a eliminar(): b=up1
Salir para
Finalizar si
w=w 1
Fin
d=up2
Finalizar si
Finalizar si
d=d 1
Fin
d=0
Siguiente
Finalizar si
Siguiente
Siguiente
Fin
IzquierdaArriba 1
Finalizar si
Finalizar si
Finalizar si
Finalizar si
Finalizar si
Finalizar Si
Fin Si
Fin Si
Fin Si
Fin Si
.p>Sub Eliminar( )
Mover a a * 31 k, b * 35 l
IzquierdaAbajo 1
Retardo llk
Mover a c * 31
k, d * 35 l
IzquierdaAbajo 1
se(a, b) = bj
se(c, d) = bj
m = m - 2
Fin Sub.