Ok it is now updated, compiles logs in but will not mine the rocks. So could use some help there cheers
////////////////////Helped by p1nky!//////////////////////
Ok it is now updated, compiles logs in but will not mine the rocks. So could use some help there cheers
////////////////////Helped by p1nky!//////////////////////
~Tom~
just put in FindNormalRandoms.
lol
You Legend I Love You!
~Tom~
lol np
lol
Ok, first you should have repeats in your main loop so it will continue mining. In your mining procedures, you have this,
SCAR Code:Procedure MineTin;
begin
repeat
If (FindColorSpiralTolerance(x, y, TinColour, MSX1, MSY1,MSX2, MSY2, 3)) or
(FindColorSpiralTolerance(x, y, TinColour1, MSX1, MSY1,MSX2, MSY2, 3)) Then
mmouse(x,y,0,0);
wait(300);
Mouse(x,y,0,0,true);
writeln('Found Rock');
Randoms;
until(invfull)
end;
That means that it will Keep click the rock every 300ms. You need a wait while ming procedure so it does not just keep clicking the rock. There is no need for
mmouse(x,y,2,2)
mouse(x,y,3,3,true)
All's you need is mouse(x,y,2,2,true) That will move the mouse to the position and click. SRL also has an auto loggin. I read the post about FindnormalRandoms. It will not compile unless you have this,
SCAR Code:procedure DeclarePlayers;
begin
HowManyPlayers := 1; // Don't edit this one
NumberOfPlayers(HowManyPlayers);
Players[0].Name :='Username';
Players[0].Pass :='Password';
Players[0].Nick :='ass'; // 3-4 letters from your name. No CAPS
Players[0].Active:= True;
end;
There in no reason for activate client when you have SMART![]()
SRL's autologgin is
SCAR Code:if not loggedin then loginplayer;
Hope I helped,
noidea
Originally Posted by irc
No Idea Thomas helped me with declare players, but when I log in it wont click on the rocks, it will only repeat "found rock" could anyone help with this?
~Tom~
Try this.
SCAR Code:Procedure MineTin;
begin
repeat
If (FindColorSpiralTolerance(x, y, TinColour, MSX1, MSY1,MSX2, MSY2, 3)) or
(FindColorSpiralTolerance(x, y, TinColour1, MSX1, MSY1,MSX2, MSY2, 3)) Then
begin
mmouse(x,y,5,5);
if isuptext('ine')then
begin
Mouse(x,y,0,0,true);
writeln('Found Rock');
Randoms;
end;
end;
until(invfull)
end;
Originally Posted by irc
hmm keeps stopping for me
nice script!
There are currently 1 users browsing this thread. (0 members and 1 guests)