VIPERR
-
Автор темы
- #1
Пожалуйста, авторизуйтесь для просмотра ссылки.
; Recommended for performance and compatibility with future AutoHotkey releases.;
Пожалуйста, авторизуйтесь для просмотра ссылки.
; Enable warnings to assist with detecting common errors.SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
Пожалуйста, авторизуйтесь для просмотра ссылки.
SendMode, Input
SetBatchLines -1
CoordMode, Mouse, Screen
mouseXY(x, y)
{
DllCall("mouse_event",uint,1,int,x,int,y,uint,0,int,0)
}
strafe(left)
{
moveCount := 25
sleepInterval := 2
relativeMove := 28
if (left)
{
key := "d"
move := relativeMove
} else
{
key := "a"
move := -relativeMove
}
send {%key% down}
DllCall("Sleep", "UInt", 5)
Loop, %moveCount%
{
mouseXY(move, -(move/4))
DllCall("Sleep", "UInt", sleepInterval)
}
send {%key% up}
}
$xbutton1::
while getkeystate("xbutton1","P")
{
strafe(true)
strafe(false)
}
return