Results 1 to 8 of 8

Thread: Request how to use a function/procedure here!

  1. #1
    Join Date
    May 2007
    Location
    UK
    Posts
    4,007
    Mentioned
    1 Post(s)
    Quoted
    12 Post(s)

    Default Request how to use a function/procedure here!

    Well I was thinking and I decided I wanted to help people.
    So how does this work?
    You post saying something like:
    "How do you use Mouse?"
    I would respond with something like:
    "Mouse(Something.X, Something.Y, 4, 4, false);
    Mouse is the function
    The X and Y are the co-ordinates which have to be declared before
    4, 4 is the randomness to x and y
    False is right click
    True is left click"

    If I get people coming and posting just to try and test me I will not respond.
    I am doing this to help people not to prove anything.

    Hope I help you

    T~M

  2. #2
    Join Date
    Oct 2009
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    how do I typed message?

  3. #3
    Join Date
    Apr 2007
    Location
    UK
    Posts
    2,295
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    TypeSend('hello');

    Rogeruk's Al-Kharid Tanner V1.1 [Released]
    Rogeruk's Barbarian Crafter [Coming Soon]
    Rogeruk's Guild Fisher [Coming Soon]
    !! - Taking Requests - !!

  4. #4
    Join Date
    May 2007
    Location
    UK
    Posts
    4,007
    Mentioned
    1 Post(s)
    Quoted
    12 Post(s)

    Default

    to write to the debug box use:
    Writeln('this will go to the debug box');
    Writeln is the function
    brackets and quote mark open and closesqthe text.

    But if your script clicks in a notepad then you want to type something use:
    TypeSend('Im writing where i have clickes');
    same as above with the function description
    Hope this helps

    T~M

  5. #5
    Join Date
    Mar 2007
    Location
    <3
    Posts
    2,683
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quick note:
    If you want the script to type but not press enter use TypeSendEx instead.

  6. #6
    Join Date
    May 2007
    Location
    UK
    Posts
    4,007
    Mentioned
    1 Post(s)
    Quoted
    12 Post(s)

    Default

    oh yeh forgot bout that n1ke
    cheers.
    Any other requests?

    T~M

  7. #7
    Join Date
    Sep 2006
    Posts
    322
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    I got a request, first I'll give you what I got.

    SCAR Code:
    Procedure CreateAcc; //By UNCfan1119
    begin
          MouseBox(324, 212, 400, 212, 1);//Clicks "create account" screen
          Wait(100 + Random(100));
          MouseBox(354, 316, 420, 315, 1);//Clicks on the space for username
          Wait(100 + Random(100));
          TypeSend(Players[CurrentPlayer].Name);
          Wait(1000+random(1000));
    // BEGIN CHECK FOR USERNAME TAKEN
          if (GetColor(503, 321) = 1251528) then
          TerminateScript;//if name is taken, script will stop
          if (GetColor(504, 322) = 3177241) then
    // END CHECK FOR USERNAME TAKEN
          MouseBox(348, 360, 387, 371, 1);//Clicks on space for password
          Wait(100+random(100));
          TypeSend(Players[CurrentPlayer].Pass);
          Wait(100+random(100));
          MouseBox(347, 387, 379, 399, 1);//Clicks on space for re-password
          Wait(100+random(100));
          TypeSend(Players[CurrentPlayer].Pass);
          Wait(100+random(100));
    // BEGIN DOB (default 1/1/1969)
          MouseBox(361, 454, 366, 457, 1);
          Wait(10+random(10));
          MouseBox(334, 485, 336, 490, 1);
          Wait(100+random(100));
          MouseBox(457, 455, 464, 454, 1);
          Wait(10+random(10));
          MouseBox(392, 487, 409, 490, 1);
          Wait(100+random(100))
          MouseBox(477, 453, 483, 458, 1);
          Wait(10+random(10));
          TypeSend('1969');
          MouseBox(378, 342, 387, 346, 1);
          Wait(100+random(100));
          MouseBox(378, 409, 387, 409);
          Wait(100+random(100));
    //END DOB
          MouseBox(129, 425, 182, 428, 1);//USA
          Wait(100+random(100));
          MouseBox(469, 400, 649, 404, 1);//Clicks continue
          Wait(5000+random(1000));//Wait for slow computers
          MouseBox(77, 360, 85, 366, 1);//I've read privacy policy
          Wait(100+random(100));
          MouseBox(78, 381, 86, 388);//I've read and agree w/Terms
          Wait(9000+random(5000));
          MouseBox(332, 342, 416, 348, 1);//Play Runescape
    end; // Create Account procedure by UNCfan1119

    In my form, where the user would type the username/password they would like to create, I have:
    SCAR Code:
    User.Caption := 'User';
    SCAR Code:
    Pass.Caption := 'Pass';

    I'd like to know, how I can make it so that when the user types in his user, and pass, it knows thats what it is in:
    SCAR Code:
    TypeSend(Players[CurrentPlayer].Name);
    SCAR Code:
    TypeSend(Players[CurrentPlayer].Pass);



    Also, do you have any idea about the "go" button, with forms. It should be something like OnClick:true or something, not to sure. Thanks for any help.

  8. #8
    Join Date
    May 2007
    Location
    England
    Posts
    4,140
    Mentioned
    11 Post(s)
    Quoted
    266 Post(s)

    Default

    SCAR Code:
    Players[CurrentPlayer].Name:= User.caption;
    Players[CurrentPlayer].Pass:= Pass.caption;
    <3

    Quote Originally Posted by Eminem
    I don't care if you're black, white, straight, bisexual, gay, lesbian, short, tall, fat, skinny, rich or poor. If you're nice to me, I'll be nice to you. Simple as that.

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
  •