Page 1 of 2 12 LastLast
Results 1 to 25 of 32

Thread: [2007 RS] + [first script] Man/Woman Thiever

  1. #1
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default [2007 RS] + [first script] Man/Woman Thiever

    As title says, man/woman thiever. Simple anti-leech:

    • Loop not infinite
    • Colour has to be provided by you
    • One other simple error


    Not perfect in any way, since getchatboxtext() wasn't working for me, and neither was P07_IsUpTextMultiCustom() (and because I'm learning pascal, obviously). As simple as it gets, so no doors/perfect wait, YET. Will improve it as I learn.

    Simba Code:
    program WordPocket;

    {$i srl/srl.simba}
    {$i P07Include.simba}
    {$i Troll.simba}

    var
    x, y, XPPH, noTimes, pickPH: Integer; PBox: TBox; xz: Integer; xyz, xzy : Integer; lol : String; woMan: Integer;

    Procedure pickPocketing;
    begin
    PBox := IntToBox(240, 158, 285, 198);
    If AveragePixelShift(PBox, 250, 350) < 100 then
    If FindColorSpiralTolerance(x, y, [colour of woman/man], P07_MSX1, P07_MSY1, P07_MSX2, P07_MSY2, 7) then
    MMouse(x, y, 1, 0);
    ClickMouse2(mouse_Right);
    wait(randomRange(200, 300));
    P07_ChooseOptionMulti(['ickpocket']);
    repeat
    wait(randomRange(200, 300));
    until AveragePixelShift(PBox, 250, 350) < 100;
    noTimes := noTimes +  1;
    end;
    //woman is: 5572950.
    procedure Progress;
    begin
      pickPH := Round((noTimes * 3600) / (GetTimeRunning / 1000));
      XPPH := Round(((noTimes * 8) * 3600) / (GetTimeRunning / 1000));
      ClearDebug;
      Writeln('Pickpocketed: ' + IntToStr(noTimes) + ' (' + IntToStr(pickPH) + ' per hour)');
      Writeln('Experience earned: ' + IntToStr(noTimes * 8)+ ' (' + IntToStr(XPPH) + ' per hour)');
      Writeln('Total time running: ' + TimeRunning);
    end;
    Function arewePocketing: Boolean;
    var
      PBox: TBox;
    Begin
      PBox := IntToBox(240, 158, 285, 198);
      Result := (AveragePixelShift(PBox, 250, 350) > 90);
    End;
    begin
    SetupP07Include;
    ActivateClient;
    SetupSRL;
    ClearDebug;
    xz := 0;
    repeat
    xz := xz + 1;
    pickPocketing;
    wait(randomRange(200, 300));
    //writeln('Says: '+GetChatBoxText(8, clBlack));
    Progress;
    until xz = 100;
    End.

    Credit: guides in the respective sections.
    Attached Files Attached Files
    Last edited by Word; 02-27-2013 at 01:06 AM.

  2. #2
    Join Date
    Feb 2013
    Posts
    37
    Mentioned
    0 Post(s)
    Quoted
    19 Post(s)

    Default

    Let's try this bad boy out =)

    edit: Works quite well. I like the stats. does give weird error that doesn't effect performance
    Code:
    Warning! You passed a wrong ye to a finder function: 1199. The client has a height of 1178, thus the ye is out of bounds. Setting the value to 1177 (h-1) for now.
    Last edited by mmmvvvbbb; 02-27-2013 at 03:23 AM.

  3. #3
    Join Date
    Feb 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Local : 1.6 / Latest : 1.7
    New P07Include Version Available! Updating...
    New P07Include Version Downloaded Please Restart Your Script!
    Restarted script but still doesn't work.. How do you fix this?

  4. #4
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by mmmvvvbbb View Post
    Let's try this bad boy out =)

    edit: Works quite well. I like the stats. does give weird error that doesn't effect performance
    Code:
    Warning! You passed a wrong ye to a finder function: 1199. The client has a height of 1178, thus the ye is out of bounds. Setting the value to 1177 (h-1) for now.
    Yes, I get the same error, but works anyway. Not sure why it does this.

    Quote Originally Posted by pure knight View Post
    Local : 1.6 / Latest : 1.7
    New P07Include Version Available! Updating...
    New P07Include Version Downloaded Please Restart Your Script!
    Restarted script but still doesn't work.. How do you fix this?
    Nothing to do with me - it's the include that needs to be updated. If this keeps happening, you could try downloading it off here, and putting it into /includes and restarting the script.

  5. #5
    Join Date
    Jan 2012
    Location
    Sweden
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    20 Post(s)

    Default

    Really nice, I was thinking of doing something similar. Do add some failsafes, though, like log out on 1hp for example.

  6. #6
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by Valvar View Post
    Really nice, I was thinking of doing something similar. Do add some failsafes, though, like log out on 1hp for example.
    This, or I was thniking, just walk back from lumbridge if you die? This script will mainly be used by people to get up to 20 or something thieving, not for making money, so a simple deathwalk would also work.

  7. #7
    Join Date
    Jan 2012
    Location
    Sweden
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    20 Post(s)

    Default

    Yeah, but I don't think SPS is working for 2007 yet...

  8. #8
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by Valvar View Post
    Yeah, but I don't think SPS is working for 2007 yet...
    Will walking with DTMs not work? I thought this was still possible, even in RS2007.

  9. #9
    Join Date
    Feb 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Warning! You passed a wrong ye to a finder function: 502. The client has a height of 481, thus the ye is out of bounds. Setting the value to 480 (h-1) for now.
    Error: Exception: Font [P07UpChars] not found. at line 544
    The following DTMs were not freed: [0, 1, 2, 3, SRL - Lamp bitmap, 5]
    The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap, SRL - NavBar Bitmap, SRL - Options Bitmap

    Getting this error when I start script

  10. #10
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by barturoDaonly View Post
    Warning! You passed a wrong ye to a finder function: 502. The client has a height of 481, thus the ye is out of bounds. Setting the value to 480 (h-1) for now.
    Error: Exception: Font [P07UpChars] not found. at line 544
    The following DTMs were not freed: [0, 1, 2, 3, SRL - Lamp bitmap, 5]
    The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap, SRL - NavBar Bitmap, SRL - Options Bitmap

    Getting this error when I start script
    Please refer to: http://villavu.com/forum/showthread....hlight=include and make sure you've done everything specified. Your error will be fixed.

  11. #11
    Join Date
    Jul 2012
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    can you help me figure out how to solve the Type Mismatch? i literally have no idea what to do ive googled for 30 minutes

  12. #12
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by keeks View Post
    can you help me figure out how to solve the Type Mismatch? i literally have no idea what to do ive googled for 30 minutes
    I've think you've added some of your own anti-leech... Which line is this?

  13. #13
    Join Date
    Feb 2013
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    [Error] C:\Simba\Pickpocket.simba(14:89): Type mismatch at line 13

    I get that, its when I pick the colour of the man/woman (btw lol @ troll)

  14. #14
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by NJT View Post
    [Error] C:\Simba\Pickpocket.simba(14:89): Type mismatch at line 13

    I get that, its when I pick the colour of the man/woman (btw lol @ troll)
    I unintentionally added another level to the anti-leech: [colour of woman/man] means you replace the whole thing (including '[]' with the number), so using my colour in the script, the line should read:

    Simba Code:
    If FindColorSpiralTolerance(x, y, 5572950, P07_MSX1, P07_MSY1, P07_MSX2, P07_MSY2, 7) then

    Try it now.

  15. #15
    Join Date
    Jan 2013
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Warning! You passed a wrong ye to a finder function: 530. The client has a height of 509, thus the ye is out of bounds. Setting the value to 508 (h-1) for now.

    That's what I get when I run the script. It clicks the woman but doesn't pickpocket her. I've already gotten the 07 includes too...

  16. #16
    Join Date
    Jan 2012
    Posts
    369
    Mentioned
    6 Post(s)
    Quoted
    91 Post(s)

    Default

    Awesome work !
    Last edited by speedster; 03-02-2013 at 01:48 PM.

  17. #17
    Join Date
    Mar 2013
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Exception in Script: Unable to find file 'Troll.simba' used from ''

    Help please

    Edit: Did i really post this :$
    Last edited by Maxo; 03-11-2013 at 04:21 PM.

  18. #18
    Join Date
    Mar 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Exception in Script: Unable to find file 'P07Include.simba' used from 'C:\Users\User\Downloads\Pickpocket.simba'
    Ehh, some1 help?

  19. #19
    Join Date
    May 2012
    Posts
    21
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Quote Originally Posted by Maxo View Post
    Exception in Script: Unable to find file 'Troll.simba' used from ''

    Help please
    I have the same problem..

  20. #20
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by jokdaris View Post
    Exception in Script: Unable to find file 'P07Include.simba' used from 'C:\Users\User\Downloads\Pickpocket.simba'
    Ehh, some1 help?
    Have you set up the P07Include properly?

    Quote Originally Posted by Aqua3 View Post
    I have the same problem..
    No, you don't, that's anti-leech.

  21. #21
    Join Date
    May 2012
    Posts
    21
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    How do I fix?

  22. #22
    Join Date
    May 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by Aqua3 View Post
    How do I fix?
    Do you think Troll.simba is necessary for the script to run?

  23. #23
    Join Date
    Jan 2013
    Posts
    14
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    may I ask, how many anti-leeches are there and are they all hard to find except 1 I'll need that info before downloading the script. You may delete this message...

  24. #24
    Join Date
    Mar 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    got the fist bait , but how do i select the colour? could someone pm me how to?

  25. #25
    Join Date
    Oct 2006
    Posts
    206
    Mentioned
    2 Post(s)
    Quoted
    45 Post(s)

Page 1 of 2 12 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
  •