jimmyxxx Posted July 16, 2007 Share Posted July 16, 2007 Hi all am new with auto it and am working in a program for autoclicks (left and right for MU)I have so far another script to use the button Q for potions, but i need to mix them in only 1 scriptHotKeySet ( "{F6}", "SwitchToRUN" )HotKeySet ( "{F7}", "SwitchToPAUSE" )HotKeyset ( "{F8}", "QuitScript")Dim $State = FalseMsgBox(64, "AutoQ v1.2 by jimmyxxx", "AutoQ actived, F6 to start Q, F7 to stop and F8 to close")While(1)If($State = True)ThenSend( "q" )EndIfSleep(10)WEndFunc SwitchToRUN()$State = TrueEndFuncFunc SwitchToPAUSE()$State = FalseEndFuncFunc QuitScript()ExitEndFuncPD: how can i make spaces between every function in the MsgboxThanks for help Link to comment Share on other sites More sharing options...
jimmyxxx Posted July 16, 2007 Author Share Posted July 16, 2007 (edited) Srry for double post Edited July 16, 2007 by jimmyxxx Link to comment Share on other sites More sharing options...
jimmyxxx Posted July 16, 2007 Author Share Posted July 16, 2007 PD: it can only be one function at time (right or left click) and the function must start with the same button as it stops (left click f9 and rightclick f10 Link to comment Share on other sites More sharing options...
SadBunny Posted July 16, 2007 Share Posted July 16, 2007 How about the following. I think it is what you mean and I think it should work expandcollapse popupHotKeySet ( "{F6}", "SwitchRunPause" ) HotKeyset ( "{F7}", "QuitScript") HotKeyset ( "{F8}", "SwitchQ") HotKeyset ( "{F9}", "SwitchLClick") HotKeyset ( "{F10}", "SwitchRClick") $run = false $doLclick = false $doRclick = false $doQ = False MsgBox(64, "AutoQ v1.2 by jimmyxxx", "AutoQ actived"& @CR & @CR &"F6 to run/pause script (script starts in Paused mode)"& @CR &"F7 to close"& @CR &"F8 to start/stop Q"& @CR &"F9 to start/stop LClick"& @CR &"F10 to start/stop RClick") While 1 If $run Then If $doLclick Then MouseClick("left") If $doRclick Then MouseClick("right") If $doQ Then Send("q") EndIf Sleep(100) WEnd Func SwitchRunPause() $run = Not $run EndFunc Func DoQ() $doQ = Not $doQ EndFunc Func SwitchLClick() $doLclick = Not $doLclick EndFunc Func SwitchRClick() $doRclick = Not $doRclick EndFunc Func SwitchQ() $doQ = Not $doQ EndFunc Func QuitScript() Exit EndFunc Exit Roses are FF0000, violets are 0000FF... All my base are belong to you. Link to comment Share on other sites More sharing options...
jimmyxxx Posted July 16, 2007 Author Share Posted July 16, 2007 (edited) Yes in a way its right, but autoclick for left click and for right click "shouldnt" work at the same time. What i mean is when u press autoclick for left click, and then u wanna change for autoclick (right click) the left click should pause and so on. , and the other thing is that unlocking script to work is a little confusing. Anyway thanks very much for ur help. Edited July 16, 2007 by jimmyxxx Link to comment Share on other sites More sharing options...
jimmyxxx Posted July 16, 2007 Author Share Posted July 16, 2007 OK now it seems like this expandcollapse popupHotKeyset ( "{F6}", "QuitScript") HotKeySet ( "{F7}", "PauseAll" ) HotKeyset ( "{F8}", "SwitchQ") HotKeyset ( "{F9}", "SwitchLClick") HotKeyset ( "{F10}", "SwitchRClick") $run = True $doLclick = false $doRclick = false $doQ = False MsgBox(64, "AutoQ v2 BETA by jimmyxxx", "AutoQ actived"& @CR & @CR &"-F6 to Close Program"& @CR &"-F7 to Pause All"& @CR &"-F8 to Start/Stop Q"& @CR &"-F9 to Start/Stop LeftClick"& @CR &"-F10 to Start/Stop RightClick") While 1 If $run Then If $doLclick Then MouseClick("left") If $doRclick Then MouseClick("right") If $doQ Then Send("q") EndIf Sleep(10) WEnd Func PauseAll() $doQ = Not $doQ $doLclick = Not $doLclick $doRclick = Not $doRclick EndFunc Func SwitchLClick() $doLclick = Not $doLclick EndFunc Func SwitchRClick() $doRclick = Not $doRclick EndFunc Func SwitchQ() $doQ = Not $doQ EndFunc 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