SRL Archive - Outdated / Broken

I need a standsalone autodropper


Ares

2006-05-28 21:12:51

Ok, i can bear with ming by hand, but when it comes to dropping the ore, i just cant cope, so i was wondering can someone make me a script so that when the last inv slot isn't empty the script kicks in and takes over and emptys the WHOLE inventory. Thanks.

Bebe

2006-05-28 21:30:56

program New;
{.include SRL/SRL.scar}

procedure DropIfFull;
begin
if(IsFunctionKeyDown(1))then
begin
DropAll;
end;
end;

begin
setupSRL;
repeat
DropIfFull;
until(false)
end.
This one waits until you hit "ctrl" before it drops.

program New;
{.include SRL/SRL.scar}

procedure DropIfFull;
begin
if(InvFull)then
begin
DropAll;
end;
end;

begin
setupSRL;
repeat
DropIfFull;
until(false)
end.
This one waits until your inventory is full until it drops.

Have your pick :)

Ares

2006-05-28 21:40:12

thanks man

Bebe

2006-05-28 21:41:50

Girl….. ;)

I remember first post=p

2006-05-29 00:24:08

From: Bebemycat2
Girl….. ;)


Owned? Lol? Is this extremeley undetectable?

Ares

2006-05-29 06:35:28

it wont matter too much though because i will be doing the mining… which is the main job.

Bebe

2006-05-29 11:47:30

Acutly this isn't very undetectable but it will serve his purpose becasue he is mining by hand. :)

Ares

2006-05-31 10:30:57

erm… when i use it, my runescape game goes super super slow, anyway to avoid that, i think its the fast loops.

Starblaster100

2006-05-31 11:14:00

This should work, may need a few tweeks.


Program Dropper;
{.include SRL\SRL.scar}
{.include srl\srl\skill\mining.scar}

Procedure Drop2;
Var
DTMOre : integer;
begin
If not (Loggedin) then
Exit;
Status('Dropping Ores');
Players[CurrentPlayer].loc := 'Dropping Ores';
DTMOre := DTMFromString('78DA639CC4C4C060CBC8800CBC7415191E026' +
'990E87F20606C04AA7144550391859140BA17A8C680809A794035' +
'A604D4CC01AA7121A0A607A8C69B809A36A01A73026AA603D518E' +
'257030091BF0C02');
GameTab(4);
Repeat
If(FindDtmIn(x, y, DTMOre, MIX1, MIY1, MIX2, MIY2))then
begin
mouse(x, y, 5, 5, false);
wait(100 + random(50));
if(ClickText2('Drop', UpChars, 555, 205, 740, 464, true))then
begin
Wait(450 + random(250)); //If it drops too fast, change this line to higher numbers.
end else
ChooseOption(x, y, 'Cancel');
end;
until not(FindDtmIn(x, y, DTMOre, MIX1, MIY1, MIX2, MIY2))
FreeDTM(DTMOre);
end;

begin
SetupSRL;
SetupSRLMining
BenMouse := false;
Drop2;
end.

Ares

2006-06-01 09:43:44

how can i chnage the item that it decides to drop? do i insert the picture string into the dtm?.

c0de

2006-06-01 10:28:46

What item do you need..

Ares

2006-06-01 13:05:41

first i thought mining, but now im bored of that, so willow logs or tea cups, i need to level up my woodcutting and thieving…

c0de

2006-06-01 13:45:36

ok i'll post dtms later i'm kinda busy right now… hope you can wait :)

shaunthasheep

2006-06-01 14:05:07

i added waits to them, i was to lazy to copy and paste, so i edits bebemycat2's post :P

From: Bebemycat2
program New;
{.include SRL/SRL.scar}

procedure DropIfFull;
begin
if(IsFunctionKeyDown(1))then
begin
DropAll;
end;
end;

begin
setupSRL;
repeat
wait(150)
DropIfFull;
until(false)
end.
This one waits until you hit "ctrl" before it drops.

program New;
{.include SRL/SRL.scar}

procedure DropIfFull;
begin
if(InvFull)then
begin
DropAll;
end;
end;

begin
setupSRL;
repeat
wait(200)
DropIfFull;
until(false)
end.
This one waits until your inventory is full until it drops.

Have your pick :)


it shouldn't lag that much

Ares

2006-06-01 15:11:42

ok, the stop one works, bottom still lags like hell, just got a rune axe and i cant wield it, keeps dropping it, lol. Ill use it for theiveing instead, thanks guys.

edit: Ok, it doesn't lag, but also, it doesn't drop all of them, the clicking times are too quick, i tried to look in "slr.scar" but i couldn't find the procedure to edit the wait times, if anyone wants to point out where to change the waiting times, would be very useful.

Bam Bam

2006-06-01 17:28:26

The most probable explaination is that your mouse is moving too fast, to slow this down go into srl.scar somewhere in there there is a mousespeed const i have mine set to 15, slower is a higher integer and faster is a lower integer.

Someone please correct me if i'm totaly wrong… :(

shaunthasheep

2006-06-01 18:35:34

no, i think the dropping sucks. i went into srl/srl/misc and changed it and it still was bad. im going to look and see what i can do. i unplugged my mouse from my laptop, and didnt touch the finger touch mouse, and it still stunk, im going to see what they use in the powerminers.

Ares

2006-06-01 18:46:44

thnx alot people, it works most of the time now, i think the mouse clicks too quick, before the mouse has finished moving.

leader

2006-06-01 20:26:35

Add this code to it. This makes the mouse move slower or faster.


MouseSpeed:=20; Pick a number from 20-25.

Hope that helps.

Cruel

2006-06-11 01:17:40

Hah.
Just had to show this screenie. :P

http://client.cruels.net/images/screen8.PNG

Auto-dropper built into client. <3 :)

Keen

2006-06-11 12:29:29

From: Cruel
Hah.
Just had to show this screenie. :P

http://client.cruels.net/images/screen8.PNG

Auto-dropper built into client. <3 :)


Ohhh. :eek:

Now where do I get your sexy client?

PyRo.

2006-06-23 20:16:51

I can't find that client. I found others, but none with auto drop. Please post the link?

Thanks.

Iamadam

2006-06-26 20:40:49

This is probably an old client…looks sexy though :D