$vk5A:: ;z. Знак доллар значит что скрипт не будет сам сам себе посылать клавишу активации(не будет замкнутого цикла)
loop 4
  Send {vk51} ;Z
KeyWait % Ltrim(A_ThisHotkey,"$") ; Ждем отжатие клавиши. Если в нажатой клавише есть знак доллара то убираем его.
return

Вот еще вариант с переменной.
Просто перечисляем какая клавиша отправит 4 раза другую клавишу(в hk_list)

; A = A
; B = Q
; C = Z
hk_list := {vk41:"vk41",vk42:"vk51",vk43:"vk5A"}


;--
FnEventhk := func("FnEventhk").Bind(hk_list)
for hotkeyVar,sendVar in hk_list
	Hotkey,% "$" hotkeyVar,% FnEventhk

FnEventhk(list)
{
	hk := Ltrim(A_ThisHotkey,"$")
	loop 4
	  Send % "{" list[hk] "}"
	 KeyWait % hk
	 Return
}
;--
Return

Вот например это работает

z::
  Send {vk51} код клавиши Q
  Send {vk51}
  Send {vk51}
  Send {vk51}
return

А вот это уже не работает

z::
  Send {vk5A} код клавиши Z
  Send {vk5A}
  Send {vk5A}
  Send {vk5A}
return

Хотелось бы в переменную записывать код кнопки, и потом использоват так ка указано выше.

И еще проблема в том, что если держишь кнопку, он продолжает нажимать. А нужно так,  при нажатии он использовал N раз, и все. До следующего нажатия.

Помогите, если не сложно