RVM_aka_Vasil
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
По своей проблеме
Цитата:| Нужно чтобы при нажатии определенной клавиши, например A, указатель мыши перемещался относительно текущего положения на 200 пикселей влево. А при нажатии, например D, указатель перемещался относительно текущего положения на 200 пикселей вправо. |
нашел готовое решение здесь
Код: HotKeySet("{ins}", "OnOff")
HotKeySet("{esc}", "Quit")
Global $Off = True, $Step = 1
While Sleep(1000)
WEnd
Func up()
MouseMove(MouseGetPos(0), MouseGetPos(1) - $Step, 0)
EndFunc
Func down()
MouseMove(MouseGetPos(0), MouseGetPos(1) + $Step, 0)
EndFunc
Func left()
MouseMove(MouseGetPos(0) - $Step, MouseGetPos(1), 0)
EndFunc
Func right()
MouseMove(MouseGetPos(0) + $Step, MouseGetPos(1), 0)
EndFunc
Func OnOff()
If $Off Then
HotKeySet("w", "up")
HotKeySet("s", "down")
HotKeySet("a", "left")
HotKeySet("d", "right")
Else
HotKeySet("w")
HotKeySet("s")
HotKeySet("a")
HotKeySet("d")
EndIf
$Off = Not $Off
EndFunc
Func Quit()
Exit
EndFunc
|
Однако после запуска иконка скрипта висит в трее, но при нажатии w, s, a или d перемещения курсора мыши не происходит. В чем может быть проблема? |
