Имя пользователя:
Пароль:
 | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Цвета , авто-кликер.

Ответить
Настройки темы
Цвета , авто-кликер.
wnc wnc вне форума

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


В заданных мною двух точках меняются цвета .
Как сделать что-бы если 2 этих цвета true, мышка кликала на другую заданную мною точку? А если false то на следующую заданную мною точку.

Отправлено: 20:48, 19-05-2012

 
wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


Да всё правильно , только проблема в том. Что оно кликает постоянно, а мне нужно что-бы оно постоянно только проверяло.

Отправлено: 09:52, 21-05-2012 | #11



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


Всё , пока проблем нет!)

Отправлено: 16:23, 21-05-2012 | #12

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
HotKeySet("{ESC}", "ExitPro")
HotKeySet("{F1}", "Terminate")

While 1
    MsgBox(64, "Программу запущена", "Успех")
Sleep(90000)
WEnd

Func Terminate()
    MsgBox(64, "Hi", "Жмиии!")
While 1
$aPos = MouseGetPos()
;Точки проверки
$var = PixelGetColor( 1097, 423 )
$var1 = PixelGetColor( 1181, 415 )

If $var = 0x8E2727 AND $var1= 0x335E25 Then 
    MouseClick("left", 1149, 891, 1)
	
Elseif $var = 0x8E2727 OR $var1= 0x335E25 Then
     MouseClick("left", 786, 908, 1) 
EndIf
WEnd
 EndFunc
 
 Func ExitPro()
	MsgBox(64, "Программа выключена", "Успешно выполнено")
Exit 0
EndFunc
Если совпадает первый цвет но не совпадает второй , то MouseClick("left", 1149, 891, 1)срабатывает.
Если не совпадает первый цвет то MouseClick("left", 1149, 891, 1) не срабатывает.
Если совпадает и первый , и второй цвет то MouseClick("left", 786, 908, 1) срабатывает.

Вопрос: почему если совпадает первый цвет но не совпадает второй то MouseClick("left", 1149, 891, 1) срабатывает, а если не совпадает первый то MouseClick("left", 1149, 891, 1) не срабатывает.
Как решить эту проблему?

Последний раз редактировалось wnc, 21-05-2012 в 17:10.


Отправлено: 16:47, 21-05-2012 | #13

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


Всё , пофиксил .

Как сделать кнопки ?

Последний раз редактировалось wnc, 23-05-2012 в 01:15.


Отправлено: 01:02, 23-05-2012 | #14


Аватара для ferget

Разный


Сообщения: 1294
Благодарности: 359

Профиль | Отправить PM | Цитировать


Цитата wnc:
Как сделать кнопки ? »
уточните вопрос

Отправлено: 01:49, 23-05-2012 | #15

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


Графические кнопки вызывающие функционал, возможно-ли это?

Отправлено: 02:51, 23-05-2012 | #16


Аватара для ferget

Разный


Сообщения: 1294
Благодарности: 359

Профиль | Отправить PM | Цитировать


можно, вот пример

Код: Выделить весь код
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

#NoTrayIcon 

Local $Button1, $msg, $Gui
$Gui=GUICreate("Test Button")

Opt("GUICoordMode", 2)
$Button1 = GUICtrlCreateButton("Test", 10, 20, 120)
GUICtrlSetBkColor(-1, 0x0)
GUICtrlSetColor(-1, 0xFFFFFF)

GUISetState()

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Button1
            OKPressed()
    EndSwitch
WEnd

Func OKPressed()
 MsgBox(4096,"", "Ok pressed")
EndFunc
Это сообщение посчитали полезным следующие участники:

Отправлено: 03:11, 23-05-2012 | #17

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


А как сделать поиск цвета по части экрана , не знаю как правильно сформулировать но думаю выразился более менее понятно ))
Вот из этого кода.
Код: Выделить весь код
HotKeySet("{ESC}", "ExitPro")
HotKeySet("{F1}", "Terminate")

While 1
    MsgBox(64, "Программу запущена", "Успех")
Sleep(90000)
WEnd

Func Terminate()
    MsgBox(64, "Включено", "ее!")
While 1
$aPos = MouseGetPos()
;Точки проверки
$var = PixelGetColor( 1097, 423 )
$var1 = PixelGetColor( 1181, 415 )
;x y

If $var = 0x8E2727 AND $var1= 0x335E25 Then 
    MouseClick("left", 1149, 891, 1)
	
Elseif $var = 0x8E2727 Or $var1= 0x335E25 Then
     MouseClick("left", 786, 908, 1) 
EndIf
WEnd
 EndFunc
 
 Func ExitPro()
	MsgBox(64, "Программа выключена", "Успешно выполнено")
	
Exit 0
EndFunc
Сделайте пожалуйста код на 2кнопки , а то у меня не получается написать вторую.. А так я сразу пойму )
Я делаю , а оно получается так что вторая не работает..

Последний раз редактировалось wnc, 23-05-2012 в 03:33.


Отправлено: 03:24, 23-05-2012 | #18


Аватара для ferget

Разный


Сообщения: 1294
Благодарности: 359

Профиль | Отправить PM | Цитировать


две кнопки

Код: Выделить весь код
Local $Button1, $Button2, $msg, $Gui
.............................................................
Opt("GUICoordMode", 2)
$Button1 = GUICtrlCreateButton("Test", 10, 20, 120)
$Button2 = GUICtrlCreateButton("кнопка", -1, 0)
GUISetState()

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Button1
			;что-то делаем
	Case $Button_2
                        ;что-то делаем
    EndSwitch
WEnd
а для поиска по части экрана PixelSearch

Код: Выделить весь код
PixelSearch( 0, 0, 20, 300, 0xE0E1E4 )
If Not @error Then
    MouseClick("left", 539, 47, 1)
EndIf

Последний раз редактировалось ferget, 23-05-2012 в 04:09.


Отправлено: 04:03, 23-05-2012 | #19

wnc wnc вне форума Автор темы

Новый участник


Сообщения: 40
Благодарности: 0

Профиль | Отправить PM | Цитировать


PixelSearche это мне указать не 2 точки , а 4 да?

Отправлено: 04:05, 23-05-2012 | #20



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Цвета , авто-кликер.

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Помогите сделать авто-кликер wnc AutoIt 31 19-05-2012 04:39
При открытии торрента для скачки, вылазиет какой то кликер(скриншот внутри) HarrysFerrarievich Лечение систем от вредоносных программ 3 16-11-2010 21:14
[решено] Как написать автоматический кликер xoxol777 AutoIt 12 18-08-2009 13:59
Интерфейс - Изменения цвета Chainyk1 Microsoft Windows Vista 4 28-03-2009 23:18
цвета html dima1981 Вебмастеру 15 31-08-2008 13:32




 
Переход