Code:
HotKeySet("{F9}", "hide")
HotKeySet("{F10}", "show")
AutoItSetOption("WinTitleMatchMode", 4)
While 1
Sleep(1000)
WEnd
Func hide()
Global = 0
Global = WinGetHandle("classname=GxWindowClassD3d")
WinSetState(, "", @SW_MINIMIZE)
WinSetState(, "", @SW_HIDE)
If @error Then
MsgBox(0, "error", "couldnt find WoW")
Else
While 1
= Random(1, 4, 1)
If = 1 Then
ControlSend(, "", "", "{UP DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{UP UP}")
ControlSend(, "", "", "{DOWN DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{DOWN UP}")
Sleep(200000 + Random(5000, 15000, 1))
ElseIf = 2 Then
ControlSend(, "", "", "{RIGHT DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{RIGHT UP}")
ControlSend(, "", "", "{LEFT DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{LEFT UP}")
Sleep(200000 + Random(5000, 15000, 1))
ElseIf = 3 Then
ControlSend(, "", "", "{DOWN DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{DOWN UP}")
ControlSend(, "", "", "{UP DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{UP UP}")
Sleep(200000 + Random(5000, 15000, 1))
ElseIf = 4 Then
ControlSend(, "", "", "{LEFT DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{LEFT UP}")
ControlSend(, "", "", "{RIGHT DOWN}")
Sleep(100 + Random(1, 50, 1))
ControlSend(, "", "", "{RIGHT UP}")
Sleep(200000 + Random(5000, 15000, 1))
EndIf
If > 0 Then ExitLoop
WEnd
EndIf
EndFunc ;==>hide
Func show()
Global = 1
WinSetState("World of Warcraft", "", @SW_SHOW)
WinSetState("World of Warcraft", "", @SW_MAXIMIZE)
WinActivate(, "")
EndFunc ;==>show