a very basic script to allow you afking

02/18/2012 18:42 w2lC##1
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...
02/19/2012 21:39 paxu12#2
Not working for me
02/20/2012 21:35 zakira80080#3
not working for windows 7 32bit
02/21/2012 13:38 w2lC##4
my bad, compiled it as 64 Bit... 32 Bit Version added. Just download the Grindx86.
02/23/2012 15:45 khaydan#5
not working on windows 7 32bit...even the x86
02/23/2012 19:32 w2lC##6
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! 
02/24/2012 04:21 zakira80080#7
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 :)
02/29/2012 22:13 linux101#8
very nice! thumbs up!