[Мышь, клавиатура] Бот для мышки

[Ruzel0]

Может кто помочь? Нужно, чтобы при обнаружение пикселя определенного цвета, нажималась ЛКМ. Вот, что у меня получилось, но что-то не работает.

HotKeySet("{F6}","_Exit")
While 1
$Variable = PixelSearch(657,346,655,423,0xB93033)
If IsArray($Variable) = True Then
MouseClick("LEFT")
End If
WEnd
Func _Exit()
Exit
EndFunc

 

[dstasv]

MouseClick('left',$Variable[0], $Variable [1])

Координаты куда кликать не указал

 

[Ruzel0]

Строчку эту заменить на твою?

HotKeySet("{F6}","_Exit")
While 1
$Variable = PixelSearch(657,346,655,423,0xB93033)
If IsArray($Variable) = True Then
MouseClick('left',$Variable[0], $Variable [1])
End If
WEnd
Func _Exit()
Exit
EndFunc

 

[dstasv]

ага
только не забывай про

MouseCoordMode
PixelCoordMode

 

[Ruzel0]

При компиляции: the left character above is illegal in an expression

 

[madmasles]

Ruzel0,

Предупреждение

За нарушение правил форума (пункт В.11):

Любые отрывки AutoIt кода необходимо заключать в тег [autoit]

(подробнее), а обычный код соответственно в тег [code]

(подробнее). Также большие выдержки текста помещайте под тег [spoiler]

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

С уважением, ваш Глобальный модератор.

 

[dstasv]

HotKeySet("{F6}","_Exit")
While 1
$Variable = PixelSearch(657,346,655,423,0xB93033)
If IsArray($Variable) = True Then
MouseClick('left',$Variable[0], $Variable [1])
EndIf
WEnd
Func _Exit()
Exit
EndFunc

Ну смотри же, что разъехалось, лишний пробел был.
И возможно для более уверенного нахождения нужно указать:
shade-variation [необязательный] Число от 0 до 255, показывающее, на сколько может отличаться красная, зелёная и синяя компоненты цвета. По умолчанию 0 (точное совпадение).
от PixelSearch

 

[Ruzel0]

Убрал пробелы между $Variable[0],$Variable [1], не помогло

Как это будет выглядеть? shade-variation [необязательный] Число от 0 до 255, показывающее, на сколько может отличаться красная, зелёная и синяя компоненты цвета.

 

[dstasv]

Ты пробуй.
Если вдруг заметишь, что цвет есть, а реакции нет, то будешь играться.
Если ткнуть на форуме в PixelSearch, то правка откроется по нему.

$Variable = PixelSearch(657,346,655,423,0xB93033,10)

10 и будет задавать небольшую погрешность.

 

[Ruzel0]

Ты пробуй.
Если вдруг заметишь, что цвет есть, а реакции нет, то будешь играться.
Если ткнуть на форуме в PixelSearch, то правка откроется по нему.

$Variable = PixelSearch(657,346,655,423,0xB93033,10)

10 и будет задавать небольшую погрешность.

Там разобрался, но всё равно не работает, то ли цвет не тот, то ли в игре не работает, нету никаких команд, если в полноэкранном ввиде пользуешься

 

[C2H5OH]

то ли в игре не работает

А там защиты нету?
Ты б игру хоть назвал.

 

[dstasv]

HotKeySet("{F6}","_Exit")
While 1
$Variable = PixelSearch(657,346,655,423,0xB93033,15)
If not @error Then
TrayTip ( "Диалог:", "нашел!", 10, 16)
MouseMove ($Variable[0], $Variable[1])
TrayTip ( "Диалог:", "подвинул!", 10, 16)
Sleep(500)
MouseClick('left',$Variable[0], $Variable[1])
TrayTip ( "Диалог:", "тыкнул!", 10, 16)
Sleep(Random(500,1000,1))
Else
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
   Sleep(Random(500,1000,1))
EndIf
WEnd
Func _Exit()
Exit
EndFunc

Я так юзаю, у меня этот Арай тоже не хотел работать.
Он с начало двинет мышку на ту координату где найдет цвет, а потом кликнет.
И ты учти что координаты у тебя по всему (1 = (по умолчанию) абсолютное экранные координаты) если ты их узнавал для окна то он не там ишет
подвигай мышь командами по тем координатам

....
Else
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
MouseMove (657,346)
Sleep(1000)
MouseMove (655,423)
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
   Sleep(Random(500,1000,1))
EndIf
....

 

[Ruzel0]

то ли в игре не работает

А там защиты нету?
Ты б игру хоть назвал.

Защита есть, apb reloaded


Добавлено:

Сообщение автоматически объединено: 5 Май 2015

HotKeySet("{F6}","_Exit")
While 1
$Variable = PixelSearch(657,346,655,423,0xB93033,15)
If not @error Then
TrayTip ( "Диалог:", "нашел!", 10, 16)
MouseMove ($Variable[0], $Variable[1])
TrayTip ( "Диалог:", "подвинул!", 10, 16)
Sleep(500)
MouseClick('left',$Variable[0], $Variable[1])
TrayTip ( "Диалог:", "тыкнул!", 10, 16)
Sleep(Random(500,1000,1))
Else
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
   Sleep(Random(500,1000,1))
EndIf
WEnd
Func _Exit()
Exit
EndFunc

Я так юзаю, у меня этот Арай тоже не хотел работать.
Он с начало двинет мышку на ту координату где найдет цвет, а потом кликнет.
И ты учти что координаты у тебя по всему (1 = (по умолчанию) абсолютное экранные координаты) если ты их узнавал для окна то он не там ишет
подвигай мышь командами по тем координатам

....
Else
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
MouseMove (657,346)
Sleep(1000)
MouseMove (655,423)
   TrayTip ( "Диалог:", "не нашел!", 10, 16)
   Sleep(Random(500,1000,1))
EndIf
....

В не игры работает, находит цвет и нажимает ЛКМ, а в игре нет пока

 

[madmasles]

Ruzel0,

Предупреждение

За нарушение общих правил (пункт В.2):

Старайтесь избегать “Over quoting” (преувеличенное цитирование) - цитируйте только необходимую часть сообщения, которая наилучшим образом подчеркнёт суть цитируемого.

С уважением, ваш Глобальный модератор.

 

[dstasv]

боюсь наврятли.
Мыша или клава случайно не А4 течь Х7 ?

 

[Ruzel0]

боюсь наврятли.
Мыша или клава случайно не А4 течь Х7 ?

Да у меня такая мышь

 

[dstasv]

попробуй скрестить у х7 мышек есть тоже язык для макросов в самой мышке, попробуй скрестить

 

[Ruzel0]

попробуй скрестить у х7 мышек есть тоже язык для макросов в самой мышке, попробуй скрестить

Я даже не знаю как, кто-нибудь знает как?
Ещё я видел есть прога для обхода фроста AntiGameGuard, только я не нашёл, где скачать можно

 

[dstasv]

Еще есть проект в ВК l2bot-4.0
в папке тоолз данного архива есть папка InpOut32 вроде как драйверочек мышки клавы пс/2 возможно он помоет тебе обойти защиту 4геймов.
Вроде для подключения есть скрипты осталось только научиться пользоваться.
Но возможно я и ошибаюсь.

 

[Ruzel0]

Еще есть проект в ВК l2bot-4.0
в папке тоолз данного архива есть папка InpOut32 вроде как драйверочек мышки клавы пс/2 возможно он помоет тебе обойти защиту 4геймов.
Вроде для подключения есть скрипты осталось только научиться пользоваться.
Но возможно я и ошибаюсь.

#include-once

global const $kLibraryName = "inpout32.dll"
;global const $kLibraryName = "inpoutx64.dll"

func InpOut_LogWrite($data)
	FileWrite("inpout.log", $data & chr(10))
endfunc

func _Out32($PortAddress, $data)
	DllCall($kLibraryName, "none", "Out32", "short", $PortAddress, "short", $data)
	
	if @error <> 0 then
		InpOut_LogWrite("_Out32 - error = " & @error)
		return 0
	endif

	return 1
endfunc

func _Inp32($PortAddress)
	$result = DllCall($kLibraryName, "short", "Inp32", "short", $PortAddress)

	if @error <> 0 then
		InpOut_LogWrite("_Inp32 - error = " & @error)
		return 0
	endif
	
	return $result[0]
endfunc

func _IsInpOutDriverOpen()
	$result = DllCall($kLibraryName, "bool", "IsInpOutDriverOpen")
	
	if @error <> 0 then 
		InpOut_LogWrite("_IsInpOutDriverOpen - error = " & @error)
		return 0
	endif
	
	return $result[0]
endfunc

в этом файле, этот скрипт внутрь моего кидать что ли?