AutoHotkey Community

Gui, Add, Edit, x26 y140 w40 h20 , 0
Gui, Add, UpDown, x66 y140 w20 h20 vXPos Range0-1000 , UpDown
Gui, Add, Edit, x156 y140 w40 h20 , 0
Gui, Add, UpDown, x196 y140 w20 h20 vYPos Range0-1000 , UpDown
Gui, Add, Text, x6 y110 w100 h20 +Center, Rock X Posotion
Gui, Add, Text, x136 y110 w100 h20 +Center, Rock Y Posotion
Gui, Add, Text, x6 y10 w230 h20 +Center, Dieoms RuneScape AutoMiner
Gui, Add, Text, x6 y40 w230 h50 +Center, Note: To find the X posotion of the rock, hover over it and press Ctrl + X and Ctrl + Y for the Y posotion.
Gui, Add, Button, x88 y180 w70 h30 , Begin
Gui, Show, x131 y91 h262 w248, AutoMiner ~dieom
Return

^x::
MouseGetPos, MouseX, MouseY
MsgBox, The X coord is: %MouseY%
Return

^y::
MouseGetPos, MousX, MousY
MsgBox, The Y coord is: %MousY%


ButtonBegin:
Gui, Submit, NpHide
Loop, 28
{
MouseClick, Left, %XPos%, %YPos%
Sleep, 10000
}

GuiClose:
ExitApp

msgbox, 4160, Important!, Before beginning power miner`, make sure that your inventory is empty. this is important`, as otherwise Power Miner will drop all of your stuff. when you have emptied your inventory, press F12 to begin calibration.
Keywait, F12, D
msgbox, 4160, Power miner, Hover the mouse cursor over the rock that you want to mine`, and press F12.
Keywait, F12, D
Mousegetpos, pmx, pmy
msgbox, 4160, Power Miner, Now hover the mouse cursor over the first slot in your inventory.
Keywait, F12, D
Mousegetpos, pmx2, pmy2
msgbox, 4160, Power Miner, Calibration complete. Power miner will now Power Mine the specified rock , at %pmx% %pmy%. until F3 is pressed.
loop
{
getkeystate, closestate3, F3, P
if closestate3 =D
break
else
loop, 2
{
getkeystate, closestate3, F3, P
if closestate3 =D
{
break
msgbox, Power miner has closed down
}
else
click %pmx%, %pmy%
{
sleep 5000
}
}
loop, 7
{
loop, 4
{
getkeystate, closestate3, F4, P
if closestate3 =D
break
else
mouseclick, R, %pmx2%, %pmy2%
{
sleep, 500
}
pmy2 +=38
click, %pmx2%, %pmy2%
pmx2 +=42
pmy2 -=38
}
pmx2 -=168
pmy2 +=36
}
pmy2 -=252
}

return