Alright, how do you make it delete the points where it fails/clicked already, so it won't click there again.
Here's the code.
EDIT:No idea if I got it or not...
Simba Code:
function Create(var x,y:Integer):Boolean;
var
i,a,Herbs:Integer;
TPA:TPointArray;
ATPA:T2DPointArray;
MP:TPoint;
Box:TBox;
begin
if(Act = 'Clean') then
begin
Herbs := DTMFromString('mggAAAHicY2NgYFBnZGCQAWIRKG0IxKpAnAnE2UCcDMSJUDoaiO2NpIG6mLBg7IARB4YAAGfrA84=');
MouseSpeed := 50
Repeat
FindDTMS(Herbs,TPA,MIX1,MIY1,MIX2,MIY2);
SortTPAFrom(TPA,Point(MICX,MICY));
ATPA := TPAtoATPAEx(TPA, 15, 15);
for a:= 0 to High(ATPA) do
begin
MP := MiddleTPA(ATPA[a]);
Box := IntToBox((MP.x - 20),(MP.y - 20), (MP.x + 20),(MP.y + 20));
SMART_DrawBoxEx(True,Box,clYellow);
MMouse(MP.x,MP.y,4,4);
if(WaitUpText('imy',100))then
begin
x := MP.X; y := MP.Y;
Result := True;
Mouse(x,y,3,3,True);
SMART_ClearCanvas;
Break;
end;
end;
Until not(FindDTM(Herbs,x,y,MIX1,MIY1,MIX2,MIY2))
FreeDTM(Herbs);
end;
end;
I want it to click all the grimy herbs, but it clicks the Clean herbs also.