SRL Archive - RS3 Script Requests

I'd like to request what seems like a fairly simple yet effective money making script.

Emerald rings enchanted to rings of duelling = nice profit.

Anyone interested?

how much profit exactly? :)

I can try to help you out :)

EDIT: Sorry for the Double Post :/

Done.

So have Cosmics and Air Runes in the first two spots of your inventory (or have an air battlestaff and change the i := 3, in the Procedure Enchanting this line "for i := 3 to 28 do" to for i := 2 to do 28

Go to Soul Wars and have the Emerald rings in your bank, it's better if you don't have any other rings as tab headers or in that tab (it might work even better if you make a Dueling ring yourself, put it in another tab so the script doesn't get confused), start it up, and off you go!

program Enchanter;
{$DEFINE SMART}
{$i SRL\SRL.simba}
var
  t, r, q, m, ring, x, y, spell: integer;
  Clock: TIntegerArray;



const
  Loads = 2500;             //How many Enchanting Cycles you wish to complete
  AntibanFrequency = 25;  //Set this to 10-30. The lower the number, the more frequent antiban will be.

procedure DeclarePlayers;
begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  Players[0].Name := '';
  Players[0].Pass := '';
  Players[0].Nick := '';
  Players[0].Member := True;
  Players[0].Active := True;
  Players[0].Pin := '';
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins', 'aphire', 'ssence'];

end;
 Procedure Bank;
 begin
 Ring := DTMFromString('mlwAAAHicY2dgYIgD4nQgTgLiTCCOAOJIII4F4rlAPAeI5wPxNCCeDsSTgXgCEB9aLg0kmbBiDgbcgBEPhgIAs8MIbQ==');
    OpenBankChestEdge(SRL_BANK_SW);
      repeat
        wait(randomrange(49,51));
      until(BankScreen);
      Mouse(655, 224, 3, 3, false);
      ChooseOption('All');
      FindDTM(Ring, x, y, MSX1, MSY1, MSX2, MSY2);
      Mouse(x,y, 2, 2, False);
      Wait(randomrange(1200, 1600));
      ChooseOption('aw-A');
      CloseWindow;


 FreeDTM(Ring);

 end;
 Procedure Enchant;
   var
  i : Integer;
 begin
 Spell := DTMFromString('m6wAAAHic42ZgYMhmYmAoBuJSKAax85gg4hlAnAbEmVAxXUYGBiMg1gNiLSBWB2JVKAaxQfLGQGwCxDKbmBik+ViIwlwMxANGEjASAACR+wlw');
 Gametab(Tab_Magic);
 Wait(randomrange(300,400));

  Wait(randomrange(200,300));
  for i := 3 to 28 do
  begin
  FindDTM(spell, x, y, MIX1, MIY1, MIX2, MIY2);
  Mouse(x,y, 2, 2, true);
    wait(randomrange(400,600));
    InvMouse(i, 1);
   Gametab(Tab_Magic);
  end;
end;


    Begin
    smart_server := 91;
    smart_members := false;
    smart_signed :=true;
    smart_superdetail := false;
    SetupSRL;
    DeclarePlayers;
    LoginPlayer;
    t:= 0
    begin
      repeat
       Bank;
       Enchant;
      until(t=Loads);
    end;
    end.            

At the moment profit should be 500k+/hour.

Did you add any anti bans to that script? i'll send you a pm soon.

:( I was hoping this would not be suggested here as this will almost immediately cause prices to crash if it is over leached.
I advise not posting in the runescape scripts section if you want to avoid this :)

There is not antiban used in that scripts, simply adding

Procedure Antiban;                   
begin
  if(not(LoggedIn))then
  Exit;
  FindNormalRandoms;
  Case Random(AntibanFrequencey) Of
    0:
      begin
        Writeln('Antiban');
        GameTab(tab_Stats) HoverSkill('Magic', False);
        Wait(400 + Random(450));
        GameTab(tab_Inv);
      end;
    1:
      begin
        Writeln('Antiban');
        GameTab(tab_Inv);
        ExamineInv;
      end;
    2:
      begin
        Writeln('Antiban');
        SleepAndMoveMouse(3500 + Random(600));
      end;
    3:
      begin
        Writeln('Antiban');
        GameTab(Tab_Stats);
        Wait(3000 + Random(1500));
        GameTab(tab_Inv);
      end;
    4:
      begin
        Writeln('Antiban');
        HoverSkill('random', False);
        Wait(1000 + Random(500));
        GameTab(tab_Inv);
      end;
    5:
      begin
        Writeln('Antiban');
        PickUpMouse;
      end;
    6:
      begin
        Writeln('Antiban');
        BoredHuman;
      end;
    end;
end;

and throwing the antiban procedure inside the other two would be effective enough.

~Caotom

~Caotom

I don't really know how to add that to the script, do you just copy & paste that below the original code?

No I wont, as that would make the script far more leech friendly. My advice is to go to the beginners tutorials section and learn the basic structure and working of simba (pascal) so you can work with scripts and maybe even create your own :)

If your looking where to start try
Coh3n's beginner scripting tutorial
or
YoHoJo's video tutorials

~Caotom

nevermind, i'm not going to risk screwing up my acc when i don't know what i am doing.

From: SlyPig
nevermind, i'm not going to risk screwing up my acc when i don't know what i am doing.

there are so many wonderful tutorials that are easy and simple to follow, and hence preventing u from screwing ur acct by just leeching off completed scripts.

If u r afraid of "screwing ur acc" u shdnt even be here as macroing poses a significant threat to ur acct, especially more so if u just use a completed script since another thousand leechers will be doing the same thing as you, and despite randomness and antibans its can still be pretty obvious that these thousand ppl are using the same bot with the same script.

If u dont wish to learn to script a full script (which i dont see any reason not to), at least learn the basics so that u can tweak the scripts (adding ur own UNIQUE antibans, diff random wait etc–which will make u stand out from the thousand other leechers) and self fix any rs updates that affect the script.