PDA

View Full Version : function FindMayScreen() : Boolean;



Kyle Undefined
05-10-2012, 06:08 AM
Made this method for my newest version of my script. I don't think it needs to be added to the include because it's only a month long promotion, so I figured I'd post it here so people could use it.


function FindMayScreen() : Boolean;
var
TPA : TPointArray;
tmpCTS : Integer;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);

SetColorSpeed2Modifiers(0.44, 1.62);
FindColorsSpiralTolerance(MSCX, MSCY, TPA, 1013212, MSX1, MSY1, MSX2, MSY2, 8);

Result := (Length(TPA) > 1500);

if(Result)then
MouseBox(494, 16, 503, 24, mouse_Left);

ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
end;


Have tested it on various accounts, and it works. Doesn't through a false positive either.

shstiger2009
05-10-2012, 06:10 AM
Thank God, this will be useful for the next couple of weeks haha.

Awesome. :)

bg5
05-10-2012, 06:25 AM
Thx ,I will use it in my script.
I was too lazy to make my own :P