Hi. I'm Runningun01 If You Haven't Already Noticed. I've Just Recently Been Introuduced To S.C.A.R., I Have Past Experience In Other Coding Languages, And Became Immediately Interested. I Read A Few Scripts, And Figured Out Procedures, Variables, And Constants. I'm Very Open To Any Positive, Negative, Constructive Feedback. Also, If Theres A Tutorial On S.C.A.R., I'd Appreciate A Link.
Thanks.
Code:Program AutoTalker; Var I: Integer; Const Say1=('Your Message Here'); {Just Constants You Have To Set Up.} Say2=('Your Message Here'); {Just Constants You Have To Set Up.} Say3=('Your Message Here'); {Just Constants You Have To Set Up.} Procedure talk; Begin sendkeys(Say1) {This Is Whats In Your Constant Say1} sendkeys(chr(13)); {This Is The Enter Key.} wait(2000+random(45)); {Waits 2 Seconds With A Random 45 Miliseconds Added} sendkeys(Say2) {This Is Whats In Your Constant Say2} sendkeys(chr(13)); {This Is The Enter Key.} wait(2000+random(45)); {Waits 2 Seconds With A Random 45 Miliseconds Added} sendkeys(Say3) {This Is Whats In Your Constant Say3} sendkeys(chr(13)); {This Is The Enter Key.} wait(2000+random(45)); {Waits 2 Seconds With A Random 45 Miliseconds Added} End; Begin I:=0; Repeat I:= I + 1; Talk; Until(I >= 5); {5 Is The Amount Of Time To Say It.} End. {If You Want To Keep It Going On Forever, Without A Set Amount Of Times To Repeat The Process Replace: Begin I:=0 Repeat I:= I + 1 Talk; Until(I >= 5); End. With Begin Repeat Talk; Until(False); End. }


Reply With Quote


