Без ~ попробую.
Без ~ работает, вроде, получше, но что-то не то?…
Попытаюсь понять, что не устраивает, отпишусь.
А Вы какой таймер имеете ввиду?
ShiftUp
Без ~ попробую.
когда бы таймер перезапускался, то оно бы "стояло" в форме "нажат шифт"…
А Вы какой таймер имеете ввиду?
]]>
~Shift::
ToolTip % (Start := A_TickCount) " {Shift Down}"
Input
SetTimer, ShiftUp, -1
Return
ShiftUp:
Input, v, L1 T1 V
If ErrorLevel != NewInput
ToolTip % A_TickCount - Start " {Shift Up}"
Return
Ну он и перезапускается. А задержка 10 мс не может быть заметна.
Заметил, вот запущен FAR, там меню нижнее меняется в зависимости от нажатого шифта, в частности.
Беру и "долблю" (с запущенной Вашей программой, ессно!) по шифту — и вижу, что меню периодически меняется, когда бы таймер перезапускался, то оно бы "стояло" в форме "нажат шифт"…
Shift::
SendInput {Shift Down}
Input
SetTimer, ShiftUp, -1
Return
ShiftUp:
Input, v, L1 T1 V
If ErrorLevel != NewInput
SendInput {Shift Up}
Return
-------------
Вот бы ещё сделать, чтобы таймер перезапускался заново при каждом нажатии Shift, а так он отрабатывает некую выдержку, затем новое нажатие его заново запускает.
Ну он и перезапускается. А задержка 10 мс не может быть заметна. Без SetBatchLines это вообще таймаут выполнения строк кода.
]]>С многократными нажатиями Shift не хорошо получается, тогда может так:
Вот бы ещё сделать, чтобы таймер перезапускался заново при каждом нажатии Shift, а так он отрабатывает некую выдержку, затем новое нажатие его заново запускает.
]]>
Shift::
SendInput {Shift Down}
SetTimer, ShiftUp, -1
Return
ShiftUp:
Input, SingleKey, L1 T1 V
If ErrorLevel != NewInput
SendInput {Shift Up}
Return
Shift::
SendInput {Shift Down}
Input, SingleKey, L1 T1 V
SendInput {Shift Up}
Return
Проще дописать минус.
Тут Вы совершенно правы, я это читал когда-то, но забыл, ибо программирую на AHK «от случая к случаю»...
Вопрос в смысле проверки A_PriorHotkey. Проверки ST вполне достаточно.
А вот тут Вы заблуждаетесь, если проверять только флаг, то шифт будет активен всегда ровно секунду (в нашем случае), даже если мы нажмём много буквенных клавиш, и все отобразятся заглавными, нам же нужно, чтобы именно одна буква «капитализировалась»...
]]> ~Shift::
ST := 1
settimer, ShiftTimer, -1000
return
ShiftTimer:
ST := 0
return Вопрос в смысле проверки A_PriorHotkey. Проверки ST вполне достаточно. Участие A_PriorKey было бы понятно наполовину, но A_PriorHotkey зачем.
#If STПо мне, тут вполне достаточно.
]]>#If (A_PriorHotkey = "~Shift") and (ST = 1)и
ShiftTimer:
settimer, ShiftTimer, off
ST := 0
return If A_PriorHotkey = "~Shift" and ST = 1
А каков смысл использования в условии A_PriorHotkey?
И зачем постоянно включенный таймер?
ST := 0
return
~Shift::
ST := 1
settimer, ShiftTimer, 1000 ; Кол-во миллисекунд для сохранения состояния шифта
return
#If A_PriorHotkey = "~Shift" and ST = 1
BackSpace::return
vk51::+vk51 ; Й
vk57::+vk57 ; Ц
vk45::+vk45 ; У
vk52::+vk52 ; К
vk54::+vk54 ; Е
vk59::+vk59 ; Н
vk55::+vk55 ; Г
vk49::+vk49 ; Ш
vk4F::+vk4F ; Щ
vk50::+vk50 ; З
vkDB::+vkDB ; Х
vkDD::+vkDD ; Ъ
vk41::+vk41 ; Ф
vk53::+vk53 ; Ы
vk44::+vk44 ; В
vk46::+vk46 ; А
vk47::+vk47 ; П
vk48::+vk48 ; Р
vk4A::+vk4A ; О
vk4B::+vk4B ; Л
vk4C::+vk4C ; Д
vkBA::+vkBA ; Ж
vkDE::+vkDE ; Э
vk5A::+vk5A ; Я
vk58::+vk58 ; Ч
vk43::+vk43 ; С
vk56::+vk56 ; М
vk42::+vk42 ; И
vk4E::+vk4E ; Т
vk4D::+vk4D ; Ь
vkBC::+vkBC ; Б
vkBE::+vkBE ; Ю
vkBF::+vkBF ; .
vkC0::+vkC0 ; Ё
vk31::+vk31 ; 1
vk32::+vk32 ; 2
vk33::+vk33 ; 3
vk34::+vk34 ; 4
vk35::+vk35 ; 5
vk36::+vk36 ; 6
vk37::+vk37 ; 7
vk38::+vk38 ; 8
vk39::+vk39 ; 9
vk30::+vk30 ; 0
vkBD::+vkBD ; -
vkBB::+vkBB ; =
#If
ShiftTimer:
ST := 0
return