function OnEvent(event, arg)
OutputLogMessage("event = %s, arg = %s\n", event, arg)
pos1x,pos1y= 31000, 29750
pos2x,pos2y= 32750, 29750
pos3x,pos3y= 34500, 29750
pos4x,pos4y= 31000, 25250
pos5x,pos5y= 32750, 25250
pos6x,pos6y= 34500, 25250
pos7x,pos7y= 31000, 21000
pos8x,pos8y= 32750, 21000
pos9x,pos9y= 34500, 21000
--------------------Poke Slot----------------------------
psx,psy= 60850, 6200
--------------------Poke Slot 2----------------------------
ps2x,ps2y= 61750, 6200
--------------------Poke Slot 3 bag dos pokes----------------------------
ps3x,ps3y= 60850, 10200
-----------------------------Check Mouse
Point---------------------------------------------------
if (event == "MOUSE_BUTTON_PRESSED" and arg == 3) then
current_mkey = GetMKeyState()
x, y = GetMousePosition();
OutputLogMessage("Mouse is at %d, %d\n", x, y);
end
-----------------------------Trocar de
Pokemon---------------------------------------------------
if (event == "MOUSE_BUTTON_PRESSED" and arg == 7) then
current_mkey = GetMKeyState()
x, y = GetMousePosition();
OutputLogMessage("Mouse is at %d, %d\n", x, y);
Sleep(150)
MoveMouseTo(psx,psy)
Sleep(50)
PressAndReleaseMouseButton(3)
Sleep(25)
MoveMouseTo(psx,psy)
Sleep(25)
PressMouseButton(1)
Sleep(150)
MoveMouseTo(ps2x,ps2y)
ReleaseMouseButton(1)
Sleep(150)
MoveMouseTo(psx,psy)
PressAndReleaseMouseButton(3)
Sleep(50)
PressKey("q")
Sleep(50)
ReleaseKey("q")
Sleep(100)
MoveMouseTo(x,y)
end
-----------------------------
REVIVE---------------------------------------------------
if (event == "MOUSE_BUTTON_PRESSED" and arg == 9) then
current_mkey = GetMKeyState()
x, y = GetMousePosition();
OutputLogMessage("Mouse is at %d, %d\n", x, y);
Sleep(150)
MoveMouseTo(psx,psy)
Sleep(50)
PressAndReleaseMouseButton(3)
Sleep(250)
PressKey("lshift", "1")
Sleep(50)
ReleaseKey("lshift", "1")
Sleep(50)
MoveMouseTo(psx,psy)
PressAndReleaseMouseButton(1)
Sleep(250)
PressAndReleaseMouseButton(3)
Sleep(50)
MoveMouseTo(x,y)
PressKey("lalt", "3")
Sleep(50)
ReleaseKey("lalt", "3")
Sleep(50)
PressKey("lalt", "9")
Sleep(50)
ReleaseKey("lalt", "9")
Sleep(50)
PressKey("q")
Sleep(50)
ReleaseKey("q")
end
-----------------------------Mudar poke de
baixo---------------------------------------------------
if (event == "MOUSE_BUTTON_PRESSED" and arg == 6) then
current_mkey = GetMKeyState()
x, y = GetMousePosition();
OutputLogMessage("Mouse is at %d, %d\n", x, y);
MoveMouseTo(ps3x,ps3y)
Sleep(25)
PressMouseButton(1)
Sleep(100)
MoveMouseTo(ps2x,ps2y)
ReleaseMouseButton(1)
Sleep(100)
MoveMouseTo(x,y)
end
-----------------------------Troca Peça Quebra
Cabeça---------------------------------------------------
if (event == "MOUSE_BUTTON_PRESSED" and arg == 4) then
current_mkey = GetMKeyState()
x, y = GetMousePosition();
OutputLogMessage("Mouse is at %d, %d\n", x, y);
Sleep(100)
MoveMouseTo(pos6x,pos6y)
PressMouseButton(1)
Sleep(150)
MoveMouseTo(x,y)
ReleaseMouseButton(1)
end
end