Umm if you're jad and ure reading this could you help me with my auto miner?
I got some bits from ure tut guide and wondering if you could help to see if it works good.. thanks
CODE:
program AutoMining;
{.include SRL/SRL.scar}
procedure DoAntiRandoms;
begin
FindTalk;
FindNormalRandoms;
if (FindFight = true) then
begin
RunAwayDirection('N');
Wait(10000 + random(2000));
RunBack;
end;
end;
procedure RepeatClicking;
begin
repeat
if(FindColor(x,y,1976901,200,200,300,300))then
MMouse(x,y,200,300);
wait(1000+random(100));
Mouse(x,y,200,300,true);
DoAntiRandoms
until(InvFull);
end;
procedure Drop;
begin
DropTo(3,28);
end;
begin
SetupSRL;
repeat
RepeatClicking;
Drop;
until(false);
end.




Reply With Quote




looks pretty good.
thanks JAD








