Drakthor Posted April 11, 2007 Posted April 11, 2007 I am working on making a bot for my friend and I was wondering how do I make it find one object with two diff colors then click it if it has those colors?
jokke Posted April 11, 2007 Posted April 11, 2007 PixelChecksum or Pixelgetcolor(X,Y) = YOURCOLOR And Pixelgetcolor(X,Y) = YOURCOLOR2 UDF:Crypter a file encrypt / decrypt tool with no need to remember a password again. Based on Caesar cipher using entire ASCII Table.Script's: PixelSearch Helper, quick and simple way to create a PixelSeach.Chatserver - simplified, not so complicated multi-socket server.AutoIT - Firewall, simple example on howto create a firewall with AutoIt.
Drakthor Posted April 11, 2007 Author Posted April 11, 2007 PixelChecksum or Pixelgetcolor(X,Y) = YOURCOLOR And Pixelgetcolor(X,Y) = YOURCOLOR2what would you use as a method to click a the coords?
jokke Posted April 11, 2007 Posted April 11, 2007 (edited) MouseClick('Left/Right',X,Y,NRCLICKS,Speed) $X = 100 $Y = 100 $x2 = 200 $y2 = 200 Dim $color[2] = ['0x000000','0x000000'] ;[Color 0(1), Color 1(2)] If PixelGetColor($X,$Y) = $color[0] And PixelGetColor($x2,$y2) = $color[1] Then MouseClick('Left',$X,$Y,1,0) EndIf oÝ÷ Ù©ÝÉëZn+f¢·vö§qæ®¶s`¤FÒb33c·³5ÒÒ²b33³b33²Âb33³#b33²Âb33³3b33µÒµ´6÷&CÄ6÷&CÄ6÷&C%Ò¤FÒb33c·³5ÒÒ²b33³b33²Âb33³#b33²Âb33³3b33µÒµ´6÷&CÄ6÷&CÄ6÷&C%Ò¤FÒb33c¶6öÆ÷%³%ÒÒ²b33³b33²Âb33³b33µÒµ´6öÆ÷"Â6öÆ÷"Ð ¤bVÄvWD6öÆ÷"b33cµ³ÒÂb33cµ³ÒÒb33c¶6öÆ÷%³ÒæBVÄvWD6öÆ÷"b33c·³ÒÂb33c·³ÒÒb33c¶6öÆ÷%³ÒFVà¢Ö÷W6T6Æ6²b33´ÆVgBb33²Âb33c·³%ÒÂb33c·³%ÒÃäVæD` Edited April 11, 2007 by jokke UDF:Crypter a file encrypt / decrypt tool with no need to remember a password again. Based on Caesar cipher using entire ASCII Table.Script's: PixelSearch Helper, quick and simple way to create a PixelSeach.Chatserver - simplified, not so complicated multi-socket server.AutoIT - Firewall, simple example on howto create a firewall with AutoIt.
Drakthor Posted April 11, 2007 Author Posted April 11, 2007 MouseClick('Left/Right',X,Y,NRCLICKS,Speed) $X = 100 $Y = 100 $x2 = 200 $y2 = 200 Dim $color[2] = ['0x000000','0x000000'] ;[Color 0(1), Color 1(2)] If PixelGetColor($X,$Y) = $color[0] And PixelGetColor($x2,$y2) = $color[1] Then MouseClick('Left',$X,$Y,1,0) EndIf oÝ÷ Ù©ÝÉëZn+f¢·vö§qæ®¶s`¤FÒb33c·³5ÒÒ²b33³b33²Âb33³#b33²Âb33³3b33µÒµ´6÷&CÄ6÷&CÄ6÷&C%Ò¤FÒb33c·³5ÒÒ²b33³b33²Âb33³#b33²Âb33³3b33µÒµ´6÷&CÄ6÷&CÄ6÷&C%Ò¤FÒb33c¶6öÆ÷%³%ÒÒ²b33³b33²Âb33³b33µÒµ´6öÆ÷"Â6öÆ÷"Ð ¤bVÄvWD6öÆ÷"b33cµ³ÒÂb33cµ³ÒÒb33c¶6öÆ÷%³ÒæBVÄvWD6öÆ÷"b33c·³ÒÂb33c·³ÒÒb33c¶6öÆ÷%³ÒFVà¢Ö÷W6T6Æ6²b33´ÆVgBb33²Âb33c·³%ÒÂb33c·³%ÒÃäVæD` like this? CODE$X = 100 $Y = 100 $x2 = 200 $y2 = 200 Dim $color[2] = ['0x655206','1x859614'] ;[Color 1, Color 2] If PixelGetColor($X,$Y) = $color[0] And PixelGetColor($x2,$y2) = $color[1] Then MouseClick('Left',$X,$Y,1,0) EndIf
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