I tried this but doesnt work. It doesnt write my text? Why? + dont say TypeSendEx plz. Tried and it doesnt work :SCode:program Auto_Talker; {$DEFINE SMART} {$i srl-6/srl.simba} Const Message1=('Text'); procedure SendMessage; Begin Wait(10000+Random(250)); //1000=1000ms=1second; Adjust for you own need TypeSend(Message1,True) End; Begin SetupSRL; ActivateClient; Repeat SendMessage; Until(False) End.
What happens when you press run?
Well when I run the script, its all good, load the client and stuff but it doesnt say anything ... just stays there until log out for inactive :S
also tried that but doesnt say anything:
Code:program AutoTyper; {$define SMART} {$i srl-6/srl.simba} procedure autoType; begin repeat wait(10000 + random(500)); typeByte(VK_ENTER); wait(1000 + random(300)); typeSend('TEXT GOES HERE',true); until(false) end; begin setupSRL; autoType; end.


Reply With Quote








like this?
