AutoAim v5.0 by Cranties

[bakycar]

Func SearchHead()
While $HeadSearchActive = True
If _IsPressed("78", $dll) Then
Stop()
EndIf
If _IsPressed("77", $dll) Then
Pause()
EndIf
$PosX = $XScreen / 2
$PosY = $YScreen /2
$ULX = $PosX - ($XSquare / 2)
If $ULX < 2 Then $ULX = 0
$ULY = $PosY - ($YSquare / 2)
If $ULY < 2 Then $ULY = 0
$BRX = $PosX + ($XSquare / 2)
$BRY = $PosY + ($YSquare / 2)
$Head = PixelSearch($ULX, $ULY, $BRX, $BRY, $SquareColor, $Tollerance, 1)
If Not @error Then
$XMove = $Head[0] - $PosX
$YMove = $Head[1] - $PosY
MouseMove($XMove, $YMove, $Speed)
EndIf
Sleep(10)
WEnd
EndFunc ;==>SearchHead

Tried this?? Since the pos cant be lower than 0 its anyways lower than 0... maybe it will work..

[sumsar1812]

i see you have problems with cords

why dont you just use
@DesktopWidth and @DesktopHeight

then you dont have to choose anything but then auto it get it self

[MyLackofskills]

i play in 1900/1200.
is this resolution incorporated?

[sumsar1812]

i play in 1900/1200.
is this resolution incorporated?

let me get this straight...

you want me(or a other person) to download this file to look at something to see about you can use it...

why the fuck dont dont you just download it your self

[Lulzcakes110]

Can somebody teach me how do this >.<? Theres squares on people but no aimbot.

[hanoi22]

I believe no one hasn't gotten this to work in game, yet.

I little doubt is this ever going to work in game. I think that way to "see" boxes from screen is a lil bit tricky. You should make dll. or hook it up some way.

Definitely cranties has done great job and it looks much better than first version.

We'll see, we'll see.

[[MPGH]Liz]

Add virus scans!

[FreddyZzz]

Virus scan:
Total Virus scan

[cranties]

Tried this?? Since the pos cant be lower than 0 its anyways lower than 0... maybe it will work..

this is not the problem, bu thanks...

the problem is in simulating mouse movement....

if i set to relative positio, in windows is ok, it moove by relative position, in game... NO!! in game all and always move by absolute position, if i set relative too!!!

THIS IS THE PROBLEM!!!

I try to inject with dll, but not go for me... now i post the all source code, to inject it need the name of the process... but it seems not to be the same of the page to start game... (BFHeroes.exe)...

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Outfile=AutoAim v5.4.exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <Misc.au3>

;VARIABLES
$dll = DllOpen("user32.dll")
$SquareColor = 0xff3000
$HeadSearchActive = False
$PauseActive = False
$AlertMessage = True
AutoItSetOption("MouseCoordMode", 0)
$MouseMode = False
$InvertCoords = False
$Speed = 20
$XSquare = 100
$YSquare = 100
$Tollerance = 10
$XScreen = 1024
$YScreen = 768
$DllInject = False
$SearchEntireScreen = False

_Main()

Func _Main()
	$AutoAim = GUICreate("AutoAim v5.4 by Cranties", 402, 447, 192, 124)
	$Tab = GUICtrlCreateTab(8, 16, 385, 400)
	GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
	$Settings = GUICtrlCreateTabItem("Settings")
	$MouseSpeed = GUICtrlCreateSlider(120, 72, 257, 25)
	$Label1 = GUICtrlCreateLabel("Mouse Speed", 24, 72, 89, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$XInvertCoords = GUICtrlCreateCheckbox("Invert Coordinate Mode", 24, 120, 169, 17)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$XMouseMode = GUICtrlCreateCheckbox("Absolute/Relative Mode", 24, 144, 169, 17)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$RColor = GUICtrlCreateSlider(120, 192, 257, 25)
	GUICtrlSetLimit(-1, 255, 0)
	$Label2 = GUICtrlCreateLabel("Red Color", 22, 192, 65, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$Label3 = GUICtrlCreateLabel("Green Color", 22, 216, 76, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$GColor = GUICtrlCreateSlider(120, 216, 257, 25)
	GUICtrlSetLimit(-1, 255, 0)
	$Label4 = GUICtrlCreateLabel("Blue Color", 22, 240, 66, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$BColor = GUICtrlCreateSlider(120, 240, 257, 25)
	GUICtrlSetLimit(-1, 255, 0)
	$TextCtrl = GUICtrlCreateInput("TextCtrl", 128, 272, 241, 24)
	GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
	$Label5 = GUICtrlCreateLabel("X Max Search", 22, 328, 86, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$XMax = GUICtrlCreateSlider(118, 328, 257, 25)
	GUICtrlSetLimit(-1, 150, 0)
	$Label6 = GUICtrlCreateLabel("Y Max Search", 22, 355, 87, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$YMax = GUICtrlCreateSlider(118, 355, 257, 25)
	GUICtrlSetLimit(-1, 150, 0)
	$Label7 = GUICtrlCreateLabel("Color Toller.", 22, 300, 87, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$XTollerance = GUICtrlCreateSlider(118, 300, 257, 25)
	GUICtrlSetLimit(-1, 150, 0)
	$Resolution = GUICtrlCreateCombo("1024x768", 128, 384, 153, 25)
	GUICtrlSetData(-1, "640x480|800x600|1280x1024|1600x1024|1280x768|1440x900|1680x1050")
	$Label7 = GUICtrlCreateLabel("Screen Resol.", 22, 387, 89, 20)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$UseDLL = GUICtrlCreateCheckbox("Use DLL for Inject", 220, 120, 169, 17)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$AllScreen = GUICtrlCreateCheckbox("Search All Screen", 220, 144, 169, 17)
	GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
	$TabSheet1 = GUICtrlCreateTabItem("Help")
	$Help = GUICtrlCreateEdit("", 16, 48, 369, 337)
	GUICtrlSetData(-1, "Help")
	GUICtrlSetState(-1, $GUI_DISABLE)
	GUICtrlCreateTabItem("")
	$BtnStart = GUICtrlCreateButton("Start AutoAim", 320, 416, 75, 25, $WS_GROUP)

	GUISetState(@SW_SHOW)

	;INITIALIZE
	$Test = GUICtrlSetData(9, "255")
	$Test = GUICtrlSetData(12, "48")
	$Test = GUICtrlSetData(14, "00")
	$Test = GUICtrlSetData(17, $XSquare)
	$Test = GUICtrlSetData(19, $YSquare)
	$Test = GUICtrlSetData(21, $Tollerance)
	$R = Hex(GUICtrlRead($RColor), 2)
	$G = Hex(GUICtrlRead($GColor), 2)
	$B = Hex(GUICtrlRead($BColor), 2)
	$SquareColor = "0x" & $R & $G & $B
	$TColor = "0x" & $R & "0000"
	$MeColor = GUICtrlSetBkColor(9, $TColor)
	$TColor = "0x00" & $G & "00"
	$MeColor = GUICtrlSetBkColor(12, $TColor)
	$TColor = "0x0000" & $B
	$MeColor = GUICtrlSetBkColor(14, $TColor)
	$AqColor = GUICtrlSetBkColor(15, $SquareColor)
	$TextCtrl = GUICtrlSetData(15, $SquareColor)
	$Test = GUICtrlSetData(5, $Speed)
	$Test = GUICtrlSetState(7, $GUI_UNCHECKED)
	$Test = GUICtrlSetState(8, $GUI_UNCHECKED)

	While 1
		$nMsg = GUIGetMsg()
		If ProcessExists("BFHeroes.exe") And $AlertMessage = True Then
			MsgBox(0, "ATTENTION", "Battlefield Heroes is running... Activate AutoAim !")
			$AlertMessage = False
		EndIf
		Switch $nMsg
			Case $GUI_EVENT_CLOSE
				Exit
			Case $RColor
				$R = Hex(GUICtrlRead($RColor), 2)
				$G = Hex(GUICtrlRead($GColor), 2)
				$B = Hex(GUICtrlRead($BColor), 2)
				$SquareColor = "0x" & $R & $G & $B
				$TColor = "0x" & $R & "0000"
				$MeColor = GUICtrlSetBkColor(9, $TColor)
				$AqColor = GUICtrlSetBkColor(15, $SquareColor)
				$TextCtrl = GUICtrlSetData(15, $SquareColor)
			Case $GColor
				$R = Hex(GUICtrlRead($RColor), 2)
				$G = Hex(GUICtrlRead($GColor), 2)
				$B = Hex(GUICtrlRead($BColor), 2)
				$SquareColor = "0x" & $R & $G & $B
				$TColor = "0x00" & $G & "00"
				$MeColor = GUICtrlSetBkColor(12, $TColor)
				$AqColor = GUICtrlSetBkColor(15, $SquareColor)
				$TextCtrl = GUICtrlSetData(15, $SquareColor)
			Case $BColor
				$R = Hex(GUICtrlRead($RColor), 2)
				$G = Hex(GUICtrlRead($GColor), 2)
				$B = Hex(GUICtrlRead($BColor), 2)
				$SquareColor = "0x" & $R & $G & $B
				$TColor = "0x0000" & $B
				$MeColor = GUICtrlSetBkColor(14, $TColor)
				$AqColor = GUICtrlSetBkColor(15, $SquareColor)
				$TextCtrl = GUICtrlSetData(15, $SquareColor)
			Case $UseDLL
				$DllInject = Not $DllInject
			Case $AllScreen
				$SearchEntireScreen = Not $SearchEntireScreen
			Case $XMouseMode
				$MouseMode = Not $MouseMode
				$Val = GUICtrlRead($XMouseMode)
				If $Val = $GUI_CHECKED Then AutoItSetOption("MouseCoordMode", 1)
				If $Val = $GUI_UNCHECKED Then AutoItSetOption("MouseCoordMode", 0)
			Case $BtnStart
				GUISetState(0)
				$HeadSearchActive = True
				$Speed = GUICtrlRead($MouseSpeed)
				$XSquare = GUICtrlRead($XMax)
				$YSquare = GUICtrlRead($YMax)
				$Tollerance = GUICtrlRead($XTollerance)
				$InvertCoords = GUICtrlRead($XInvertCoords)
				$Screen = GUICtrlRead($Resolution)
				If $Screen = "640x480" Then
					$XScreen = 640
					$YScreen = 480
				EndIf
				If $Screen = "800x600" Then
					$XScreen = 800
					$YScreen = 600
				EndIf
				If $Screen = "1024x768" Then
					$XScreen = 1024
					$YScreen = 768
				EndIf
				If $Screen = "1280x1024" Then
					$XScreen = 1280
					$YScreen = 1024
				EndIf
				If $Screen = "1600x1024" Then
					$XScreen = 1600
					$YScreen = 1024
				EndIf
				If $Screen = "1280x768" Then
					$XScreen = 1280
					$YScreen = 768
				EndIf
				If $Screen = "1440x900" Then
					$XScreen = 1440
					$YScreen = 900
				EndIf
				If $Screen = "1680x1050" Then
					$XScreen = 1680
					$YScreen = 1050
				EndIf
				SearchHead()
				ExitLoop
		EndSwitch
	WEnd
EndFunc   ;==>_Main

Func SearchHead()
	While $HeadSearchActive = True
		If _IsPressed("78", $dll) Then
			Stop()
		EndIf
		If _IsPressed("77", $dll) Then
			Pause()
		EndIf
		$PosX = $XScreen / 2
		$PosY = $YScreen / 2
		If $SearchEntireScreen = True Then
			$ULX = 0
			$ULY = 0
			$BRX = $XScreen - 1
			$BRY = $YScreen - 1
		Else
			$ULX = $PosX - ($XSquare / 2)
			If $ULX < 0 Then $ULX = 0
			$ULY = $PosY - ($YSquare / 2)
			If $ULY < 0 Then $ULY = 0
			$BRX = $PosX + ($XSquare / 2)
			$BRY = $PosY + ($YSquare / 2)
		EndIf
		$Head = PixelSearch($ULX, $ULY, $BRX, $BRY, $SquareColor, $Tollerance, 1)
		If Not @error Then
			if $MouseMode = true Then
				$XMove = $Head[0]
				$YMove = $Head[1]
			Else
				$XMove = $Head[0] - $PosX
				$YMove = $Head[1] - $PosY
			EndIf
			If $DllInject = False Then
				MouseMove($XMove, $YMove, $Speed)
			Else
				MouseMoveDLL("Battlefield - Heroes", $Head[0], $Head[1])
			EndIf
		EndIf
		Sleep(10)
	WEnd
EndFunc   ;==>SearchHead

Func Stop()
	Exit
EndFunc   ;==>Stop

Func Pause()
	$PauseActive = Not $PauseActive
	While $PauseActive = True
		If _IsPressed("77", $dll) Then
			$PauseActive = False
		EndIf
		Sleep(5)
	WEnd
	If $PauseActive = False Then
		SearchHead()
	EndIf
EndFunc   ;==>Pause

Func MouseMoveDLL($Window, $X = "", $Y = "")
	Local $WM_MOUSEMOVE = 0x0200
	DllCall("user32.dll", "int", "SendMessage", "hwnd", WinGetHandle($Window), "int", $WM_MOUSEMOVE, "int", 0, "long", MakeLong($X, $Y))
EndFunc   ;==>MouseMoveDLL

Func MakeLong($LoWord, $HiWord)
	Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc   ;==>MakeLong

DllClose($dll)

File AutoAim_v5.4.zip received on 2009.10.16 15:06:53 (UTC)
Current status: finished
Result: 2/41 (4.88%)
Compact
Print results
Antivirus Version Last Update Result
a-squared 4.5.0.41 2009.10.16 -
AhnLab-V3 5.0.0.2 2009.10.16 -
AntiVir 7.9.1.35 2009.10.16 -
Antiy-AVL 2.0.3.7 2009.10.16 -
Authentium 5.1.2.4 2009.10.16 -
Avast 4.8.1351.0 2009.10.14 -
AVG 8.5.0.420 2009.10.16 -
BitDefender 7.2 2009.10.16 -
CAT-QuickHeal 10.00 2009.10.16 -
ClamAV 0.94.1 2009.10.16 -
Comodo 2621 2009.10.16 -
DrWeb 5.0.0.12182 2009.10.16 -
eSafe 7.0.17.0 2009.10.15 Suspicious File
eTrust-Vet 35.1.7071 2009.10.16 -
F-Prot 4.5.1.85 2009.10.15 -
F-Secure 8.0.14470.0 2009.10.16 -
Fortinet 3.120.0.0 2009.10.16 -
GData 19 2009.10.16 -
Ikarus T3.1.1.72.0 2009.10.16 -
Jiangmin 11.0.800 2009.10.16 -
K7AntiVirus 7.10.872 2009.10.16 -
Kaspersky 7.0.0.125 2009.10.16 -
McAfee 5772 2009.10.15 -
McAfee+Artemis 5772 2009.10.15 -
McAfee-GW-Edition 6.8.5 2009.10.16 -
Microsoft 1.5101 2009.10.16 -
NOD32 4515 2009.10.16 -
Norman 6.03.02 2009.10.16 -
nProtect 2009.1.8.0 2009.10.15 -
Panda 10.0.2.2 2009.10.15 -
PCTools 4.4.2.0 2009.10.16 -
Prevx 3.0 2009.10.16 -
Rising 21.51.44.00 2009.10.16 -
Sophos 4.46.0 2009.10.16 -
Sunbelt 3.2.1858.2 2009.10.15 -
Symantec 1.4.4.12 2009.10.16 -
TheHacker 6.5.0.2.043 2009.10.15 Trojan/Downloader.Agent.cgfw
TrendMicro 8.950.0.1094 2009.10.16 -
VBA32 3.12.10.11 2009.10.15 -
ViRobot 2009.10.16.1988 2009.10.16 -
VirusBuster 4.6.5.0 2009.10.15 -
Additional information
File size: 314242 bytes
MD5 : 3795fb8e68f3a4f86e53a53500e96611
SHA1 : cf1b0e75abbdfab1db94cddbf9ff854a7b27b6d8
SHA256: c7c5dfc23e3d24efa9bd85a82fc9f054ebd85546eca128db28 00b60581351cb8
TrID : File type identification
ZIP compressed archive (100.0%)
ssdeep: 6144:tpDjlssfHX7FxroYE0H9/OJc4pJ29s8V+p2yioH5YOLAk6cRiQOs8vX7zro0tj4wb+pJioHxomizs8
PEiD : -
packers (Kaspersky): PE_Patch.UPX, UPX
packers (F-Prot): UPX
RDS : NSRL Reference Data Set
-

[MyLackofskills]

let me get this straight...

you want me(or a other person) to download this file to look at something to see about you can use it...

why the fuck dont dont you just download it your self

post from cranTies: page 1 or 2.



AutoAim v5.2 by Cranties

--------------------------------------------------------------------------------

Try This!!!

Try to not modify nothing, just start
ONLY CHANGE SCREEN RESOL.,
this is your in-game screen resolution....
If you have a resolution not in list, let me know and i add... (i add when i have2-3 new resolution...)

F8 Pause
F9 Exit


Let Me know!!!
--------------------------------------------------------------------------
just asking some question.
thx

[oren007x]

Spins around again, as usual.

[ms205]

in response to 5.4
for me it no longer randomly goes in the air.
but it still doesn't auto aim.
btw i'm running on vista 64-bit

[bakycar]

.dll would work better if you would amke it in c++.. i dont think you can make any good hacks for BFH with AutoIt... thats why the EA crew already know your codes..

[sumsar1812]

yes you can get it to work in auto it

go to auto its forum and ask for help

there a lot of people there can help you

[chukycheeze23]

hey this doesn't work...just aims down or up and makes you turn around...
can you have a screenshot of what the settings should be?

thanks!