Runescape Anachronia Agility Course Sample Code

To make this work, you have to install Scite Editor. It's similar to AutoHotKey. If you need help, feel free to send me a message.


HotKeySet("{END}", Terminate)
HotKeySet("{HOME}", Pause)

$enabled = 1

WinActivate("RuneScape")

ResetView()
Sleep(1500)

While 1
While $enabled
Start()
WEnd
WEnd

Func Pause()
If($enabled == 1) Then
$enabled = 0
Else
$enabled = 1
EndIf
EndFunc

Func Terminate()
Exit 1
EndFunc

Func Start()
ClickWithDelay(726, 377, 5500) ; 1
ClickWithDelay(1264, 205, 8500) ; 2
ClickWithDelay(1284, 233, 10500) ; 3
ClickWithDelay(679, 475, 9000) ; 4
ClickWithDelay(1282, 657, 14000) ; 5
ClickWithDelay(934, 382, 11500) ; 6
ClickWithDelay(845, 377, 9000) ; 7
ClickWithDelay(1322, 112, 10000) ; 8
ClickWithDelay(778, 340, 9000) ; 9
ClickWithDelay(617, 373, 5000) ; 10
ClickWithDelay(1188, 196, 9500) ; 11
ClickWithDelay(396, 368, 10000) ; 12
ClickWithDelay(514, 371, 11000) ; 13
ClickWithDelay(457, 374, 9500) ; 14
ClickWithDelay(212, 92, 12500) ; 15
ClickWithDelay(367, 149, 7000) ; 16
ClickWithDelay(1240, 65, 10000) ; 17
ClickWithDelay(461, 203, 8500) ; 18
EndFunc

Func ClickWithDelay($x, $y, $interval)
LC($x, $y)
Sleep($interval)
EndFunc

Func LC($x, $y)
MouseClick("left", $x, $y, 1, 1)
EndFunc

Func RC($x, $y)
MouseClick("right", $x, $y, 1, 1)
EndFunc

Func ResetView()
LC(1141, 78)
Send("{PGDN down}")
Send("{UP down}")
Sleep(2000)
Send("{PGDN UP}")
Send("{UP UP}")
EndFunc

good job bro nice hack
good job bro nice hack