Results 1 to 2 of 2

Thread: Ok here is my 3rd auto talker version working better than ever!!

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

    Ok here is my 3rd auto talker version working better than ever!!

    Ok here it is, this is very differant than my last 2 because it does just type it all at once then send, it types it letter by letter almost like a person. You can change the typing speed and slow it down. Here it is!
    Code:
    //Directions
    //Set what u would like it to say(line 16)
    //Set how long you would like it to wait until it says again(line 17)
    //hit play
    program AutoTalk;
    
    procedure OpenRSWindow;//this is to open the rs window(it must be the one to left)
    begin
    MoveMouse(106,650);
    Wait(534);
    ClickMouse(169,751,true);
    end;
    
    procedure Talk;
    begin
    SendKeys('H');// what you would like it to say letter by letter use spaces
    wait(284)//If you make this small it will type faster and bigger slower
    SendKeys('e')
    wait(284)
    SendKeys('l')
    wait(284)
    SendKeys('l')
    wait(284)
    SendKeys('o')
    wait(284)
    SendKeys(',')
    wait(284)
    SendKeys('h')
    wait(284)
    SendKeys('o')
    wait(284)
    SendKeys('w')
    wait(284)
    SendKeys(' ')
    wait(284)
    SendKeys('r')
    wait(284)
    SendKeys(' ')
    wait(284)
    SendKeys('u')
    wait(284)
    SendKeys('?'+chr(13))
    wait(5000+random(147));//how long until typed again 1000= 1 second
    end;
    
    procedure ThankYou;
    begin
    writeln('-------Auto-Talker-------')
    writeln('-----by Diamondhero5-----')
    writeln('- I know u will like it -')
    writeln('@@##$$  Thank you  $$##@@')
    writeln('         ENJOY           ')
    end;
    
    begin
    OpenRSWindow
    Thankyou
    repeat
    Talk;
    until(false)
    end.

  2. #2
    Join Date
    Feb 2007
    Posts
    71
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 5
    Last Post: 11-23-2007, 08:45 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
  •