Results 1 to 8 of 8

Thread: Human Mouse Procedures

  1. #1
    Join Date
    Nov 2007
    Location
    PA
    Posts
    90
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Human Mouse Procedures

    This procedure is very similar to the Mouse procedure. However, like a human, it will miss the coordinates that are set and then come back to it.

    I thank Ducels for helping me correct and fix some errors.

    EDIT: I edited the procedure so it has an option for an accurate one. According to Ducel's suggestion. Also, with Ducel's help, changed the procedure so it is much neater.

    SCAR Code:
    Procedure HumanMouse(mousex, mousey, ranx, rany: Integer; left: Boolean);
    var
      OrigSpeed: integer;
    begin
      OrigSpeed:= MouseSpeed;
      MouseSpeed:= MouseSpeed - 2 + random(5);   //new random speed
      Case Random(5) of
      0-1:begin
          MMouse(mousex - Random(10), mousey - Random(10), ranx, rany);
          Mouse(mousex, mousey, ranx, rany,left);
        end;
      2-3:begin
          MMouse(mousex + Random(10), mousey + Random(10), ranx, rany);
          Mouse(mousex, mousey, ranx, rany,left);
        end;
      4:Mouse(mousex, mousey, ranx, rany,left);
        end;
      MouseSpeed:= OrigSpeed   //back to original mousespeed
    end;


    Procedure HumanMouseBox(x1, y1, x2, y2, clicktype: Integer);
    var
      OrigSpeed: integer;
    begin
      OrigSpeed:= MouseSpeed;
      MouseSpeed:= MouseSpeed - 2 + random(5);   //new random speed
      Case Random(5) of
      0-1:begin
          MMouse(x1 - Random(10), y1 - Random(10),0,0);
          MouseBox(x1, y1, x2, y2, clicktype);
        end;
      2-3:begin
          MMouse(x2 + Random(10), y2 + Random(10),0,0);
          MouseBox(x1, y1, x2, y2, clicktype);
        end;
      4:MouseBox(x1, y1, x2, y2, clicktype);
        end;
      MouseSpeed:= OrigSpeed   //back to original mousespeed
    end;
    -It's not that women don't want to hear your opinion, it's that they want to hear their opinion, but in a deeper voice

    <a href="http://www.justsayhi.com/bb/fight5" style="display: block; background: url(http://assets.justsayhi.com/badges/7...8hnwzprff0.jpg) no-repeat; width: 296px; height: 84px; font-family: Arial, sans-serif; font-size: 42px; color: #fff; text-decoration: none; text-align: center; padding-top: 145px;">26</a><p></p>

  2. #2
    Join Date
    Feb 2007
    Location
    EST (US East Coast)
    Posts
    250
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    They look pretty good.

    You could still improve them by making it sometimes not miss, since humans don't always miss.

    Otherwise it's good for your second scripted material.
    Temporarily inactive.

  3. #3
    Join Date
    Sep 2006
    Posts
    6,089
    Mentioned
    77 Post(s)
    Quoted
    43 Post(s)

    Default

    SCAR Code:
    2-3:begin
          MMouse(mousex + Random(10), mousey + Random(10), ranx, rany);
          Mouse(mousex, mousey, ranx, rany,left);
        end;

    It will never do this one, as 2 - 3 = -1 and Random doesn't return negative numbers.
    Hup Holland Hup!

  4. #4
    Join Date
    Nov 2007
    Location
    PA
    Posts
    90
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by nielsie95 View Post
    SCAR Code:
    2-3:begin
          MMouse(mousex + Random(10), mousey + Random(10), ranx, rany);
          Mouse(mousex, mousey, ranx, rany,left);
        end;

    It will never do this one, as 2 - 3 = -1 and Random doesn't return negative numbers.

    Sorry if I sound like a doushe, but your wrong. 2-3 means that it does "blablabla" for cases from 2 to 3. its not 2 minus 3. So thats why. Run it. It runs perfectly.
    -It's not that women don't want to hear your opinion, it's that they want to hear their opinion, but in a deeper voice

    <a href="http://www.justsayhi.com/bb/fight5" style="display: block; background: url(http://assets.justsayhi.com/badges/7...8hnwzprff0.jpg) no-repeat; width: 296px; height: 84px; font-family: Arial, sans-serif; font-size: 42px; color: #fff; text-decoration: none; text-align: center; padding-top: 145px;">26</a><p></p>

  5. #5
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    use
    SCAR Code:
    2, 3 :

  6. #6
    Join Date
    Jun 2007
    Posts
    1,312
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol whats this do, MMouse isn't detected by Jagex.
    Active only during the Summer...

  7. #7
    Join Date
    Apr 2007
    Location
    Perth, Australia
    Posts
    3,926
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Skepsis View Post
    Sorry if I sound like a doushe, but your wrong. 2-3 means that it does "blablabla" for cases from 2 to 3. its not 2 minus 3. So thats why. Run it. It runs perfectly.
    You can't do that. You have to go 2, 3. If you go 2-3 it will think you mean -1. Also Mouse is the same as MMouse except it clicks so you don't need to called both procedures.

    You could also do something like this:

    SCAR Code:
    procedure HumanMouse(x, y, xmod, ymod: Integer; Left: Boolean);
    begin
      Mouse(x - 10 + Random(20), y - 10 + Random(20), xmod, ymod, Left);
    end;

    That way you don't need the cases.

  8. #8
    Join Date
    Jun 2006
    Posts
    3,861
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by Skepsis View Post
    Sorry if I sound like a doushe, but your wrong. 2-3 means that it does "blablabla" for cases from 2 to 3. its not 2 minus 3. So thats why. Run it. It runs perfectly.
    SCAR Code:
    program New;
    begin
      case 3 of
        2-3: writeln('you''re right!');
      else
        writeln('you''re wrong');
      end;
    end.
    SCAR Code:
    program New;
    begin
      case 3 of
        2,3: writeln('nielsie''s right!');
      else
        writeln('nielsie''s wrong');
      end;
    end.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 13
    Last Post: 10-24-2007, 03:34 AM
  2. Random mouse movements / human wandering is all unessesary
    By sythe in forum Bot Information and Spottings
    Replies: 25
    Last Post: 04-28-2007, 09:16 PM
  3. MMouse/Mouse Procedures
    By snuwoods in forum OSR Help
    Replies: 5
    Last Post: 02-05-2007, 09:21 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •