Let's get this started:
1. Bind any emote to NUMPADs 1 and 2 (make sure your NUMPAD is enabled).Code:Global $Paused $TT = 0 $win = "- ArcheAge -" $esVar = "" $vRan = "" HotKeySet("{HOME}","ToggleAntiAFK") HotKeySet("{END}","ExitS") Dim $TTmsg[3] $TTmsg[0] = 'Anti-AFK is on' & @CRLF & @CRLF & 'Press "End" to exit' $TTmsg[1] = 'Anti-AFK is on' & @CRLF & @CRLF & 'Sitting down and then nodding' & @CRLF & @CRLF & 'Press "End" to exit' $TTmsg[2] = 'Anti-AFK is on' & @CRLF & @CRLF & 'Jumping' & @CRLF & @CRLF & 'Press "End" to exit' Dim $numpad[4] $numpad[0] = "{NUMPAD1 down}" $numpad[1] = "{NUMPAD1 up}" $numpad[2] = "{NUMPAD2 down}" $numpad[3] = "{NUMPAD2 up}" Dim $jump[2] $jump[0] = "{SPACE down}" $jump[1] = "{SPACE up}" While 1 Sleep(1000) WEnd Func ToggleAntiAFK() WinExists($win) If @error Then $esVar = 1 ExitS() Else $Paused = NOT $Paused Tool_Tip() ; 0 While $Paused $vRan = Random(0,2) Select Case $vRan <= 1 If $esVar = 1 Then ExitS() Else $TT = 1 Tool_Tip() ; 1 SdaN() EndIf Case $vRan > 1 If $esVar = 1 Then ExitS() Else $TT = 2 Tool_Tip() ; 2 Jump() EndIf EndSelect $vRan = "" Tool_Tip() ; 3 WEnd EndIf ToolTip("") EndFunc Func Tool_Tip() ToolTip($TTmsg[$TT],10,10) sRan() $TT = 0 EndFunc Func sRan() $sRan = Random(2412,4689) $sRan = $sRan - Random(367.13, 439.52) Sleep($sRan) EndFunc Func SdaN() For $element In $numpad ControlSend($win,"","",$element) Sleep(Random(731,1049)) Next EndFunc Func Jump() For $element In $jump ControlSend($win,"","",$element) Next Sleep(Random(747,1073)) EndFunc Func ExitS() Exit 0 EndFunc
2. Keep jump button defaulted to SPACE.
3. Compile above, rename .exe to something unsuspicious and run.
4. HOME button to start, END to terminate.
Your character should either perform two emotes or jump. Don't use this in towns.
Last edited by EVARGNUG; 09-26-2014 at 08:18 AM.
Nice job.
Muh Tumblr (NSFW)
Click HERE to join the Night Owls if you stay up late on MPGH
Anime Recommendation (3/14/15) | Manga/Manhwa Recommendation (8/20/15)
^ I'll update one of these soon I swear ^
Member Since 8/05/2012
Editor 4/04/13 - 4/21/13
Middleman 7/14/13 - 11/4/13
Battlefield Minion 6/13/14-3/20/15
Steam Minion 7/16/14-3/20/15
Minion+ 10/1/14-3/20/15
M.A.T. Minion 10/19/14-3/20/15
ROTMG Minion 1/14/15-3/20/15
Donator Since 2/26/15 (Thanks @Cursed!)
Steam Minion 5/9/15 - 11/5/15
OSFPS Minion 9/15/15 - 11/5/15
Doesn't seem to work for me. Runs on desktop instead of in client
Error: Line 45
If
"If" statements must have a "Then" keyword.
This error pops up every time I try to run the script.
EDIT: Sorry, didn't see the updated script.
Thanks!
Last edited by three6pyro; 09-30-2014 at 04:40 AM.
Last edited by Color; 09-30-2014 at 05:04 PM.
Muh Tumblr (NSFW)
Click HERE to join the Night Owls if you stay up late on MPGH
Anime Recommendation (3/14/15) | Manga/Manhwa Recommendation (8/20/15)
^ I'll update one of these soon I swear ^
Member Since 8/05/2012
Editor 4/04/13 - 4/21/13
Middleman 7/14/13 - 11/4/13
Battlefield Minion 6/13/14-3/20/15
Steam Minion 7/16/14-3/20/15
Minion+ 10/1/14-3/20/15
M.A.T. Minion 10/19/14-3/20/15
ROTMG Minion 1/14/15-3/20/15
Donator Since 2/26/15 (Thanks @Cursed!)
Steam Minion 5/9/15 - 11/5/15
OSFPS Minion 9/15/15 - 11/5/15
Yea, if you want to modify or share the code, etc., go ahead. PM me or post here if you want me to make changes.
Isn't it easier to just afk on a training dummy? Or am I missing something? I know it works, I have done it...
Alternativly, rather than using a script that is possibly against Eula, you can fill your backpack space, then Shift + Right click a coinpurse. Because inventory is full, it wont open, but it will also make the game think you are right clicking all the time, no afk log out.
Sorry for being so noob, what is this compiled in/with?