Results 1 to 15 of 15

Thread: Poider's Auto Talkert

  1. #1
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Poider's Auto Talkert

    Hey Guys i'm new at scripting so post what you think of my script its not much but hey it's my first scripts

  2. #2
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Glad you used you first post for a script .

    PHP Code:
    procedure AutoTalk;
    begin
    if(IsFKeyDown(2))then
    begin
    TypeSend
    (Message1);
    end;
    if(
    IsFKeyDown(4))then
    begin
    TypeSend
    (Message2);
    end;
    if(
    IsFKeyDown(5))then
    begin
    TypeSend
    (Message3);
    end;
    end
    Correct me if i'm wrong, but won't that lag you? I don't have scar here but i know it works. Put some waits in there so it doesn't screw up if it does lag you. Also, you did well on this, go read a few tutorials on how to make a powerminer or something.

  3. #3
    Join Date
    Feb 2007
    Posts
    3,616
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    for the record, he didn't put waits in it because he coppied it from my tutorial things the beginner tuts don't teach you but nice signature

    EDIT: Just tried my uber script and it doesen't lag!

  4. #4
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thx guys for the feed back i will keep that in mind about the lag and stuff i am still learning how to make other scripts and this script is not copied i did not put waits in because i dind't think i needed them... thx for the advice
    hey321

  5. #5
    Join Date
    Dec 2006
    Posts
    374
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    procedure AutoTalk;
    begin
    wait(1);
    if(IsFKeyDown(2))then
    begin
    TypeSend(Message1);
    end;
    wait(1);
    if(IsFKeyDown(3))then
    begin
    TypeSend(Message2);
    end;
    wait(1);
    if(IsFKeyDown(4))then
    begin
    TypeSend(Message3);
    end;
    end;
    added waits to it and fixed ur fkeys.. u said in ur script to use fkey 2,3 and 4, but in ur script it said if(isfkeydown(2)), 4, 5 wich might confuse some1 who dont know how to script or read them --.--
    Another awsome scripting forum! Check it out: www.Uberbroproductions.net/forums
    TRY MY VARROCK ZAMMY MAGE CURSER/CONFUSER/WEAKENER! THE LINK IS BELOW
    http://www.srl-forums.com/forum/varr...56.html?t=6356
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~


  6. #6
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thx for the help i'm been doing alot of school work so i have not much time to look at tutorials but thx for the feed back

  7. #7
    Join Date
    Feb 2007
    Posts
    433
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ok Syberium ur way better at scripting than me but u DO NOT need to put waits in cuz u have to press down F2 F3 or whatever u set it to so it will type it than send it so NO LAG i posted something like this on JADs tut too but yeah Poider if u have MSN mine is pwnt_by_pwnt@hotmail.com and i can help u with scripting

  8. #8
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yeah i do i have just added you... Where do you live cause i live in Australia so we might not be able to chat

  9. #9
    Join Date
    Oct 2006
    Posts
    2,297
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    if this is your first script, good work! keep it up! Btw once i made an autotalker that plays a sound and/or opens the trade when a trade has been found you can search for it if you want.
    I didn't used TypeSend because it didn't typed numbers :s

  10. #10
    Join Date
    Feb 2007
    Posts
    433
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i live in the USA poider but we can talk to each other on here ok well im gonna be looking at peoples scripts and maybe training my autoer ok well again i live in the USA

  11. #11
    Join Date
    Mar 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    it's good but some people dont want to touch the keyboard at all when they want a auto talker
    so instead of having it so you have to push a button make it do it on it's own and put in randomness
    you can look at mine for some ideas but anything you copy i want my name mentioned plz
    posted my script below
    i'll take out the forms because they will mess you up if you have never seen them before


    SCAR Code:
    //directions
    //put what you want to say in lines  9-12
    //press play to start
    //press F12 to stop
    program AUTO-TALKER;
    {.include SRL\SRL.Scar}

    const
    ms1='cyan:wave2:selling full rune-your rs name here';//put ur rs name after the -
    ms2='white:wave2:selling full rune-your rs name here';
    ms3='flash2:wave2:selling full rune-your rs name here';
    ms4='green:wave2:selling full rune-your rs name here';


    procedure namechange(wstatus :String);
    begin
    status(wstatus);
    GetApplication.Title:=wstatus;
    GetSelf.Caption:=wstatus;
    end;

    procedure change;
    begin
    namechange('Auto-Talker by Diamondhero6')
    wait(50);
    end;

    procedure ThankYou;
    begin
    writeln('-------Auto-Talker-------')
    writeln('-----by Diamondhero6-----')
    writeln('- I know u will like it -')
    writeln('@@##$$  Thank you  $$##@@')
    writeln('         ENJOY           ')
    end;

    procedure send;
    begin
    case random(4) of // THIS ADDS RANDOMNESS SO IT WONT BE IN OREDER BUT TYPE IT RANDOMLY
    0:TypeSend(ms1)
    1:Typesend(ms2)
    2:Typesend(ms3)
    3:Typesend(ms4)
    end;
    end;



    BEGIN
    SetupSrl
    cleardebug
    Thankyou
    change
    SafeInitForm
    repeat
    send
    wait(1000)
    until(isfkeydown(12))
    end.

  12. #12
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Nice

    Nice script i still havn't gotten the hang of the variables like string, integer and boolean if anyone could help me understand them by making a good tut i would be soooo happy





    If you don't know how to find something if you still don't know how then you lol nah just jking look in the tut section

  13. #13
    Join Date
    Feb 2007
    Posts
    433
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    diamond i understand what ur saying but if u do it like that than thats kinda an easier way to get banned because if u just repeat the same thing over(well the random is good) than someone trade with u and ur still typing it than thats an easy ban so what he did is good cuz u need to be touching the mouse to trade with people and if u make all three say different things like selling full rune 200k!!!! <- (name here) and than like another one would say selling full rune! and like the last one say (name here) is selling full rune for 200k!!! and if u wanted to say one like 3 times in a row than his is better and i dont think anyone is too lazy to just press F2 or F3 or F4 or something when there playing runescape lol but its good that ur helping people

  14. #14
    Join Date
    Mar 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    not if you make it accept trades which i am working on and i thought i did make them all differant o mayb not and some people will want to let it run for hours if it world like 2.

    O and by the way these script was stolen, originally posted by JAD

    EDIT:didn't realize JAD had already said that sorry.

    Quote Originally Posted by JAD
    program New;
    {.include SRL/SRL.scar}
    const
    Message1 ='This Uber Tut Is Made By JAD!';
    Message2 ='JAD is the Uber of Uberness!';
    Message3 ='You are doing very well reading this Uber Tut by JAD!';
    procedure AutoTalk;
    begin
    if(IsFKeyDown(2))then
    begin
    TypeSend(Message1);
    end;
    if(IsFKeyDown(4))then
    begin
    TypeSend(Message2);
    end;
    if(IsFKeyDown(5))then
    begin
    TypeSend(Message3);
    end;
    end;

    begin
    SetupSRL;
    repeat
    AutoTalk;
    until(IsFKeyDown(12));
    end.
    Here the links, it's in his tut click here!

  15. #15
    Join Date
    Feb 2007
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    sorry to say but it is really my work ever heard the saying *Great Minds think alike*??

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Your Full Guide to Preparing to Auto [SCAR, SRL, SVN, HowTo Auto]
    By Runescapian321 in forum Outdated Tutorials
    Replies: 71
    Last Post: 10-11-2008, 03:46 AM
  2. Replies: 5
    Last Post: 11-23-2007, 08:45 PM
  3. Poider's Auto Login
    By PheteyGee in forum RS3 Outdated / Broken Scripts
    Replies: 3
    Last Post: 04-25-2007, 11:29 PM
  4. Poider's Auto Login
    By PheteyGee in forum RS3 Outdated / Broken Scripts
    Replies: 3
    Last Post: 03-16-2007, 10:19 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
  •