Results 1 to 5 of 5

Thread: Requesting Assistance

  1. #1
    Join Date
    Jan 2012
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default Requesting Assistance

    Hey guys, I went through all of the pinned tutorials and a few other ones, but I'm not really learning anything. I'm just memorizing it and do not know how most of the things in a script work. I basically came here today trying to learn how to make a script because I wanted to make a really basic one for crafting coifs. So far, I know how to start the script, know a TINY bit about TPA, know how to find the color using ACA2, and that's pretty much it. I am going to go through guides and try to find out how to find objects in your inventory (I already found a guide where this was included in it, but it was difficult comprehending the matter), and how to bank. All I know about banking is that I have to set the desired banking area, which is going to be sw (Soul Wars Bank) and since I can't just make a TPA for the deposit all since I have thread in my inventory, I have to get Hue/Sat/Tolerance using ACA2. If you guys know an easier way for me to find objects in a bank/inventory please post below. In the meanwhile, I am going to look through more tutorials, if you have anything that could assist me, please post below.

    What I am working on right now:
    Banking



    Questions:
    Is my banking correct? And how do I make it deposit the coifs?

    Do I have to put another FindColorsSpiralTolerance which is at the bottom of the post for the coif's color?



    What I have so far:

    Simba Code:
    program New;
    {$DEFINE SMART}
    {$i srl/srl.simba}

    //////////////SETUP//////////////
    (*Start at Edgeville Bank
    Have leather in the first row AND column of bank in the first tab
    Have thread in the first slot of your inventory, needle in toolkit
    *)


    Procedure DeclarePlayers;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      Players[0].Name := '';
      Players[0].Pass := '';
      Players[0].Pin  := '';
      Players[0].Nick := '';
      Players[0].Active:=True;
    end;




    procedure OpenBankBooth;
    var
      x, y, Bank, Tried: integer;
    begin

      Bank := DTMFromString('m6wAAAHic42ZgYFAD4kgGCNAAYiYg9gRieyAWQKLnATELAypgA2J2IOYAYlYgZoRikDpfT2uGD2/OM1y9uJ3hxdMTYD4ybu/qBWM3DwUGEaB6OSQsgoaRxUHmM0MxE5KdMMwExayoTgUA2PATHg==');

      if (BankScreen)then
      begin
        FreeDTM(Bank);
        Exit;
      end;

      begin
        repeat
        Inc(Tried);
        Wait(150 + random(100));
        x := MSCX;
        y := MSCY;
        if FindDTMRotated(Bank, x, y, MSX1, MSY1, MSX2, MSY2, -Pi, Pi, Pi/30, aFound)then
        begin
          Mouse(x, y, 10, 10, True);
          Flag;
          Wait(1000 + random(100));
          FindNormalRandoms;
        end;
        until (BankScreen) or (PinScreen) or (Tried > 10);
      end;

      begin
        if PinScreen then
          if (Players[CurrentPlayer].Pin <> '')then
            InPin(Players[CurrentPlayer].Pin)
          else
            begin
              FreeDTM(Bank);
              Logout;
              WriteLn('No pin given');
              TerminateScript;
            end;
      end;

      FreeDTM(Bank);

    end;


    procedure Banking;
    var
      Tried, Tried2: integer;

    begin

      if not(BankScreen)then
      begin
        Exit;
      end;

      DepositAll;      //Need HELP here! How do I make it deposit the coifs in the inventory?

      repeat

        Inc(Tried);
        Wait(20);

        if (FindNormalRandoms)then
        begin
          ClickNorth(SRL_ANGLE_HIGH);
          OpenBankBooth;
        end;

      until (BankScreen) or (Tried > 15);

        begin
          repeat
            Inc(Tried2);
            if(BankScreen) then
            begin
              Withdraw(0, 0, 27);
              Wait(800 + random(50));
              FindNormalRandoms;
            end;
          until (InvCount = 28) or (Tried2 > 2);

          if(Tried2 > 2)then
          begin
            WriteLn('Failed to find leather')
            Logout;
            TerminateScript;
          end;

        end;

      end;

    end;





    Procedure CraftCoif;
    begin
    if(FindColorSpiralTolerance(x, y, raft, 538427, MIX1, MIY1, MIX2, MIY2, 5))then
      begin
        Mouse(x, y, 5, 5, true); //If found will Left-Click on the x, y coordinates with a randomness between 5 pixel
        ChooseOption('Craft');
        Repeat
        Wait(1200+random(250));
        Until not IsUpText('Craft') or InvFull
      end;
    end;

    Procedure AntiBan;
    Begin
      If(Not LoggedIn)then
      Exit;
        Case Random(8)of
          0:
            Begin;
              HoverSkill('Crafting',false)
              Wait(2453+random(432));
            End;
          1: Wait(100);
          2 : PickUpMouse;
        End;

    begin
      SetUpSRL;
      ActivateClient;
      DeclarePlayers;
      LoginPlayer;
      BankScreen;
      CraftCoif;
    end.



    Credits:

    Tickyy's Color Finding Tutorial
    EdgeGoldSmither Script for some of the banking in the script
    Last edited by SmellyPenguin; 04-01-2012 at 10:14 AM.

  2. #2
    Join Date
    Feb 2012
    Location
    Somewhere, over the rainbow...
    Posts
    2,272
    Mentioned
    3 Post(s)
    Quoted
    45 Post(s)

    Default

    There are a whole lot of functions which support banking.

    Go here:
    C:\Simba\Includes\SRL\srl\core and find the 'banking.simba' file. Open it and it will show you a list of all the functions you need in a bank.


    EDIT: Can't find DTM Editor? It's here:
    Last edited by Abu; 04-01-2012 at 09:42 AM.

  3. #3
    Join Date
    Jan 2012
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Thank you I'll take a look at that and also I can't find the DTM Editor.


  4. #4
    Join Date
    Feb 2012
    Location
    Somewhere, over the rainbow...
    Posts
    2,272
    Mentioned
    3 Post(s)
    Quoted
    45 Post(s)

    Default

    Here ya go:

    http://villavu.com/forum/showthread.php?t=25312

    EDIT: It's old and might not work - I'll find you a new link.

    EDIT2: You have to enable DTM Editor - Open Simba and go to View -> Extensions and enable dtm editor.sex
    Last edited by Abu; 04-01-2012 at 09:58 AM.

  5. #5
    Join Date
    Jan 2012
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Alright thanks, Reped you for the help. Also, could you check my banking in the OP? I got a few snippets from the EdgeGoldSmither script, is it okay if I use them as long as I give credits, and I have to update that DTM right?

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •