Что нового

[Мышь, клавиатура] Помогите с выполнением функции по зажатой кнопке XButton2

pandemia

Новичок
Сообщения
12
Репутация
0
Всем :IL_AutoIt_1: добрый день. Я в затруднении помогите мне реализовать выполнение нажатие левой кнопки мыши только тогда когда зажата кнопка XButton2
Код:
#include <WinAPIEx.au3>
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
Global $Paused, $counter = 0
HotKeySet("{insert}", "Terminate")
Shoot()
Func Shoot()
While 1
Local $coord = PixelSearch(503, 322, 520, 384, 0xff0000)
If Not @error Then
MouseClick("Left") ;Нужно чтобы эта кнопка активировалась скриптом только тогда когда зажата кнопка Xbutton2
Sleep (120)
EndIf
WEnd
EndFunc
While 1
$counter +=1
WEnd
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
;ToolTip('Script is "Paused"',0,0, $counter, 1)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
 

gunter123

Продвинутый
Сообщения
159
Репутация
69
Клавиши Х2 нет, тестировал на ЛКМ, работает
Код:
#include <WinAPIEx.au3>
#include <Misc.au3>

If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)

Global $Paused, $counter = 0

HotKeySet("{insert}", "Terminate")
Func Terminate()
   Exit 0
EndFunc

Shoot()

Func Shoot()

   While 1

	  Local $coord = PixelSearch(503, 322, 520, 384, 0xff0000)
	  If Not @error Then
		 If _IsPressed("06") Then   ; 06 - Код клавиши Х2
			MouseClick("Left")
			Sleep(120)
		 EndIf
	  EndIf
      Sleep(5)

   WEnd

EndFunc

While 1
   $counter +=1
WEnd

Func TogglePause()
$Paused = NOT $Paused
   While $Paused
	  Sleep(100)
   WEnd
ToolTip("")
EndFunc
 

RC-1140

Новичок
Сообщения
11
Репутация
1
Возможно ли выполнить обратный процесс? То есть, что бы при нажатии левой кнопки нажималась боковая? И везде она по разному называется: чаще XButton1, здесь "06 - Код клавиши Х2", иногда KEY_MOUSE5.
 
Верх