Серый форум — AHK: Ожидание нажатия

Re: AHK: Ожидание нажатия

null@example.com (slavafedora) — Thu, 09 Feb 2017 01:46:17 +0000

serzh82saratov
Спасибо большое за помощь, что старались.
Нашел более простой и удобный способ.

Re: AHK: Ожидание нажатия

null@example.com (serzh82saratov) — Sun, 05 Feb 2017 07:42:34 +0000

#SingleInstance Force
#NoEnv

#if !wait && (wait := 1)
1::
	addChatMessage("Нажмите Num1, Num2 или Num3")
	SetTimer, reset, -5000 
	Return
	
#if wait
Numpad1::
Numpad2::
Numpad3::
	SetTimer, reset, % (!(wait := ++wait = 3 ? 0 : wait) ? "Off" : -5000) 
	AddChatMessage("Нажали " (A_ThisHotkey = "Numpad1" ? "Num1" : A_ThisHotkey = "Numpad2" ? "Num2" : "Num3"))
	Gosub % (A_ThisHotkey = "Numpad1" ? "proc1" : A_ThisHotkey = "Numpad2" ? "proc2" : "proc3")
	Return
#if

proc1:
	MsgBox,,,% A_ThisLabel,0.4
	Return
proc2:
	MsgBox,,,% A_ThisLabel,0.4
	Return
proc3:
	MsgBox,,,% A_ThisLabel,0.4
	Return
	
reset:
	AddChatMessage("Время истекло")
	wait := 0
	Return

+ Без повтора одной и той же клавиши.


#SingleInstance Force
#NoEnv

#if !wait && (wait := 1, arr := {})
1::
	addChatMessage("Нажмите Num1, Num2 или Num3")
	SetTimer, reset, -5000 
	Return

#if wait && !arr[A_ThisHotkey] && arr[A_ThisHotkey] := 1
Numpad1::
Numpad2::
Numpad3:: 
	SetTimer, reset, % (!(wait := ++wait = 3 ? 0 : wait) ? "Off" : -5000) 
	AddChatMessage("Нажали " (A_ThisHotkey = "Numpad1" ? "Num1" : A_ThisHotkey = "Numpad2" ? "Num2" : "Num3"))
	Gosub % (A_ThisHotkey = "Numpad1" ? "proc1" : A_ThisHotkey = "Numpad2" ? "proc2" : "proc3")
	Return
#if

proc1:
	MsgBox,,,% A_ThisLabel,0.4
	Return
proc2:
	MsgBox,,,% A_ThisLabel,0.4
	Return
proc3:
	MsgBox,,,% A_ThisLabel,0.4
	Return
	
reset:
	AddChatMessage("Время истекло")
	wait := 0
	Return

Re: AHK: Ожидание нажатия

null@example.com (slavafedora) — Sun, 05 Feb 2017 03:51:48 +0000

Почти так.

Re: AHK: Ожидание нажатия

null@example.com (serzh82saratov) — Sat, 04 Feb 2017 18:54:58 +0000

Вариант, если из 3 можно нажать 2 раза любую.


#SingleInstance Force
#NoEnv

#if !wait && (wait := 1)
1::
	Traytip,, Нажмите Num1`,2`,3
	SetTimer, reset, -5000 
	Return
	
#if wait
Numpad1::
Numpad2::
Numpad3::
	SetTimer, reset, % ((wait := wait + 1 = 3 ? 0 : wait + 1) = 3 ? "Off" : -5000)
	Traytip,, % "Нажали " (A_ThisHotkey = "Numpad1" ? "Num1" : A_ThisHotkey = "Numpad2" ? "Num2" : "Num3")
	Return

reset:
	Traytip,, Время истекло
	wait := 0
	Return
	
#if

AHK: Ожидание нажатия

null@example.com (slavafedora) — Sat, 04 Feb 2017 17:50:09 +0000

Решено, код убрал из своих соображений.