#IfWinActive World of Warcraft
SetKeyDelay, 50 ; Keystroke is sent four times per second
#MaxHotkeysPerInterval 1000 ; Rate of hotkey activations beyond which a warning dialog will be displayed.
                                                ; Increase it to delay the warning message.


$1::
GetKeyState, state, 1, P
if state = D
Loop
{
Send {1}
return
}


$2::
GetKeyState, state, 2, P
if state = D
Loop
{
Send {2}
return
}

$3::
GetKeyState, state, 3, P
if state = D
Loop
{
Send {3}
return
}
$4::
GetKeyState, state, 4, P
if state = D
Loop
{
Send {4}
return
}

$5::
GetKeyState, state, 5, P
if state = D
Loop
{
Send {5}
return
}

$f::
GetKeyState, state, f, P
if state = D
Loop
{
Send {f}
return
}

$h::
GetKeyState, state, h, P
if state = D
Loop
{
Send {h}
return
}

$r::
GetKeyState, state, r, P
if state = D
Loop
{
Send {r}
return
}