Серый форум — AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Fri, 23 Mar 2012 16:30:07 +0000

MAGISTR как просил сделал для себя, но ты меня с подвигнул... я бы долго собирался.

1. Убрано то что тебе не нужно.
2. Обработка только одной оси и одного направления джойстика, остальное пишется по аналогии.

#SingleInstance
#Persistent

JoystickNumber := 1

;---Граничные условия
JoyZoneUp := 25
JoyZoneDn := 100 - JoyZoneUp

;---Флаги Left Right Up Down стрелок 
; Истина - кнопка не нажата
flagL := true
flagR := true
flagU := true 
flagD := true

;********Отладочные переменные
countUP := 0
countDN := 0
;********


SetTimer, LeftJoystick, 10

return


;==========Секция таймера=================
LeftJoystick:
SetFormat, float, 03
GetKeyState, JoyX, %JoystickNumber%JoyX

;--------ОТЛАДКА---------
; Alert Exit! =) 
GetKeyState, state, %JoystickNumber%Joy1  ; Первая кнопка джойстика.
if (state = "D")
 ExitApp
;------------------------- 

;*********Стрелка LEFT
if (JoyX < JoyZoneUp and  flagL) 
 {
  countDN++  ;<----Для отладки (убрать)
  ToolTip  Нажали = %countDN% ;<----Для отладки (убрать)
  ;Send, {Left Down} после проверки раз комментировать
  flagL := false
 }
else if (JoyX > JoyZoneUp and !flagL) 
 {
  countUP++ ;<----Для отладки (убрать)
  ToolTip  Отжали = %countUP%  ;<----Для отладки (убрать)
  ;Send, {Left Up} после проверки раз комментировать
  flagL := true
 }
;*********
return
;================================

Функция автоповтора не реализована, но если она требуется, то могу и её сделать в режиме On/Off по произвольной клавише.

Удачного полёта

P.S. Секция аварийного выхода

;--------ОТЛАДКА---------
; Alert Exit! =) 
GetKeyState, state, %JoystickNumber%Joy1  ; Первая кнопка джойстика.
if (state = "D")
 ExitApp
;-------------------------

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

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 19:02:10 +0000

Тогда зайди на форум "Сухого" там ребята много что делают в области переделки джойстиков (на уровне железа)

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 18:56:23 +0000

Бесполезно. Кстати, открытие чего либо по двойному клику левой кнопкой мыши тоже не работает. Просто нет реакции. Ну и зависание курсора при попытке закрыть или свернуть браузер мышкой. Я уж подумываю разобрать эти педали и заменить резисторы на переключатели такого же типа и вставить туда схему от клавиатуры, как здесь например.

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 17:15:40 +0000

Попробуй так, я добавил флаг - переменная FlagY

#SingleInstance
#Persistent
 
JoystickNumber := 1
JoyZone := 20

; "+1" добавлен из-за сравнения "больше", если поставить "больше или равно" то "+1" не нужен
JoyZoneY := 100 - JoyZone + 1
FlagY := false

SetTimer, Joystick, 10

 
Joystick:
SetFormat, float, 03
GetKeyState, JoyX, %JoystickNumber%JoyX ; не обязательно, если нет обработки X-оси.
GetKeyState, JoyY, %JoystickNumber%JoyY

if JoyY > %JoyZoneY% and FlagY
 {
 SendPlay {- Down}
 FlagY := false 
 }

if JoyY < %JoyZoneY% and !FlagY
 {
 SendPlay {- Up}
 FlagY := true
 }
return

Вроде правильно - не проверял, но думаю общая идея ясна

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 16:26:21 +0000

Скорость повтора была громадная при простейшем бинде кнопки на ось.
If (JY > 050)
Send {-}

При этом варианте всё великолепно работало за исключением одного неприятного момента: индикаторы, которые забиндены в приложении на "-" мигали с такой скоростью, что становились просто невидимыми.

«Ну надо проверять когда срабатывает секция (используй отладочные точки)» — Из этого предложения ничего не понял, поэтому постараюсь дождаться этого: «Буду делать аналогичное - скажу». В любом случае спасибо.

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 14:59:28 +0000

Ну надо проверять когда срабатывает секция (используй отладочные точки)

Joystick:

......

return

Буду делать аналогичное - скажу, правда я не на ось буду вешать, а на кнопки джойстика, но думаю принцип будет тот же.

P.S. У меня "курсор замирал намертво" при большой скорости повтора - попробуй покапать в этом направлении и также если клавиша нажата, то не надо её повторно нажимать, ну как и отжимать.

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 14:54:55 +0000

Indomito, благодарю!

Хм, правда здесь происходит та же самая аномалия:

Но начались странные аномалии, сводящие на нет любые преимущества. Все клавиши начали срабатывать с задержкой, модификаторы работают, но странно. Например Alt+Shift перестал переключать раскладку клавиатуры, а при попытке свернуть браузер левой кнопкой мыши курсор виснет на одном месте и отказывается двигаться, оживая только после Alt+Tab, который работает. Тем не менее в игре Alt+Shift работает (хотя все клавиши, как я уже говорил, работают с задержкой). Мистика. %)

Курсор также намертво зависает при попытке закрыть окно нажатием на крестик. Оживает также по Alt+Tab. На Alt стоит автоповтор с огромной скоростью. То есть она не зажимается, но при этом Alt+Tab работает. Хм. И это не во всех окнах происходит. Что это вообще может быть?

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 13:32:56 +0000

Да, сейчас её подредактирую...

Приблизительно так:

#SingleInstance
#Persistent
 
JoystickNumber := 1
JoyZone := 20

; "+1" добавлен из-за сравнения "больше", если поставить "больше или равно" то "+1" не нужен
JoyZoneY := 100 - JoyZone + 1
 
SetTimer, Joystick, 10

 
Joystick:
SetFormat, float, 03
GetKeyState, JoyX, %JoystickNumber%JoyX ; не обязательно, если нет обработки X-оси.
GetKeyState, JoyY, %JoystickNumber%JoyY

if JoyY > %JoyZoneY%
 SendPlay {- Down}
else
 SendPlay {- Up}

return

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 13:12:58 +0000

Это вписать в конец той большой конструкции?

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 12:34:24 +0000

if y>81
 Send, {- Down}
if y<79
 Send, {- Up}

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 12:19:19 +0000

Я извиняюсь если буду говорить глупости, просто впервые поставил AutoHotkey несколько дней назад и знаю лишь простейшие вещи. У меня руль с педалями. От него интересуют только педали. JoystickTest.ahk показывает что педали это ось Y. Если обе педали отпущены, то Y = 050. Если нажимать левую, то этот показатель плавно увеличивается от 050 до 100, а если правую, то падает до Y000. Задачей является повесить клавишу "-" на нажатие левой педали, то есть возрастание Y от 050 до 100. Например от Y080 до Y100 — клавиша нажата. Всё что меньше Y080 — клавиша отпущена. При нажатии этой клавиши клавиатура и мышь должны работать в самом обычном режиме, как если бы я нажимал "-" на клавиатуре. То есть без каких либо глюков с модификаторами и общих задержек клавиш. Вроде кое-как настроил эту конструкцию под нажатие "-", но опять те же самые глюки с курсором, задержками и т.п. Отчаяние.

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 11:09:37 +0000

Попробуй вместо цикла использовать такую конструкцию.

#SingleInstance
#Persistent

JoystickNumber := 1
SetTimer, RightJoystick, 10  ; Для JoyX  и JoyY осей
SetTimer, LeftJoystick, 10  ; Для JoyZ  и JoyR осей

RightJoystick:
SetFormat, float, 03
GetKeyState, JoyX, %JoystickNumber%JoyX
GetKeyState, JoyY, %JoystickNumber%JoyY
; код обработки
return

LeftJoystick:
; аналогично RightJoystick:
return

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

JoystickNumber := 1
JoyZoneUp := 25
JoyZoneDn := 100 - JoyZoneUp
SetTimer, LeftJoystick, 10  ; Для JoyZ  и JoyR осей

LeftJoystick:
SetFormat, float, 03
GetKeyState, JoyX, %JoystickNumber%JoyX
GetKeyState, JoyY, %JoystickNumber%JoyY
{
OutJoyXY := "JoyX= " JoyX ",  JoyY= " JoyY ; Отладка
ToolTip  %OutJoyXY% ; Отладка
}
if JoyX < %JoyZoneUp%
 {
 SendPlay {Left}
 }
if JoyX > %JoyZoneDn%
 {
 SendPlay {Right}
 }
if JoyY < %JoyZoneUp%
 {
 SendPlay {Up}
 }
if JoyY > %JoyZoneDn%
 {
 SendPlay {Down}
 } 
return

т.е. джойстику нужна мёртвая зона около "нуля" иначе он будет работать всегда, т.к. оси сделаны на резисторах, если у тебя конечно не Saitek последних моделей начиная с X52/X52 Pro.

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (MAGISTR) — Thu, 22 Mar 2012 11:00:01 +0000

В конце концов сработал вот этот вариант:

Loop
{
GetKeyState, YJ, JoyY
If (YJ > 077)
SendPlay {Blind}{- down}
If (YJ < 077)
SendPlay {Blind}{- up}
}

Но начались странные аномалии, сводящие на нет любые преимущества. Все клавиши начали срабатывать с задержкой, модификаторы работают, но странно. Например Alt+Shift перестал переключать раскладку клавиатуры, а при попытке свернуть браузер левой кнопкой мыши курсор виснет на одном месте и отказывается двигаться, оживая только после Alt+Tab, который работает. Тем не менее в игре Alt+Shift работает (хотя все клавиши, как я уже говорил, работают с задержкой). Мистика. %)

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (creature.ws) — Thu, 22 Mar 2012 10:36:36 +0000

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

Re: AHK: Бинд клавиши на JoyY — отказ клавиш-модификаторов

null@example.com (Indomito) — Thu, 22 Mar 2012 09:54:28 +0000

Не понял а зачем GetKeyState, YJ, JoyY это же проверка оси, а не клавиши или я чего то недопонимаю?
Или же просто что ось, что кнопка - без разницы?

И ещё как проще опрашивать по таймеру или же можно как обычную кнопку на клавиатуре?

P.S. Просто фокус с осью не пройдёт, а вот судя по справке можно использовать второй вариант(как обычную кнопку на клавиатуре), правда я не уверен.