Results 1 to 14 of 14

Thread: Could anyone make a script Opening hunter kits

  1. #1
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Could anyone make a script Opening hunter kits

    Anyone be able to make a hunter kit opener as its great money as they are 2gp ea and the traps sell for 300 ea... Would be cool if someone could

  2. #2
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    Ill Have a play I got some time
    Mat



    ^^

  3. #3
    Join Date
    Nov 2011
    Location
    Maryland
    Posts
    72
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    The kits will not be able to be bought for 2gp each and the traps won't sell for 300gp each. Just a heads up.

  4. #4
    Join Date
    May 2007
    Location
    Waterloo, Ontario, Canada
    Posts
    1,008
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by KarlPk View Post
    Anyone be able to make a hunter kit opener as its great money as they are 2gp ea and the traps sell for 300 ea... Would be cool if someone could
    This would just mean the traps would drop drastically within a day. How many people do you think buy traps out of the legit players who hunt? Not many.



  5. #5
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Think is they will sell for 300 gp + as mine are selling for more than 300 So yeah and people can only buy 100 per 4 hours ... So they won't go down to quick

  6. #6
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    I've almost made it lol... Prob not relasing tho as Prices will Crash really Quickly but hay
    Mat



    ^^

  7. #7
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    Made it lol



    ^^

  8. #8
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Sweet Thankyou!

  9. #9
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Could i ask where you have put it? Send a link please

  10. #10
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    Its pritty Pointless isn't it as 100 per four hour by limit?
    I've got it on My Pc.
    Mat



    ^^

  11. #11
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Could you put it on please or send me it via msn? And ive already bought 1.6k hunter kits

  12. #12
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    There
    Simba Code:
    program HunterKitOpener;
    {$DEFINE SMART}
    {$i srl/srl.Simba}
    Var
      KitBox,X,Y:Integer;
    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1; // Number of Players to use
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0; // Player to start with, first one is 0
      Players[0].Name := ''; // Username
      Players[0].Pass := '' // Password
      Players[0].Active := True; // True if you are using this player
      Players[0].Pin := ''; // Bank Pin. Leave it if you don't have one.
      Players[0].Integers[1] := 10000; // Number of loads
    end;
    Procedure Banking;
    Var
      BankRun:Integer;
    Begin
      If FindNormalRandoms then
      Begin
        Logout;
        TerminateScript;
      End else
      KitBox := DTMFromString('m1gAAAHic42JgYHBmgmBXIDYDYgsg9gFiPyi2goo/B6q9AcSfgfgBEN8C4ptA/BCI3wLxRyB+B8SetppAkokglmQgDjASiREAAL2aDIY=');
      If Not BankScreen then
      OpenBank('VWB',True,True);
      Wait(1200+random(100));
      If PinScreen then
        InPin(Players[CurrentPlayer].Pin);
      Wait(500+random(100));
      if BankScreen then
      Begin
        DepositAll;
        If FindDTM(KitBox,X,Y,MBX1,MBY1,MBX2,MBY2)Then
        Begin
          MMouse(X,y,5,5);
          Repeat
            Inc(BankRun);
            Wait(100+Random(50));
            ClickMouse2(True);
          Until(BankRun = 4);
          FreeDTM(KitBox);
          BankRun := 0;
        End else
        Begin
          Writeln('Out of Traps');
          TerminateScript;
        end;
        CloseBank;
      end;
    end;
    Procedure OpeningKits;
    Var
      OpenRun:Integer;
    Begin
      KitBox := DTMFromString('m1gAAAHic42JgYOBlgAAWIJaAYjEgZoKK80PV8EPFJYFYFIg5gZgRqo4DiKWh6j1tNaGi+DE/A3GAkUiMAAAWcAHc');
      Repeat
        Inc(OpenRun);
        If FindDTM(KitBox,X,Y,MIX1,MIY1,MIX2,MIY2)Then
        Begin
          MMouse(X,y,5,5);
          Wait(150+Random(50));
          If IsUpText('unter') then
          Begin
            ClickMouse2(True);
            Wait(3000+Random(50));
          end;
        End;
      Until(OpenRun = 4);
      FreeDTM(KitBox);
      OpenRun := 0;
    End;
    begin
      smart_server := 16;
      smart_members := false;
      smart_signed := true;
      smart_superDetail := false;
      SetupSRL;
      DeclarePlayers;
      LoginPlayer;
      ClickNorth(SRL_ANGLE_HIGH);
      Repeat
        Banking;
        OpeningKits;
      Until(Not LoggedIn);
    end.
    Mat
    Last edited by Mat; 01-21-2012 at 09:18 PM.



    ^^

  13. #13
    Join Date
    Dec 2011
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hey man theres a little error with the bot hes only opening 2 off the boxes and banking otherwise its working great sometimes it opens all but sometimes only a few Depends
    Last edited by KarlPk; 01-21-2012 at 08:37 PM.

  14. #14
    Join Date
    Nov 2011
    Posts
    1,589
    Mentioned
    9 Post(s)
    Quoted
    17 Post(s)

    Default

    Changed it.
    Mat



    ^^

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
  •