SRL Archive - RS3 Script Requests

Hi, i've seen this request been talked about but never seen anyone post about it, and please link me too the bot if there is one.
I'd like to request a simple prayer pot drinker, that u run at the designated place you wish too afk, (ex. bandits) and it drinks a dose of a prayer potion once the players prayer drops under x amount. and once finished try to log out, or teleport away and log out.
I have no idea on how too script i've tried looking at guide but they look really confusing.

heh, this will be easy, give me a few mins

~shut

Program new;

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

Const
  DrinkBelow= 200;  //Drink if below this ammount!


Var
  PrayerPotion, X, Y: Integer;


Function PrayerLeft:Integer;

var
  s: String;

Begin
  Result:=GetMMLevels('pray', s);
End;

begin

  SMART_Server:=35;
  SMART_Signed:=True;
  SMART_Members:=False;


  SetUpSRL;
  PrayerPotion := DTMFromString('mggAAAHicY2NgYHAGYjcgtgdiLyC2AmJfIN4FxPOAeA0QrwfibUC8FYgt9vYASSYMbMSAHTDiwBAAALgvB4E=');

  Repeat

    If (PrayerLeft < DrinkBelow) Then

    Begin
      GameTab(tab_Inv);
      If FindDTM(PrayerPotion, X, Y, MIX1, MIY1, MIX2, MIY2) Then
      Mouse(X-10, Y, 3, 3, True);
      Wait(5000);
    End;

    FindNormalRandoms; 


  Until(False);

end.

Just drinks and finds randoms, someone can add home tele to it for you.
Made a few weeks ago for another guy, should work.

Someone just realsed a bandit aid and it drinks pray pots. Beleive its under first scripts

program new;
{$i srl/srl.simba}

var
  junk: string;
  Pot: Integer;

begin
  SetupSRL;
  Pot:= DTMFromString('mggAAAHicY2NgYNgJxFuBeAMQHwbiPVCxCiBOA+JCIC6FsuOB2GJXF5BkwsAiDNgBIw4MAQBduwiG');;
  Tab:= DTMFromString('mggAAAHicY2NgYNjNzMCwFojXAfE+ID4JxQcZGRi2AvERID4GxPuBeDMQB/n5AXUxYWARBuyAEQeGAADy5QoJ');
  repeat
    if (GetMMLevels('pray', junk)<=100) then
      if FindDTM(Pot, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        Mouse(x-5, y-5, 10, 10, True);
        Wait(1000+Random(500));
      end else
        if FindDTM(Tab, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          Mouse(x-5, y-5, 10, 10, True);
          Wait(1000+Random(1000));
          Logout;
        end;
  until(false);
end.

that will drink potions when it is below 100, then if you run out of pray pots it will click a teletab and logout

~shut

From: Shuttleu

program new;
{$i srl/srl.simba}

var
  junk: string;
  Pot: Integer;

begin
  SetupSRL;
  Pot:= DTMFromString('mggAAAHicY2NgYNgJxFuBeAMQHwbiPVCxCiBOA+JCIC6FsuOB2GJXF5BkwsAiDNgBIw4MAQBduwiG');;
  Tab:= DTMFromString('mggAAAHicY2NgYNjNzMCwFojXAfE+ID4JxQcZGRi2AvERID4GxPuBeDMQB/n5AXUxYWARBuyAEQeGAADy5QoJ');
  repeat
    if (GetMMLevels('pray', junk)<=100) then
      if FindDTM(Pot, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        Mouse(x-5, y-5, 10, 10, True);
        Wait(1000+Random(500));
      end else
        if FindDTM(Tab, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          Mouse(x-5, y-5, 10, 10, True);
          Wait(1000+Random(1000));
          Logout;
        end;
  until(false);
end.

that will drink potions when it is below 100, then if you run out of pray pots it will click a teletab and logout

~shut

gave me an error.
[Error] (12:3): Unknown identifier 'Tab' at line 11
Compiling failed.

sorry, add another var after pot

so replace
Pot: Integer;
with
Pot, Tab: Integer;

~shut

program new;
{$i srl/srl.simba}

var
  junk: string;
  Pot,Tab: Integer;

begin
  SetupSRL;
  Pot:= DTMFromString('mggAAAHicY2NgYNgJxFuBeAMQHwbiPVCxCiBOA+JCIC6FsuOB2GJXF5BkwsAiDNgBIw4MAQBduwiG');;
  Tab:= DTMFromString('mggAAAHicY2NgYNjNzMCwFojXAfE+ID4JxQcZGRi2AvERID4GxPuBeDMQB/n5AXUxYWARBuyAEQeGAADy5QoJ');
  repeat
    if (GetMMLevels('pray', junk)<=100) then
      if FindDTM(Pot, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        Mouse(x-5, y-5, 10, 10, True);
        Wait(1000+Random(500));
      end else
        if FindDTM(Tab, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          Mouse(x-5, y-5, 10, 10, True);
          Wait(1000+Random(1000));
          Logout;
        end;
  until(false);
end.

Try that :P Fixed Shuttelu but he came im before :P

Fixed above to compile.
Forgot to define X,Y as integer.

program new;
{$i srl/srl.simba}

var
  junk: string;
  Pot,Tab, X, Y: Integer;

begin
  SetupSRL;
  Pot:= DTMFromString('mggAAAHicY2NgYNgJxFuBeAMQHwbiPVCxCiBOA+JCIC6FsuOB2GJXF5BkwsAiDNgBIw4MAQBduwiG');;
  Tab:= DTMFromString('mggAAAHicY2NgYNjNzMCwFojXAfE+ID4JxQcZGRi2AvERID4GxPuBeDMQB/n5AXUxYWARBuyAEQeGAADy5QoJ');
  repeat
    if (GetMMLevels('pray', junk)<=100) then
      if FindDTM(Pot, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        Mouse(x-5, y-5, 10, 10, True);
        Wait(1000+Random(500));
      end else
        if FindDTM(Tab, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          Mouse(x-5, y-5, 10, 10, True);
          Wait(1000+Random(1000));
          Logout;
        end;
  until(false);
end.

thanks so much ^ =]

ehm how's this working for you guys?

I was thinking about, maybe add superstr / super attacks? would improve xp/hr allot :p