a very basic script to allow you afking

[w2lC#]

all it does is basically press aoe and pickup if set right... so you can go afk in case you combine this with the awesome wazzup hack.

put AoE-Skill on 1, put PickUp on 2, run the .exe, switch to twelve sky, press 5 ONCE! and the script will spam 1 and 2. press 5 AGAIN to make it stop, ESC to exit the script.

nothing special, but good enough to pickup all the silver during afk grind...

[paxu12]

Not working for me

[zakira80080]

not working for windows 7 32bit

[w2lC#]

my bad, compiled it as 64 Bit... 32 Bit Version added. Just download the Grindx86.

[khaydan]

not working on windows 7 32bit...even the x86

[w2lC#]

It should... since its compiled as 32 bit programm, works fine on my win 7 32bit System... But here is the code, just use AutoIt :-)

PHP Code:

; Prompt the user to run the script - Yes / No
Local $answer = MsgBox(4, "you want to go afk?", "To help you grind.  Run?")


; Check the user's answer to the prompt
; If "No" was clicked then exit the script
If $answer = 7 Then
    MsgBox(0, "AutoIt", "OK.  Bye!")
    Exit
EndIf

; Press Esc to terminate script, 5 to run and pause

Global $UnPaused
HotKeySet("5", "TogglePause")
HotKeySet("{ESC}", "Terminate")

While 5
    Sleep(100)
    ToolTip("Script is Paused",0,0)
WEnd

Func TogglePause()
    $UnPaused = NOT $UnPaused
    While $UnPaused
        ToolTip("Sending...",0,0)
         Send("1")
         Send("2")
    WEnd
EndFunc

Func Terminate()
    Exit 0
 EndFunc
 
; Finished! 


[zakira80080]

Nop don't work ...

; Prompt the user to run the script - Yes / No
Local $answer = MsgBox(4, "you want to go afk?", "To help you grind. Run?")


; Check the users answer to the prompt
; If "No" was clicked then exit the script
If $answer = 7 Then
MsgBox(0, "AutoIt", "OK. Bye!")
Exit
EndIf

; Press Esc to terminate script, 5 to run and pause

Global $UnPaused
HotKeySet("{5}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

While 5
Sleep(100)
ToolTip("Script is Paused",0,0)
WEnd

Func TogglePause()
$UnPaused = NOT $UnPaused
While $UnPaused
ToolTip("Sending...",0,0)
Send("1")
Send("2")
WEnd
EndFunc

Func Terminate()
Exit 0
EndFunc

; Finished!

Now its work

[linux101]

very nice! thumbs up!