Что нового

[Мышь, клавиатура] Поочередное нажатие кнопок мыши

AndreySeVeN

Новичок
Сообщения
26
Репутация
0
Код:
Func ClickD()
   MouseDown("LEFT")
EndFunc

Func ClickU()
   MouseUp("LEFT")
EndFunc


В общем нужно сделать так, программа при вызове функции ClickD нажимает левую кнопку мыши, затем при вызове ClickU программа отпускает левую кнопку. Потом снова при вызове ClickD программа уже нажимает ПРАВУЮ кнопку мыши, а при вызове ClickU программа отпускает ПРАВУЮ кнопку мыши. И так далее...
 

InnI

AutoIT Гуру
Сообщения
4,912
Репутация
1,429
Код:
ClickD("left")
ClickU("left")
ClickD("right")
ClickU("right")

Func ClickD($btn)
  MouseDown($btn)
EndFunc

Func ClickU($btn)
  MouseUp($btn)
EndFunc
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Так?
Код:
Local $aBtn[2]=['left','right']
$i = 0

ClickD()
ClickU()
ClickD()
ClickU()
ClickD()
ClickU()

Func ClickD()
   MouseDown($aBtn[Mod($i, 2)])
EndFunc

Func ClickU()
   MouseUp($aBtn[Mod($i, 2)])
   $i+=1
EndFunc
 

Olim98

Новичок
Сообщения
48
Репутация
2
AndreySeVeN

Код:
Global $fRightDown = False
Global $fRightUp = False
Func ClickD()
If $fRightDown Then
    MouseDown("LEFT")
    $fRightDown = True
Else
    MouseDown("RIGHT")
    $fRightDown = False
EndIf
EndFunc

Func ClickU()
If $fRightUp Then
    MouseUp("LEFT")
    $fRightUp = True
Else
    MouseUp("RIGHT")
    $fRightUp = False
EndIf
EndFunc
 
Верх