Red de conocimiento informático - Aprendizaje de código fuente - El asistente de claves salta a la etiqueta.

El asistente de claves salta a la etiqueta.

Pruebe

hacer

Hwnd = complemento. Window.MousePoint()

Bucle hasta hwnd & gt0

QP = split(plugin.Window.GetClientRect(Hwnd), " | ")

Rem A

Retraso 2222

Llame al complemento. Bkgnd.LeftDown(Hwnd, 1093 - QP(0), 250 - QP(1))

Retraso 789

Llame al complemento. Bkgnd.MoveTo(Hwnd, 163 - QP(0), 191 - QP(1))

Retraso 789

Llame al complemento. Bkgnd.LeftUp(Hwnd, 163 - QP(0), 191 - QP(1))

Retraso 789

Rem B

Complemento de llamada. Bkgnd.LeftClick(Hwnd, 166 - QP(0), 576 - QP(1))

Retraso 789

Llame al complemento. Bkgnd.LeftClick(Hwnd, 1031 - QP(0), 658 - QP(1))

Retraso 5678

Llame al complemento. Bkgnd.LeftClick(Hwnd, 166 - QP(0), 553 - QP(1))

Retraso 5678

XY = complemento. Bkgnd.FindColor(Hwnd, 0, 0, 1440, 900, " 10110E ")

ZB = Instrumento(XY, "| ")

X = Clng(Left(XY, ZB - 1)): Y = Clng(Derecha(XY, Len(XY) - ZB))

Retraso 555

Si X & gt0 e Y & gt0, ¿entonces qué?

Llame al complemento. Bkgnd.LeftClick(Hwnd, 1100 - QP(0), 490 - QP(1))

Ir a C

Terminará si...

Ir Ir a B

Rem C

Retraso 100

Ir a A