SRL Archive - RS3 Outdated / Broken Scripts

JJ's Obelisk Pouch/Scroll Maker
This is a script that camps at the Taverley Obelisk and makes pouches and scrolls. It will sell your secondary's to the store and buy them back for the best experience per hour :)

Video to show the idea:
www.youtube.com/watch?v=ooxJGNNxUQA
[youtube]ooxJGNNxUQA[/youtube]


Currently there are two versions.
Version 1 is based on static waiting times. You can lower or raise these waiting times to your likings, depending on the speed of your computer.
Version 2 is based on variable waiting times and is therefore faster for most of the people.

Version 1:
~3300 pouches per hour after solving two random events.
http://img20.imageshack.us/img20/9773/proggy9.png

Version 2:
~4600 pouches per hour after getting a random event.
http://img10.imageshack.us/img10/6761/proggy10v2.png

Version 2 updated for Simba 991 [Progress report from Fruit/Solar]
http://img17.imageshack.us/img17/4876/proggy0.png

Version 3: tweaked by Ashaman88 [Progress report from Ashaman88]
~5500 pouches per hour without getting random events.
http://puu.sh/10RwT

Instructions:
Download the desired version below.
Place your scrolls, empty pouches, shards and charms in the bottom row of your inventory. Place your secondary's in the first inventory slot.

Walk to the Taverley summoning obelisk. Position your character here:
This also shows how your inventory should look like.
http://img820.imageshack.us/img820/9679/starthere.png

Then hit start and it will start running :D
I did add antiban but the chance of antiban happening is pretty low, you can make antiban happen more often by decreasing the number. The script also solves randoms most of the times but can get unstable afterwards. I suggest you to babysit this script as you get a random every 20 minutes or so because of the experience per hour.
http://img842.imageshack.us/img842/3451/solverandom.png

Problems?
Turn on Debug mode, it is pretty epic
http://img443.imageshack.us/img443/1668/debugea.png
And post some screenshots of what happened with debug pictures!

Enjoy. Leave some progress reports if you can.
I've personally used this script to use 31000 gold charms so it should run stable :stirthepot:

Also, thanks Momotron for helping me out with the WaitFunc to make this work a lot faster!

Updated version for Simba 991+ by Ashaman has been added as attachment (JJsSummonerV3)
Also thanks to Fruit/Solar for updating the script to Simba 991, the code can be found on post #16
Thanks both of you :)

Another version by Le Jingle has been added 28/10/2012 (SummonerV3 LJ)

451k an hour! how much does this cost to do?

Is it possible just to convert pouches into scrolls? With having them in bank or so.

From: illester
451k an hour! how much does this cost to do?

It depends on your secondary's. For me it didn't cost much more because swamp toads can be bought back out of the store for 5 gp each :) Other items might be more expensive though.

From: Adobe
Is it possible just to convert pouches into scrolls? With having them in bank or so.

No, this does not support walking. If you want you could add your own walking and delete the pouch making procedure/selling procedure/buying procedure. Just make a path to the obelisk then use the OpenObelisk/MakeScrolls procedure and walk back to the bank.

Mad dog, Definitely going to use this in about a weeks time, looks so amazing, down side is you lose a lot more when you make toad scrolls, only 10gp each!

Crazy. Expensive but stable! <3
Not sure if intended but it always oversells what can be bought?

Can I suggest that you add in the option to sell the pouches you make to the store? It's faster that way and you lose less money :) I gave it a shot but failed :p
Anyway great script thanks alot, randoms are annoying though lol.

From: Eluvies
Crazy. Expensive but stable! <3
Not sure if intended but it always oversells what can be bought?

I really don't know much about coding but this might work…
line 229

          if WaitOptionMulti(['50', 'Sell 50', 'l 5'], 1000) then

Change it to

          if WaitOptionMulti(['10', 'Sell 10', 'l 10'], 1000) then

line 244

  if WaitOptionMulti(['50', 'y 5', 'All', '500', 'Buy 50'], 1000) then

Change it to

  if WaitOptionMulti(['10', 'y 10', 'Buy 10'], 1000) then

What that does it changes the Buy/Sell to only 10
Now to make it repeat it 2 times the process for each so instead of only buying/selling 10 it would be 20 <- we would want that since we want higher xp

At the end of the script code, where you see this:

SellSecondary;
BuySecondary;

Change it to this:

SellSecondary;
SellSecondary;
BuySecondary;
BuySecondary;

I suppose this way it will sell & buy always 20 ;)
LOL I might be wrong about this, but test it out

I forgot also change line 335

        IncEx(PouchesMade, 23);

to this

        IncEx(PouchesMade, 20);

I guess that would also correct the Progress report according to this change

From: Zerkeronrs7
Can I suggest that you add in the option to sell the pouches you make to the store? It's faster that way and you lose less money :) I gave it a shot but failed :p
Anyway great script thanks alot, randoms are annoying though lol.

Not certain if this would work
Make another function.. I guess copy again the one of SellSecondary, but have it named to SellPouches & change the Mousebox

function SellPouches: Boolean;
begin
  if WaitFunc(@IsShopUp, RandomRange(50, 100), 5000) then
    begin
      if Debug then
        WriteLn('Shop screen is up');
      WriteLn('Selling pouches');
      if SellTime then
        begin
          Mousebox(612, 217, 629, 237, 0);
          if WaitOptionMulti(['50', 'Sell 50', 'l 5'], 1000) then
            Result:=True;
          Wait(WaitTime);
        end else
        begin
          Result:=True;
        end;
    end;
end;

Then at the end of the script code…

        SellSecondary;
        BuySecondary;
        CloseShop;
        if OpenObelisk then
          begin
            MakePouches;
            MakeScrolls;
            Proggy;
          end else

Change it to this

        SellPouches;
        SellSecondary;
        BuySecondary;
        CloseShop;
        if OpenObelisk then
          begin
            MakePouches;
            //MakeScrolls;
            Proggy;
          end else

This is exactly what I was looking to make. I'll post a proggy when I get around to trying it. Looks good from the screenies! Cheers.

Script gains exp too fast. I got a random in 3 minutes of runnning ugh. Nerf Plox. Aside from needing constant monitoring, the thing is pretty slick.


Ugh!!! Can't go 5 mins without a random. It's almost like doing it myself to keep the efficiency up lol. Oh well. Saves me 5 minutes of clicking at a time.

it doesn't work for me :S It just runs crazy

Im willing to test it out, I'm 96 summ, would like to get 99. But If I'm going to have to watch it why don't I just do it by hand then?

I might use this when I get members soon, have a few questions though.
1) This is insanely expensive right?
2) Do you lose any secondaries after selling them to the shop? ie. would leaving them there long enough make their count reset to zero?

Awesome script! An excellent way to get rid of the huge amount of gold charms that seemly build up..

From: Whatmatters
This is exactly what I was looking to make. I'll post a proggy when I get around to trying it. Looks good from the screenies! Cheers.

Script gains exp too fast. I got a random in 3 minutes of runnning ugh. Nerf Plox. Aside from needing constant monitoring, the thing is pretty slick.


Ugh!!! Can't go 5 mins without a random. It's almost like doing it myself to keep the efficiency up lol. Oh well. Saves me 5 minutes of clicking at a time.

Yeah the random rate is just incredibly high for summoning. I'm pretty sure it's around 1 random per 100k xp which can be achieved within minutes when using crimson/blue charns.

From: ericrootbeer
it doesn't work for me :S It just runs crazy

Doesn't really help me much on possibly fixing it.

From: chris91
Im willing to test it out, I'm 96 summ, would like to get 99. But If I'm going to have to watch it why don't I just do it by hand then?

You can just let it run while you are only solving the random events. Most of the times the random events gets solved but eventually it will fail to solve a random event so you might aswell watch it.

From: litoris
I might use this when I get members soon, have a few questions though.
1) This is insanely expensive right?
2) Do you lose any secondaries after selling them to the shop? ie. would leaving them there long enough make their count reset to zero?

1) It depends on the secondary's you are using, I personally used like 30k gold charms on my summoning tank and I made barker toads. They sell to the store for like 4 gp and you can buy them back for 8 gp so you are just losing 4 gp per secondary which isn't that much. But for other items the price difference is much higher.
2) I believe they are disappearing at an extremely low rate. Also, no-one else can buy the secondary's so yeah.. sometimes the script sells more secondary's than it should but you can just comment // out the buy procedure to quickly buy up the shops stock :P

From: iiNveRsioN
Awesome script! An excellent way to get rid of the huge amount of gold charms that seemly build up..

Thanks :)

I heard that the obelisk doesn't get detected properly anymore so I will look into that.

Updated the script and it seems to be running flawlessly except sometimes it fails to buy the secondary, although it does correct itself.
Will definitely be using this for a while since I haven't trained summoning legit in a couple of years, only with lamps.
I'll edit or repost some proggies in the future. Thanks alot J J.

Edit; proggy1

proggy2

Thanks Fruit, added to the first post aswell (PM'd code) :)

Doing some summoning and with a few edits I'm at


Will test longer when I switch to crimsons in a bit, but great script man!

Edit: Before I got randomed


Edit2: Another random :(


Edit3: Highest /hr i could get


Edit4: Let me know if you want me to take it down, feel free to take whatever you like from it!

Program JJsSummoner;
{$DEFINE SMART}
{$i srl/srl.simba}
{$i SRL/SRL/misc/debug.simba}
{$i SRL/SRL/misc/smartgraphics.simba}

Var
  PouchesToMake: Integer;

///////////////////////////////////////////////////////////////////////
//                                                                   //
//                  Begin of user setup                              //
//                Fill in the fields below                           //
//                                                                   //
///////////////////////////////////////////////////////////////////////

Procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  With Players[0] Do
  Begin
    Name          := '';         // ***RS Username***
    Pass          := '';         // ***RS Pass***
    Pin           := '';         // ***RS Pin***
    PouchesToMake := 32000;      // ***How many pouches to make?***
    BoxRewards  := ['Coins', 'oins'];
    Active := True;
  End;
End;

///////////////////////////////////////////////////////////////////////////////////////////
//                                                                                       //
//                            End of user setup                                          //
//           Don't touch below this line unless you know what you're doing!!             //
//                                                                                       //
///////////////////////////////////////////////////////////////////////////////////////////

Var
  FoundMagestix,FoundObelisk,Start: Boolean;
  B,T,PouchesMade,Selling,StartTime,
  MagestixX,MagestixY,ObeliskX,ObeliskY,
  PouchesPH,StartingExperience,XP,XPH: Integer;

Const
  ScriptVersion='2.0';

Procedure SetupLogin;
Begin
  ClearDebug;

  {$IFDEF SIMBAMAJOR980}
    SMART_SERVER := 10;
    SMART_MEMBERS := TRUE;
    SMART_SIGNED := TRUE;
    SMART_SUPERDETAIL := FALSE;
  {$ELSE}
    SRL_SIXHOURFIX := TRUE;
    SMART_FIXSPEED := TRUE;
  {$ENDIF}

  SetupSRL;

  DeclarePlayers;
  LoginPlayer;

  UseFindMod:=False;

  ToggleXPBar(True);
  StartingExperience := GetXPBarTotal;
  StartTime:=GetSystemTime;

  ClickNorth(SRL_ANGLE_HIGH);

  B:= 0;
  Start:=True;
  MarkTime(T);
End;

Function WaitPixelChange(Time:Integer;Points:TPointArray):Boolean;
Var
  T:Integer;
  ColorPoints: TPointArray;
  InitialColors: TIntegerArray;
Begin
  ColorPoints:=Points;
  InitialColors:= GetColors(ColorPoints);
  MarkTime(T);
  Repeat
    If InitialColors<>GetColors(ColorPoints) Then
      Break;
    If TimeFromMark(T) > Time Then
    Begin
      Result := False;
      Exit;
    End;
  Until(False);
  Result := True;
End;

Function WaitInvCountInc(Time:Integer):Boolean;
Var
  Inv1,Inv2,T:Integer;
Begin
  MarkTime(T);
  Inv1 := InvCount;
  Repeat
    Wait(10);
    Inv2 := InvCount;
    If TimeFromMark(T) > Time Then
    Begin
      Result := False;
      Exit;
    End;
    If InvFull Then
      Break;
  Until(Inv2 > Inv1);
  Result := True;
End;

Function WaitInvCountDec(Time:Integer):Boolean;
Var
  Inv1,Inv2,T:Integer;
Begin
  MarkTime(T);
  Inv1 := InvCount;
  Repeat
    Wait(10);
    Inv2 := InvCount;
    If TimeFromMark(T) > Time Then
    Begin
      Result := False;
      Exit;
    End;
  Until(Inv2 < Inv1);
  Result := True;
End;

Function IsShopUp: Boolean;
Begin
  ColorToleranceSpeed(1);
  Result := (CountColorTolerance(3779306, 490, 81, 501, 203, 15) > 100); // Orange scrolling bar
End;

Function IsObeliskUp: Boolean;
Begin
  ColorToleranceSpeed(1);
  Result := (CountColorTolerance(105157, 200, 37, 211, 47, 1) > 30); // Yellow X
End;

Function IsMainSpotUp: Boolean;
Begin
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.02, 1.56);
  Result := (CountColorTolerance(6529477, MSX1, MSY1, MSX2, MSY2, 11) > 2000); // Light brown of the logs
  ColorToleranceSpeed(1);
  SetColorSpeed2Modifiers(0.2, 0.2);
End;

Function SellTime: Boolean;
Begin
  Inc(B);
  Inc(Selling);
  If (B > 22) Then
  Begin
    B := 0;
    Selling := (Selling - 1);
  End;
  If (Selling = 2) Then
  Begin
    Selling := 0;
    Result := True;
  End;
  If Start Then
    Result:=True;
End;

Function TradeMagestix: Boolean;
Var
  Colors: TPointArray;
  SplitColors: Array of TPointArray;
  P: TPoint;

Begin
  If Not LoggedIn Then
    Exit;

  FindNormalRandoms;

  If Not(FoundMagestix) Then
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.17, 1.45);
    If FindColorsSpiralTolerance(MSCX, MSCY, Colors, 1546700, MSCX-30, MSCY-80, MSCX+30, MSCY, 14) Then
    Begin
      SplitTPAExWrap(Colors, 3, 3, SplitColors);
      SortATPASize(SplitColors, True);
      P := MiddleTPA(SplitColors[0]);
      MMouse(P.X+RandomRange(-4, 4), P.Y+RandomRange(20, 28), RandomRange(-5, 5), RandomRange(-5, 5));
      If WaitUpTextMulti(['alk', 'ages', 'tix'], 500) Then
      Begin
        FoundMagestix := True;
        MagestixX := P.X;
        MagestixY := P.Y+24;
        ClickMouse2(False);
        If WaitOptionMulti(['rade', 'Trade'], 500) Then
          Result:=True;
      End;
    End;
  End Else
  Begin
    MMouse(MagestixX, MagestixY, RandomRange(-2, 2), RandomRange(-2, 2));
    ClickMouse2(False);
    If WaitOptionMulti(['rade', 'Trade'], 500) Then
      Result:=True;
  End;
End;

Function SellSecondary: Boolean;
Begin
  If Not LoggedIn Then
    Exit;

  If FindNormalRandoms Then
    Exit;

  If WaitFunc(@IsShopUp, RandomRange(50, 100), 6000) Then
  Begin
    If SellTime And ExistsItem(1) Then
    Begin
      Mousebox(567, 217, 589, 237, Mouse_Right);
      If WaitOptionMulti(['50', 'Sell 50', 'l 5'], 1000) Then
        Result:=True;
      If Start Then
      Begin
        Start:=False;
        WaitPixelChange(5000,[Point(565,218),Point(572,217),Point(580,217),Point(571,220)]);
      End;
    End Else
    Begin
      Result:=True;
    End;
  End;
End;

Function BuySecondary: Boolean;
Begin
  If Not LoggedIn Then
    Exit;

  If FindNormalRandoms Then
    Exit;

  Mousebox(180, 199, 211, 218, Mouse_Right);
  If WaitOptionMulti(['50', 'y 5', 'All', '500', 'Buy 50'], 1000) Then
  Begin
    Mousebox(491, 13, 506, 27, Mouse_Move);
    WaitInvCountInc(2000);
    If PinScreen Then
    Begin
      InPin(Players[0].Pin);
      Wait(2000 + Random(2000));
      TradeMagestix;
      BuySecondary;
    End;
    Result:=True;
  End;
End;

Function CloseShop: Boolean;
Var
  X,Y: Integer;
Begin
  If Not LoggedIn Then
    Exit;

  If FindNormalRandoms Then
    Exit;

  GetMousePos(X,Y);
  If Not PointInBox(Point(X,Y),IntToBox(491,13,506,27)) Then
    Mousebox(491, 13, 506, 27, Mouse_Left) Else
    ClickMouse2(True);

  MMouse(ObeliskX, ObeliskY, RandomRange(-15, 15), RandomRange(-15, 15));
  If WaitFunc(@IsMainSpotUp, RandomRange(50, 100), 5000) Then
      Result:=True;
End;

Function OpenObelisk: Boolean;
Var
  Colors: TPointArray;
  SplitColors: Array of TPointArray;
  P: TPoint;
Begin
  If Not InvFull Then
    Exit;

  If Not LoggedIn Then
    Exit;

  FindNormalRandoms;

  If Not(FoundObelisk) Then
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.11, 0.13);
    If FindColorsSpiralTolerance(MSCX, MSCY, Colors, 9147284, MSX1, MSY1, MSX2, MSY2, 17) Then
    Begin
      SplitTPAExWrap(Colors, 5, 5, SplitColors);
      SortATPASize(SplitColors, True);
      P := MiddleTPA(SplitColors[0]);
      Repeat
        MMouse(P.X, P.Y, RandomRange(-15, 15), RandomRange(-15, 15));
        If WaitUpTextMulti(['fuse', 'ouch', 'lisk'], RandomRange(300,400)) Then
        Begin
          ObeliskX := P.X;
          ObeliskY := P.Y;
          FoundObelisk := True;
          ClickMouse2(True);
        End;
          If FindNormalRandoms Then
            Exit;
          Wait(Random(500));
      Until IsObeliskUp;
      Result:=True;
    End;
  End Else
  Begin
    If Not IsUpTextMultiCustom(['fuse', 'ouch', 'lisk']) Then
      MMouse(ObeliskX, ObeliskY, RandomRange(-15, 15), RandomRange(-15, 15));

    If WaitUpTextMulti(['fuse', 'ouch', 'lisk'], RandomRange(300,400)) Then
    Begin
      Repeat
        Wait(Random(500));
        ClickMouse2(True);
        If FindNormalRandoms Then
          Exit;
      Until IsObeliskUp;
    End;
    Result:=True;
  End;
End;

Function MakePouches: Boolean;
Begin
  If Not LoggedIn Then
    Exit;

  If FindNormalRandoms Then
    Exit;

  If WaitFunc(@OpenObelisk,RandomRange(50,100),6000) Then
  Begin
    MouseBox(51,68,76,94,Mouse_Right);
    If WaitOptionMulti(['All','Infuse-All'],1000) Then
    Begin
      WaitPixelChange(1000,[Point(709,416),Point(704,410),Point(708,401),Point(700,403)]);
      IncEx(PouchesMade,23);
      Result:=True;
    End;
  End;
End;

Function MakeScrolls: Boolean;
Begin
  If Not LoggedIn Then
    Exit;

  If FindNormalRandoms Then
    Exit;

  If WaitFunc(@OpenObelisk,RandomRange(50,100),5000) Then
  Begin
    MouseBox(110,35,155,50,Mouse_Left);
    WaitPixelChange(1000,[Point(65,100),Point(62,88),Point(82,98),Point(49,104)]);
    Mousebox(51,68,76,94,Mouse_Right);
    If WaitOptionMulti(['All','Infuse-All'],1000) Then
      Result:=True;
    WaitInvCountDec(1000);
  End;
End;

Procedure FailSafe;
Begin
  FindNormalRandoms;
  If (TimeFromMark(t) > 15000) Then
  Begin
    MarkTime(T);
    If FindChatBoxText('inventory',8,clBlack) Then
      CloseShop;
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.06,1.58);
    If CountColorTolerance(1803469,494,16,502,24,13) >= 25 Then
    Begin
      CloseShop;
    End else
    Begin
      MouseBox(479, 35, 492, 48, 1);
    End;
  end;
end;

Procedure DrawProggy;
Var
  Bmp: Integer;
Begin
  SMART_ClearCanvas;
  Bmp := BitmapFromString(53, 55, 'meJztmHlslGUex7trNpGrB1Bks4' +
        'luYnZXy7FerG1pRUVEChH/2exGE42bkKyumFUIYpQNnlmRo0JvSu+' +
        '7tLQcPabT+8aWntOZ6Zyd+z3n7kWF/T7v045dQdBllH/2zS9PhtC+' +
        '/cz3dz/Xr///uf0TEhISGXnfmjX3rV4dGR4ecbdx/ut5dONjq1ZFA' +
        'm/16jWRkWtwhoaG322o+SdmU8yTj0dHrATffWADZ1hYeHR0/Nq1v7' +
        '7baOR5KeGlRzY8SvFWrly9ZMnSN998p7dX+eCDv4PH7y7by39+ede' +
        '2Xesf3gC8iIiVy5YtP3Toc4djiudnn39+593Fc7nczY0t257a9vAf' +
        'olaEhoWFRXz++QmWnWWYabf72ltv7btbeKLLC/N6/TabY89re+7/z' +
        'f3AS0rKFsVvzGY3DOplZRX//HgUbGp6luUEmM8/XVZydm3k2pMnM9' +
        '3u6yaTa2LCqddzDDPZ1TUUEvKLnxkM5vb4Od7JCy7R6cFng9FSXl7' +
        'DcbNWqxdsOh1rNArAGx3V/5zqAezq3HVQMZwoiB7R6WVY0cEIZrPT' +
        'bp+0WLxms8tkcsIcDr/Az/zUbCHSc31BN8HpsTE8J7g53oWTFz1gM' +
        'xg4kwnB5tHrBZ2OMxgEaCiKc++/f3jF8hV3/tdv8QS8CfP4pnE6gM' +
        'e7WN4JAV1uv93uMRhEnY7XalnKZrF4OG7mvff+heqHEn0nSKqmIpi' +
        '+vez7rLFB5vJMspwIP07NzDndPlDZ7JzNwQHSbvcajYg0zmgUkRHI' +
        'Vrvdz7LTBw4cWrp0WUTEKpTo/4GNUi02bVtpwCiYtrVE317usJgci' +
        'C5WAJ7bOwn1JDzWYmPMFhFsExMumqpgQykWhKtgW7KEsIWHr/pRsf' +
        'fM5j9dyDrSf/HMQE321xcyYZ2Vaf2XsiihQl4wVJeL/xquyx1tyB+' +
        'V5Q3X55oNOuBBPRByyFOXFwlrtTETJgHxZrG4oRvYEGzQDXj79n1A' +
        'dVu2POztv/31YtaRH0i4JWbThTNf9FSld1WmdVak9lZl9FRndFamj' +
        'sjyxhoLwYMPIFQQMHzOVzYWqpoKLUa9g3MyrABv4nS6vIg6m82DPA' +
        'WSxCYi2ACGqrJ//4eIt/DwlStCw9/d8wpeVZn22Q/B2xT1JL5IY9F' +
        'XbeXJFO/r85kdFamQbkxeQNlgVEOIhlPVVCAvSjbojYg3QXSDDRpC' +
        'QJadAgxciSzACQ1hgjB38OBH0C0sfOXyFeEH3ngVL+mpTi9N/vi2e' +
        'GCDbvLCxJqcL1tKk7rPpXWfSwdhd2WaooGwDdfnAXKwNufKpSx4nP' +
        'BXphx+a09+VqHg8gPP65+mkCazCCqY1Bd4KfAQctMHDx4mbGERcOt' +
        '7b746UJsNv7SUnipP/WQx3k2LQ8LWhIbCRFn+iZqco80lJ8HWU5UB' +
        'BvAo5BQvV91UBCVlBSfkRYnnM794ffdLe175Oyd4nG4/aay+KbAZj' +
        'aR6wKcsO2M2ewGJQocP+/eTPA0NC0cZ+eqjdxAVvdWn28+mNJeeai' +
        'tPonjzJM8lfMdefOFF4MEuZX/ZWJSI3wKYpE/qUG0O2EA4RpIiR16' +
        'Q2FScGPhSg4MKiMZyTl50IR20WjvY0KoQYwwzMzHhhlks/nffJbmw' +
        'fEUYxuOjH+7FC8F2ufo0wOAgindTsF3P79q5bSeM4sHq8493BTx7L' +
        'g1JCudSt0I0eeGJxZpPzVx1sDzLi4g6vZ4ZH3dAK3gTcsEAZrNNge' +
        '3ee5feu2T5bx944OiHbyM2OqUvjrxrkaT7Dh7GQhil2rF1B4WEgLu' +
        '276KETcUne6szAIkUBh4cQX1alvzpYjavfwr9Cw0C6WAyw6c8+oJe' +
        'L4JQo+FNJh/LzsGnv7znV8iF3S88U3X634M12fjWCBtAwjuULRByu' +
        '1/YTQCeS6BsRLrndu54dsf2Ldu3x2/ftnnbU49voYQSXjo0vFKTDe' +
        'n6Lp5BOlRnfJl0+GDGpx+c+eKwakzlnZyBWwXRywt+o9GF8qvVcsD' +
        'TaHC6bLbpf77zQUjIPX9c91DSJ/uu1GQBSQrpdHgWBtcE2CgeeMC2' +
        '45kdW2O2Pr3p6S2PbYl/JH7zhs2x62Nj1sXErItF/lLDF8Sr8AUl5' +
        '+bDv6gn4y3Fuo5SbWuhfawDo5ydcdpZp4NxGoxAEtRqxmBAa4BbfQ' +
        '7H1Tf+cSA0NPTt1//SWpbUf+kMrVTdVelwa3PJKdhi6ShewrMJoIr' +
        'dEBsTFUN4omJi18VStrj1m6OjYigbXoVvB+fiA9KB1GGp0NGiNybP' +
        't07oeNFrtvJWm2CzYXjzQS6dDuXXyzBzJvP03r3vPxv7REnSxwOSY' +
        'h1nU2BtZcmNxV8hSFAZvsNG8eI2xkVHRUeviyZnVDSo8Dl2XUxANG' +
        'qIWDj38nmS+IO1xLkjUvOChgpZ7nivjBM9DOe0OZwTZoQZksKt0Yg' +
        '6vddsmdEbJ48dSTy097XL1Rl9FzOhGKkeJacaChLr8o6jrhLOG9go' +
        'nuRBYlSxzetj4zbEbfj944FoR4Ch29KSgsTvqEiZdy4KS2MBcmRMl' +
        'mvSKAS3H3hWm1OpdCjHOKWKV6t45bBWNaxtqKqsPv0ZwPASqAStYO' +
        'hE9XnHKdVN2She/MZ4GJDiN8bFbYx/5KEnApNk4Gfq808sNIVUEnu' +
        '12XQYgIDq5uKR+hx11yVUOZZ3mcxOtZrX6jyjw8b288XyguMoic3F' +
        'iV2VqRCt42xqbe5RFNK63GPgbC9PuQXb9/WLG3+ATilotbQyw6cYn' +
        '2j4EfXQQeqzDSPdDt5vNPmMEz5F/3BbRUZjwbGWklOICikF0sAGQl' +
        'nBcVn+8YA3bwH2wx9KSBMf/kVqQDcyO0kjAU6kBoJQ3delG1UOdTR' +
        '1lCe3lychuhBjsE5SzZKJehIeGiUFA+Sds32LV5XaeTa5uyKl70IG' +
        'BjwIiIYLJQekHjfakDdSlz1SlzVwKZMUDanF0B4tJWmqVHKT0YDgW' +
        'Zq2QWGjeBUlhRatYnywRzvUO9pZN3DxNLKDlJTGgpH6PKohnUsho7' +
        'KpCP+kaY5snW/WFRhFkuryjkFAsP2oefi2eDYH7/HP8E6v6J5kWK9' +
        '64AqmqaHaLDKLSl7GLIoPwFM2kWgEat+FM62lSX0XMrulXgNCdEbg' +
        'NUiVJLh407Nzdoa3k0XGiU3QZPFpx/TKtqoxWQ6dS+dtYTQFJ5CQm' +
        '4AEGMVDmqCYADKIePQ9Ht8kwDCQk0WVFBBhAklq4PX9HaOyXEQggZ' +
        'TGe5iEl4PAg3P7FmomCNHLEHuQNLh4c99cI8sCJwIPm5fo9GAaQaM' +
        'n/dTkU/X3jtSTQj0/1UsyojZCN8QbOZEdFSkUD22C5kVQ8OhLMPTO' +
        'LzUc8Dx2xg02jHCYRkxm//jQCOoedS5ZjmTzBWdAmpTobtIp1UyIW' +
        'U+KXnIQ8TC8YSxH4GEl5EWP3eHSaDmMIpJ6osU6perrUciyF1dCur' +
        'vRIfPr86cBQ4tez7l04GEMCAoe3nDkyFHs+GDDEs2TGxIfkPQ6kd4' +
        '/kI3G7FN2NylkOdJ4kE/nBDpOK+T5tPRJPYIseig1KHrBij28YVSh' +
        'wqqFCRNRB92wJmAgx65qNpMbEnKBY/ErO2pH63OoYkhYKqOhoxz9D' +
        'lQkf8+mtJYlo7ADVdqqTgULb3JqlhfdwHMwWLhcBgPWQMFq9QEPkz' +
        'BObKxjbVWYCmhGDNaRDqJpLTH3nAMnxaPqkbuFijSMBMEqLKTczXy' +
        'DDdps4Y1kl5m/U8K5cEniMegYRVOZomH+omBEygttW5m+oxyzOom3' +
        'qnQae8gRyBgsPPw6VlSXx2+xkrV04bILSeHQaFiwETN5NEqjQj7fJ' +
        'mjFA6S+vQyDFslcqdzRzR3TLKo08DDpBQVv5uo1xBvLztpsk4CBYg' +
        'DT6TicFgu5ATNOuMdHxiCdUqrGMKyWSmkBQWogRwKrMU5apYF353W' +
        'PjCj9gwyL0PKK4jXp7tcv3YoQ/0rXmFgleMOEWzM0rJTnoc+ONxfT' +
        'rRy60Q0dXl7AS6N48HVgXLlDPJbzorLpdCDxWywkF6CYzeaXTp+0V' +
        'rvNVr92sE8lz4NcSAeas2gcqMwqMmvl0eVOupxJozmCkSBIeLN0fQ' +
        'aJtESzUgQKNOqgJMNMWYDX36FuzEciBKjolkRvYFDoEHKUUBr8UoO' +
        'FhxMwDse0hEeSAqlhNIoQDeGH02r1msweTU/DeFOBrr2ctozxlhK6' +
        'Ziql7gY8GM0O6eYkGT23gdzJnLzz1MDjcl2nhgSBWxFy81FnEKRrY' +
        'ed450V1UwHJBTmZQkF1pSYbuqnmJ9LMy9Xf4mGgIniFidiDgtVzF0' +
        'PCoJtWyxiN5ArRYhZUrRXq5kK1lBfzkx5283qSyxha4Fni3Co62Kf' +
        'TaRnqYXQJ7jh6IydMZD3GrkpDR5kOe0czKSYoxehrUpEhlzB0c6fr' +
        'Rh+5kU6FW1tKkqBnEPFu5Lzx0baW6trLIKC6uUjTWgpClGUohmYBQ' +
        'gTkrdfVn/oJ/F0UEySypqVE01KMKn23eG763Hap/1HPfwCWogq+');
  SetTransparentColor(Bmp,clWhite);
  FastReplaceColor(Bmp,clWhite,0);
  SMART_DrawBitmap(False,Bmp,Point(31, 218));
  FreeBitmap(Bmp);
End;

Procedure ProgressReport;
Var
  Sec: Integer;
Begin
  ClearDebug;

  XP := (GetXPBarTotal - StartingExperience);
  XPH := Round(XP * (3600.0 / (GetTimeRunning / 1000.0)));
  PouchesPH := Round((PouchesMade * (3600.0 / (GetTimeRunning / 1000.0))));
  Sec := (1+((GetSystemTime-StartTime)/1000));

  SMART_ClearCanvasArea(IntToBox(0, 324, 350, 388));
  SMART_DrawText(5, 247, UpCharsEx, 'JJ''s          v'+ScriptVersion, RGBToColor(100, 190, 225));
  SMART_DrawText(5, 275, UpCharsEx, 'Running for: '+TimeRunning+'', ClWhite);
  SMART_DrawText(5, 290, UpCharsEx, 'Pouches made: '+IntToStr(PouchesMade)+' at '+ToStr(PouchesPH)+' per hour', ClWhite);
  SMART_DrawText(5, 305, UpCharsEx, 'Scrolls made: '+IntToStr(10*(PouchesMade))+' at '+IntToStr(((PouchesMade*36000)/Sec))+' per hour', ClWhite);
  SMART_DrawText(5, 320, UpCharsEx, ''+ToStr(XP)+' Summoning xp gained at '+ToStr((XPH))+' per hour', ClWhite);

  Writeln('=========JJs Summoner=========');
  Writeln('=========Version: '+ScriptVersion+'=========');
  Writeln('Time Running: ' + TimeRunning);
  Writeln('Pouches Made: ' + IntToStr(PouchesMade));
  Writeln('Experience Earned: ' + IntToStr(XP));
  Writeln('Experience/Hour: ' + IntToStr(XPH));
  Writeln('Pouches/H: ' + IntToStr(PouchesPH));
  Writeln('===============================');
End;

Begin
  SetUpLogin;

  DrawProggy;
  Repeat
    If TradeMagestix Then
    Begin
      SellSecondary;
      BuySecondary;
      CloseShop;
      MakePouches;
      MakeScrolls;
      ProgressReport;
    End Else
      FailSafe;

    If Not LoggedIn Then
      LoginPlayer;
  Until (AllPlayersInactive) Or (PouchesMade >= PouchesToMake);
End.

No problem with the code at all, I'll add it to the first post aswell :D
Unfortunately the random event rate is incredibly high so you can't get long proggies unless you are using gold charms like me. And even then it was a random once in 20-30 minutes :P

From: J J
No problem with the code at all, I'll add it to the first post aswell :D
Unfortunately the random event rate is incredibly high so you can't get long proggies unless you are using gold charms like me. And even then it was a random once in 20-30 minutes :P

Yeah it is pretty funny how fast you get randoms with this method, but insane xp rates! Thanks again!

[Error] C:\Simba\Scripts\SummonerV2.simba(31:3): Unknown identifier 'Smart_Server' at line 30
Compiling failed.

Help Please..

From: Smithsservice
[Error] C:\Simba\Scripts\SummonerV2.simba(31:3): Unknown identifier 'Smart_Server' at line 30
Compiling failed.

Help Please..

Ah jj forgot to upload the version I posted. Just copy the version I posted a couple posts up!

From: Smithsservice
[Error] C:\Simba\Scripts\SummonerV2.simba(31:3): Unknown identifier 'Smart_Server' at line 30
Compiling failed.

Help Please..

So many threads and post about this please use the search function on the forums.

From: J J
Updated version for Simba 991+ by Ashaman has been added as attachment (JJsSummonerV3)
Also thanks to Fruit/Solar for updating the script to Simba 991, the code can be found on post #16
Thanks both of you :)

At the bottom of the first post.

Yeah I didn't upload the script properly for some reason :S I must have forgotten to click update topic because I did update the OP.

Will try this soon :)

just some progs and screenies. thank you so much JJ you're script is a beast.

Thanks for the progress reports. Now that random events have been removed I'm hoping for longer proggy's :garfield: As you would normally get a random event every 10-15 minutes.

Yep gonna run it to 99 on bxp :) Will get insane rates

Going to use this for the BXP weekend, 99 Summoning here I come!

<3 got 99 in no time

=========JJs Summoner=========
=========Version: 3.0=========
Time Running: 20 Minutes and 5 Seconds
Pouches Made: 1702
Experience Earned: 1487579
Experience/Hour: 4443191
Pouches/H: 5084
===============================

did about 4k crim charms, so close to 99 but so far away. Proggy was all whacked :S

It kept on selling too many items, so i lost quiet a lot, but i suppose it was just lag from heaps of people being there.

From: Ashaman88
<3 got 99 in no time

holy sh*t :o

From: stuartroad
did about 4k crim charms, so close to 99 but so far away. Proggy was all whacked :S

It kept on selling too many items, so i lost quiet a lot, but i suppose it was just lag from heaps of people being there.

Make sure you are using the latest version. It should perform well even when lagging because the waits are based on WaitFuncs. But even then it might mess up due to lag: waitfunc returns true because the color count is correct -> moves the mouse to the pouch or wherever it should move -> due to lag the pouch has not been loaded yet -> failsafe active.

Anyways, good to see this is being used now :) And congratulations on 99 Ashaman :f:

Could you please help me change it so it buys the correct ingredient? I have already made other pouches so the swamp toads (what i'm using) are further to the right in the shop. Eg. It buys swamp titan pouches instead of swamp toads. I think it's something to do with the co-ordinates near line 257?

EDIT: Don't worry :)

AMAZING SCRIPT!! SO FREAKING FAST!!

=========JJs Summoner=========
=========Version: 2.0=========
Time Running: 2 Minutes and 29 Seconds
Pouches Made: 138
Experience Earned: 84952
Experience/Hour: 2047228
Pouches/H: 3326
===============================

was getting 2mil xp an hour and I was only doing pheonix (familiar) very nice but.. it loses some materials. So you will have to get extra. Out of 1,000 pheonix quils I lost around 80. So just be wary of that.

Can hardly use this, the lag is bad and the script is to fast :(

is this a huge money loss? or since it makes it into scrolls not that much?

From: John404
is this a huge money loss? or since it makes it into scrolls not that much?

its barely any extra loss to the normal methods. I was doing spirit spider pouches and it meant i had to pay about 15gp more per pouch todo this method (more than worth it!)

For some reason the script just walks here and does nothing


my inventory and starting place is exactly how it's shown in the picture

why does it do this?

From: John404
For some reason the script just walks here and does nothing


my inventory and starting place is exactly how it's shown in the picture

why does it do this?

You are using JJsSummonerV3.simba from the first post? It is never searching in the minimap area so I have no idea why it even clicks there. You are on fixed mode + minimum graphics + safe mode? You could try using another version if you are using version #3 already.

Also for the other people, you can slow it down by putting static waits where the WaitFunc stuff is now :P

The wait func should be fine, just may need to increase the total time to wait for each action.

From: J J
You are using JJsSummonerV3.simba from the first post? It is never searching in the minimap area so I have no idea why it even clicks there. You are on fixed mode + minimum graphics + safe mode? You could try using another version if you are using version #3 already.

Also for the other people, you can slow it down by putting static waits where the WaitFunc stuff is now :P

my bad, I forgot to update SRL :P thanks
i'll post proggies / problems soon if i have any

sometimes the script doesn't do anything right after it makes the pouch, i noticed it stopped after it makes the pouches sometimes (one in 5-8 chance?) so i disabled smart and opened up the summoning interface then it continued, what do i have to change in the script to fix this? i think it's timing, but i don't know

i found a bug, when it trades magestix 1/10-20 times it will misclick and walk instead of clicking on magestix, i think it's because the method you used to randomly click in the range sometimes clicks outside of magestix? u should have it click on north on the compass then have the bot run based on that imo

From: John404
sometimes the script doesn't do anything right after it makes the pouch, i noticed it stopped after it makes the pouches sometimes (one in 5-8 chance?) so i disabled smart and opened up the summoning interface then it continued, what do i have to change in the script to fix this? i think it's timing, but i don't know

From: John404
i found a bug, when it trades magestix 1/10-20 times it will misclick and walk instead of clicking on magestix, i think it's because the method you used to randomly click in the range sometimes clicks outside of magestix? u should have it click on north on the compass then have the bot run based on that imo

Well all scripts here run on north angle :P ClickNorth(SRL_ANGLE_HIGH) can do it for you though. I've added a new version made/modified by Le Jingle :)

From: J J
Well all scripts here run on north angle :P ClickNorth(SRL_ANGLE_HIGH) can do it for you though. I've added a new version made/modified by Le Jingle :)

Thanks to yourself and Ashaman88 for allowing me to toy with V3 :)
(I edited V3 to work with slower computers/lag. Same setup as previous versions!!)

Also, to example how amazing J J's/Ashaman88's/my edit (confusing to say 3 people) of J J's Obelisk Pouch/Scroll Maker:

=========JJs Summoner=========
=========Version: 3.0b=========
Time Running: 5 Hours, 24 Minutes and 10 Seconds
Pouches Made: 20010
Experience Earned: 4256427
Experience/Hour: 787804
Pouches/H: 3704
===============================

Edit:
1 to 99 in a weekend, on side acc, foremost accredited to this script (for the mid-later levels) :)

Cheers :)))

Hey bro, are you going to update this to be compatible with EoC? You definitely should, this is an amazing script!

From: Le Jingle
Thanks to yourself and Ashaman88 for allowing me to toy with V3 :)
(I edited V3 to work with slower computers/lag. Same setup as previous versions!!)

Also, to example how amazing J J's/Ashaman88's/my edit (confusing to say 3 people) of J J's Obelisk Pouch/Scroll Maker:

=========JJs Summoner=========
=========Version: 3.0b=========
Time Running: 5 Hours, 24 Minutes and 10 Seconds
Pouches Made: 20010
Experience Earned: 4256427
Experience/Hour: 787804
Pouches/H: 3704
===============================

Edit:
1 to 99 in a weekend, on side acc, foremost accredited to this script (for the mid-later levels) :)

Cheers :)))

Late response, but congratz man. This script has been improved by multiple people and it's pretty epic indeed!

From: boris
Hey bro, are you going to update this to be compatible with EoC? You definitely should, this is an amazing script!

Does it need updating? I plan to make my "main" account member again for the christmas holiday. It used to be a staker so it was 1 prayer/1 summoning and now with the EOC it is 43 prayer/2 summoning. So I need to get some work done and get 70 prayer and piety/rigour/augury. Then I'll bot waterfiends for charms and use this script & update it where needed.

From: J J
Late response, but congratz man. This script has been improved by multiple people and it's pretty epic indeed!


Does it need updating? I plan to make my "main" account member again for the christmas holiday. It used to be a staker so it was 1 prayer/1 summoning and now with the EOC it is 43 prayer/2 summoning. So I need to get some work done and get 70 prayer and piety/rigour/augury. Then I'll bot waterfiends for charms and use this script & update it where needed.

After EoC there is a window that pops up when you do something. You just have to click ok everytime you do a load of pouches.

Hey guys, I noticed that no one is fixing summoning, so I decided to take a peek at this script stuff, I have made a very easy non complicated script for summoning.

Now the thing is I do not know whether I can post it anywhere in this site or here

Can I post it?

P.S.

currently testing it, and so far its good

From: cool4 ltr
Hey guys, I noticed that no one is fixing summoning, so I decided to take a peek at this script stuff, I have made a very easy non complicated script for summoning.

Now the thing is I do not know whether I can post it anywhere in this site or here

Can I post it?

P.S.

currently testing it, and so far its good

post it in the first scripts section, let some people use it and if it is good/not many flaws a mod can move it for you. I'd test it out but I'm already 99 summoning and have no intentions of blowing extra gp on that skill :p best of luck to you!

From: idodew
post it in the first scripts section, let some people use it and if it is good/not many flaws a mod can move it for you. I'd test it out but I'm already 99 summoning and have no intentions of blowing extra gp on that skill :p best of luck to you!

thx a lot for quick response =D, and will do =]

Does the script still work?

It would if it were updated for the crafting interface.

anybody feel like updating this script? would really be appreciated. I would if i knew how.


EDIT: i am going to try to incorporate some of ashamans functions on the new craftin interface into this script and see if i can get it working again.

moved to outdated. pm when/if this is updated (I will probably do so if/when I go for 200m summ xp). thanks and gig 'em.