az0 Posted February 14, 2009 Share Posted February 14, 2009 I have searched through the forums and came across quite a few color aimbot examples but what I am trying to put together is a color autoshooter..that just clicks if the color crosses the center of the screen and since i use 640*480 resolution center screen is at 320x and 240 y....this is what i have yet its not working....help is greatly appreciated...btw its for q3arena. WinWaitActive("Quake 3: Arena") Global $Autoshoot = 0, HotKeySet("{HOME}", "ToggleAutoshoot") HotKeySet("{END}", "TurnoffAutoshoot") While 1 If $Autoshoot = 1 then; PixelSearch(318, 242, 322, 238, 0x00FF00, 10, 2) If Not @error then MouseClick('left') EndIf EndIf WEnd Func ToggleAutoshoot() If $Autoshoot < 1 Then $Autoshoot = $Autoshoot + 1 Else $Autoshoot = 0 EndIf Select Case $Autoshoot = 0 ToolTip("Autoshoot Status: Off",0,0) Case $Autoshoot = 1 ToolTip ("Autoshoot Status: Green",0,0) EndSelect EndFunc ;==>ToggleAutoshoot Func TurnoffAutoshoot() $Autoshoot = 0 ToolTip ("Autoshoot Status: Off",0,0) EndFunc ;==>TurnoffAutoshoot Link to comment Share on other sites More sharing options...
Manjish Posted February 14, 2009 Share Posted February 14, 2009 what is the exact problem u r facing.. as far as i see.. $autoshoot will never be <0.. and what's the need to provide autoshoot off hotkey when u have toggle.. [font="Garamond"]Manjish Naik[/font]Engineer, Global Services - QPSHoneywell Automation India LimitedE-mail - Manjish.Naik@honeywell.com Link to comment Share on other sites More sharing options...
Manjish Posted February 14, 2009 Share Posted February 14, 2009 (edited) ok 1st mistake Global $Autoshoot = 0, Remove the "," here's what i did to ur script: expandcollapse popup$Autoshoot = 0 HotKeySet("{HOME}", "ToggleAutoshoot") HotKeySet("{END}", "TurnoffAutoshoot") While 1 If $Autoshoot = 1 then; PixelSearch(318, 242, 322, 238, 0x00FF00, 10, 2) If Not @error then MouseClick('left') EndIf EndIf WEnd Func ToggleAutoshoot() if $Autoshoot=0 Then $Autoshoot=1 Else $Autoshoot=0 EndIf Select Case $Autoshoot = 0 MsgBox(4096,"","Autoshoot Status: Off") Case $Autoshoot = 1 MsgBox(4096,"","Autoshoot on") EndSelect EndFunc;==>ToggleAutoshoot Func TurnoffAutoshoot() $Autoshoot = 0 MsgBox(4096,"","Autoshoot Status: Off") EndFunc;==>TurnoffAutoshoot Edited February 14, 2009 by Manjish [font="Garamond"]Manjish Naik[/font]Engineer, Global Services - QPSHoneywell Automation India LimitedE-mail - Manjish.Naik@honeywell.com Link to comment Share on other sites More sharing options...
az0 Posted February 14, 2009 Author Share Posted February 14, 2009 ok 1st mistake Global $Autoshoot = 0, Remove the "," here's what i did to ur script: expandcollapse popup$Autoshoot = 0 HotKeySet("{HOME}", "ToggleAutoshoot") HotKeySet("{END}", "TurnoffAutoshoot") While 1 If $Autoshoot = 1 then; PixelSearch(318, 242, 322, 238, 0x00FF00, 10, 2) If Not @error then MouseClick('left') EndIf EndIf WEnd Func ToggleAutoshoot() if $Autoshoot=0 Then $Autoshoot=1 Else $Autoshoot=0 EndIf Select Case $Autoshoot = 0 MsgBox(4096,"","Autoshoot Status: Off") Case $Autoshoot = 1 MsgBox(4096,"","Autoshoot on") EndSelect EndFunc;==>ToggleAutoshoot Func TurnoffAutoshoot() $Autoshoot = 0 MsgBox(4096,"","Autoshoot Status: Off") EndFunc;==>TurnoffAutoshootThanks for the reply but i ran the script as you had it and it didnt work in minimized mode or fullscreen, even when i used WinWaitActive at the top...if some1 else sees the problem I would appreciate more help but thx for replying i am new but did study the tutorial and searched the forums. Link to comment Share on other sites More sharing options...
Manjish Posted February 14, 2009 Share Posted February 14, 2009 i think i found ur problem.. PixelSearch(318, 242, 322, 238, 0x00FF00, 10, 2) u said ur screen is 640 length, 480 height.. look at ur coordinates.. see, pixelsearch searches a rectrangle or square for the color.. u r not leaving even 1 pixel wide area to search, by giving such co-ordinates.. atleast leave a 10*10 area.. for it to search properly.. [font="Garamond"]Manjish Naik[/font]Engineer, Global Services - QPSHoneywell Automation India LimitedE-mail - Manjish.Naik@honeywell.com Link to comment Share on other sites More sharing options...
Fi0da Posted February 14, 2009 Share Posted February 14, 2009 Use Autoit Window Info ...try to use it in yhe game. In my case, it just show me the cordinates...but colors, 0x000000 . I can't get the real colors of my game, then make SS fron Screen and use AWI...to know that color exactly. Take sure RGB or BGR colors of stuffs. I read ... I update ... I learn ... Link to comment Share on other sites More sharing options...
Manjish Posted February 15, 2009 Share Posted February 15, 2009 @Fioda.. I read ur posts in the past two days.. did u reach a solution.. a very wierd prob, the Autoit window info tool wasn't detecting the color.. Anyways, I think the problem here is not of color.. its of the pixelsearch coordinates.. just as i mentioned in my prev post.. Thanks for the input though.. [font="Garamond"]Manjish Naik[/font]Engineer, Global Services - QPSHoneywell Automation India LimitedE-mail - Manjish.Naik@honeywell.com Link to comment Share on other sites More sharing options...
az0 Posted February 15, 2009 Author Share Posted February 15, 2009 @Fioda..I read ur posts in the past two days.. did u reach a solution.. a very wierd prob, the Autoit window info tool wasn't detecting the color..Anyways, I think the problem here is not of color.. its of the pixelsearch coordinates.. just as i mentioned in my prev post..Thanks for the input though..thx again i didnt know that it needed at least 10 pixels to scan. Appreciate it. Link to comment Share on other sites More sharing options...
Manjish Posted February 15, 2009 Share Posted February 15, 2009 its not a rule that u need 10 pixels.. but u need some atleast.. in ur script there is no pixel to scan.. [font="Garamond"]Manjish Naik[/font]Engineer, Global Services - QPSHoneywell Automation India LimitedE-mail - Manjish.Naik@honeywell.com Link to comment Share on other sites More sharing options...
az0 Posted February 15, 2009 Author Share Posted February 15, 2009 its not a rule that u need 10 pixels.. but u need some atleast.. in ur script there is no pixel to scan..ok so i changed resolutions....and now my script looks like this...it runs fine on green but whe i switch to red it crashes...manjish help me out plz.WinWaitActive ( "Quake 3: Arena")Global $Aimbot = 0Global $Pause = 1Opt("MouseCoordMode", 0)Opt("PixelCoordMode", 1)Opt("MouseClickDelay", 10)Opt("MouseClickDownDelay", 0)HotKeySet("{HOME}", "ToggleAimbot")HotKeySet("{END}", "TurnOffAimbot")While 1 $color=0x00FF00 If $Aimbot = 1 Then;$coord = PixelSearch( 508,375,518,385, $color) If Not @error Then MouseClick('left',513,381,1,10) Sleep(1) EndIf EndIf $color2=0xFF0000 If $Aimbot = 2 Then;$coord = PixelSearch( 508,375,518,385, $color2) If Not @error Then MouseClick('left',513,381,1,10)) Sleep(1) EndIf EndIf WEnd Func ToggleAimbot() If $Aimbot < 2 Then $Aimbot = $Aimbot + 1 Else $Aimbot = 0 EndIf Select Case $Aimbot = 0 ToolTip("Aimbot Status: Off",0,0) Case $Aimbot = 1 ToolTip ("Aimbot Status: Green",0,0) Case $Aimbot = 2 ToolTip("Aimbot Status: Red",0,0) EndSelectEndFunc ;==>ToggleAimbot Func TurnOffAimbot() $Aimbot = 0 ToolTip ("Aimbot Status: Off",0,0)EndFunc ;==>TurnoffAimbot Link to comment Share on other sites More sharing options...
az0 Posted February 15, 2009 Author Share Posted February 15, 2009 ok so i changed resolutions....and now my script looks like this...it runs fine on green but whe i switch to red it crashes...manjish help me out plz.WinWaitActive ( "Quake 3: Arena")Global $Aimbot = 0Global $Pause = 1Opt("MouseCoordMode", 0)Opt("PixelCoordMode", 1)Opt("MouseClickDelay", 10)Opt("MouseClickDownDelay", 0)HotKeySet("{HOME}", "ToggleAimbot")HotKeySet("{END}", "TurnOffAimbot")While 1 $color=0x00FF00 If $Aimbot = 1 Then;$coord = PixelSearch( 508,375,518,385, $color) If Not @error Then MouseClick('left',513,381,1,10) Sleep(1) EndIf EndIf $color2=0xFF0000 If $Aimbot = 2 Then;$coord = PixelSearch( 508,375,518,385, $color2) If Not @error Then MouseClick('left',513,381,1,10)) Sleep(1) EndIf EndIf WEnd Func ToggleAimbot() If $Aimbot < 2 Then $Aimbot = $Aimbot + 1 Else $Aimbot = 0 EndIf Select Case $Aimbot = 0 ToolTip("Aimbot Status: Off",0,0) Case $Aimbot = 1 ToolTip ("Aimbot Status: Green",0,0) Case $Aimbot = 2 ToolTip("Aimbot Status: Red",0,0) EndSelectEndFunc ;==>ToggleAimbot Func TurnOffAimbot() $Aimbot = 0 ToolTip ("Aimbot Status: Off",0,0)EndFunc ;==>TurnoffAimbotNVM found my error it was the extra )........appreciate all the help manjish Link to comment Share on other sites More sharing options...
guinness2010 Posted September 14, 2010 Share Posted September 14, 2010 (edited) NVM found my error it was the extra )........appreciate all the help manjish i had a go at using your script for the past few days now with no luck. looking all over the forums for more ansers but again with no luck so i was thinking i had better post and ask for the much needed help i need on this more than likely easy problem for most of you. sorry im new to this ha! your final script looks a little to much for me i would just like the script to turn on green and off as in your first attempt, using your first script i changed a few things, my screen size 600 x 800 and im thinking i got the coordinates correct for a center hit-box 6 x 10? here is what i got so far expandcollapse popupGlobal $Autoshoot = 0 HotKeySet("{HOME}", "ToggleAutoshoot") HotKeySet("{END}", "TurnoffAutoshoot") While 1 If $Autoshoot = 1 then; PixelSearch(397, 295, 403, 305, 0x00FF00, 50, 1) If Not @error then MouseClick('left') EndIf EndIf WEnd Func ToggleAutoshoot() If $Autoshoot < 1 Then $Autoshoot = $Autoshoot + 1 Else $Autoshoot = 0 EndIf Select Case $Autoshoot = 0 ToolTip("Autoshoot Status: Off",0,0) Case $Autoshoot = 1 ToolTip ("Autoshoot Status: On",0,0) EndSelect EndFunc ;==>ToggleAutoshoot Func TurnoffAutoshoot() $Autoshoot = 0 ToolTip ("Autoshoot Status: Off",0,0) EndFunc ;==>TurnoffAutoshoot also i just need to turn it on and of using the home key as i only need 1 color so how do i set it to this and not to toggle? Edited September 14, 2010 by guinness2010 Link to comment Share on other sites More sharing options...
Atylios Posted January 30, 2011 Share Posted January 30, 2011 i had a go at using your script for the past few days now with no luck. looking all over the forums for more ansers but again with no luck so i was thinking i had better post and ask for the much needed help i need on this more than likely easy problem for most of you. sorry im new to this ha! your final script looks a little to much for me i would just like the script to turn on green and off as in your first attempt, using your first script i changed a few things, my screen size 600 x 800 and im thinking i got the coordinates correct for a center hit-box 6 x 10? here is what i got so far expandcollapse popupGlobal $Autoshoot = 0 HotKeySet("{HOME}", "ToggleAutoshoot") HotKeySet("{END}", "TurnoffAutoshoot") While 1 If $Autoshoot = 1 then; PixelSearch(397, 295, 403, 305, 0x00FF00, 50, 1) If Not @error then MouseClick('left') EndIf EndIf WEnd Func ToggleAutoshoot() If $Autoshoot < 1 Then $Autoshoot = $Autoshoot + 1 Else $Autoshoot = 0 EndIf Select Case $Autoshoot = 0 ToolTip("Autoshoot Status: Off",0,0) Case $Autoshoot = 1 ToolTip ("Autoshoot Status: On",0,0) EndSelect EndFunc ;==>ToggleAutoshoot Func TurnoffAutoshoot() $Autoshoot = 0 ToolTip ("Autoshoot Status: Off",0,0) EndFunc ;==>TurnoffAutoshoot also i just need to turn it on and of using the home key as i only need 1 color so how do i set it to this and not to toggle? How can i use this for a 1650 x 1050 resolution? I tried using this script with 800 x 600 resolution with no luck. What am i doing wrong? Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now