EpicPacMan's CA AFK BOT {BETA} 2nd RELEASE!

[EpicPacMan]

Hey, I'm proud to announce the second release (beta) of my AFK bot.
The other topic won't let me edit my fucking posts. ARG

I HATE DOUBLE POSTING

This raises the question, because I make so many new updates am I allowed to make a new topic for each one? Hmm.


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.

1. Open the au3 file attached or copy and paste the source in this post into SciTE after downloading it.
2. 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:

1. Alt + Tab to SciTE and press F5
2. Click the afknade button
3. Sit back, relax. Go watch a movie

If your in the lobby and using the executable:

1. Open the executable. (CAAFKBOT.exe)
2. Click the AfkNade button
3. Sit back, relax. Go watch a movie

If your in your own room and not using the executable:

1. Alt + Tab to SciTE and hit f5
2. Click the Invite button
3. Wait for it to finish
4. IF and only IF there are ready users Alt +Tab and click AfkNade

If your in your own room and using the executable:

1. Open the executable. (CAAFKBOT.exe)
2. Click the Invite button
3. Wait for it to finish
4. IF and only IF there are ready users Alt +Tab and click AfkNade

New Feature!
Pretty user interface! BWUAHAHA DIABOLICAL!

New Feature!
Sound check box. It was made aware to me that the notification beeps were annoying and unwanted. I added a check box. Leave it unchecked if you don't want sound!

New Feature!
Close Combat Arms wicked fast! All you have to do is press the button!

New Feature!
New unreleased section, in a new tab! OH MAN! As more features become available, these buttons will become active and more tabs will be added to accommodate the features with options.


Please, help the project grow! Post in this thread with bugs, or suggestions.


What to expect in the future?

AIMBOT!

Go make some hype.




WOOT! No false positives this time! CLEAN
Virustotal. MD5: b1f1277efd535e34488ff0be9d14cf40 Suspicious File

#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>


Global $invite, $startnotification, $joinclicks, $nade, $sound, $check
$check = WinExists("Combat_Arms")



Opt('MustDeclareVars', 1)
HotKeySet("{esc}", "kill")

Func kill()
	Exit
	EndFunc

ui()

Func ui()
    Local $Invitebutton, $afk, $msg, $runjump, $background, $background2, $kill
	
	
	
    GUICreate("EpicPacMan .::[afk bot]::.", 300, 400)
	GuiCtrlCreateTab(1, 0, 300, 400)
	GuiCtrlCreateTabItem("AFK BOT")
	GUISetBkColor(0xFFFFFF)
	
	$background = GUICtrlCreatePic("bg/2.jpg", 2, 23, 296, 376)
	GUICtrlSetState($background, $GUI_DISABLE)
	
    Opt("GUICoordMode", 1)
	
	GuiCtrlCreateTab(20, 100, 50, 50)
	
	
	$Invitebutton = GUICtrlCreateButton("InviteBot", 100, 110, 100, default, $BS_DEFPUSHBUTTON)
	$afk = GUICtrlCreateButton("AFK-NADE", 100, 140, 100)
	$kill = GUICtrlCreateButton("Exit CA FAST", 100, 170, 100)
	$sound = GUICtrlCreateCheckbox("Sound?", 100, 90)
	
	GuiCtrlCreateTabItem("Unreleased")
	$background2 = GUICtrlCreatePic("bg/3.jpg", 2, 23, 296, 376)
	GUICtrlSetState($background2, $GUI_DISABLE)
	GUICtrlCreateButton("AIMBOT", 100, 90, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Account Creation", 100, 140, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Net Taping", 100, 170, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Dual Bot Farmer ", 100, 200, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Team Killer", 100, 230, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Auto Glitch ", 100, 260, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Filter Work Around", 100, 290, 100, default, $WS_DISABLED)
	GUICtrlCreateButton("Chat A.I.", 100, 320, 100, default, $WS_DISABLED)
	
	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)
				If GUICtrlRead($sound) = $gui_CHECKED Then 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")
		Case $msg = $kill
			if $check = 0 Then Call("Fail")
				WinClose("Combat_Arms")		
						
        EndSelect
    WEnd
EndFunc

Func Fail()
	MsgBox(0, "Failed", "Combat Arms is not open.")
	Exit
	EndFunc

Func join()
	Global $joinclicks
	If GUICtrlRead($sound) = $gui_CHECKED Then 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
		If GUICtrlRead($sound) = $gui_CHECKED Then 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

If you use or like this idea, press the thanks button! Love you.

[MrParo]

dude u dont need to call some1 a retard have some respect

[420airik]

dude u dont need to call some1 a retard have some respect

Why respect a retard? XD

[MrParo]

cos what if u were a retard u wouldnt like it if people were looking at u heaps or what if u had a wife or family that something happened to them and they were retarded and people were saying shit about them or something u wouldnt really like it would u so think about it they cant help it.

[Matt1243]

cos what if u were a retard u wouldnt like it if people were looking at u heaps or what if u had a wife or family that something happened to them and they were retarded and people were saying shit about them or something u wouldnt really like it would u so think about it they cant help it.

u know what u retard shut the hell up and if u dont like it leave becuase no one wonts to hear u complain