Автор Тема: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ  (Прочитано 493 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Viktor19870628 [?]

  • Новичок
  • *
  • Сообщений: 36
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Версия AutoIt: 3.3.14.0.

Описание:
Здравствуйте уважаемые форумчане!!!
Нужно при появление определенного цвета в заданных координатах зажать ЛКМ и отпустить только когда цвет пропадет.Именно зажать а не кликнуть.
Код: AutoIt [Выделить]
#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
 

Примечания:Помогите у кого есть время.С новым годом!!!
« Последнее редактирование: Январь 03, 2018, 11:33:25 от Viktor19870628 »

Русское сообщество AutoIt

[Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Отправлен: Январь 03, 2018, 09:08:45 »

Оффлайн Tempo [?]

  • Продвинутый
  • ***
  • Сообщений: 403
  • Репутация: 92
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #1, Отправлен: Январь 03, 2018, 10:59:01 »
Код: AutoIt [Выделить]
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


Оффлайн Viktor19870628 [?]

  • Новичок
  • *
  • Сообщений: 36

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #2, Отправлен: Январь 03, 2018, 11:40:55 »
Код: AutoIt [Выделить]
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 [?]

  • Продвинутый
  • ***
  • Сообщений: 403
  • Репутация: 92
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #3, Отправлен: Январь 03, 2018, 12:03:34 »
Viktor19870628, ну вы хоть свои значения подставили?


Добавлено: Январь 03, 2018, 12:07:14
В вашем коде который вы добавили через пол часа используется PixelSearch и вы не уточнили что пиксель нужно искать в определенной области

Русское сообщество AutoIt

Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #3 Отправлен: Январь 03, 2018, 12:03:34 »

Оффлайн Viktor19870628 [?]

  • Новичок
  • *
  • Сообщений: 36

  • Автор темы
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #4, Отправлен: Январь 03, 2018, 13:10:20 »
Viktor19870628, ну вы хоть свои значения подставили?


Добавлено: Январь 03, 2018, 12:07:14
В вашем коде который вы добавили через пол часа используется PixelSearch и вы не уточнили что пиксель нужно искать в определенной области
Ну теперь то уточнил.


Добавлено: Январь 03, 2018, 13:16:57
Viktor19870628, ну вы хоть свои значения подставили?


Добавлено: Январь 03, 2018, 12:07:14
В вашем коде который вы добавили через пол часа используется PixelSearch и вы не уточнили что пиксель нужно искать в определенной области
поставил значения естественно свои.
В моем коде при появлении цвета происходит клик.мне бы хотелось что бы при появлении цвета происходило зажатие ЛКМ и отжатие происходило только после изчезновения цвета в зоне поиска.


Добавлено: Январь 03, 2018, 16:39:32
Версия AutoIt: 3.3.14.0.

Описание:
Здравствуйте уважаемые форумчане!!!
Нужно при появление определенного цвета в заданных координатах зажать ЛКМ и отпустить только когда цвет пропадет.Именно зажать а не кликнуть.
Код: AutoIt [Выделить]
#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
 

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


Добавлено: Январь 03, 2018, 18:04:15
Код: AutoIt [Выделить]
#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
 

« Последнее редактирование: Январь 03, 2018, 18:04:15 от Viktor19870628, Причина: Объединение сообщений »

Русское сообщество AutoIt

Re: [Мышь, клавиатура] Правильное ЗАЖАТИЕ ЛКМ
« Ответ #4 Отправлен: Январь 03, 2018, 13:10:20 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
15 Ответов
24403 Просмотров
Последний ответ Декабрь 06, 2009, 18:26:22
от CreatoR
3 Ответов
3597 Просмотров
Последний ответ Сентябрь 17, 2010, 08:08:19
от Guezt Gutsy
1 Ответов
6836 Просмотров
Последний ответ Июнь 06, 2012, 10:16:35
от Yuriy
3 Ответов
3594 Просмотров
Последний ответ Август 24, 2012, 06:07:32
от CreatoR
0 Ответов
979 Просмотров
Последний ответ Май 19, 2014, 09:16:13
от madmasles
12 Ответов
3205 Просмотров
Последний ответ Август 25, 2014, 05:13:14
от Dima1337
4 Ответов
2065 Просмотров
Последний ответ Февраль 26, 2015, 12:03:05
от CreatoR
5 Ответов
1945 Просмотров
Последний ответ Июнь 06, 2015, 19:08:46
от Yashied
2 Ответов
1139 Просмотров
Последний ответ Январь 05, 2017, 09:56:47
от mr.Gbabak
2 Ответов
485 Просмотров
Последний ответ Сентябрь 13, 2017, 13:59:02
от Viktor19870628