Серый форум — AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-07T00:26:49Z

Спасибо!Теперь отлично.

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-06T05:41:15Z

Вероятнее всего нажатие происходить в момент когда скрипт ждет Sleep 400, вылечить можно добавив переменную:

rcontrol::
WhileSend7:=1
KeyWait, rcontrol
while (!GetKeyState("rcontrol", "P") And WhileSend7 = 1) {
Send 7
Sleep 400
}
Return
#If WhileSend7
rcontrol::WhileSend7:=0

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T17:31:02Z

rcontrol::
KeyWait, rcontrol
while !GetKeyState("rcontrol", "P") {
Send 7
Sleep 400
}
Return

Вроде все так и сделал,но цикл то идет,а останавливается как-то рандомно,то со 2 то с 3 нажатия,где я мог ошибиться?

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T15:34:34Z

Ox1de

1::
KeyWait, 1
while !GetKeyState("1", "P") {
Send 2
Sleep 100
}
Return

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T14:15:05Z

Все-таки, удалось написать с ExitApp. Ограничение такого метода в том, что между нажатиями клавиши нужен промежуток времени в 300-500 милисекунд (пока скрипт новый запустится)

#SingleInstance off
#NoEnv
#UseHook On
SetBatchLines, -1
SetKeyDelay -1

Interval := 10

1::
	SetTimer timer, 0
	While GetKeyState("1","P") {
		Send 1
		Sleep %Interval%
		Send 2
		Sleep %Interval%
		Send 3
		Sleep %Interval%
		Send 4
		Sleep %Interval%
		Send 5
		Sleep %Interval%
		Send 6
	}
	return

timer:
	if !GetKeyState("1","P")
	{
		Run %A_ScriptFullPath%
		ExitApp
	}

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T14:02:19Z

То что нужно получилось! Спасибо ребята! Nikva отдельное спасибо! А подскажите еще вот такой момент : нужно к примеру на клавишу 1 сделать цикл клавиши 2 и что бы он включался клавишей 1 и воспроизводился до бесконечности и этой же клавишей 1 выключался.

P.s. Заранее извиняюсь если много вопросов.

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T13:42:33Z

mafckz пишет:

с #SingleInstance force создаются дубликаты скрипта (десятки и сотни)

Я лечу такие скрипты добавлением в начало это кода:

DetectHiddenWindows, on
IfWinExist, % A_ScriptName
ExitApp

В ahk скриптах всегда есть скрытое окно, и если уже существует окно с именем скрипта, он тут же завершится.

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T13:07:24Z

Поэксперементировал с Reload, чтобы при отпускании клавиши (проверка через таймер) скрипт перезагружался - не получилось, даже с #SingleInstance force создаются дубликаты скрипта (десятки и сотни). Если скомпилировать скрипт и использовать ExitApp, то можно сделать в паре с другим отдельным скриптом, который будет запускать скомпилированный скрипт (рабочий) при его отсутствии (в процессах).

А так, видимо, пириведенный выше вариант самый "дубовый".

Можно сделать немного лаконичней код с помощью функции:

ExitIfKeyIsUp(key) {
	If !(GetKeyState(key,"P"))
		Exit	
}

sc4f::
   Loop
   {
      Send, {10
	  ExitIfKeyIsUp("sc4f")
      Send, {sc41}
	  ExitIfKeyIsUp("sc4f")
      Sleep, 10
	  ExitIfKeyIsUp("sc4f")
      Send, {sc44}
      Sleep, 10
	  ExitIfKeyIsUp("sc4f")
      Send, {sc43}
      Sleep, 10
	  ExitIfKeyIsUp("sc4f")
      Send, {sc42}
      Sleep, 10
	  ExitIfKeyIsUp("sc4f")
      Send, {sc41}
      Sleep, 10
	  ExitIfKeyIsUp("sc4f")
   }
   Return

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T12:48:58Z

У меня нажимает, попробуйте SetKeyDelay.

SetKeyDelay, 100, 50
sc4f:: ; NumpadEnd
   Loop
   {
      Send, {10
      Send, {sc41} ; F7
      Sleep, 10
      If !GetKeyState("sc4f", "P")
         Break
      Send, {sc44} ; F10
      Sleep, 10
      If !GetKeyState("sc4f", "P")
         Break
      Send, {sc43} ; F9
      Sleep, 10
      If !GetKeyState("sc4f", "P")
         Break
      Send, {sc42} ; F8
      Sleep, 10
      If !GetKeyState("sc4f", "P")
         Break
      Send, {sc41} ; F7
      Sleep, 10
      If !GetKeyState("sc4f", "P")
         Break
   }
   Return

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T12:42:58Z

Nikva Шикарно, вот то что нужно казалось бы, но почему таким способом ф1-ф12 не хотят нажиматься?

P.s Разобрался, спасибо тебе большое!

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T11:28:13Z

У меня вот таким образом прописан макрос, покажите пожалуйста что нужно дописать, чтобы этот цикл обрывался сразу как отпускаю клавишу. И еще появился вопрос, как сюда дописать длительность нажатия клавиши и задержку после того как отпустишь, я так понимаю sleep это и есть задержка?


sc4f::
   Loop
   {
      Send, {10
      Send, {sc41}
      Sleep, 10
      Send, {sc44}
      Sleep, 10
      Send, {sc43}
      Sleep, 10
      Send, {sc42}
      Sleep, 10
      Send, {sc41}
      Sleep, 10


      If !GetKeyState("sc4f", "P")
         Break
   }
   Return

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T09:36:57Z

Я делаю так:

1::
While GetKeyState("1","P") {
Send 2
If !(GetKeyState("1","P"))
Break
Send 3
If !(GetKeyState("1","P"))
Break
Send 4
If !(GetKeyState("1","P"))
Break
Send 5
If !(GetKeyState("1","P"))
Break
Send 6
If !(GetKeyState("1","P"))
Break
}
Return

Если кто то покажет как делать правильно, буду признателен.

Re: AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T06:47:11Z

Ox1de, после знаков препинания нужен отступ (пробел).
В названии темы должен быть префикс скриптового языка.

AHK: Как сделать цикл который обрывается сразу после отжатия клавиши?

2016-04-05T00:09:53Z

Здравствуйте, собственно вопрос в шапке, нужно сделать цикл, к примеру пока держу клавишу 1, печатаются клавиши 23456, но, как только я ее отпускаю цикл должен сразу прерываться, поясню, к примеру я нажал клавишу и тут же отпустил, цикл будет идти до конца и закончится, а нужно чтобы он обрывался сразу когда клавиша отжата не доходив до конца. Как это реализовать?