Good start , much better then my first script. Just a few pointers.
- Try useing the SRL Include lots more and The Wizzy Plugin that is full of TPA function, that be used with the FindColorTol you have been using to make Color finding lots better.
SCAR Code:
Procedure MiningIron;
Begin
FindColorSpiralTolerance(x,y,1976644,0,0,517,339,20);
AntiBan;
Wait(2000+random(1000));
AntiRandoms;
MMouse(x,y,5,5);
if IsUpText('ine') then
Mouse(x,y,5,5,true);
if InvFull then
GetRidOf;
if (LoadsDone=10) then
NextPlayer(false);
end;
here you might want to use a loop for when its waiting for the next rock such in....
SCAR Code:
Procedure MiningIron;
var
Start, Finsh : Integer;
Begin
FindColorSpiralTolerance(x,y,1976644,0,0,517,339,20);
AntiBan;
Wait(2000+random(1000));
AntiRandoms;
Start:= InvCount;
MMouse(x,y,5,5);
if IsUpText('ine') then
Mouse(x,y,5,5,true);
while Start =< InvCount do
begin
antiban
wait(2000);
end;
if InvFull then
GetRidOf;
if (LoadsDone=10) then
NextPlayer(True);
end;
if you see there i used some simple Integers a While Loop.
The While loop simply works as
While Someting = True do some other code.
so basiclly what that does while you havent mined a rock it will wait until you have mined a rock.