Wade007
2007-11-23 15:32:15
Ok, here is my auto talker, i hope you guys like it. Although it is not even at beta…:D
Lemme know any suggestions, problems, comments. ETC.:fiery:
Lemme know any suggestions, problems, comments. ETC.:fiery:
//Effects////////////////////Please post more
//Cyan:
//Glow1:
//Glow2:
//Glow3:
program autotalker;
Procedure Talk;
var
talk2:String
Talk: String
Say: string;
Effect: String;
Begin
//Edit stuff to say here//////////////
Talk2:='Jordan Productions'/////////
Talk:='Jordan Productions'//////////
say:='Jordan Productions'///////////
Effect:=''///Remember to put colon in////Leave blank for no effect
//DO NOT EDIT BELOW!//////////////////
Repeat
sendkeys (effect+say)
wait(1000+random(300))
sendkeys (Effect+talk)
wait(1000+random(120))
Until(False)
end;
begin
talk
end.