shrubie1
2008-04-22 09:57:07
TEH RAMBLER
This is my Autotalker. Easy to use and works until you stop it. Please give Feed back and Rate.
2008-04-22 09:57:07
2008-04-22 23:10:38
2008-04-22 23:31:15
2008-04-26 11:20:06
2008-07-25 04:43:46
const
Message1=('Cyan:'); //Type the colour you want your text to appear in between the ' '
Message2=('Shake:'); //Type the style you want your text to appear in between the ' '
Message3=('W00t'); // Type you message in between the ' '
// You can leave any of the above blank if you wish.
procedure RambleOn;
begin
sendkeyssilent(Message1)
sendkeyssilent(Message2)
sendkeyssilent(Message3)
sendkeyssilent(chr(13)); // This is the enter button.
wait (4500+random(50)); // This is the time between each time you say the text.
// 1000 milliseconds = 1 second. Feel free to change.
const
Message = 'Your Text Here';
Colour = 'The Colour You Want Your Text:';
Effect = 'The Effect That Your Text Will Have:';
WaitTime = 3000; //Time to wait between each time your message gets typed
RandomWait = 1000; //Amount of randomness to add onto WaitTime
procedure RambleOn;
begin
Sendkeyssilent(Colour+Effect+Message+Chr(13))
Wait (WaitTime + random (RandomWait));
end;