Results 1 to 18 of 18

Thread: [FIXED] CloseBank;

  1. #1
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default [FIXED] CloseBank;

    The current one:
    SCAR Code:
    function CloseBank: Boolean;
    var
      i, Timer, Points: Integer;
    begin
      if BankScreen then
      begin
        MarkTime(Timer);
        repeat
          Mouse(485, 41, 4, 4, True);
          for i := 0 to 30 do
          begin
            Wait(100);
            Points := CountColorTolerance(2070783, 177, 30, 337, 52, 5);
            if(Points < 170)then
            begin
              Result := True;
              Break;
            end;
          end;
        until(Points < 170)or(TimeFromMark(Timer) > 8000)
      end;
    end;

    I know its not a big deal or anything because it uses randomness in the clicking, but CloseBank uses coord clicking, I know the X button is in the same spot every time but I'm sure theres a different method that would be more anti-ban.

    For different methods maybe a DTM, or Bitmap, or MouseBox?

    Sorry if I'm totally wrong and coord clicking would be ok in this situation (I see how it could be because the square is sorta small).


    MouseBox's x1, y1, x2, y2:
    SCAR Code:
    MouseBox(478, 34, 493, 48, 1);


    For a failsafe maybe add isuptext for these as well?

    Or maybe at least increase the randomness of the mouse to like 8, 8 or something.

    Again, sorry if it doesn't really matter.

  2. #2
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Dtm or Bmp isnt needed becouse the X is in the same spot everytime. MouseBox could be fine.


  3. #3
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Also, is it just me or are the coordinates for it off anyways? (in the Mouse coords in the current CloseBank) (using SCAR 3.15b)

  4. #4
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    MouseBox clicks in a random spot in the box.. like a human

  5. #5
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yeah, who said they didn't know what MouseBox does?

  6. #6
    Join Date
    Dec 2006
    Location
    Copy pastin to my C#
    Posts
    3,788
    Mentioned
    8 Post(s)
    Quoted
    29 Post(s)

    Default

    If it works, tell me and I'll put it in

  7. #7
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yeah, I replaced the
    SCAR Code:
    Mouse(485, 41, 4, 4, True);
    with
    SCAR Code:
    MouseBox(478, 34, 493, 48, 1);

    I tested it about 20 times and it worked every time.

  8. #8
    Join Date
    Dec 2006
    Location
    Sydney, New South Wales, Australia
    Posts
    4,603
    Mentioned
    15 Post(s)
    Quoted
    42 Post(s)

    Default

    Look at the 4, 4:
    SCAR Code:
    Mouse(485, 41, *4, *4, True);

    The click will not always be in the same spot because of those two numbers.
    You may contact me with any concerns you have.
    Are you a victim of harassment? Please notify me or any other staff member.

    | SRL Community Rules | SRL Live Help & Chat | Setting up Simba | F.A.Q's |

  9. #9
    Join Date
    Sep 2007
    Posts
    415
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by IP-Drowner View Post
    Look at the 4, 4:
    SCAR Code:
    Mouse(485, 41, *4, *4, True);

    The click will not always be in the same spot because of those two numbers.
    it won't be in the same spot. but 4 pixels is not much at all..or 3..whatever, but for something used like that, the most randomness is the best, as long as it works
    Quote Originally Posted by That guy that wrote forefeathers
    <munklez>haha im too lazy, girls annoy me
    <munklez> they always wanna like, do stuff
    <munklez> and i just wanna program
    <munklez> and they always take all my money

  10. #10
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    Quote Originally Posted by Iron man View Post
    Yeah, who said they didn't know what MouseBox does?
    why have a dtm when you could only do mousebox?

  11. #11
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Zytex! View Post
    why have a dtm when you could only do mousebox?
    Thats why I suggested MouseBox as well.

  12. #12
    Join Date
    Dec 2006
    Location
    Banville
    Posts
    3,914
    Mentioned
    12 Post(s)
    Quoted
    98 Post(s)

    Default

    Why have all that goblydegook when I could just write:

    SCAR Code:
    procedure CloseBank;
    begin
      Mouse(485, 41, 5, 5, True);
    end;

    Seriously people... You've become *too* paranoid. I think they'll start looking for things that are too random instead of things that are always the same.
    The jealous temper of mankind, ever more disposed to censure than
    to praise the work of others, has constantly made the pursuit of new
    methods and systems no less perilous than the search after unknown
    lands and seas.

  13. #13
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    Just make a bitmap of it - if FindBitmap then MMouse(x,y,5,5); if IsUpText('lose') then begin GetMousePos(x,y); Mouse(x,y,1,1,True) else WriteLn('Hy fails!');


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  14. #14
    Join Date
    Dec 2006
    Location
    Banville
    Posts
    3,914
    Mentioned
    12 Post(s)
    Quoted
    98 Post(s)

    Default

    Still too complicated.............

    Srsly, wtf, mate.
    The jealous temper of mankind, ever more disposed to censure than
    to praise the work of others, has constantly made the pursuit of new
    methods and systems no less perilous than the search after unknown
    lands and seas.

  15. #15
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    How is MouseBox too complicated?

  16. #16
    Join Date
    Dec 2006
    Location
    Banville
    Posts
    3,914
    Mentioned
    12 Post(s)
    Quoted
    98 Post(s)

    Default

    Its not, its just all the other stuff you have with it... instead of your lines, I'd use:

    SCAR Code:
    function CloseBank: Boolean;
    begin
      Result := True;
      if BankScreen then
        MouseBox({...});
      Wait(200);
      if BankScreen then
        Result := False;
    end;

    Seeeeee.....?
    The jealous temper of mankind, ever more disposed to censure than
    to praise the work of others, has constantly made the pursuit of new
    methods and systems no less perilous than the search after unknown
    lands and seas.

  17. #17
    Join Date
    Jan 2008
    Location
    Alberta
    Posts
    727
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Are you talking about this?
    SCAR Code:
    function CloseBank: Boolean;
    var
      i, Timer, Points: Integer;
    begin
      if BankScreen then
      begin
        MarkTime(Timer);
        repeat
          Mouse(485, 41, 4, 4, True);
          for i := 0 to 30 do
          begin
            Wait(100);
            Points := CountColorTolerance(2070783, 177, 30, 337, 52, 5);
            if(Points < 170)then
            begin
              Result := True;
              Break;
            end;
          end;
        until(Points < 170)or(TimeFromMark(Timer) > 8000)
      end;
    end;

    'Cause I never made that, its in the current SRL.
    Or am I being stupid and not realizing what your talking about?

    My idea was just to replace the Mouse with MouseBox.

  18. #18
    Join Date
    Dec 2006
    Location
    Banville
    Posts
    3,914
    Mentioned
    12 Post(s)
    Quoted
    98 Post(s)

    Default

    Ooooh. I thought you made that to replace the current one...

    Well, uhm... Mine is just way shorter.
    The jealous temper of mankind, ever more disposed to censure than
    to praise the work of others, has constantly made the pursuit of new
    methods and systems no less perilous than the search after unknown
    lands and seas.

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
  •