Results 1 to 18 of 18

Thread: S1NHumidify [27k+ XP/h | 200K+ GP/h]

  1. #1
    Join Date
    Dec 2011
    Location
    Toronto, Ontario
    Posts
    6,424
    Mentioned
    84 Post(s)
    Quoted
    863 Post(s)

    Default S1NHumidify [27k+ XP/h | 200K+ GP/h]

    Thought this was good money when I saw the method but it turns out it isn't.

    Progress Report:
    ==========S1NHumidify=============
    Time Running: 6 Minutes and 4 Seconds
    XP Earned: 2860
    XP/h: 28285
    Profit: 19448
    Profit/H: 192342
    ===================================


    Well, have ALOT of vials in your bank and fill out these Constants:

    Simba Code:
    bSlot = 5; //Which Bankslot has your empty vials?
      vialPrice = 3;  //Whats the Vial price?
      voWPrice = 22;  //Whats the Vial of Water Price?
      astralPrice = 149; //Whats the Astral rune Price?

    Have your spellbook like this:



    Astrals in any slot, preferably the first one.
    Start it at Soul Wars bank.
    You need to have a Steam Staff equipped by the way.

    I think that's it?

  2. #2
    Join Date
    Jan 2012
    Posts
    915
    Mentioned
    13 Post(s)
    Quoted
    87 Post(s)

  3. #3
    Join Date
    Feb 2012
    Location
    Wonderland
    Posts
    1,988
    Mentioned
    41 Post(s)
    Quoted
    272 Post(s)

    Default

    You can make more gp/hr via humidifying clay

  4. #4
    Join Date
    Dec 2011
    Location
    Toronto, Ontario
    Posts
    6,424
    Mentioned
    84 Post(s)
    Quoted
    863 Post(s)

    Default

    Quote Originally Posted by Le Jingle View Post
    You can make more gp/hr via humidifying clay
    They don't buy

  5. #5
    Join Date
    Dec 2011
    Location
    New York, USA
    Posts
    1,242
    Mentioned
    12 Post(s)
    Quoted
    193 Post(s)

    Default

    Let me introduce you to

    function GetGEPrice(v: variant): Integer;
    And
    function Withdraw(col, row, Amount: Integer): Boolean;

    --
    --

    Simba Code:
    function WaitXPIncrease(Time:Integer):Boolean;
    var
      First,Second,t:Integer;
    begin
      First := GetXPBarTotal;
      MarkTime(T);
      repeat
        wait(10);
        Second := GetXPBarTotal;
        if TimeFromMark(t) > Time then
        begin
          Result := False;
          Exit;
        end;
      until(Second > First);
      Result := True;
    end;

    Can be

    Simba Code:
    function WaitXPIncrease(Time:Integer):Boolean;
    var
      First,Second,t:Integer;
    begin
      First := GetXPBarTotal;
      MarkTime(T);
      While ((TimeFromMark(t) < Time) and (not result)) do
      if (GetXPBarTotal >= First) then
        result := true
    end;


    Simba Code:
    Profit := profit - astralPrice;
    Profit := Profit - vialPrice;
    Profit := Profit + (voWPrice * 27);

    You forgot to multiply the vial price by 27 and this can be condensed.

    Simba Code:
    Profit := (VowPrice * 27) - (VialPrice * 27) -AstralPrice);

    Simba Code:
    repeat
        Bank;
        Humidify;
      until(AllPlayersInactive);
    This will go forever because you don't have proper multiplayer support in your script.



    Simba Code:
    var
      Box:TBox;
    ...

      Box := GetTPABounds(TPA);

    You never did anything with it...


    Simba Code:
    if FindColorsTolerance(TPA,10646381,MIX1,MIY1,MIX2,MIY2,38) then
        begin
          //writeLn(Length(TPA));
         if Length(TPA) > 170 then
         begin
          Box := GetTPABounds(TPA);
          if FindColorTolerance(p.x,p.y,10646381,MIX1,MIY1,MIX2,MIY2,38) then
          begin
    Why call FindColorTolerance twice?

    Simba Code:
    while InvFull do
                wait(50 + random(50));
    Infinite loop... not good.
    WaitFunc(@InvFull, 10, 5000);

    Simba Code:
    MouseSpeed := 40;  

      -------

     MouseSpeed := 15;

    Not very human like to speed up so fast every time you withdraw then slow back down afterwards.


    Simba Code:
    function Humidify:Boolean;
    var
      TPA:TPointArray;
    begin
      TypeByte(VK_F4);
      if GameTab(tab_Magic) then
      begin
        Mouse(600,256,5,5,True);
        if WaitXPIncrease(2500 + Random(500)) then
        begin
          Profit := profit - astralPrice;
          Profit := Profit - vialPrice;
          Profit := Profit + (voWPrice * 27);
          Wait(1250 + Random(1000));
          Proggy;
        end;
      end;
    end;

    A function with no result...



    And not a single FindNormalRandoms was called. (yes it as at sw but there are spin tickets, those rocks, and other stuff)

    E:
    Quote Originally Posted by Vinyl Scratch View Post
    Sin, you left an unused variable, inb4nebula.
    Didn't even see this. I was making this post while you said that. Were you referring to the box or is there more?


    Simba Code:
    procedure SetupLogin;
    begin
      ClearReport;
      ClearDebug;

      SetupSRL;

      ActivateClient;
      DeclarePlayers
    end;
    There isn't a LoginPlayer here or anywhere in this script.


    Simba Code:
    Mouse(600,256,5,5,True);

    That is how you click the humidify button. Not its blue color, a DTM, or edge color counting. A static click. The thing is like 11x11, use a higher randomness if anything.
    Last edited by Nebula; 08-10-2012 at 02:21 PM.

  6. #6
    Join Date
    Dec 2011
    Location
    Toronto, Ontario
    Posts
    6,424
    Mentioned
    84 Post(s)
    Quoted
    863 Post(s)

    Default

    Now, time to respond to all that urgh.

    function GetGEPrice(v: variant): Integer;
    Nty.


    Simba Code:
    function WaitXPIncrease(Time:Integer):Boolean;
    var
    First,Second,t:Integer;
    begin
    First := GetXPBarTotal;
    MarkTime(T);
    repeat
    wait(10);
    Second := GetXPBarTotal;
    if TimeFromMark(t) > Time then
    begin
    Result := False;
    Exit;
    end;
    until(Second > First);
    Result := True;
    end;

    Can be

    Simba Code:
    function WaitXPIncrease(Time:Integer):Boolean;
    var
    First,Second,t:Integer;
    begin
    First := GetXPBarTotal;
    MarkTime(T);
    While (TimeFromMark(t) < Time) do
    if (GetXPBarTotal >= First) then
    result := true
    end;
    Does it make a goddamn difference?

    Simba Code:
    repeat
    Bank;
    Humidify;
    until(AllPlayersInactive);
    This will go forever because you don't have proper multiplayer support in your script.



    Simba Code:
    var
    Box:TBox;
    ...

    Box := GetTPABounds(TPA);

    You never did anything with it...
    AllPlayersInactive doesn't need multiplayer to function LOL.

    Box: indev, don't concern yourself.

    Simba Code:
    if FindColorsTolerance(TPA,10646381,MIX1,MIY1,MIX2,MI Y2,38) then
    begin
    //writeLn(Length(TPA));
    if Length(TPA) > 170 then
    begin
    Box := GetTPABounds(TPA);
    if FindColorTolerance(p.x,p.y,10646381,MIX1,MIY1,MIX2 ,MIY2,38) then
    begin
    Why call FindColorTolerance twice?
    L2Seethe's'

    Simba Code:
    MouseSpeed := 40;

    -------

    MouseSpeed := 15;

    Not very human like to speed up so fast every time you withdraw then slow back down afterwards.
    Simulates Mouse keys

    Simba Code:
    function Humidify:Boolean;
    var
    TPA:TPointArray;
    begin
    TypeByte(VK_F4);
    if GameTab(tab_Magic) then
    begin
    Mouse(600,256,5,5,True);
    if WaitXPIncrease(2500 + Random(500)) then
    begin
    Profit := profit - astralPrice;
    Profit := Profit - vialPrice;
    Profit := Profit + (voWPrice * 27);
    Wait(1250 + Random(1000));
    Proggy;
    end;
    end;
    end;

    A function with no result...
    I'll admit that I missed that.

    imba Code:
    procedure SetupLogin;
    begin
    ClearReport;
    ClearDebug;

    SetupSRL;

    ActivateClient;
    DeclarePlayers
    end;
    There isn't a LoginPlayer here or anywhere in this script.
    LoginPlayer doens't work.


    E*
    You must have ALOT of time on your hands to criticize everything I do.

  7. #7
    Join Date
    Nov 2011
    Location
    Louisiana
    Posts
    881
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nebula, IIRC, GetGEPrice isn't in the include anymore for some reason...correct me if I'm wrong, I know you will.

  8. #8
    Join Date
    Dec 2011
    Location
    New York, USA
    Posts
    1,242
    Mentioned
    12 Post(s)
    Quoted
    193 Post(s)

    Default

    1) why not
    2) yes
    3) Lol what you're using multiplayer, just not correctly. You don't know you are because you probably just copied it from someone's correct setup. You never call NextPlayer(); so it WILL be an endless loop. You're wrong.
    4) Oh, still pre-planning things? Hang on lemme add 50 vars to my script for future use.
    5)Didn't see it.
    Simba Code:
    if FindColorTolerance(p.x,p.y,10646381,MIX1,MIY1,MIX2,MIY2,38) then
          begin
            HumanMMouse(p.x,p.y,2,2);
            ClickMouse2(False);
            if WaitOption('All',750) then
              while InvFull do
                wait(50 + random(50));
          end;
    It will click the same vial every time. So it should still be changed.

    6) not really....

    7)k +1 for me

    8)LoginPlayer does work.

    Quote Originally Posted by shstiger2009 View Post
    Nebula, IIRC, GetGEPrice isn't in the include anymore for some reason...correct me if I'm wrong, I know you will.
    You have to define Online.Simba



    Quote Originally Posted by Shay View Post
    You must have ALOT of time on your hands to criticize everything I do.
    I didn't criticize your use of ClearDebug; at the beginning of the script.
    Last edited by Nebula; 08-10-2012 at 06:42 AM.

  9. #9
    Join Date
    Dec 2011
    Location
    Toronto, Ontario
    Posts
    6,424
    Mentioned
    84 Post(s)
    Quoted
    863 Post(s)

    Default

    Won't be responding to you anymore.


  10. #10
    Join Date
    Jan 2012
    Posts
    915
    Mentioned
    13 Post(s)
    Quoted
    87 Post(s)

    Default

    Thata Boy, mate! Anyway, Script looks really good. Going to try it.. when I can humidify.

  11. #11
    Join Date
    Apr 2012
    Location
    Seattle
    Posts
    791
    Mentioned
    1 Post(s)
    Quoted
    159 Post(s)

    Default

    I didn't know 200k+ gp per hour was bad profit lol. Looks good anyways, wont be able to use it tho :9

  12. #12
    Join Date
    Jul 2012
    Posts
    251
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Guess I'll have to go and legit Dream mentor :P

    Btw, nice script!

    +1
    Activity
    Going asian on University College Ghent.
    No time for anything atm.

  13. #13
    Join Date
    Nov 2011
    Posts
    232
    Mentioned
    1 Post(s)
    Quoted
    5 Post(s)

    Default

    Eh, right now it's more around 150k gp/hr. A very basic script, but it works well, made a few tweaks myself for antiban and efficiency though.

    Edit: Oops, yeah, that was a typo on my part, meant gp/hr. Fixed now.
    Last edited by Texy; 08-14-2012 at 02:18 AM.

  14. #14
    Join Date
    Feb 2012
    Location
    Wonderland
    Posts
    1,988
    Mentioned
    41 Post(s)
    Quoted
    272 Post(s)

    Default

    Quote Originally Posted by Texy View Post
    Eh, right now it's more around 150k xp/hr. A very basic script, but it works well, made a few tweaks myself for antiban and efficiency though.
    There's no way you will ever reach 150k xp per hour.
    Perhaps you meant gp per hour?

    There are more items aside from vials to profit on.. (clay > jug > bowl > vial > bucket)

  15. #15
    Join Date
    Nov 2011
    Location
    Louisiana
    Posts
    881
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Le Jingle View Post
    There's no way you will ever reach 150k xp per hour.
    Perhaps you meant gp per hour?

    There are more items aside from vials to profit on.. (clay > jug > bowl > vial > bucket)
    I'm sure that is what he meant lol. What are jugs of water for?

  16. #16
    Join Date
    Feb 2012
    Location
    Wonderland
    Posts
    1,988
    Mentioned
    41 Post(s)
    Quoted
    272 Post(s)

    Default

    Quote Originally Posted by shstiger2009 View Post
    I'm sure that is what he meant lol. What are jugs of water for?
    Grapes + Jug of water's for wine cooking/making

  17. #17
    Join Date
    Nov 2011
    Location
    Louisiana
    Posts
    881
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Le Jingle View Post
    Grapes + Jug of water's for wine cooking/making
    Ahaaaa. Wouldn't that be ridiculous profit? I bet jugs are hard to buy.

  18. #18
    Join Date
    Dec 2011
    Posts
    45
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    After some tweaks and experimenting this script is really effective. Thank you S1N. :-)

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
  •