trulu Posted April 1, 2012 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
qsek Posted April 1, 2012 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
trulu Posted April 1, 2012 Author 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.
VixinG Posted April 1, 2012 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]
trulu Posted April 2, 2012 Author 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
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