SRL Archive - Help

Help With Repeat


azza123

2013-01-14 01:52:38

Hey guys sorry I just started with this 20 minutes ago and so far I have a script just clicking a tree using color, although I can't seem to figure out how to repeat it every maybe 20 seconds , Could anyone help me ? If anyone could also explain to me certain ways I could go about banking that would be nice also whats the best way also this is for private server runescape. THANKS!
This is my code:

program new;
{$i srl/srl.simba}
procedure clicktree;
var
X, Y: Integer;
begin
if FindColorTolerance (X, Y, 3240032, 244, 61, 293, 110, 5) then
begin;
mmouse(x, y,1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
end;
end;
begin
MouseSpeed := 15;
clicktree;
end.

Chris!

2013-01-14 01:59:23

I would take a look at the bank.simba file for all things bank related.

Just use repeat..until to repeat what you want to do.

Take a look at http://villavu.com/forum/showthread.php?t=94909&p=1158509]this for help with Private Server scripting.

azza123

2013-01-14 02:22:08

From: Chris!
I would take a look at the bank.simba file for all things bank related.

Just use repeat..until to repeat what you want to do.

Take a look at http://villavu.com/forum/showthread.php?t=94909&p=1158509]this for help with Private Server scripting.


I've looked at the repeat..until although I can't seem to figure out where I would include it into my code, where would I put it everything I try comes out as an error when I compile, do you know where I should input it into my code?

Gucci

2013-01-14 02:25:16

From: azza123
I've looked at the repeat..until although I can't seem to figure out where I would include it into my code, where would I put it everything I try comes out as an error when I compile, do you know where I should input it into my code?


In the mainloop do,

Repeat
clicktree;
Until(False)

That's a basic loop for it to do clicktree as long as it can

Chris!

2013-01-14 02:26:37

program new;
{$i srl/srl.simba}
procedure clicktree;
var
X, Y: Integer;
begin
if FindColorTolerance (X, Y, 3240032, 244, 61, 293, 110, 5) then
repeat
begin;
Do stuff;
end;
end;


begin
MouseSpeed := 15;
Mainloopstuff;
repeat
clicktree;
until(false);
end.

Look through tutorials, that's what will help you the most. ;)