SRL Archive - RS3 Script Requests

i have noticed all of the tuna, lobbies, and swordies dropped at the karamja dock, and was wondering if someone would make a script that would collect these fish, and turn them into notes, then pick up more, and so on, thanks in advance, shane0137

Why not just fish them? Is picking them up a lot faster money or something? Wouldn't be too hard to make, though I don't know if it'd be practical.

From: Harry
Why not just fish them? Is picking them up a lot faster money or something? Wouldn't be too hard to make, though I don't know if it'd be practical.

Yes, its a lot faster if the number of botters is high and the amount of fish dropped is a lot. I wouldn't recommend it though since it relies heavily on reflection and since the ground items stuff leak, the mem spikes up fairly quickly.

Not to mention that after some loads I am sure you will have to wait for the drops, drastically slowing down the process.
Although I wasn't there for a long time, so idk.

I've made one but the profit isn't really there. Your better off just fishing.

There's plenty of people picking up the fish. Then your gonna have to world change.
As Sabzi has said, its going to slow down the process.

From: KingKong
Yes, its a lot faster if the number of botters is high and the amount of fish dropped is a lot. I wouldn't recommend it though since it relies heavily on reflection and since the ground items stuff leak, the mem spikes up fairly quickly.

Could use RRL. It doesn't leak

From: Zyt3x
Could use RRL. It doesn't leak

Thats only going to solve one problem.

MyItem := NULL_GROUNDITEM;

Problem solved..

This is what i used (very basic, just to see profit per hour, noticed it was shit and stopped lol)

Procedure Loot;
Var
  Items : TGroundItemArray;
  I : Integer;
  ITile : TPoint;
  FishIDs : TIntegerArray;
Begin
  FishIDs := [377,359,371];
  Repeat
    Items := GetItemsNear(3);
    For I := 0 to High(Items) Do
    Begin
      If(InIntArray(FishIDs,Items[I].ID))Then
      Begin
        ITile := TileToMS(Items[I].Tile, 0);
        Mouse(ITile.X, ITile.Y, 1, 1, true);
        Wait(100+random(200));
        If(InvFull)Then Break;
      End;
    End;
    Repeat
      Wait(300+random(900));
    Until(Not IsMoving);
  Until(InvFull);
  CheckInv;
  If(Not InvFull)Then Loot;
End;   

In what world does nulling an object free it?

Solves the leaking for me.