Poll: Do you weship da sun?

Be advised that this is a public poll: other users can see the choice(s) you selected.

Page 8 of 9 FirstFirst ... 6789 LastLast
Results 176 to 200 of 206

Thread: [07Scape] Meth's SIMPLE Tea Stealer

  1. #176
    Join Date
    Mar 2012
    Location
    San Diego
    Posts
    760
    Mentioned
    4 Post(s)
    Quoted
    91 Post(s)

    Default

    Quote Originally Posted by Pocket View Post
    Just a quick question, occasionally the bot will move the mouse off of the stall and hover just next to it. Sometimes I can just rotate the camera slightly and it will pick it back up again but other times it will be just out of reach of the stall and I have to stop and restart the script. I wouldn't be so bothered if it only did it every hour or so as I babysit my bots anyway but it literally happens every 5-10 minutes. I was just wondering if there was any way I could edit the script myself in order to make the click-box smaller? I've had a little look through the code but i'm more than useless when it comes to coding so I couldn't see anything obvious I could change to get this to work.

    Any help you or the community could offer would be greatly appreciated
    On line 52, try changing "(291, 125, 325, 170);" to something smaller.
    Basically what MouseBoxHover is doing is hovering the mouse randomly inside the box that the X and Y coordinates make.

    Lets use a graph for example. Say we have the coordinates of (-5, 5) and (3, -3).


    (X1 = -5, X2 = 3, Y1 = 5, Y2 = -3)

    If we were to use that in MouseBoxHover, we would have to put "MouseBoxHover(-5, 3, 5, -3);" Our result would create a box with the coordinates, shown below:



    Now the mouse will hover over one of the coordinates in the box randomly, so it would look less bot-like as opposed to clicking the same coordinate over and over again for an hour+ (Blue dots representing the coordinates it would click)




    After that brief lesson on the function, I guess you would understand better of what the function does
    What you should do is to get the coordinates of the center of the tea stall. You can find this by hovering your mouse over the stall, and the coordinates will be displayed on the bottom of Simba. Example:



    Try to make the coordinates as small apart as possible, Example: (291, 125, 325, 170) would be (291, 125, 301, 180), at least 10 coordinates apart.

    I tried explaining this as thoroughly as I can get, as I don't have enough time to change the coordinates
    Hope this helped you!

  2. #177
    Join Date
    Apr 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    im having a problem help me ?
    Compiling failed.
    [Error] C:\Simba\Includes\SRL-OSR\SRL\misc\SmartParams.Simba(35:6): Unknown identifier 'Smart_World' at line 34
    Compiling failed.

  3. #178
    Join Date
    May 2012
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by [PRO]metheus View Post
    I tried explaining this as thoroughly as I can get, as I don't have enough time to change the coordinates
    Hope this helped you!

    That was more than helpful, it was broful. Working like a charm, good day and thanks again to you sir!

  4. #179
    Join Date
    Apr 2013
    Posts
    41
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    Clicks on the Teastall once, commences AFK.

  5. #180
    Join Date
    Mar 2012
    Location
    San Diego
    Posts
    760
    Mentioned
    4 Post(s)
    Quoted
    91 Post(s)

    Default

    Quote Originally Posted by Toofstah View Post
    Clicks on the Teastall once, commences AFK.
    Is your inventory empty?

  6. #181
    Join Date
    Apr 2013
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    15 Post(s)

    Default

    Quote Originally Posted by [PRO]metheus View Post
    On line 52, try changing "(291, 125, 325, 170);" to something smaller.
    Basically what MouseBoxHover is doing is hovering the mouse randomly inside the box that the X and Y coordinates make.

    Lets use a graph for example. Say we have the coordinates of (-5, 5) and (3, -3).


    (X1 = -5, X2 = 3, Y1 = 5, Y2 = -3)

    If we were to use that in MouseBoxHover, we would have to put "MouseBoxHover(-5, 3, 5, -3);" Our result would create a box with the coordinates, shown below:



    Now the mouse will hover over one of the coordinates in the box randomly, so it would look less bot-like as opposed to clicking the same coordinate over and over again for an hour+ (Blue dots representing the coordinates it would click)




    After that brief lesson on the function, I guess you would understand better of what the function does
    What you should do is to get the coordinates of the center of the tea stall. You can find this by hovering your mouse over the stall, and the coordinates will be displayed on the bottom of Simba. Example:



    Try to make the coordinates as small apart as possible, Example: (291, 125, 325, 170) would be (291, 125, 301, 180), at least 10 coordinates apart.

    I tried explaining this as thoroughly as I can get, as I don't have enough time to change the coordinates
    Hope this helped you!

    hey ive tried your method but it still misses after a few clicks, ive tried messing around with it my self (without saving it) just to see if i could get it, and even though i changed it, its still clicking sort of the same spots and still ends up missing which leads it to getting stuck, any more help you could give on how to fix this would be awesome. thanks

    Edit: i went back to the original co-ordinates and it loaded me to world 322, and its working perfectly, im assuming by that, is that for each world there are different co-ordinations for the tea stall(you probs already knew that) im not 100% sure but the only way i see how to fix it is by setting co's for each world that it loads, or use colour? o.0 :P
    Last edited by lordasukuu; 05-02-2013 at 04:12 AM.

  7. #182
    Join Date
    Apr 2013
    Posts
    41
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    This is so annoying - it'll move to the left of the stall and basically will just halt completely -.- this is after a few steals...

  8. #183
    Join Date
    Apr 2013
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Toofstah View Post
    This is so annoying - it'll move to the left of the stall and basically will just halt completely -.- this is after a few steals...
    Easy fix :P
    Look for:

    MouseBoxHover(291, 125, 325, 170);
    change to
    MouseBoxHover(330, 125, 325, 170);
    it wont click off the tea stall now.

  9. #184
    Join Date
    Apr 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    it wont drop the teas, simple hoover over it, repeating. never dropping.

  10. #185
    Join Date
    Mar 2012
    Location
    San Diego
    Posts
    760
    Mentioned
    4 Post(s)
    Quoted
    91 Post(s)

    Default

    Changed the coordinates for the mousebox thingy. Hopefully it won't go off that much anymore.

  11. #186
    Join Date
    Apr 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    why the fuck does it stand still after every 5 or 10 minutes? doesnt steal anything just stands there.
    i have to close simba n reopen it for it 2 work again.
    ?!?!?!

  12. #187
    Join Date
    Mar 2012
    Location
    San Diego
    Posts
    760
    Mentioned
    4 Post(s)
    Quoted
    91 Post(s)

    Default

    Quote Originally Posted by vello1234 View Post
    why the fuck does it stand still after every 5 or 10 minutes? doesnt steal anything just stands there.
    i have to close simba n reopen it for it 2 work again.
    ?!?!?!
    Watch your language, and be more specific. Did you read the instructions? Try taking a video of it.

  13. #188
    Join Date
    Apr 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by [PRO]metheus View Post
    Watch your language, and be more specific. Did you read the instructions? Try taking a video of it.
    sorry man
    it just steals about 10-20 tea's and then stops stealing tea's and stands there, can't vid it sorry.
    and yes i read the intstructions

    You stole: 64 teas
    You are getting: 424 teas an hour!
    You have gotten: 1024 thieving experience
    You are getting: 6788 thieving experience per hour
    Running for: 543 seconds
    That is: 9 minute(s)
    Error: Exception: Mask is invalid. Width/Height: (9,6). WhiteHi/BlackHi: (-1,53) at line 778
    The following DTMs were not freed: [SRL - Lamp bitmap, SRL - Book of Knowledge]
    The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Minimap Mask bitmap]
    [Error] C:\Simba\Includes\SRL-OSR\SRL\core\antirandoms\common.simba(59:15): Unknown identifier 'returnTPAExceptColors' at line 58
    Compiling failed.


    line 777 in antirandoms

    this is what its gicving me
    Last edited by vello1234; 06-09-2013 at 11:06 PM.

  14. #189
    Join Date
    Jul 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    I'm having the same issue as Vello. The same error appears.

    I hope a fix comes out soon

  15. #190
    Join Date
    Dec 2011
    Location
    Hyrule
    Posts
    8,662
    Mentioned
    179 Post(s)
    Quoted
    1870 Post(s)

    Default

    Quote Originally Posted by LaPanthere View Post
    I'm having the same issue as Vello. The same error appears.

    I hope a fix comes out soon
    It means you didn't put anything in for your nickname. You need to fill out that.

  16. #191
    Join Date
    Jul 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by Ashaman88 View Post
    It means you didn't put anything in for your nickname. You need to fill out that.
    I put the last 4 letters of my rs name... Thats what you're supposed to do right?

  17. #192
    Join Date
    Dec 2011
    Location
    Hyrule
    Posts
    8,662
    Mentioned
    179 Post(s)
    Quoted
    1870 Post(s)

    Default

    Quote Originally Posted by LaPanthere View Post
    I put the last 4 letters of my rs name... Thats what you're supposed to do right?
    Then you need to move declareplayers before setupsrl

  18. #193
    Join Date
    Jul 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    I've redesigned some of the project made an antiban and some-what of a leveling tracker.
    I have also improved the stealing of tea and used ACA for this, feel free to look at the code and compile it yourself;

    Code:
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   {
    ***07Scape Tea Stealer made by Prometheus | Heavily edited by LaPanthere***
        ======Be sure to bank your armor======
    
    }
    program TeaStealer;
    {$DEFINE SMART8}   //Remove the 8 if you dont have SMART8
    {$i srl-osr/srl.simba}
    {$i srl-osr/srl/misc/trade.simba}
    var
      x, y: Integer;
      XPGain, TeasStolen, TotalTime: Integer;
      XPPerHour, TeasPerHour, RealEXP, Minutes: Integer;
      BasePlayerLevel, CurrentPlayerLevel, DifferencePlayerLevel, i: Integer;
      LatestAnti: String;
    
    
    
    Procedure DeclarePlayers;
    Begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
    
      Players[0].Name := ''; //username
      Players[0].Pass := ''; //password
      Players[0].Nick := ''; //last 4 letters of name
      Players[0].Active := True;
    End;
    
    Procedure TradingCheck;
    begin
      If SomeoneTrades then
      HandleTrade;
    end;
    
    Procedure RandomAnti;
    begin
      FindNormalRandoms;
      FindNonInventoryRandoms;
      FindTalk;
    end;
    
    {* Failsafe thanks to YoHoJo *}
    Procedure FailSafe(Reason:String);
    Begin
      Players[CurrentPlayer].Loc:=Reason;
      Logout;
      Stats_Commit;
      Writeln(Reason);
      TerminateScript;
    End;
    
    {* Antiban thanks to LaPanthere *}
    procedure AntiBan;
    begin;
      TradingCheck;
      RandomAnti;
      case Random(50) of
    
        0: //
        begin
          Writeln('AntiBan: Taking a break for 60 seconds')
          RandomMovement;
          wait(RandomRange(54000, 66000))
          RandomMovement;
          LatestAnti := 'Break for ~60s';
        end;
    
        1: //
        begin
          Writeln('AntiBan: Taking a break for 20 seconds')
          RandomMovement;
          wait (RandomRange(16000, 24000))
          RandomMovement;
          LatestAnti := 'Break for ~20s';
        end;
    
        2: //
        begin
          Writeln('AntiBan: Checking Thieving XP')
          HoverSkill(skill_Thieving, false);
          wait(1000 + random(3900));
          LatestAnti := 'Checked Thieving XP';
        end;
    
        3: //
        begin
          Writeln('AntiBan: Checking random skill')
          HoverSkill('random', false);
          wait(1000 + random(3500));
          LatestAnti := 'Checked random skill';
        end;
    
        4: //
        begin
          Writeln('AntiBan: Waiting a random amount of time - between 1 and 3 seconds.')
          wait(1000 + random(3000));
          LatestAnti := 'Waiting for 1-3s';
        end;
    
        5: //
        begin
          Writeln('AntiBan: Acting like a bored Human.')
          BoredHuman;
          LatestAnti := 'Acting bored human';
        end;
    
        6: //
        begin
          Writeln('AntiBan: Simulated the dropping of your mouse')
          PickUpMouse;
          wait(1000 + random(4000));
          LatestAnti := 'Mouse Dropped';
        end;
    
        7: //
        begin
          Writeln('AntiBan: Randomly moving mouse')
          RandomMovement;
          LatestAnti := 'Random Mouse Movement';
        end;
    
        8: //
        begin
          Writeln('AntiBan: Randomly adjusting angle')
          RandomAngle(1);
          LatestAnti := 'Adjusted Camera Angle';
        end;
    
        9: //
        begin
          Writeln('AntiBan: Randomly moved and reset compass position')
          CompassMovement(random(500), random(1700), true);
          wait(1000 + random(4000));
          LatestAnti := 'Compass movement';
        end;
    
        10: //
        begin
          Writeln('AntiBan: Randomly examined an item in the inventory')
          If not (InvCount = 0) Then
          ExamineInv;
    
          wait(1000 + random(4000));
          LatestAnti := 'Examined item in inventory';
        end;
    
        11: //
        begin
          Writeln('AntiBan: Randomly changed Tab')
          RandomTab(True);
          wait(1000 + random(2000));
          LatestAnti := 'Changed active tab';
        end;
    
        12: //
        begin
          Writeln('AntiBan: Randomly hovered over online friend')
          HoverOnlineFriend;
          LatestAnti := 'Hover online friend';
        end;
    
        13: //
        begin
          Writeln('AntiBan: Randomly moved off client')
          MMouseOffClient('rand');
          wait(1000 + random(5000));
          LatestAnti := 'Moved off client';
        end;
    
        14: //
        begin
          Writeln('AntiBan: Randomly Moving Player')
    
          case Random(3) of
            0:   RunAway('n', False, 1, randomrange(3000, 10000));
            1:   RunAway('s', False, 1, randomrange(3000, 10000));
            2:   RunAway('e', False, 1, randomrange(3000, 10000));
            3:   RunAway('w', False, 1, randomrange(3000, 10000));
          end; //end case
          LatestAnti := 'Moved player';
        end;
    
        15..18: //
        begin
          Writeln('AntiBan: Randomly moved camera')
          MakeCompass(randomRange(120, 190));
          wait(1000 + random(5000));
          LatestAnti := 'Moved camera';
        end;
        Else
        Begin
          Writeln('AntiBan: None')
          LatestAnti := 'No antiban method has been performed';
        end;
      end;      //end case
    end;      //end procedure
    
    function CanvasColor: Integer;
    var
      arP: TPointArray;
      arC: TIntegerArray;
      tmpCTS, i, arL: Integer;
    begin
      tmpCTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.05, 0.36);
    
      if not (FindColorsTolerance(arP, 7441307, MSX1, MSY1, MSX2, MSY2, 7)) then
      begin
        Writeln('Failed to find the color, no result. Are you at the tea stall?');
        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);
            //FailSafe('Failed to find the color');
        Exit;
      end;
    
      arC := GetColors(arP);
      ClearSameIntegers(arC);
      arL := High(arC);
    
      for i := 0 to arL do
      begin
        Result := arC[i];
        //Writeln('AutoColor = ' + IntToStr(arC[i]));
        Break;
      end;
    
      ColorToleranceSpeed(tmpCTS);
      SetColorSpeed2Modifiers(0.2, 0.2);
    
      if (i = arL + 1) then
      Writeln('AutoColor failed in finding the color. Are you at the tea stall?');
          //FailSafe('Failed to find the color');
    end;
    
    Procedure StartingOff;
    begin
      If not LoggedIn then
      LoginPlayer;
      WriteLn('MAKE SURE YOU BANKED YOUR VALUABLES, LIKE YOUR ARMOR');
      Wait(randomRange(300, 500));
      MakeCompass(randomRange(120, 190));
      SetAngle(SRL_ANGLE_HIGH);
    end;
    
    Procedure Stealing;
    Var
      obX, obY: Integer;
    Begin
      wait(RandomRange(1300, 2000));
      obX := MSCX;
      obY := MSCY;
      If (FindObjTPA(obX, obY, CanvasColor, 5, 1, 15, 80, 1, ['teal', 'rom']))
      Then
      Begin
        GetMousePos(obX, obY);
        Case Random(2) Of
          0: Mouse(obX, obY, RandomRange(10, 15), RandomRange(10, 15), True);
          1: //
          Begin
            Mouse(obX, obY, RandomRange(10, 15), RandomRange(10, 15), False);
            wait(100 + random(300));
            WaitOption('teal', 500);
            LevelUp;
          End;
        End;
        AntiBan;
        Inc(TeasStolen);
        RealEXP := 0 + XPGain;
        XPGain := RealEXP + 16
        Exit;
      End
      Else
      Begin
        WriteLn('Failed to find a teacup, antiban triggered, restarting stealing process');
        AntiBan;
        Stealing;
      End;
    
    End;
    
    Procedure Dropping;
    Var
      x, y: Integer;
    Begin
      Repeat
        Wait(150)
      until InvCount = + 1;
      Wait(RandomRange(250, 300));
      Case Random(2) of
        0: DropAll;
        1: //
        Begin
          DropAll;
          GetMousePos(x, y);
          MMouse(Random(MSX2), Random(MSY2), 0, 0);
        End;
      End;
      Wait(RandomRange(70, 100));
    End;
    
    Procedure Proggy;
    begin
      TotalTime := (GetTimeRunning/1000);
      Minutes := TotalTime/60;
    
      XPPerHour := 3600*(XPGain)/(TotalTime);
      TeasPerHour := 3600*(TeasStolen)/(TotalTime);
    
      If (i = 5) or (i = 0) Then
      Begin
        CurrentPlayerLevel := GetSkillLevel(skill_Thieving);
        i := 1;
      End
      Else
      Begin
        i := + 1;
      End;
      DifferencePlayerLevel := CurrentPlayerLevel - BasePlayerLevel;
    
      If (DifferencePlayerLevel < 0) Then
      DifferencePlayerLevel := 0;
    
      ClearDebug;
      WriteLn('You stole: ' + IntToStr(TeasStolen) + ' teas');
      WriteLn('You are getting: ' + IntToStr(TeasPerHour) + ' teas an hour!');
      WriteLn('You have gotten: ' + IntToStr(XpGain) + ' thieving experience');
      WriteLn('You are getting: ' + IntToStr(XPPerHour) + ' thieving experience per hour');
      WriteLn('');
      WriteLn('Your thieving level is ' + IntToStr(CurrentPlayerLevel));
      WriteLn('You have gained ' + IntToStr(DifferencePlayerLevel) + ' level(s)');
      WriteLn('');
      WriteLn('Running for: ' + IntToStr(TotalTime) + ' seconds');
      WriteLn('That is: ' + IntToStr(Minutes) + ' minute(s)');
      WriteLn('');
      WriteLn('Latest Antiban: ' + LatestAnti);
    end;
    
    begin
      DeclarePlayers;
      SetupSRL;
      ClearDebug;
      ActivateClient;
      MouseSpeed := RandomRange(10, 15);
    
      repeat
        StartingOff;
        BasePlayerLevel := GetSkillLevel(skill_Thieving);
    
        repeat
          Stealing;
          RandomAnti;
          Dropping;
          RandomAnti;
          Proggy;
          RandomAnti;
        until not LoggedIn;
    
      until false;
    
    end.

  19. #194
    Join Date
    May 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Doesn't work.
    Doesn't pick thea, antiban doesn't does it's job.

  20. #195
    Join Date
    Apr 2013
    Posts
    56
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    The script just stops stealing after a couple mins? tried editing but couldn't fix. Anyone got a solution?

    Thanks!

  21. #196
    Join Date
    Mar 2015
    Posts
    23
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    You stole: 406 teas
    You are getting: 535 teas an hour!
    You have gotten: 6496 thieving experience
    You are getting: 8569 thieving experience per hour
    Running for: 2729 seconds
    That is: 45 minute(s)

  22. #197
    Join Date
    Mar 2015
    Posts
    23
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    2nd run

    You stole: 445 teas
    You are getting: 532 teas an hour!
    You have gotten: 7120 thieving experience
    You are getting: 8512 thieving experience per hour
    Running for: 3011 seconds
    That is: 50 minute(s)

  23. #198
    Join Date
    Mar 2015
    Posts
    23
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    3rd run

    You stole: 515 teas
    You are getting: 541 teas an hour!
    You have gotten: 8240 thieving experience
    You are getting: 8666 thieving experience per hour
    Running for: 3423 seconds
    That is: 57 minute(s)

    4th run - longest

    You stole: 577 teas
    You are getting: 529 teas an hour!
    You have gotten: 9232 thieving experience
    You are getting: 8471 thieving experience per hour
    Running for: 3923 seconds
    That is: 65 minute(s)
    Last edited by iownyou23; 04-26-2015 at 04:54 AM.

  24. #199
    Join Date
    Mar 2012
    Location
    San Diego
    Posts
    760
    Mentioned
    4 Post(s)
    Quoted
    91 Post(s)

    Default

    Quote Originally Posted by iownyou23 View Post
    3rd run

    You stole: 515 teas
    You are getting: 541 teas an hour!
    You have gotten: 8240 thieving experience
    You are getting: 8666 thieving experience per hour
    Running for: 3423 seconds
    That is: 57 minute(s)

    4th run - longest

    You stole: 577 teas
    You are getting: 529 teas an hour!
    You have gotten: 9232 thieving experience
    You are getting: 8471 thieving experience per hour
    Running for: 3923 seconds
    That is: 65 minute(s)
    Nice progress reports
    I'll have to update this soon since I learned about how the camera angles changed randomly. I'll have to change the MouseBox function, and add an AeroLib version.

  25. #200
    Join Date
    Apr 2015
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default More efficiency

    I edited the code a little to make it more efficient. I took out the antirandom stuff since it was so slow and made everything move a little smoother.

    Thanks for the script.

    EfficientTeaStealer.simba

    p.s. start script with empty inventory.

Page 8 of 9 FirstFirst ... 6789 LastLast

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
  •