Is this what you mean by wrappers? ive never used them before, just looked it up on the forums :c
Simba Code:
function FindHide: boolean;
var
i : Integer;
TPA : TPointArray;
ATPA : T2DPointArray;
MP : TPoint;
Box : TBox;
tmpCTS : Integer;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.62, 4.32);
if FindColorsSpiralTolerance(MSCX, MSCY, TPA, 15133427, MSX1, MSY1, MSX2, MSY2, 4) then
begin
TPAtoATPAExWrap(TPA, 15, 15, ATPA);
SortATPASize(ATPA, True);
for i := 0 to High(ATPA) do
begin
MP := MiddleTPA(ATPA[i]);
Box := IntToBox((MP.X - 20), (MP.Y - 20), (MP.X + 20), (MP.Y + 20));
MMouse(MP.X, MP.Y, 4, 4);
Result := True;
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
Break;
end;
end;
end;
Should that stop the memory buildup?