
Originally Posted by
DannyRS
I would look into making your own object finder ^^ using something written by someone else for that is a bad idea, because objects are always different, and need to be sorted correctly based on what they are, size and etc, read some tutorials

Well I think I got it to where it would move the mouse over and click correctly ETC... The only problem i'm having now is that when i start it, it'll hover over the objects but then it just stops, doesn't click or anything. It basically doesn't do anything after the 'then'
Simba Code:
Function MineIron:Boolean;
Var
x, y, PlusOneOre, OreCounter: Integer;
Begin
PlusOneOre:= InvCount +1;
x:=MSCX;
y:=MSCY;
If FindObjCustom(x, y, ['Min', 'Mine'], [RockColor], 5) then
Begin
WriteLn('Found Iron Rock');
GetMousePos(x, y);
Case Random (2) Of
0: Mouse(x, y, 0, 1, True);
1:Begin
Mouse(x, y, 0, 1, False);
Wait(RandomRange(400, 1000));
P07_ChooseOptionMulti(['Mine']);
End;
End;
Repeat
MarkTime(OreCounter);
Antiban;
Wait(1000);
If InvCount=PlusOneOre Then
WriteLn('Collected one Ore');
Until (InvCount=PlusOneOre) Or (TimeFromMark(OreCounter) > 7000)
End;
End
It doesn't write 'Found Iron Rock'