Results 1 to 10 of 10

Thread: My first script-s

  1. #1
    Join Date
    Aug 2006
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default My first script-s

    these are my first script, i finnaly made the jump from leacher to scripter <3 you Klaus


    SCAR Code:
    program Autotalker

    ;Const

    whattosay = 'type here';//To say something press f3. noobs, FIRST SCRIPT
    begin

    repeat

    if(IsFKeyDown(3))then

    begin

    sendkeys(whattosay);

    SendKeysVb('{ENTER}',false);

    end;

    wait(300);//

    until(false)

    end.

    auto talker if your retarded click f3 to make it type, must crosshair, works in anything

  2. #2
    Join Date
    Aug 2006
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Second Script auto clicker - 1 second interval

    SCAR Code:
    program Autoclicker ;
    Var x,y :integer;

    procedure click;
    begin
    GetMousePos(x,y)
    clickMouse(x,y,true)
    Wait(1000)
    End;

    procedure confirmation;
    begin
    Writeln('Obviously worked by h31pm3')
    end;

    begin
    Repeat;
    click;
    until(false)
    End.

  3. #3
    Join Date
    Aug 2006
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default lol

    Auto Login ----

    SCAR Code:
    program Login;

    procedure existinguser;
    begin
    clickMouse(456,291,true)
    Wait(1000)
    End;

    procedure Username;
    begin
    Sendkeys('username')// enter username
    Wait(500)
    End;

    procedure Passwordenter;
    begin
    SendKeysVb('{ENTER}',false);
    End;

    procedure Passwordtyping;
    begin
    Sendkeys('password')//Enter pass
    Wait(1000)
    End;

    procedure login;
    begin
    clickMouse(294,321,true)
    End;

    begin
    existinguser;
    Username;
    Passwordenter;
    Passwordtyping;
    login;
    end.

    so many bugs in this when i made it ( do not fear i fixed them ) so many silly mistakes



    LOL this is sad, im trying to contribute, 15 views, no replies, i make the jump and no one gives a ****, i make 3 scripts in a day, like wtf, no encouragement?
    Thanks guys <3 you Klaus Comments appreciated!

  4. #4
    Join Date
    Feb 2006
    Posts
    3,044
    Mentioned
    4 Post(s)
    Quoted
    21 Post(s)

    Default

    Thanks for credit .. I don't really earn it.. I have been mean to you :/

    Good to see you are trying

  5. #5
    Join Date
    Mar 2006
    Posts
    795
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    not bad, hope you keep on scripting and learn more and create Elite scripts.



    Dont Steal..

  6. #6
    Join Date
    Oct 2006
    Posts
    90
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    lol nice

  7. #7
    Join Date
    Feb 2006
    Location
    Amsterdam
    Posts
    6,136
    Mentioned
    28 Post(s)
    Quoted
    17 Post(s)

    Default

    Good work. You are certainly getting the hang of this...
    SRL is a Library of routines made by the SRL community written for the Program Simba.
    We produce Scripts for the game Runescape.

  8. #8
    Join Date
    Aug 2006
    Location
    London
    Posts
    2,021
    Mentioned
    2 Post(s)
    Quoted
    0 Post(s)

    Default

    good work, i glad you made the jump,
    theres 1 thing i noticed is that you dont need to put "sendkeysvb", most people just put "sendkeys(whattotype+chr(13))", this means it will press keyboard code 13 which happens to be enter.
    Join the Official SRL IRC channel. Learn how to Here.

  9. #9
    Join Date
    Dec 2006
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hey topic maker... could you teach me some stuff about scripting?

  10. #10
    Join Date
    Dec 2006
    Location
    London, England
    Posts
    36
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Just a small point ;)

    Just a quick tip the procedure:
    SCAR Code:
    procedure confirmation;
    begin
    Writeln('Obviously worked by h31pm3')
    end;

    it is not included in the script

    SCAR Code:
    begin
    Repeat;
    click;
    until(false)
    End.

    but dont worry:wink:
    just some minor ajustment and it is!! *YaY*

    SCAR Code:
    begin
    comfirmation;
    repeat
    click;
    until(False);
    End.

    but it runs smoothly never the less, Good Work:wink:

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
  •