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

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

Ответить
Настройки темы
Помогите сделать авто-кликер
wnc wnc вне форума

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


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

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


Мне нужно сделать программу которая при наведении на определённый цвет , будет срабатывать mouse1.

Отправлено: 23:12, 17-05-2012

 

Аватара для ferget

Разный


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

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


можно попробовать

Код: Выделить весь код
If $var < 0xC00000  OR $var > 0xCFFFFF Then

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



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

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

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

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


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

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


Нет, к сожалению так не получается =(

Отправлено: 05:31, 18-05-2012 | #22


Аватара для ferget

Разный


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

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


Цитата wnc:
Нет, к сожалению так не получается =( »
значит нужно каждый задавать, лучше массивом

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

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

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


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

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


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

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


Аватара для ferget

Разный


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

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


вот так

читать дальше »
Код: Выделить весь код
HotKeySet("{ESC}", "Terminate")

;Сначала выбираем все нужные цвета
Dim $aArray[4]

;тут записываем каждый цвет
$aArray[0]=0xC00000
$aArray[1]=0x000000
$aArray[2]=0xFFFFFF
$aArray[3]=0xCFF555
;........................




	While 1
		For $element In $aArray
			$aPos = MouseGetPos()
			$var = PixelGetColor( $aPos[0] , $aPos[1] )
			If $var = $element   Then 
				MouseClick("Left")
			EndIf
		Next
	WEnd


Func Terminate()
    Exit 0
EndFunc


хотя лучше автоматизировать поиск цвета, этот код сам наводит мышку на нужный цвет

читать дальше »
Код: Выделить весь код
HotKeySet("{ESC}", "Terminate")


;Сначала выбираем все нужные цвета
Dim $aArray[4]

;тут записываем каждый цвет
$aArray[0]=0xC00000
$aArray[1]=0x000000
$aArray[2]=0xFFFFFF
$aArray[3]=0xCFF555
;........................




	While 1
		For $element In $aArray
			$coord = PixelSearch( 0, 0, 800, 600, $element );первые 4 цифры - область экрана где ищется цвет
			If Not @error Then
			MouseClick("Left", $coord[0] , $coord[1])
			EndIf
		Next
	WEnd


Func Terminate()
    Exit 0
EndFunc
Это сообщение посчитали полезным следующие участники:

Отправлено: 06:15, 18-05-2012 | #25

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

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


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

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


$coord = PixelSearch( 0, 0, 800, 600, $element );первые 4 цифры - область экрана где ищется цвет
А там где 800, 600 - это разрешение экрана ? Или как...

Отправлено: 06:26, 18-05-2012 | #26


Аватара для ferget

Разный


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

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


Цитата wnc:
А там где 800, 600 - это разрешение экрана ? Или как... »
это просто для примера
0,0 -это левый верхний угол экрана
800, 600 - это размер области

можно задавать все 4 цифры

Отправлено: 06:31, 18-05-2012 | #27

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

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


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

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


AutoIt v3 Window Info
Показует мне Position 480,524 . Куда её вписывать от туда?

Отправлено: 06:39, 18-05-2012 | #28


Аватара для ferget

Разный


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

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


первые две цифры брать из Position две последние из Size

Отправлено: 06:41, 18-05-2012 | #29

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

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


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

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


Хорошо, а теперь как сделать что-бы при смене любого цвета срабатывал MouseClick("Left"), и задать еще кнопки включения и выключения ?

Отправлено: 15:45, 18-05-2012 | #30



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

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
При открытии торрента для скачки, вылазиет какой то кликер(скриншот внутри) HarrysFerrarievich Лечение систем от вредоносных программ 3 16-11-2010 21:14
Помогите с авто установкой программ tiylar Тест-форум 4 09-01-2010 14:39
[решено] Как написать автоматический кликер xoxol777 AutoIt 12 18-08-2009 13:59
Разное - Авто Принтер - запуск вручную. помогите! ventblanc Microsoft Windows 2000/XP 0 01-11-2007 11:04
помогите с авто установкой прог! Пожалуста! DREDivan Автоматическая установка приложений 5 18-02-2007 22:08




 
Переход