Some help

[jimmyxxx]

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 script

HotKeySet ( "{F6}", "SwitchToRUN" )

HotKeySet ( "{F7}", "SwitchToPAUSE" )

HotKeyset ( "{F8}", "QuitScript")

Dim $State = False

MsgBox(64, "AutoQ v1.2 by jimmyxxx", "AutoQ actived, F6 to start Q, F7 to stop and F8 to close")

While(1)

If($State = True)Then

Send( "q" )

EndIf

Sleep(10)

WEnd

Func SwitchToRUN()

$State = True

EndFunc

Func SwitchToPAUSE()

$State = False

EndFunc

Func QuitScript()

Exit

EndFunc

PD: how can i make spaces between every function in the Msgbox

Thanks for help

[jimmyxxx]

Srry for double post

Edited July 16, 2007 by jimmyxxx

[jimmyxxx]

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

[SadBunny]

How about the following. I think it is what you mean and I think it should work

expandcollapse popup

HotKeySet ( "{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

[jimmyxxx]

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

[jimmyxxx]

OK now it seems like this

expandcollapse popup

HotKeyset ( "{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