
Originally Posted by
larsi37
this is my whole mining procedure:
procedure MineDown;
var
x , y, PlusOne, Rockcounter: Integer;
begin
PlusOne:= P07_InvCount + 1;
if P07_FindObjCustom (x, y, ['mi', 'ne', 'ro'], [1054247, 791328, 527385], 10) Then
begin
Writeln('Found some Tin');
P07_MouseBox(X+5, Y+5, X+5, Y+5, mouse_left);
MarkTime(RockCounter);
repeat
Antiban;
wait(100);
FindNormalRandoms;
until (P07_InvCount=PlusOne) Or (TimeFromMark(RockCounter) > 7000 +random(1000))
WriteLN('Mined Something or TimePassed');
end;
end;
i dont know how i can put it as a scar code, so i just copy pasted it, sorry
Make
Simba Code:
if P07_FindObjCustom (x, y, ['mi', 'ne', 'ro'], [1054247, 791328, 527385], 10) Then
Simba Code:
if P07_FindObjCustom (x, y, ['Min', 'ine'], [1054247, 791328, 527385], 10) Then
2 letters is to broad, it might get it confused with "Take copper ore"