Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Здравствуйте.
Помогите, пожалуйста, как сделать, чтобы при зажатой кнопке альт я мог набрать комбинацию клавиш(от однозначного до трехзначного числа) от 1 до 5 и зависимости от комбинации выполнялось определенное действие?
И подскажите, пожалуйста, можно ли сделать, чтобы клавиша альт при этом работала как обычно?
Спасибо!
А как скрипт должен понять, что Вы уже закончили набирать комбинацию клавиш?
ypppu
Я должен отпустить клавишу альт. В начале я нажимаю альт, потом, например, 3, отпускаю, 5, отпускаю, 2, отпускаю, отпускаю альт и скрипт должен понять, что это комбинация из 2, 3, 5
Не, с Alt не получается. Пока удерживается этот модификатор, другие кнопки (1, 3, 5) нормально не обрабатываются. Вот с Ctrl кое-что выходит.
С ctrl можно попробовать или с пробелом. Но ctrl должен выполняться в самом действии, хотя надеюсь это не повлияет на скрипт
#MaxThreadsPerHotkey 10
!1::
!2::
!3::
!4::
!5::
key := RegexReplace(A_ThisHotKey, "^.")
If AlreadyRun
return
AlreadyRun := 1
While GetKeyState("Alt", "P")
{
If !key
Continue
keys .= key
key := ""
}
msgbox % keys
AlreadyRun := keys := ""
returnСпасибо, работает!
А как в этом коде, если что, поменять альт на другую клавишу, пробел, например?
И еще. Как добавить в код, чтобы при нажатии на клавишу R скрипт вводил комбинацию 2 и 3 при зажатой альт?
Как ни пробовал, на выходе sc13 либо пусто
Как добавить в код, чтобы при нажатии на клавишу R скрипт вводил комбинацию 2 и 3 при зажатой альт?
#MaxThreadsPerHotkey 10
!1::
!2::
!3::
!4::
!5::
!r::
key := RegexReplace(A_ThisHotKey, "^.")
If AlreadyRun
return
AlreadyRun := 1
While GetKeyState("Alt", "P")
{
If !key
Continue
if (key = "r")
key := 23
keys .= key
key := ""
}
msgbox % keys
AlreadyRun := keys := ""
returnА как в этом коде, если что, поменять альт на другую клавишу, пробел, например?
А как скрипт узнает для чего нажат пробел?
На контрол меняется так:
#MaxThreadsPerHotkey 10
^1::
^2::
^3::
^4::
^5::
^r::
key := RegexReplace(A_ThisHotKey, "^.")
If AlreadyRun
return
AlreadyRun := 1
While GetKeyState("Ctrl", "P")
{
If !key
Continue
if (key = "r")
key := 23
keys .= key
key := ""
}
msgbox % keys
AlreadyRun := keys := ""
returnMalcev
Спасибо! Скрипт с клавишей R работает так как нужно.
Если при зажатом пробеле нажимается клавиша, которая используется в комбинации, то он должен выполнить скрипт. А если пробел нажат и опущен, то сработает как обычно.
Пробовал изменить код вместо
!3:: сделал
sc39 & 3::и вместо
Altнаписал
SpaceНо в итоге выдает не тройку, а
c39 & 3Если
~sc39 & 3::тогда
sc39 & 3
Замените:
key := RegexReplace(A_ThisHotKey, "^.")на:
key := substr(A_ThisHotKey, StrLen(A_ThisHotKey))Malcev
Спасибо!
Какое-то время буквы работали нормально, но пока их добавлял что-то сбилось. Оставил главную часть скрипта, все равно та же проблема осталась. При зажатии пробела и r высвечивает тройку вместо 23. Изменение значения не изменяет тройку. А с числами все нормально
#MaxThreadsPerHotkey 10
~sc39 & 1::
~sc39 & 2::
~sc39 & 3::
~sc39 & 4::
~sc39 & 5::
~sc39 & sc13::
key := substr(A_ThisHotKey, StrLen(A_ThisHotKey))
If AlreadyRun
return
AlreadyRun := 1
While GetKeyState("sc39", "P")
{
If sc39 & key
Continue
if (key = "sc13")
key := 23
keys .= key
key := ""
}
msgbox % keys
AlreadyRun := keys := ""
return
#MaxThreadsPerHotkey 10
~sc39 & 1::
~sc39 & 2::
~sc39 & 3::
~sc39 & 4::
~sc39 & 5::
~sc39 & sc13::
key := RegexReplace(A_ThisHotKey, ".*\s")
if (key = "sc13")
key := 23
if (keys != "")
return
While GetKeyState("sc39", "P")
{
If !key
Continue
keys .= key
key := ""
}
msgbox % keys
keys := ""
returnMalcev
Благодарю
Malcev
Приветствую,подскажите пожалуйста код:
что бы при зажатой ПКМ зажимались эта же ПКМ и пробел. при отжатой ПКМ, пробел и эта же ПКМ отжимались.
А в чем тут сложность?
RButton::
Send, {RButton down}{Space Down}
KeyWait, RButton
Send, {RButton Up}{Space Up}
returnMalcev
Огромное спасибо! Ещё если можно, хотел бы уточнить, есть ли упрощённая альтернатива этому коду,и правильно ли он написан:
$tab::
Send, {tab}
If isKeyPressed := !isKeyPressed
SetTimer, SendA, 40
Else
{
SetTimer, SendA, Off
Send {LBUTTON Up}
Send {Space Up}
}
KeyWait tab
return
SendA:
Send {LBUTTON Down}
Send {Space Down}
return
Код следует обрамлять тегом code.
И я в вашем коде ничего не понял.
Malcev
Извиняюсь, не знаю как делать теговое обрамление.
Код при однократном нажатии на таб, зажимает ЛКМ и пробел. После повторного однократного нажатия на таб, ЛКМ и пробел перестают удерживаться.
http://forum.script-coding.com/help.php?section=bbcode
Вторая слева:
Tab::
toggle := !toggle
If toggle
Send, {RButton down}{Space Down}
Else
Send, {RButton Up}{Space Up}
returnСтраницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
