a good way to find the color is to take a screen shot of it
put in paint and find the color there
this dosent allways work but maybe here![]()
Whats the colour of AAR 2.6 red box? please answer me or PM me![]()
a good way to find the color is to take a screen shot of it
put in paint and find the color there
this dosent allways work but maybe here![]()
i cant w8 for the next patch to version 55 ^^
[SIZE="2"]
[ ] get 10 posts
[ ] get 50 posts
[ ] get 100 posts
[ ] Get my New multiplayer game to work (3 years back i guess
designersliver møller pedersen
online part Programming :Mathias K
Game Programming: ME ! (Rasmus Bach)
)
im searching after some more designers to my game
, you may self choose what kind of program you want to paint in(photoshop,paint ,etc) so if you are interested pm me
MY PROUD BOT... Hope it work, posting a comment ee if it workshotkeyset("{F10}","stop")
hotkeyset("{f9}","pause")
HotKeySet("{F8}","Aimboton")
Tooltip("F8= Aimboton/off, F9 = Pause, F10 = Exit bot", 0, 0)
Dim $pause=false
Dim $shoot = False
Func Aimboton()
If $shoot = False Then
$shoot = True
ToolTip("Aiming",0,0)
Else
$shoot = False
Tooltip("F8 = Aimboton/off, F9 = Pause, F10 = Exit bot", 0, 0)
EndIf
EndFunc
while $shoot=true
Dim $cordinates = PixelSearch( 0, 0, @DesktopWidth, @DesktopHeight, 0x00FF00)
If Not @error Then
MouseClick( "left", $cordinates[0], $cordinates[1], 1, 10)
EndIf
Sleep(500)
WEnd
func stop ()
Exit
EndFunc
func pause()
$pause=not $pause
if $pause=true Then
Do
sleep (5)
until $pause=False
EndIf
EndFunc
Dont works for you guys, i have chams
Omg.. No bot works in game whwen playing... O Well i can make flash game bots
Btw: Sumsar, thx for informate me about this prog, it owns
EDIT: Now with on/off button ;D
EDIT 2: Fixed some stuff
Last edited by DontFearTheReaper; 10-13-2009 at 01:13 AM.
DontFearTheReaper, Great BOT! I'll test it now, this is tested by you already?
Edit : Man this script works perfectly!
the only thing that drives me insane is that I can't get the right color!
every char has a different color of shoes, head, shirt, pants and so on...
It's aiming at the target and shooting perfectly... but the only problem is the target. its not the char. ><"
If someone gets the right color, please, post it here!
Last edited by oren007x; 10-12-2009 at 03:06 PM.
i most say impressiv
you never did any scripting before?
but i see you could do something instead of
and then sayCode:while true if $shoot = True Then
and then remove the endif at the end..Code:while $shoot=true
more simple
also i se you made a function where you need to click before you can start the aimbot right?
you can just put the whole script into a function and make this outsite of a function
then it just w8 until you click a hotkeyCode:while 1 sleep (5) wend![]()
i cant w8 for the next patch to version 55 ^^
[SIZE="2"]
[ ] get 10 posts
[ ] get 50 posts
[ ] get 100 posts
[ ] Get my New multiplayer game to work (3 years back i guess
designersliver møller pedersen
online part Programming :Mathias K
Game Programming: ME ! (Rasmus Bach)
)
im searching after some more designers to my game
, you may self choose what kind of program you want to paint in(photoshop,paint ,etc) so if you are interested pm me
I make this script:
#include <GuiConstantsEx.au3>
;VARIABLES
hotkeyset("{f5}","pause")
hotkeyset("{f8}","stop")
$pause=false
_Main()
Func _Main()
; GUI
GuiCreate("AutoAim by Cranties", 370, 220)
GuiCtrlCreateLabel("Upper Left Corner X :", 10, 10)
$Input_ULX = GuiCtrlCreateInput("0", 10, 30, 100, 20)
GuiCtrlCreateLabel("Upper Left Corner Y :", 10, 60)
$Input_ULY = GuiCtrlCreateInput("0", 10, 80, 100, 20)
GuiCtrlCreateLabel("Down Right Corner X :", 250, 10)
$Input_DRX = GUICtrlCreateInput("" & @DesktopWidth-1, 250, 30, 100, 20)
GuiCtrlCreateLabel("Down Right Corner Y :", 250, 60)
$Input_DRY = GUICtrlCreateInput("" & @DesktopHeight-1, 250, 80, 100, 20)
GuiCtrlCreateLabel("Color :", 170, 100)
$Input_COLOR = GUICtrlCreateInput("0x00FF00", 140, 120, 100, 20)
$Button_START = GuiCtrlCreateButton("Start AutoAim", 60, 160, 100, 30)
$Button_CLOSE = GuiCtrlCreateButton("Close AutoAim", 210, 160, 100, 30)
GuiCtrlCreateLabel("Press (F5) for Pause | Press (F8) to Exit", 85, 200)
; Run the GUI
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_START
$LX = GUICtrlRead($Input_ULX)
$LY = GUICtrlRead($Input_ULY)
$RX = GUICtrlRead($Input_DRX)
$RY = GUICtrlRead($Input_DRY)
$CL = GUICtrlRead($Input_COLOR)
MsgBox(0, "Starting AimBot...", "Press (F5) for Pause and use (F8) for Exit.")
Guisetstate(0)
play($LX,$LY,$RX,$RY,$CL)
ExitLoop
Case $msg = $Button_CLOSE
stop()
ExitLoop
EndSelect
WEnd
Exit
EndFunc
func play($LX,$LY,$RX,$RY,$CL)
while 1
$head_search=PixelSearch($LX,$LY,$RX,$RY,$CL,5,1)
if $head_search= not @error then
mouseclick ("left",$head_search[0],$head_search[1],1,10)
EndIf
sleep (5)
WEnd
EndFunc
func stop ()
Exit
EndFunc
func pause()
$pause=not $pause
if $pause=true Then
Do
sleep (2)
until $pause=False
EndIf
EndFunc
I think is usefull...
Help me on discovery the exact colour...
I attach also the exe file...
I have found a little bug...
change inCode:func play($LX,$LY,$RX,$RY,$CL) while 1 $head_search=PixelSearch($LX,$LY,$RX,$RY,$CL,5,1) if $head_search= not @error then mouseclick ("left",$head_search[0],$head_search[1],1,10) EndIf sleep (5) WEnd EndFunc
ok.. i recompile all and add a new exe build of AutoAimCode:func play($LX,$LY,$RX,$RY,$CL) while 1 $head_search=PixelSearch($LX,$LY,$RX,$RY,$CL,5,1) if not @error then mouseclick ("left",$head_search[0],$head_search[1],1,10) EndIf sleep (5) WEnd EndFunc
pirate1000 (04-17-2014)
fast learners at this place O_o
you could play a little bit with the design colors ? or something
also if you want to go future with your gui then go to the help file and look after
guictrlcreatemenu
then you can make it as a tabbut go ahead and try
![]()
i cant w8 for the next patch to version 55 ^^
[SIZE="2"]
[ ] get 10 posts
[ ] get 50 posts
[ ] get 100 posts
[ ] Get my New multiplayer game to work (3 years back i guess
designersliver møller pedersen
online part Programming :Mathias K
Game Programming: ME ! (Rasmus Bach)
)
im searching after some more designers to my game
, you may self choose what kind of program you want to paint in(photoshop,paint ,etc) so if you are interested pm me
It's not for me ^ ^. I can anyone make such a
Thanks
Sorry for my bad English
My life-goal is reached, I AM A NEWB!
[] Be a Newb
Just one more thing I want:
[] Be a world famous über AWESOME Superman cool guy RAPPER
what is wrong with it?Code:hotkeyset("{f1}","stop") hotkeyset("{f2}","pause") $color=0xFF0000 $pause=false while 1 $head_search=PixelSearch(0,0,1280,1024,$color,5,1) if $head_search= not @error then MouseClick ("left",$head_search[0],$head_search[1],1,1) EndIf sleep (5) WEnd func stop () Exit EndFunc func pause() $pause=not $pause if $pause=true Then Do sleep (5) until $pause=False EndIf EndFunc
i put it my 1280 x 1024 res in there, red color for the game, and compiled to .exe doesnt do anythinghelp!!
Nevermid, I posted that then left and right when I came back I noticed the problem lol
Updated:
If anyone is interested I made this after I fixed the problem because I was trying it out with Counter Strike and wanted to make it more legit.Code:hotkeyset("{f1}","stop") hotkeyset("{f2}","pause") $color=0xFFFFFF $pause=false while 1 $head_search=PixelSearch(0,0,1279,1023,$color,5,1) if not @error then MouseClick ("left",$head_search[0],$head_search[1],1,3) EndIf sleep (5) WEnd func stop () Exit EndFunc func pause() $pause=not $pause if $pause=true Then Do sleep (5) until $pause=False EndIf EndFunc
Enjoy! - ak0 (nickmacs)Code:$pos = MouseGetPos() $coord = PixelSearch(($pos[0] - 10) , ($pos[1] - 10) , ($pos[0] + 10) , ($pos[1] + 10), $searchcolor) If IsArray($coord) = 1 Then MouseMove($coord[0], $coord[1], 0)
*EDIT*
for the pixel search i made it 10 around, this is sort of like fov (field of view) raise it higher if you need, i wouldnt go over 100 if your trying to look legit.
Last edited by nickmacs; 11-01-2009 at 02:16 AM. Reason: added info