SRL Archive - First Scripts

[For Other Users]Bone Burier!


laakerules

2012-02-05 22:32:15

I just made this since i have been asked about it. You can implement it into your script if you want to, but you have to give 100% credit to me on this function ok! :)

All it is is it goes through the inv without having object dtm's so it will bury any bones without dtms and with other things spread out through out the inventory! :) I might put this one in my caff kill script since this is better than the one in there!


program Bury;

{$DEFINE SMART}
{$i SRL\SRL.simba}


Procedure Bury;
var
I: Integer;
begin
for i := 1 to 28 do
begin
InvMouse(I, 3);
if IsUpText('Bury') then
begin
ClickMouse2(True);
Wait(RandomRange(950, 975));
end;
end;
exit;
end;

procedure SetupChar;

begin

SetupSRL();
SetAngle(0);
ClickNorth(0);
end;
procedure Startup;
begin
Smart_Server := 69;
Smart_Members:= true;
Smart_Signed := true;
Smart_SuperDetail := false;
SetupSRL;
MouseSpeed := 10;
wait(100+random(100));
end;

Begin
Startup;
SetupChar;
Repeat
Bury;
Until Not(loggedin);
end.

Nebula

2012-02-05 22:33:14

I don't think you can "claim" a simple for to do statement. But that is a good procedure none the less.

Chrome

2012-02-05 22:37:04

I would love it if you updated cafinated killer

laakerules

2012-02-05 22:44:54

Lol nebula that works 100% flawless. Put it in as
If InvFull then
Begin
Bury;
end;

With a simple pickup method, more than likely someone would rip them from one of my scripts but ya.

Emotional

2012-02-05 22:46:39

laakerrules, your awesome bro.

laakerules

2012-02-05 22:51:01

Thanks brah! Im working on making a soul wars burying script! :)

Nebula

2012-02-05 22:54:41

From: laakerules
Lol nebula that works 100% flawless. Put it in as
If InvFull then
Begin
Bury;
end;

With a simple pickup method, more than likely someone would rip them from one of my scripts but ya.


I'm not saying this procedure isn't flawless, but I don't think you can force people to give you credit for using a for..to..do statement in their bone burying script. If I were to make a bone burying script, I would use a for..to..do statement to make things shorter and easier to read. but that doesn't mean that I should have to give you credit for it just because you made this thread.

laakerules

2012-02-05 22:56:06

No im saying if you use this method like copy paste give me credit. If you can come up with one on your own then great im happy to see others do it! :) we need more combat scripters! :P

tepovre

2012-02-16 18:51:35

doesnt bank?

Gucci

2012-02-22 01:07:14

From: tepovre
doesnt bank?


Lol this is only a function not a script