Серый форум — AHK: нажатие Mouse Click при отпускании клавиши

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Esc) — Thu, 05 Mar 2015 12:42:40 +0000

teadrinker пишет:

Ещё так можно:

Спасибо, но к сожалению у меня эти скрипты глючат, и одинарный ЛКМ не работает как следует. В целом, похоже, лучше не связываться с дабл кликом, а то у меня сейчас открылось штук 50 копий скрипта.

Могли бы Вы помочь вот в этой теме? Как раз там я и хотел использовать переназначение дабл клика, но сейчас понял, что лучше попробовать по другому.
http://forum.script-coding.com/viewtopic.php?id=10464

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Michael.G) — Thu, 05 Mar 2015 12:39:17 +0000

Я конечно сделаю, но до упоминания sc2 всё было в рамках правил.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 12:20:02 +0000

А почему вы всё-таки не хотите действовать в соответствии с правилами?

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Michael.G) — Thu, 05 Mar 2015 12:13:42 +0000

Я понимаю и все-таки, можете ли вы написать что нужно добавить чтобы скрипт отключался на клавишу B?

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 11:53:28 +0000

Esc пишет:

teadrinker
Имелось ввиду немного другое, сохранить функциональность ЛКМ (перетаскивание, выделение) всё по умолчанию, но при двойном клике посылать одинарный ЛКМ + g + Enter, например.

Ещё так можно:

DoubleClickTime := DllCall("GetDoubleClickTime")
LButton::
   if (A_PriorHotkey = A_ThisHotkey && A_TimeSincePriorHotkey <= DoubleClickTime)
      SendInput, {Click}g{Enter}
   else
   {
      SendInput, {LButton Down}
      KeyWait, LButton
      SendInput, {LButton Up}
   }
   Return

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 11:46:52 +0000

Michael.G пишет:

Скрипт нужен для игры StarCraft

Для игр есть своя ветка, задавайте вопросы там.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Michael.G) — Thu, 05 Mar 2015 11:29:04 +0000

Сейчас работаем именно так, как мне хотелось. Осталась одна деталь. Скрипт нужен для игры StarCraft, там можно использовать последовательность действий через shift (т.е. действие 1 -> shift -> действие 2 по выполнение д. 1), можно ли как-то сделать, чтобы скрипт продолжал работать при зажатой клавише shift?
З.Ы. Также отключение скрипта на клавишу "B" было бы очень кстати.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 10:31:44 +0000

Подредактировал немного.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 10:21:17 +0000

А, да, ступил.

OnExit, Exit
hHookMouse := DllCall("SetWindowsHookEx"
   , Int, WH_MOUSE_LL := 14
   , Int, RegisterCallback("LowLevelMouseProc", "Fast")
   , Ptr, DllCall("GetModuleHandle", UInt, 0, Ptr)
   , UInt, 0, Ptr)
 Return

Exit:
    DllCall("UnhookWindowsHookEx", Ptr, hHookMouse)
    ExitApp

LowLevelMouseProc(nCode, wParam, lParam)
{
   static WM_LBUTTONDOWN := 0x201, PrevTime, DoubleClickTime := DllCall("GetDoubleClickTime")

   time := NumGet(lParam + 16, "UInt")
   if (wParam = WM_LBUTTONDOWN && PrevTime && time - PrevTime <= DoubleClickTime)
   {
      SetTimer, EventHandling, -10
      Return 1
   }
   (wParam = WM_LBUTTONDOWN && PrevTime := time)
   
   Return DllCall("CallNextHookEx", Ptr, 0, Int, nCode, UInt, wParam, UInt, lParam)

EventHandling:
   SendInput {Click}{vk47}{Enter}
   Return
}

Esc::ExitApp

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Esc) — Thu, 05 Mar 2015 10:01:26 +0000

teadrinker
Имелось ввиду немного другое, сохранить функциональность ЛКМ (перетаскивание, выделение) всё по умолчанию, но при двойном клике посылать одинарный ЛКМ + g + Enter, например.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 09:44:44 +0000

Michael.G пишет:

мне нужно чтобы она продолжала выполнять свою функцию

~vk4E Up:: Send {Click 2}

Двойной клик:

dcTime := 200

~LButton::
   if(A_PriorHotkey = A_ThisHotkey && A_TimeSincePriorHotkey < dcTime)
      MsgBox, DblClick
   return

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Esc) — Thu, 05 Mar 2015 09:33:17 +0000

teadrinker
Спасибо, а есть ли вменяемый способ переназначить дабл клик, сохранив быструю реакцию одиночного? Вот вроде код рабочий, но тормозной.

dcTime := 50

LButton::
    if(A_PriorHotkey = A_ThisHotkey && A_TimeSincePriorHotkey < dcTime) {
        Send, {MButton}
    } else {
        Send, {LButton}
    }
return

Michael.G
Тогда нужно добавить тильду.

~vk4E Up:: Send {Click}

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Michael.G) — Thu, 05 Mar 2015 09:31:01 +0000

Хм... что-то странно. При бинде "N" перестает работать вообще (т.е. когда я ее зажимаю ничего не происходит), мне нужно чтобы она продолжала выполнять свою функцию (т.е. при зажатии "N" она бы продолжала печататься), но в то же время чтобы при отпускании производился Mouse Click. Видимо я просто изначально неправильно мысль изложил.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (teadrinker) — Thu, 05 Mar 2015 09:23:14 +0000

Есть:

Send {Click 2}

Чтобы переназначить напрямую — нет.

Re: AHK: нажатие Mouse Click при отпускании клавиши

null@example.com (Esc) — Thu, 05 Mar 2015 09:17:10 +0000

Michael.G
У меня после отпускания работает, но вариант teadrinker конечно лучше и быстрее.

teadrinker
А не подскажете, есть ли в AHK код двойного клика, вроде DLButton, чтобы только его переназначить?