Серый форум — AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (svoboden) — Fri, 20 Jan 2017 22:18:18 +0000

Malcev,

Input, SingleKey, V L1,
(
{LControl}{RControl}{LAlt}{RAlt}{LShift}{RShift}{LWin}{RWin}{AppsKey}
{F1}{F2}{F3}{F4}{F5}{F6}{F7}{F8}{F9}{F10}{F11}{F12}
{Left}{Right}{Up}{Down}{Home}{End}{PgUp}{PgDn}
{Del}{Ins}{BS}{Capslock}{Numlock}{PrintScreen}{Pause}
)
msgbox % SingleKey
ExitApp

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (Malcev) — Fri, 20 Jan 2017 13:08:03 +0000

Если же нужно разделить LCtrl, LShift, LCtrl+LShift, LShift+LControl, то можно так:

list := {"~LShift_a":"00", "~LControl_a":"11", "~<^LShift_a":"22", "~<+LControl_a":"33", "~LShift_b":"44", "~LControl_b":"55", "~<^LShift_b":"66", "~<+LControl_b":"77"}

~LShift::
~LControl::
~<^LShift::
~<+LControl::
If (A_ThisHotkey = "~LShift") or (A_ThisHotkey = "~LControl")
   key := SubStr(A_ThisHotKey, 2)
else
{
   key := SubStr(A_ThisHotKey, 4)
   Hotkey, % key, Off
   KeyWait, % key
   Hotkey, % key, On
}
return

#if (A_PriorKey = key) and (key != "")
a::
b::
Send % list[A_PriorHotKey "_" A_ThisHotkey]
return
#if

Кстати ваша функция AnyKeyWait() реагирует не на все нажатия.
Например нажмите f1:

Input, var, V L1
msgbox % var

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (svoboden) — Fri, 20 Jan 2017 08:22:36 +0000

Это я про свои виртуальные кнопки говорил, у меня они не работали.
А так, вот еще такой вариант есть:

state := 0

vkA0:: ; LShift
sdf = 1
size()
sdf = 0
Hotkey, vk56, MyLabel, state:=!state ? "off" : "on"
Hotkey, vk59, MyLabelH, state:=!state ? "off" : "on"
return
 
MyLabel:
#if (sdf = 1)
vk56:: ; м
SendInput 123
Hotkey, vk56, MyLabel, off
return

MyLabelH:
#if (sdf = 1)
vk59:: ; н
SendInput, 1212
Hotkey, vk59, MyLabel, off
return

size() {
Input, qwe, V L1,
(
{LControl}{RControl}{LAlt}{RAlt}{LShift}{RShift}{LWin}{RWin}{AppsKey}
{F1}{F2}{F3}{F4}{F5}{F6}{F7}{F8}{F9}{F10}{F11}{F12}
{Left}{Right}{Up}{Down}{Home}{End}{PgUp}{PgDn}
{Del}{Ins}{BS}{Capslock}{Numlock}{PrintScreen}{Pause}
)
}
return

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (Malcev) — Fri, 20 Jan 2017 01:34:03 +0000

Так можно:

list := {LShift_a:"00", LControl_a:"11", LControlLShift_a:"22", LShiftLControl_a:"33", LShift_b:"44", LControl_b:"55", LControlLShift_b:"66", LShiftLControl_b:"77"}

~LShift::
~LControl::
key := SubStr(A_ThisHotKey, 2)
if (key != A_PriorKey) and ((A_PriorKey = "LControl") or (A_PriorKey = "LShift"))
   key := A_PriorKey key
return

#if (A_PriorKey = "LControl") or (A_PriorKey = "LShift")
a::
b::
Send % list[key "_" A_ThisHotkey]
return
#if

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 21:16:23 +0000

#if (A_PriorKey = "Ctrl & Shift")

Тоже не работает.

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 21:13:37 +0000

Всё таки видимо A_PriorKey не мой вариант, мне нужны и сочетания клавиш.
И вот так не работает, видимо A_PriorKey только для одной горячей клавиши, судя по названию даже, наверно было бы A_PriorKeys для моего варианта.

#if (A_PriorKey = "^Shift")
vk59::SendInput, н̇ 
b::send 22
#if

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 21:06:27 +0000

Как думаете стоит ли переделывать на A_PriorKey? Есть ли выигрыш в скорости или большее количество ситуаций в которых всё будет работать как надо?

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 21:04:41 +0000

svoboden пишет:

так и виртуальные кнопки тоже не работали.

У меня вроде работает так.

#if (A_PriorKey = "LShift")
vk59::SendInput, н̇ 
#if

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 21:01:50 +0000

Malcev блин, серьёзно, не теряет! Видимо у меня был запущен какой-то скрипт тестовый, который всё ломал, сейчас включаю и всё норм работает... Спасибо, буду в курсе про ваш вариант. Уже успел всё переделать под anykeywait...

Вот что получилось.

MsgBox, Ctrl & F1 - вызов помощи

  *~alt::
   палочка = 1

   AnyKeyWait()
  
   палочка = 0
   return

   #if (палочка = 1)

  vk45::sendinput, ӯ
return
*+vk45::sendinput, Ӯ
return

vk46::SendInput, а̄
return
*+vk46::SendInput, А̄ 
return

vk43::SendInput, ɔ
return
*+vk43::SendInput, Ɔ
return


vk44::SendInput, ɞ
return

vk42::SendInput, ӣ 
return
*+vk42::SendInput, Ӣ 
return
#if




 *^Shift::      
   волна = 1

   AnyKeyWait()
  
   волна = 0
   return

   #if (волна = 1)

vk59::SendInput, н̃
return
*+vk59::SendInput, Н̃
return


vk46::SendInput, а̃
return
*+vk46::SendInput, А̃
return
#if







~shift::
   точка_в = 1

   AnyKeyWait()
  
   точка_в = 0
   return

   #if (точка_в = 1)
   
vk56::sendinput, м̇
return
*+vk56::sendinput, М̇
return

vk59::SendInput, н̇ 
return
*+vk59::SendInput, Н̇
return

vk49::SendInput, ш̇ 
return
*+vk49::SendInput, Ш̇
return
#if




 *~Ctrl::      
   точка_н = 1

   AnyKeyWait()
  
   точка_н = 0
   return

   #if (точка_н = 1)

vk59::sendinput, н̣
return
*+vk59::SendInput, Н̣
return

vk4c::send, д̣
return
*+vk4c::send, Д̣
return

vk48::SendInput, р̣
return
*+vk48::SendInput, Р̣
return

vk4e::SendInput, т̣
return
*+vk4e::SendInput, Т̣
return

vk49::SendInput, ш̣
return
*+vk49::SendInput, Ш̣
return

vkdb::SendInput, х̣
return
*+vkdb::SendInput,  Х̣
return
#if







*~+Ctrl::      
   запятая_в = 1

   AnyKeyWait()
  
   запятая_в = 0
   return

   #if (запятая_в = 1)

vk49::SendInput, ш́ 
return
*+vk49::SendInput, Ш́
return
#if

^f1::
Gui Add, Text, x7 y0 left
,  Нажать и отпустить клавишу для печати`nследующей буквы с указанной диакритикой. `n`nAlt - палочка и ɔ, ɞ `nShift - точка верхняя `nCtrl - точка нижняя `nCtrl + Shift - волнистая `nShift + Ctrl - запятая верхняя `n`nДоступные буквы: `nА̄ а̄ А̃ а̃  Ɔ ɔ Д̣ д̣ М̇ м̇ Н̃ н̃ Н̣ н̣ Н̇ н̇ ɞ `nӢ ӣ Ӯ ӯ Р̣ р̣ Т̣ т̣ Ш̇ ш̇ Ш́ ш́ Ш̣ ш̣ Х̣ х̣
Gui, Show, NA x0 y0 w250 h163






   AnyKeyWait() {
   Input, var, V L1
   }
   return

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (svoboden) — Thu, 19 Jan 2017 19:18:43 +0000

Malcev, так и виртуальные кнопки тоже не работали.

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (Malcev) — Thu, 19 Jan 2017 17:48:35 +0000

OmTatSat, не понял, при каких обстоятельствах теряет.
Вроде, ничего терять не должен.

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (Flasher) — Thu, 19 Jan 2017 17:48:15 +0000

OmTatSat
Оверквотинг удалён. Следите за исполнением правил.

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 17:43:38 +0000

svoboden
С автозаменой пока не понял преимущества. Но код который вы написали делает то, что нужно - печатает буквы при первом нажатии которые не указаны как хоткеи! Спасибо!

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (OmTatSat) — Thu, 19 Jan 2017 17:41:30 +0000

Malcev
Интересный вариант, своей простотой, но он также теряет буквы, при первом нажатии, которые не указаны(.

Re: AHK: Включить hotkey мульти хоткеем на одно следующее нажатие

null@example.com (svoboden) — Thu, 19 Jan 2017 15:07:42 +0000

Вот ваш скрипт, если по автозамене не получится. Исправленный вариант:

   alt::
   палочка = 1

   AnyKeyWait()
  
   палочка = 0
   return

   #if (палочка = 1)

   vk31::
   SendInput 123
   return

   vk32::
   SendInput 234
   return

   AnyKeyWait() {
   Input, var, V L1
   }
   return