[Program] Lagalot's Anti-afk program

[lagalot]

Hey guys!

I've been messing around in AutoIT and decided to make this simple Anti-AFK script.

I've seen people post other programs that do the same but, some involve character movement (Such as hitting the Space Bar to jump). My method is a lot more discreet. It simply presses the "c" key every 50-135 seconds. This will prevent you from going AFK.

Features:

1. Anti-AFK (of course)
2. Will still work if WoW is not the focused window. Meaning you can play another game.
3. Simple and easy to understand and use.
4. Automatically exits when WoW does.

Well, here is the source for those people who wish to tweak it/can rest assured there is nothing that will steal your account. (I'm not that advanced yet :P)

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=exe1.ico
#AutoIt3Wrapper_outfile=rename-me.exe
#AutoIt3Wrapper_Res_Description=By Lagalot
#AutoIt3Wrapper_Res_Fileversion=1.0
#AutoIt3Wrapper_Res_LegalCopyright=Lagalot of MMOwned.com
#AutoIt3Wrapper_Res_Language=1033
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; Press F11 to terminate script, Pause/Break to "pause"
Global 
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{F11}", "Terminate")

MsgBox(4096, "", "Simple anti-afk program for World of Warcraft. Hit Pause/Break key to pause script.  Hit F11 to exit script.")
	
If FileExists("rename-me.exe") Then
	;
MsgBox(4096, "", "Rename the program to anything for maximum security")
	Exit
EndIf	

If Not ProcessExists("WoW.exe") Then
   ; Is WoW running?
MsgBox(4096,"","WoW is not running. Please start up WoW then run the program.")
   Exit
EndIf

If ProcessWaitClose("WoW.exe") Then
	;
Exit
EndIf

	

While 1
	Sleep(Random(50000,135000))
	ControlSend("World of Warcraft","","","{c}")
WEnd

Func TogglePause()
     = NOT 
    While 
        sleep(100)
    WEnd
    
EndFunc

Func Terminate()
    Exit 0
EndFunc

*NOTE* If you don't want the tray icon, simply add

#NoTrayIcon

at the very top of the script and compile it the "Compile with Options" way in AutoIT.

I've compiled the script and it can be downloaded here:

http://rapidshare.com/files/101409905/rename-me.exe
(I set the download to direct so there's no waiting for the annoying timer for you free users.)

This is my first AutoIT script I have ever released. Feel free to make suggestions on how I can improve this. It will help me out since I am still learning. Also, let me know if you find any bugs and I will do my best to fix them.

Virus Scan

Antivirus Version Last Update Result
AhnLab-V3 2008.3.22.1 2008.03.21 -
AntiVir 7.6.0.75 2008.03.21 -
Authentium 4.93.8 2008.03.22 -
Avast 4.7.1098.0 2008.03.21 -
AVG 7.5.0.516 2008.03.21 -
BitDefender 7.2 2008.03.22 -
CAT-QuickHeal 9.50 2008.03.21 -
ClamAV 0.92.1 2008.03.22 -
DrWeb 4.44.0.09170 2008.03.21 -
eSafe 7.0.15.0 2008.03.18 suspicious Trojan/Worm
eTrust-Vet 31.3.5633 2008.03.21 -
Ewido 4.0 2008.03.21 -
F-Prot 4.4.2.54 2008.03.20 -
F-Secure 6.70.13260.0 2008.03.21 -
FileAdvisor 1 2008.03.22 -
Fortinet 3.14.0.0 2008.03.21 -
Ikarus T3.1.1.20 2008.03.22 IM-Worm.Win32.Sohanad.cv
Kaspersky 7.0.0.125 2008.03.22 -
McAfee 5257 2008.03.21 -
Microsoft 1.3301 2008.03.22 -
NOD32v2 2967 2008.03.21 archive damaged
Norman 5.80.02 2008.03.20 -
Panda 9.0.0.4 2008.03.22 -
Prevx1 V2 2008.03.22 Trojan.SystemPoser
Rising 20.36.42.00 2008.03.21 -
Sophos 4.27.0 2008.03.22 -
Sunbelt 3.0.978.0 2008.03.18 -
Symantec 10 2008.03.22 -
TheHacker 6.2.92.250 2008.03.19 -
VBA32 3.12.6.3 2008.03.21 -
VirusBuster 4.3.26:9 2008.03.21 -
Webwasher-Gateway 6.6.2 2008.03.22 -

Additional information
File size: 326171 bytes
MD5: e7bd8e819beaf7f9faa74acd90c1a03d
SHA1: 195e9dd26e57d61764da62e11ee8415d83deba80
PEiD: -
packers: UPX
packers: PE_Patch.UPX




The Anti-Virus programs that detect this as a trojan or worm are all simply false-positives. As you can tell by the source, there is nothing malicious in the code. It's just simply assuming it's one because it's written in AutoIT or that it's using UPX packers.

[MillerLite]

programs that have this function are posted like everywhere... (You can change the button they preset on it)

but good job making this anyway

[spiderpigz]

now this is really good thx for sharing
+rep

[babble]

i gotta try one of these