Script help?

[justinblack]

expandcollapse popup

HotKeySet("{PAUSE}","activate")
HotKeySet("{PAUSE}","inactive")

While 1
$a = 0
inactive()
$a = 0
start()
WEnd


func inactive()
Do
Until $a = 1
EndFunc

func activate()
$a = 1
EndFunc

func start()
Do
Send('{LEFT DOWN}')
Sleep(Random(6000,100000)
Send('{LEFT UP}')

Sleep(Random(10000,240000))

Send('{RIGHT DOWN}')
Sleep(Random(2000,11000)
Send('{RIGHT UP}')

Sleep(Random(120000,240000))
Until $a = 1
EndFunc

func quit()
Exit
EndFunc

My assumption is that by hitting the PAUSE key the script will activate and continue until I hit PAUSE again. Also I want the script to press the LEFT and RIGHT arrow keys for random amounts of time. But I can't seem to get it working. Any tips?

Thanks!!!

Edited January 27, 2010 by justinblack

[PsaltyDS]

HotKeySet() calls ONE function for the keystroke. You set that function for "{PAUSE}" to "activate", then immediately changed it to "inactivate". The end result is "inactivate" get called every time you hit "{PAUSE}".

To fix it, just use one Global variable as a flag, and toggle it each time the hotkey is pressed with a single function:

Global $f_Run = False
Global $iVar = 0

HotKeySet("{PAUSE}", "_Pause")
HotKeySet("{ESC}", "quit")

While 1
    If $f_Run Then
        $iVar += 1
        ToolTip("$iVar = " & $iVar)
    EndIf
    Sleep(500)
WEnd

Func _Pause()
    $f_Run = Not $f_Run
EndFunc   ;==>inactive

Func quit()
    Exit
EndFunc   ;==>quit