[Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ

Tempo сказал(а):

Код:

HotKeySet("{ESC}", "_Exit")
Global $iPixelX = 100, $iPixelY = 125, $iPixelColor = Number(0xF0F4F9), $iMouseX = 300, $iMouseY = 300

While Sleep(10)
	If PixelGetColor($iPixelX, $iPixelY) = $iPixelColor Then
		MouseMove($iMouseX, $iMouseY, 0)
		MouseDown("left")
		While PixelGetColor($iPixelX, $iPixelY) = $iPixelColor
			Sleep(10)
		WEnd
		MouseUp("left")
	EndIf
WEnd

Func _Exit()
	Exit
EndFunc   ;==>_Exit

Нажмите, чтобы раскрыть...

Tempo сказал(а):

Viktor19870628, ну вы хоть свои значения подставили?


Добавлено:

Сообщение автоматически объединено: 3 Янв 2018

В вашем коде который вы добавили через пол часа используется PixelSearch и вы не уточнили что пиксель нужно искать в определенной области

Нажмите, чтобы раскрыть...

Tempo сказал(а):

Viktor19870628, ну вы хоть свои значения подставили?


Добавлено:

Сообщение автоматически объединено: 3 Янв 2018

В вашем коде который вы добавили через пол часа используется PixelSearch и вы не уточнили что пиксель нужно искать в определенной области

Нажмите, чтобы раскрыть...

Viktor19870628 сказал(а):

Версия AutoIt: 3.3.14.0.

Описание:
Здравствуйте уважаемые форумчане!!!
Нужно при появление определенного цвета в заданных координатах зажать ЛКМ и отпустить только когда цвет пропадет.Именно зажать а не кликнуть.

Код:

#include <Misc.au3>
Local $hDLL = DllOpen("user32.dll")
Opt('MustDeclareVars', 1)
Opt("PixelCoordMode", 1)
Opt("MouseCoordMode", 1)
Opt("MouseClickDownDelay", 70)
Global $Hueta
While 1
	If _IsPressed("02", $hDLL) Then
		ah()
EndIf
	WEnd
DllClose($hDLL)
Func ah()
$Hueta = PixelSearch(160, 210,160, 90,0xff2626,0,1)
    If IsArray($Hueta) = True Then
		MouseClick('left')
	sleep(300)
		EndIf
	EndFunc

Примечания:Помогите у кого есть время.С новым годом!!!

Нажмите, чтобы раскрыть...

#include <Misc.au3>
Local $hDLL = DllOpen("user32.dll")
Opt('MustDeclareVars', 1)
Opt("PixelCoordMode", 1)
Opt("MouseCoordMode", 1)
Opt("MouseClickDownDelay", 300)
Global $Hueta
Global $Mueta
While 1
	If _IsPressed("02", $hDLL) Then
		ah()
EndIf
	WEnd
DllClose($hDLL)
Func ah()
$Hueta = PixelSearch(160, 210,160, 90,0xff2626,0,1)
    If IsArray($Hueta) = True Then
		 MouseDown("left")
sleep(10)
		$Mueta = PixelSearch(160, 210,160, 90,0xff2626,0,1)
    If IsArray($Mueta) = False Then
		MouseUp("left")
	sleep(10)
	EndIf
	EndIf
	EndFunc