SRL Archive - RS3 Outdated / Broken Scripts

low lvl alcher beta stage


print

2012-08-10 21:52:10

hey guys once more with another alcher thats a little better than my first one
1.make sure you start in your magic tab and have your alch item in the first inventory spot it has no fail safes but will stop if you move the mouse but i think it has a little color finding but i still need to work on it it did 200 alchs for me flawlessly
2.please tell me if my color finding is bad or wrong and plz tell me were i made a mistake
idk if im allowed to post here btw this is my second script lol
program proalchbeta;
{$i SRL\SRL.simba}
var
x, y: Integer;
begin
//enjoy

ActivateClient;
SetupSRL;
Mouse(573, 259, 4, 4, true); //Will move and left-click on (x,y) with a randomness of 1 pixel
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(573, 281, 4, 4, true); //Will move and left-click on (x,y) with a randomness of 1 pixel
Wait(1000); //waits 3500 milliseconds (3.5 seconds)
ClickMouse2(true);
clickmouse2(true);
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(573, 259, 4, 4, true);
Clickmouse2(true)
Mouse(573, 259, 4, 4, true); //Will move and left-click on (x,y) with a randomness of 1 pixel
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(573, 281, 4, 4, true); //Will move and left-click on (x,y) with a randomness of 1 pixel
Wait(2000); //waits 3500 milliseconds (3.5 seconds)
ClickMouse2(true);
clickmouse2(true);
wait(randomrange(350,780));
clickmouse2(true);
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(573, 259, 4, 4, true);
Clickmouse2(true)
repeat
clickmouse2(true);
wait(randomrange(177,220));
wait(randomrange(200,600));
until (Not loggedIn);

end.

tehq

2012-08-10 21:55:36

Give me a few minutes to comment on your script to help you learn. I'll edit this post. :)

program proalchbeta;
{$i SRL\SRL.simba}

var
x, y: Integer; // all mouse movements have a randomness of 4 px

begin
ActivateClient;
SetupSRL;
Mouse(573, 259, 4, 4, true); // moves the mouse to a static location
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves mouse to where it found the color Point (x, y) from above and left clicks
Wait(1000); // static wait of 1 second
ClickMouse2(true);
clickmouse2(true); // clicks the mouse left twice
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves mouse to the Point (x, y) and left clicks
Clickmouse2(true)
Mouse(573, 259, 4, 4, true); // moves the mouse to a static location
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves the mouse to the Point (x, y) and left clicks
Wait(2000); // static wait of 2 seconds
ClickMouse2(true);
clickmouse2(true); // clicks the mouse left twice
wait(randomrange(350,780)); // randomized wait, good job!
clickmouse2(true);
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // again, moves the mouse to the Point (x, y) and left clicks
Clickmouse2(true); // left clicks the mouse
repeat
clickmouse2(true); // left clicks the mouse
wait(randomrange(177,220));
wait(randomrange(200,600)); // waits between 377 - 820 ms
until (Not loggedIn); // until you're logged out
end.

See some things you don't need?

Here's how I'd do it..

program proalchbeta;
{$i SRL\SRL.simba}

var
x, y: Integer;

begin
ActivateClient;
SetupSRL;
repeat
if (WaitFindColor(x, y, 176668, MIX1, MIY1, MIX2, MIY2, 5, 1000) then
begin // if it finds the color in the inventory coordinates with a tolerance of 5
Mouse(x, y, 4, 4, mouse_left); // in a max time of 1 sec, then move the mouse to that location and
Wait(1500 + RandomRange(-500, 500)); // left click. Wait 1-2 sec then click the mouse again (on the item)
ClickMouse2(True);
end;
until not LoggedIn; //until you are logged out
end.

Nebula

2012-08-10 22:07:16

http://villavu.com/forum/showthread.php?t=58935

print

2012-08-10 22:19:38

From: tehq
Give me a few minutes to comment on your script to help you learn. I'll edit this post. :)

program proalchbeta;
{$i SRL\SRL.simba}

var
x, y: Integer; // all mouse movements have a randomness of 4 px

begin
ActivateClient;
SetupSRL;
Mouse(573, 259, 4, 4, true); // moves the mouse to a static location
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves mouse to where it found the color Point (x, y) from above and left clicks
Wait(1000); // static wait of 1 second
ClickMouse2(true);
clickmouse2(true); // clicks the mouse left twice
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves mouse to the Point (x, y) and left clicks
Clickmouse2(true)
Mouse(573, 259, 4, 4, true); // moves the mouse to a static location
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // moves the mouse to the Point (x, y) and left clicks
Wait(2000); // static wait of 2 seconds
ClickMouse2(true);
clickmouse2(true); // clicks the mouse left twice
wait(randomrange(350,780)); // randomized wait, good job!
clickmouse2(true);
if(FindColor(x, y, 176668, 0, 0, 500, 200))then
Mouse(x, y, 4, 4, true); // again, moves the mouse to the Point (x, y) and left clicks
Clickmouse2(true); // left clicks the mouse
repeat
clickmouse2(true); // left clicks the mouse
wait(randomrange(177,220));
wait(randomrange(200,600)); // waits between 377 - 820 ms
until (Not loggedIn); // until you're logged out
end.

See some things you don't need?

Here's how I'd do it..

program proalchbeta;
{$i SRL\SRL.simba}

var
x, y: Integer;

begin
ActivateClient;
SetupSRL;
repeat
if (WaitFindColor(x, y, 176668, MIX1, MIY1, MIX2, MIY2, 5, 1000) then
begin // if it finds the color in the inventory coordinates with a tolerance of 5
Mouse(x, y, 4, 4, mouse_left); // in a max time of 1 sec, then move the mouse to that location and
Wait(1500 + RandomRange(-500, 500)); // left click. Wait 1-2 sec then click the mouse again (on the item)
ClickMouse2(True);
end;
until not LoggedIn; //until you are logged out
end.


so everything i did you made it 10x smaller and took off junk?

Footy

2012-08-10 22:21:41

Colors in runescape are constantly changing, so use findcolortolerance And set a tolerance of 10.