[Мышь, клавиатура] Нужен скрипт при нажатии лкм, чтобы курсор мыши сдвигался вниз
- Автор темы Uzn1k
- Дата начала
- Сообщения
- 3,999
- Репутация
- 967
Код:
#Include <Misc.au3>
HotKeySet('{ESC}', '_Exit')
$DesktopHeight = @DesktopHeight - 30
MouseMove(@DesktopWidth/2, 0)
While 1
If _IsPressed(01) Then
MouseMove(@DesktopWidth/2, $DesktopHeight)
$DesktopHeight -= 1
EndIf
Sleep(50)
WEnd
Func _Exit()
Exit
EndFuncРезкость очень сильная, и если я тыкну в другой точке экрана он кидает меня в центр а не переносит в низ, т.е. куда бы не тыкнул всегда переносит в центр, а если тыкну в центр перенесет в низ. Мне нужен скрипт при котором куда бы я не тыкнул (или зажал лкм) вообще чтобы при каждом нажатии лкм он перемещал курсор мышки на 1 мм в низ
firex
AutoIT Гуру
- Сообщения
- 943
- Репутация
- 208
Uzn1k
Сколько будет зажата - столько будет и перемещаться.
Сколько будет зажата - столько будет и перемещаться.
Код:
#Include <Misc.au3>
HotKeySet('{ESC}', '_Exit')
Local $aPos
Local $iStep = 30 ;На сколько перемещаем за один цикл
Local $iSpeed = 1 ;В s сколько займет перемещение
Local $iCheckDelay = 20 ;В ms
While Sleep( $iCheckDelay )
If _IsPressed( 0x01 ) Then
$aPos = MouseGetPos()
MouseMove( $aPos[0], $aPos[1] + $iStep, $iSpeed )
EndIf
WEnd
Func _Exit()
Exit
EndFuncВо, то - что нужно, очень благодарен 
:IL_AutoIt_1:
Добавлено:
Рано радовался :( Случилась другая беда, в приложении это не работает (игре), взять любую стрелялку где есть прицел, по логике в оконном режиме оно должно двигать прицел, но не тут то было :( есть идеи?
:IL_AutoIt_1:Добавлено:
Сообщение автоматически объединено:
Рано радовался :( Случилась другая беда, в приложении это не работает (игре), взять любую стрелялку где есть прицел, по логике в оконном режиме оно должно двигать прицел, но не тут то было :( есть идеи?
