trulu Posted April 1, 2012 Share Posted April 1, 2012 (edited) what's wrong with this code? expandcollapse popupGlobal $Paused HotKeySet("{ESC}", "Terminate") HotKeySet("{'}", "TogglePause") Func TogglePause() $Paused = NOT $Paused While $Paused sleep(0) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc $i = 0 Send("'") While $i = 0 Do ControlClick("A Client","", "", "left", 631, 453, 2) sleep(5000) ControlClick("A Client","", "", "left", 631, 453, 2) sleep(5000) ControlClick("A Client","", "", "left", 631, 453, 2) sleep(6000) ControlClick("A Client","", "", "middle", 0) sleep(1000) ControlClick("A Client","", "", "left", 639, 216, 2) sleep(10000) ControlClick("A Client","", "", "left", 624, 458, 2) sleep(5000) ControlClick("A Client","", "", "left", 624, 458, 2) sleep(5000) ControlClick("A Client","", "", "left", 624, 458, 2) sleep(6000) ControlClick("A Client", "", "", "middle", 0) sleep(1000) ControlClick("A Client", "", "", "left", 624, 181, 2) sleep(100000) Until $i = 1 WEnd Edited April 1, 2012 by trulu Link to comment Share on other sites More sharing options...
qsek Posted April 1, 2012 Share Posted April 1, 2012 1) what do you want to script to do? 2) what happened instead? 3) what error do you get? Teamspeak 3 User Viewer - Quick and functional TS3 Query script, which shows online users.Cached Screenshot Deleter - Deletes older Fraps Screenshots if they exceed a specified limit.Unresolved Topics:Intercept and modify dragdrop text behaviour in scite Link to comment Share on other sites More sharing options...
trulu Posted April 1, 2012 Author Share Posted April 1, 2012 1) what do you want to script to do?2) what happened instead?3) what error do you get?1)i want my script to send a mouse click to a curtain program while i'm browsing.2 & 3) my script is not working right now, no error msg and doin nothing. Link to comment Share on other sites More sharing options...
VixinG Posted April 1, 2012 Share Posted April 1, 2012 Should be: ControlClick("A Client","", "", "left", 2, 624, 458)It was: ControlClick("A Client","", "", "left", 624, 458, 2)Remember: ControlClick("A Client","", "", "BUTTON", CLICKS, X, Y)fix'd:expandcollapse popupGlobal $Paused HotKeySet("{ESC}", "Terminate") HotKeySet("{'}", "TogglePause") Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc Send("'") While 1 ControlClick("A Client","", "", "left", 2, 631, 453) sleep(5000) ControlClick("A Client","", "", "left", 2, 631, 453) sleep(5000) ControlClick("A Client","", "", "left", 2, 631, 453) sleep(6000) ControlClick("A Client","", "", "middle", 1) sleep(1000) ControlClick("A Client","", "", "left", 2, 639, 216) sleep(10000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(5000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(5000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(6000) ControlClick("A Client", "", "", "middle", 1) sleep(1000) ControlClick("A Client", "", "", "left", 2, 624, 181) sleep(100000) WEnd [indent=3][/indent] Link to comment Share on other sites More sharing options...
trulu Posted April 2, 2012 Author Share Posted April 2, 2012 Should be: ControlClick("A Client","", "", "left", 2, 624, 458) It was: ControlClick("A Client","", "", "left", 624, 458, 2) Remember: ControlClick("A Client","", "", "BUTTON", CLICKS, X, Y) fix'd: expandcollapse popupGlobal $Paused HotKeySet("{ESC}", "Terminate") HotKeySet("{'}", "TogglePause") Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc Send("'") While 1 ControlClick("A Client","", "", "left", 2, 631, 453) sleep(5000) ControlClick("A Client","", "", "left", 2, 631, 453) sleep(5000) ControlClick("A Client","", "", "left", 2, 631, 453) sleep(6000) ControlClick("A Client","", "", "middle", 1) sleep(1000) ControlClick("A Client","", "", "left", 2, 639, 216) sleep(10000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(5000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(5000) ControlClick("A Client","", "", "left", 2, 624, 458) sleep(6000) ControlClick("A Client", "", "", "middle", 1) sleep(1000) ControlClick("A Client", "", "", "left", 2, 624, 181) sleep(100000) WEnd woah thx vixing, it's working now Link to comment Share on other sites More sharing options...
VixinG Posted April 2, 2012 Share Posted April 2, 2012 I'm glad I could help [indent=3][/indent] Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now