Code:
#RequireAdmin
Global $g_bPaused = False
HotKeySet("{PAUSE}", "TogglePause") ;start/pause
HotKeySet("{ESC}", "Terminate") ;close
Dim $a
If WinActive("[CLASS:ArcheAge]") Then
$a
Else
TogglePause()
EndIf
While 1
$a
$title = WinGetTitle("[CLASS:ArcheAge]", "")
ControlSend($title, "", "", "{TAB}")
Sleep(Random(250,350,1))
$title = WinGetTitle("[CLASS:ArcheAge]", "")
ControlSend($title, "", "", "{7}") ; use arrow skill for melee
Sleep(Random(600,825,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(575,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,950,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,900,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{7}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{f}")
Sleep(Random(600,850,1))
ControlSend($title, "", "", "{f}")
Sleep(Random(1000,1250,1))
ControlSend($title, "", "", "{LEFT down}")
Sleep(Random(500,1000,1))
ControlSend($title, "", "", "{LEFT up}")
WEnd
Func loop()
$a
EndFunc
Func TogglePause()
$g_bPaused = Not $g_bPaused
While $g_bPaused
Sleep(100)
ToolTip('"Paused"', 0, 0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit
EndFunc
if you don`t want it to rotate delete the Left down Left up part.