[Клавиатура-мышь]постоянный клик кнопки на клавиатуре или мышки.

[erup]

Доброго времени суток. Искал скрипт быстрого клика мышки, нашел на этом форуме.

#include <MouseSetOnEvent_UDF.au3>

Global $bSecondaryDown_Event = False

HotKeySet("^+e", "_Quit")

_MouseSetOnEvent($MOUSE_SECONDARYDOWN_EVENT, "MouseSecondary_Event", 1, "", 0, 0)
_MouseSetOnEvent($MOUSE_SECONDARYUP_EVENT, "MouseSecondary_Event", 2, "", 0, 0)

While 1
Sleep(10)

If $bSecondaryDown_Event Then
_MouseSetOnEvent($MOUSE_SECONDARYDOWN_EVENT)

While $bSecondaryDown_Event
MouseClick("Main")
WEnd

_MouseSetOnEvent($MOUSE_SECONDARYDOWN_EVENT, "MouseSecondary_Event", 1, "", 0, 0)
_MouseSetOnEvent($MOUSE_SECONDARYUP_EVENT, "MouseSecondary_Event", 2, "", 0, 0)
EndIf
WEnd

Func MouseSecondary_Event($iEvent)
$bSecondaryDown_Event = ($iEvent = 1)
EndFunc

Func _Quit()
Exit
EndFunc

Пашет изумительно, но реально использовать только в стратегиях, в шутерах невозможно, так как мышка двигается неровно и не плавно а сильными рывками, попробывал уже на 4х компьютерах. Вопрос в следующем, можноли вместо зажатия кнопки мышки зажимать пробел, чтобы неиспользовать (MouseSetOnEvent) этот скрипт или может ктонибудь сталкивался с проблемой рывков мышки и нашел решение этой задачи??? Заранее спасибо за ответы.

 

[spider_xr]

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

пасмотрел, поэксперементировал, осознал - вопросы сняты.

есть ешо рекомендация попробуй дабавить паузу в цикле

While $bSecondaryDown_Event
  Sleep(30)
  MouseClick("Main")
WEnd

у меня при тестах снижает загрузку цп скриптом на 30-40% может поможет(всеравно в экшенах аружие так часто не стреляет как он кликает ;))

 

[erup]

поставил слип 30 где сказал, трабла осталась и трабла в том что даже не зажжимая правой кнопки мыши, мышь ужасно лагает и прицелиться или развернуться плавно нереально, если несложно немог бы ты предложить скрипт без этих библиотек, чтобы вместо кнопки мыши зажимать пробел и отпускать, тогда как я понял вообще эти библиотеки не потребуются, библиотеки перепробывал с 1.5 версии до 1.8, эфект одинаковый.((

 

[spider_xr]

это уже странно скрипт еще почти ничего ни делал а уже лагает )

ну ради интереса попробуй так(запускается и останавливается при "нажатие" на пробел, держать не надо)

HotKeySet("{ESC}", "Terminate")
HotKeySet("{ }", "onoff")

Global $a = False

While 1
    Sleep ( 10 )
    If $a Then
		While $a
			Sleep(30)
            MouseClick("Left")
        WEnd
		
	EndIf
WEnd

Func Terminate()
    Exit 0
EndFunc

Func onoff()
	if $a = False Then
		$a = True
	Else
		$a = False
	EndIf
EndFunc