SRL Archive - Outdated / Broken

Fast Dropper!


Ejjman

2006-04-30 11:32:58

Can some1 make a procedure that drops ores fast?? I use drop all and drop to position and drop to, but I need something faster than that. Thanks if you can make it, or just give me a link to get to it.

WhiteShadow

2006-04-30 13:58:30

From: ejjman1
Can some1 make a procedure that drops ores fast?? I use drop all and drop to position and drop to, but I need something faster than that. Thanks if you can make it, or just give me a link to get to it.


Set BenMouse:= False;

It should raise the speed of all mouse moves by alot and make the coords a bit more accurate.

Ejjman

2006-04-30 14:15:35

Thanks, already added it

The Un-Named

2006-04-30 14:34:56

From: WhiteShadow
Set BenMouse:= False;

It should raise the speed of all mouse moves by alot and make the coords a bit more accurate.


Also makes the mouse more detectable.

Ejjman

2006-04-30 14:44:14

Do we want it more detectable?

chuch!

2006-04-30 14:46:58

lol I think he meant detectable by Jagex, and in that case, no =P

WT-Fakawi

2006-04-30 16:19:40

you might consider temporarily raising MouseSpeed

like this:

[php]MouseSpeed:=5;
DropAll;
MouseSpeed:=25;[/php]

The Un-Named

2006-04-30 17:07:17

He uses 3 with benmouse ;)

Ejjman

2006-04-30 19:19:42

Heres what I got…

{~~~~~~~~~~DropOres~~~~~~~~~~}
procedure DropOres;
Begin
BenMouse:=False;
if(EquipPick=True)then
DropAll;
if(EquipPick=False)then
Begin
DropToPosition(2, 13)
FindNormalRandoms;
DropToPosition(14, 28)
End;
BenMouse:=True
End;
{~~~~~~~~~~DropOres~~~~~~~~~~}

Detectable alot?

The Prince of Randomness?

2006-05-01 00:28:52

From: ejjman1
Heres what I got…

{~~~~~~~~~~DropOres~~~~~~~~~~}
procedure DropOres;
Begin
BenMouse:=False;
if(EquipPick=True)then
DropAll;
if(EquipPick=False)then
Begin
DropToPosition(2, 13)
FindNormalRandoms;
DropToPosition(14, 28)
End;
BenMouse:=True
End;
{~~~~~~~~~~DropOres~~~~~~~~~~}

Detectable alot?


Instead of
if equip = false then
dropall
if equippick = true the
begin blablabla

do


if(EquipPick=True)then
begin
DropAll;
end else
DropToPosition(2, 13)
FindNormalRandoms;
DropToPosition(14, 28)