Home › Forum › MultiPlayer Game Hacks & Cheats › Combat Arms Hacks & Cheats › EpicPacMan's CA AFK BOT {BETA}
EpicPacMan's CA AFK BOT {BETA}
EpicPacMan's CA AFK BOT {BETA}
Hey, I'm proud to announce the beta of my AFK bot.
Before you begin please note that:
If you are going to use the source and not the executable, get SciTE for autoit3.
AutoIt v3 - Downloads
Also note that:
This program is not intended to gain an advantage over other players, or increase your kill count. It will join games, die and gain gp and xp for you. Keep in mind that KDR is not everything in a game like this. In many cases having a very low KDR will fool your enemies.
If at any time you want the bot to stop working press the escape key.
There will be instances and glitches where you may need to press it.
If your in the lobby and not using the executable:
If your in the lobby and using the executable:
If your in your own room and not using the executable:
If your in your own room and using the executable:
(7/1/2009) Please test this out with me, I will be running this all night on my laptop as I sleep.
Please, help the project grow! Post in this thread with bugs, or suggestions.
Just like it did before, Ikarus and A-Squared are reporting false positives.
Virustotal. MD5: 5e8794249046224bd7d4c2594709d9a1 Backdoor.Generic!IK Suspicious File Backdoor.Generic
If you use or like this idea, press the thanks button! Love you. 
Before you begin please note that:
If you are going to use the source and not the executable, get SciTE for autoit3.
AutoIt v3 - Downloads
Also note that:
This program is not intended to gain an advantage over other players, or increase your kill count. It will join games, die and gain gp and xp for you. Keep in mind that KDR is not everything in a game like this. In many cases having a very low KDR will fool your enemies.
If at any time you want the bot to stop working press the escape key.
There will be instances and glitches where you may need to press it.
- Open the au3 file attached or copy and paste the source in this post into SciTE after downloading it.
- Make sure Combat Arms is open- that you are logged in and in either the lobby of a server or your own room.
If your in the lobby and not using the executable:
- Alt + Tab to SciTE and press F5
- Click the afknade button
- Sit back, relax. Go watch a movie
If your in the lobby and using the executable:
- Open the executable. (CAAFKBOT.exe)
- Click the AfkNade button
- Sit back, relax. Go watch a movie
If your in your own room and not using the executable:
- Alt + Tab to SciTE and hit f5
- Click the Invite button
- Wait for it to finish
- IF and only IF there are ready users Alt +Tab and click AfkNade
If your in your own room and using the executable:
- Open the executable. (CAAFKBOT.exe)
- Click the Invite button
- Wait for it to finish
- IF and only IF there are ready users Alt +Tab and click AfkNade
(7/1/2009) Please test this out with me, I will be running this all night on my laptop as I sleep.
Please, help the project grow! Post in this thread with bugs, or suggestions.
Just like it did before, Ikarus and A-Squared are reporting false positives.
Virustotal. MD5: 5e8794249046224bd7d4c2594709d9a1 Backdoor.Generic!IK Suspicious File Backdoor.Generic
Code:
#include <GUIConstantsEx.au3>
$check = WinExists("Combat_Arms")
Opt('MustDeclareVars', 1)
HotKeySet("{esc}", "kill")
Func kill()
Exit
EndFunc
ui()
Func ui()
Local $Invitebutton, $afk, $msg, $runjump
Global $invite, $startnotification, $joinclicks, $nade
GUICreate("CA bot", 300, 75)
Opt("GUICoordMode", 2)
$Invitebutton = GUICtrlCreateButton("InviteBot", 50, 30, 100)
$afk = GUICtrlCreateButton("AfkNade", 0, -1)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Invitebutton
if $check = 0 Then Call("Fail")
$invite = 6
$startnotification = Random(1,100)
WinActivate("Combat_Arms")
Sleep(10000)
Beep(500, 100)
Send($startnotification&"{enter}")
MouseMove(1,1)
Do
MouseClick("primary", 574,515,1)
MouseClick("primary", 512, 477, 10)
$invite = $invite - 1
if $invite > 1 Then Call("SEcountdown")
If $invite = 1 Then Call("grammar")
If $invite = 0 Then Call("endnotification")
Sleep(10000)
Until $invite = 0
Case $msg = $afk
if $check = 0 Then Call("Fail")
WinActivate("Combat_Arms")
Sleep(10000)
Call("join")
EndSelect
WEnd
EndFunc
Func Fail()
MsgBox(1, "Failed", "Combat Arms is not open.")
Exit
EndFunc
Func join()
Global $joinclicks
Beep(500,100)
Do
$joinclicks = $joinclicks + 1
if $joinclicks = 6 then Call("reset")
MouseClick("primary", 247, 516, 1, 10)
MouseClick("primary", 512, 472, 1, 10)
Until $joinclicks = 5
MouseClick("primary", 451, 517, 1, 20)
sleep(10000)
Call("nade")
EndFunc
Func nade()
Global $nade
Do
Beep(500,100)
Send("{4}")
MouseClick("primary", 400,600, 2, 10)
Sleep(12000)
$nade = $nade + 1
if $nade = 3 Then Call("reset")
Until $nade = 2
Call("join")
EndFunc
Func reset()
Global $joinclicks, $nade
$joinclicks = 0
$nade = 0
EndFunc
Func SEcountdown()
Global $invite
Send("Sending out "&$invite&" more invites.{enter}")
EndFunc
Func grammar()
Global $invite
Send("Sending out "&$invite&" more invite.{enter}")
EndFunc
Func endnotification()
Send("No more invites. Ready or not, I'm starting.{enter}")
EndFunc
Similar Threads
- 63Last post
- 1Last post
- 0Last post
Originally Posted by Ryzon
