i need major help with my auto miner can someone tell me what im doing wrong
i need major help with my auto miner can someone tell me what im doing wrong
Please post the script using [ scar][ /scar] tags, btw, where is my lvl 20 account you told me you were going to make for testing scripts?
Here it is...
SCAR Code:Program Powerminer;
{.include SRL/SRL.scar}
Const
Coppercolor = 5476070;
Ironcolor = 2898528;
rocktype='iron'; //name of rock
rockw = 15000; //time you want to wait for the rock
pick='false'; //true if weilding, false if unweilded.
Procedure findandmine;
Begin
If (findcolorSpiralTolerance(x,y,Ironcolor,MSX1,MSY1,MSx2,MSY2,15))Then
Begin
Mmouse(x,y,5,5)
wait(Random(1000))
if IsUpText(RockType) Then
Begin
mouse(x,y,1,1,true)
flag;
wait(rockw+random(2000))
End Else
findandmine;
end;
end;
procedure dropore;
begin
case pick of
'true': dropto(1,28);
'false': dropto(2,28);
end;
end;
Begin
setupsrl;
repeat
repeat
if invfull then break;
findandmine;
until(invfull)
if invfull then
dropore;
until(false)
end.
There are currently 1 users browsing this thread. (0 members and 1 guests)