Code: Select all
SetBatchLines -1
IncrementValue = 175
typeOfMove = "R"
MouseDelay = 0
keyPressDelay := 200
D::
S::
A::
Left::
Right::
Up::
Down::
Loop,
{
If (A_ThisHotkey = "Down"){
xVal := 0, yVal := IncrementValue
typeOfMove = R
}
If (A_ThisHotkey = "Up"){
xVal := 0, yVal = -IncrementValue
typeOfMove = R
}
If (A_ThisHotkey = "Left"){
xVal := -IncrementValue, yVal = 0
typeOfMove = R
}
If (A_ThisHotkey = "Right"){
xVal := IncrementValue, yVal = 0
typeOfMove = R
}
If (A_ThisHotkey = "D"){
xVal = 2500, yVal = 100
typeOfMove = ""
}
If (A_ThisHotkey = "A"){
xVal = 1357, yVal = 150
typeOfMove = ""
}
If (A_ThisHotkey = "S"){
xVal = 1205, yVal = 978
typeOfMove = ""
}
If GetKeyState(A_ThisHotKey, "P"){
MouseMove, %xVal%, %yVal%,%MouseDelay%,%typeOfMove%
Sleep keyPressDelay
}
Else{
Break
}
}
return
Esc::ExitApp