I'll post what code I have so far:
HotKeySet("{F3}", "Toggle")
Global $speed = 2000
; Toggle run/pause
Func Toggle()
$Toggle = Not $Toggle
While $Toggle
Local $var = WinList("Diablo III")
For $i = 1 To $var[0][0]
If IsVisible($var[$i][1]) Then
ControlSend($var[$i][1],"","","3")
EndIf
Next
Sleep($speed)
WEnd
EndFunc
But, it doesn't work. Not sure if I have just a typo or I'm just plain doing it wrong. Help please!