Старший Пользователь
Регистрация: 10.11.2014
Возраст: 49
Город: Усть-Илимск
Регион: 38
Машина: HYUNDAI I30 Рестайлинг
Сообщений: 958
|
А я чуть сложней пошел.(Кнопки уже имелись) Перерезал дорожки,сделал перемычки.
То есть каждая клавиша, это отдельная кнопка.(уже не резистивные)
Установил, в руль платку от джойстика, соединил все с улиткой.
А дальше на комп. Серый форум помог написать скрипт для управления джойстиком при определенных нажатиях. Тестировал в iCarDS. На одну клавишу устанавливаем 3 действия (нажатие, двойное нажатие и удержание)
Код HTML:
#UseHook
Joy1:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy1_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111111||OnD uinoKeyPress")
Return
Joy1_1:
Send, ^{vk57 Down} ; Ctrl-W.
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111112||OnD uinoKeyPress")
Return
Joy1_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111113||OnD uinoKeyPress")
Return
Joy2:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy2_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111114||OnD uinoKeyPress")
Return
Joy2_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111115||OnD uinoKeyPress")
Return
Joy2_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111116||OnD uinoKeyPress")
Return
Joy3:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy3_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111117||OnD uinoKeyPress")
Return
Joy3_1:
Send, ^{vk51 Down} ; Ctrl-Q.
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111118||OnD uinoKeyPress")
Return
Joy3_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111119||OnD uinoKeyPress")
Return
Joy4:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy4_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111120||OnD uinoKeyPress") и
Return
Joy4_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111121||OnD uinoKeyPress")
Return
Joy4_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111122||OnD uinoKeyPress")
Return
Joy5:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy5_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111123||OnD uinoKeyPress")
Return
Joy5_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111124||OnD uinoKeyPress")и
Return
Joy5_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111125||OnD uinoKeyPress")
Return
Joy6:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy6_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111126||OnD uinoKeyPress")
Return
Joy6_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111127||OnD uinoKeyPress")
Return
Joy6_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111128||OnD uinoKeyPress")
Return
Joy7:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy7_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111129||OnD uinoKeyPress")
Return
Joy7_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111130||OnD uinoKeyPress")
Return
Joy7_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111131||OnD uinoKeyPress")
Return
Joy8:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy8_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111132||OnD uinoKeyPress")
Return
Joy8_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111133||OnD uinoKeyPress")
Return
Joy8_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111134||OnD uinoKeyPress")а
Return
Joy9:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy9_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111135||OnD uinoKeyPress")
Return
Joy9_1:
Send, ^{vk43 Down} ; Ctrl-C.
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111136||OnD uinoKeyPress")
Return
Joy9_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111137||OnD uinoKeyPress")
Return
Joy10:: ;
HK := RegExReplace(A_ThisHotkey, "S)[\Q+^!#<>~*$\E]"), i := 0
KeyWait, %HK%, T0.7
If !ErrorLevel
Loop {
KeyWait, %HK%
KeyWait, %HK%, D T0.3
} Until !(++i) || ErrorLevel
Try Gosub % A_ThisHotkey "_" i
Return
Joy10_0:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111138||OnD uinoKeyPress")
Return
Joy10_1:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111139||OnD uinoKeyPress")
Return
Joy10_2:
icar := ComObjCreate("RideRunner.SDK")
icar.Execute("SetVar;duino_key;duino_11111140||OnD uinoKeyPress")
Return
НЕ ПОДКЛЮЧЕНА ТОЛЬКО КРЕСТОВИНА ДЖОЙСТИКА!!!!
__________________
GIGABYTE LGA1150 GA-85N B85,Intel Core i3-4330 3.5GHz 4Mb 2xDDR3-1600,Kingston HyperX 4Gb...USB GPS приемник Locosys LS-23030G.,блок питания M4-ATX
Windows 7-64, iCarDS 1.7.0.60 (лицензия)
Оформления и темы для iCarDS
|