BryceTheCoder Posted October 22, 2012 Share Posted October 22, 2012 Sooo this is my perfect color i got: And the code im using: [scar] procedure FindIron; var TPA: TPointArray; x,y: Integer; begin ColorToleranceSpeed(2); SetColorspeed2Modifiers(0.04, 0.08); if FindColorTPATol(x,y,3162220,TPA,7) then begin MMouse(x,y,0,0); writeln(x); writeln(y); end; end; [/scar] i dont understand why its not finding the color? Please help me ASAP :c Quote Link to comment Share on other sites More sharing options...
shadowrecon Posted October 22, 2012 Share Posted October 22, 2012 I believe. Find color tpa only searches the points. Within the. Tpa which right now is 0 points Quote Link to comment Share on other sites More sharing options...
LordJashin Posted October 22, 2012 Share Posted October 22, 2012 (edited) What's stored in your TPA? It uses the points in your TPA to search from. So if you had point 0, 0 in the TPA. It would search point 0, 0 for the color you put for the color var. If it found that Color at Point 0, 0 for instance. It would return the x, and y value. Edited October 22, 2012 by LordJashin Quote Link to comment Share on other sites More sharing options...
shadowrecon Posted October 22, 2012 Share Posted October 22, 2012 [scar] procedure FindIron; var x,y: Integer; begin ColorToleranceSpeed(2); SetColorspeed2Modifiers(0.04, 0.08); if FindColorTol(X, Y, 3162220, 0, 0, MSPW, MSPH) then begin MMouse(X, Y, 0, 0); writeln(X); writeln(Y); end; SetColorspeed2Modifiers(0.02, 0.02); // You need to reset this other wise ColorToleranceSpeed(1); // if you use OSI/GMRL functions wont work end; [/scar] Quote Link to comment Share on other sites More sharing options...
BryceTheCoder Posted October 23, 2012 Author Share Posted October 23, 2012 alright cool guys, thnx very much for help. Quote Link to comment Share on other sites More sharing options...