Хелп, как сделать чтобы при зажатии W оно писалось не 1 раз ,а столько сколько зажал.
Типо Sendinput
Типо Sendinput
AutoHotKey:
#InstallKeybdHook
W::
Sendinput, {W}
FileAppend, w, %A_ScriptDir%\lol.txt
goto l
A::
Sendinput, {A}
FileAppend, a, %A_ScriptDir%\lol.txt
goto 2
S::
Sendinput, {S}
FileAppend, s, %A_ScriptDir%\lol.txt
goto 3
D::
Sendinput, {D}
FileAppend, d, %A_ScriptDir%\lol.txt
goto 4
F::
Sendinput, {F}
FileAppend, f, %A_ScriptDir%\lol.txt
goto 5
return
l:
n := 0
If GetKeyState("vk57","P")
{
StartTime := A_TickCount
Loop
{
If !GetKeyState("vk57","P")
{
ElapsedTime := A_TickCount - StartTime
text =
(
`nВремя W - %ElapsedTime%
)
FileAppend,%text%,%A_WorkingDir%\времяW.txt
goto, l
}
}
}
return
2:
n := 0
If GetKeyState("vk41","P")
{
StartTime := A_TickCount
Loop
{
If !GetKeyState("vk41","P")
{
ElapsedTime := A_TickCount - StartTime
text =
(
`nВремя A - %ElapsedTime%
)
FileAppend,%text%,%A_WorkingDir%\времяW.txt
goto, 2
}
}
}
return
3:
n := 0
If GetKeyState("vk53","P")
{
StartTime := A_TickCount
Loop
{
If !GetKeyState("vk53","P")
{
ElapsedTime := A_TickCount - StartTime
text =
(
`nВремя S - %ElapsedTime%
)
FileAppend,%text%,%A_WorkingDir%\времяW.txt
goto, 3
}
}
}
return
4:
n := 0
If GetKeyState("vk44","P")
{
StartTime := A_TickCount
Loop
{
If !GetKeyState("vk44","P")
{
ElapsedTime := A_TickCount - StartTime
text =
(
`nВремя D - %ElapsedTime%
)
FileAppend,%text%,%A_WorkingDir%\времяW.txt
goto, 4
}
}
}
return
5:
n := 0
If GetKeyState("vk46","P")
{
StartTime := A_TickCount
Loop
{
If !GetKeyState("vk46","P")
{
ElapsedTime := A_TickCount - StartTime
text =
(
`nВремя F - %ElapsedTime%
)
FileAppend,%text%,%A_WorkingDir%\времяW.txt
goto ,5
}
}
}
return
Последнее редактирование: