Anti AFK Bot

09/26/2010 02:27 Kololand#1
I made this simple anti-AFK bot with background mode so you can do something else when Aion is minimized.
It just hit "P" every 10 sec.
It works on Full screen and Windowed mode.

Tested on Win XP x84, Win Vista x64, Win 7 x64.

Code:
;~ **************************************************
;~ Aion Anti-AFK Background Mode
;~ Ver 1.0 10/1/2009
;~
;~ Author: Kololand
;~
;~ For ***************
;~ **************************************************
HotKeySet("{Pause}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Global $Paused, $WinTitle ='AION Client'
TogglePause()

While 1
    If WinExists($WinTitle) Then
            ControlSend($WinTitle, "", "", "p", 1)
                Sleep(1000)
            ControlSend($WinTitle, "", "", "p", 1)
                Sleep(10000)
    Else
        MsgBox(0, "No AION!!", "Can't find AION Window!"&@CRLF&"Launch the game before the anti-AFK."&@CRLF&""&@CRLF&"Bot will close now.", "", "")
        Exit
    EndIf
WEnd

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Anti-AFK Paused! (Pause = Enable - Esc = Exit)',0,0)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc

[Only registered and activated users can see links. Click Here To Register...]

Antivir: Nothing found
ArcaVir: Nothing found
AVG: Nothing found
BitDefender: Nothing found
VirusBlokAda32: Nothing found
VirusBuster: Nothing found

[Only registered and activated users can see links. Click Here To Register...]