Каскадный хоткей

HotKeySet("{PAUSE}", "Toggle")
$iii = 0
While 1
    Sleep(200)
WEnd
Func Toggle()
    $iii += 1
    If $iii = 5 Then $iii = 0
    Select
        Case $iii = 1
            MsgBox(4096, "!!!", "1", 3)
        Case $iii = 2
            MsgBox(4096, "!!!", "2", 3)
        Case $iii = 3
            MsgBox(4096, "!!!", "3", 3)
        Case $iii = 4
            MsgBox(4096, "!!!", "4", 3)
        Case $iii = 5
            MsgBox(4096, "!!!", "5", 3)
    EndSelect

EndFunc

$Paused = 0
HotKeySet("{TAB}", "TogglePause")

While 1
	Sleep(50)
WEnd

Func TogglePause()
	$Paused += 1
	If $Paused = 2 Then Exit
	While $Paused
		Sleep(100)
	WEnd
EndFunc   ;==>TogglePause