Серый форум — AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (ypppu) — Fri, 24 May 2013 14:01:12 +0000

+ AHK: Длительность нажатия горячей клавиши

Adept пишет:

Можно ли на одну и ту же клавишу назначить разные макросы при том, что один из них будет вызываться по обычному (короткому) нажатию, а другой - по длительному (500-1000 мс)? Как прописать назначение горячей клавиши в последнем случае?

serzh82saratov пишет:

Space::
    KeyWait Space, T0.5 
    If ErrorLevel 
    {
        KeyWait Space
        ToolTip long
    }    
    Else    
    {
        ToolTip short
    }    
    return

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (teadrinker) — Tue, 23 Apr 2013 19:26:42 +0000

Но можно дать ссылку на подобную тему вместо подобного ответа.

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (creature.ws) — Sat, 20 Apr 2013 10:03:45 +0000

так не правильно (синтаксис вообще не корректный):
MsgBox, % h%A_Index+2%

так правильно:
MsgBox, % "h" A_Index+2

i := 1
h3 := 42

MsgBox % "h" i+2

j := i + 2
MsgBox % h%j%

—

Попытаюсь сделать из них какую-то компиляцию.

Новые пользователи, задающие однотипные вопросы, не читают справку, не пользуются поиском по форуму, не будут читать подобную тему.

У каждого нового пользователя уникальная клавиатура и мышь, без всякого сомнения уникальные папиллярные узоры на пальцах, жмущих кнопки и клавиши, каждый пользователь просто вынужден спрашивать как закодить пять кликов когда он нажимет один раз, ведь все предыдущие темы с подобными вопросами не имели к нему отношения.
Одной темой форума проблему уникальности нового пользователя не решить.

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (Mikki) — Fri, 19 Apr 2013 17:51:19 +0000

Спасибо creature.ws за комментарии. Внес исправления и убрал все коды под спойлеры.

Помнится завсегдатаи сетовали что много однотипных просьб с "закодьте мне пять кликов когда я нажимаю один раз". Тыкните в подобные темы. Попытаюсь сделать из них какую-то компиляцию.

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (creature.ws) — Fri, 19 Apr 2013 09:20:59 +0000

так не правильно:
MsgBox, % h%A_Index+2%
так правильно:
MsgBox, % h%A_Index%+2

Фрагменты кода (как мне кажется) подразумевают различный результат.
Синтаксис первого выражения неприемлемый, но второе выражение не является «правильной» альтернативой первого.

h%A_Index+2%

Если бы это работало, то результатом было бы содержимое переменной, имя которой состоит из строки "h" и числа являющегося суммой переменной A_index и 2.

varIndex := A_index + 2
msgbox % h%varIndex%

—

- Как правильно написать шестнадцатеричное число (например 2212) :
H1:="0x"2212

Не согласен с приведенным кодом.

Вот прям так взять и записать шестнадцатеричное число в переменную:

h1 := 0x2212

Указать, что в переменной шестнадцетиричное число:

var := 2212 ; записываем десятичное, но на самом деле собираемся использовать как шестнадцетиричное.
h1 := "0x" var

—

IniName := A_ScriptDir "\" RegExReplace(A_ScriptName, "(.*)\..*", "$1") ".ini"

Splitpath, A_ScriptName,,,, fileName
iniPath := A_ScriptDir . "\" . fileName . ".ini"

Re: AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (Mikki) — Thu, 18 Apr 2013 22:03:58 +0000

Накидайте ссылок на темы которые надо добавить.

AHK/OFF: N.F.A.Q (Noob Frequently Asked Questions)

null@example.com (Mikki) — Thu, 18 Apr 2013 22:03:03 +0000

<-пробная версия, если сообщество одобрям-с->


-------------------------------------------------------------------------------
=                                                                             =
=  Здесь вы найдете примеры кода и ссылки на подсказки по логическим          =
=      схемам и синтаксису языка [b]AutoHotkey[/b].                           =
=                                                                             =
=                                  v.0.0.4                                    =
-------------------------------------------------------------------------------

Синтаксис

- AHK: знак процента внутри выражений ;
AHK: Знак процента и задание опций GUI-элемента

+ открыть спойлер

так не правильно (синтаксис не корректный):
MsgBox, % h%A_Index+2%

так правильно:
j:=A_Index+2
MsgBox, % h%j%

- Указать, что число записано в шестнадцатеричном формате, а не в десятичном (например 2212) :

+ открыть спойлер

var := 2212 ; записываем десятичное, но на самом деле собираемся использовать как шестнадцатеричное.
H1:="0x" var

-AHK: Запись масива в INI файл

+ открыть спойлер

indexA := [1,2,3,4,5]

    Splitpath, A_ScriptName,,,, fileName
    IniName:= A_ScriptDir . "\" . fileName . ".ini"

    Loop % indexA.MaxIndex() 
    {
        indexList := indexList indexA[A_Index] ","
    }
    IniWrite, %indexList%, % IniName, Settings, indexList

- Считать несколько заголовков окон

+ открыть спойлер

SetTitleMatchMode, 2
WinGet, List, List, Блокнот
Loop % List
   WinGetTitle, Title%A_Index%, % "ahk_id" List%A_Index%

Алгоритмы

- Задержка срабатывания выборочной горячей клавиши - на примере ЛевогоШифта

+ открыть спойлер

*LShift::
   sleep 1000
   if GetKeyState("LShift", "P")
      SendInput {LShift Down}
Return
*LShift Up:: SendInput {LShift Up}

- Остановка (Пауза) скрипта при нажатии определенных клавиш (например Alt, Ctrl, Shft)

+ открыть спойлер

Loop
{
   if !(GetKeyState("Alt", "P") || GetKeyState("Ctrl", "P") || GetKeyState("Shift", "P"))
      Send {F7}
   Sleep, 100
}

- Укороченная запись нескольких горячих клавиш с похожими действиями

+ открыть спойлер

f11::
f12::
    send, 1
    if (A_ThisHotkey <> "f12") {
        send, 2
        send, 3
        send, 4
    }
    send, 5
    return

- Перетаскивание GUI-окна за любую его часть - в каждой gLabel придется вставить конструкцию WinMove(WinID) , if moved..

+ открыть спойлер

Button:
    WinMove(WinID)
    if moved
        return
    MsgBox, Button
    return

WinMove(WinID)
{
    global moved, hGui
    CoordMode, Mouse
    SetWinDelay, -1
    SetBatchLines, -1
    moved:=
    MouseGetPos, Start_X, Start_Y
    WinGetPos, X_Win, Y_Win,,, ahk_id %WinID%
    While GetKeyState("LButton", "P")
    {
        MouseGetPos, Current_X, Current_Y
        moved := (Current_X != Start_X || Current_Y != Start_Y) ? 1 : ""
        WinMove, ahk_id %WinID%,, X_Win + Current_X - Start_X, Y_Win + Current_Y - Start_Y
        Sleep, 10
    }
}

~LButton::
    MouseGetPos,,, WinID
    if (WinID = hGui)
        WinMove(WinID)
    return

- Получать сообщение о активации\деактивации окон в системе

+ открыть спойлер

CoordMode, ToolTip, Screen
DllCall("RegisterShellHookWindow", "UInt", A_ScriptHwnd) 
OnMessage(DllCall("RegisterWindowMessage", "str", "SHELLHOOK"), "ShellProc") 
OnExit, Exit
Return

ShellProc(nCode, wParam)
{ 
    static A := 1
    If (nCode = 4)
    { 
        WinGet, Process, ProcessName, % !wParam ? "A" : "ahk_id " wParam 
        ToolTip % A++ "`n`n" Process, 15, 15
    }    
} 

Exit:
    DllCall("DeregisterShellHookWindow", "UInt", A_ScriptHwnd)
    ExitApp

- Запоминание данных GUI-элементов (на пример - CheckBox)

Философия

- Диалог о тщетности коментописания

- Что приходится делать читающему, чтобы понять вопрос.

+ открыть спойлер