


Программисты помогите Автокликер perfect click
Я хотел написать код для автокликера perfect click для автоматизации фарма в игре
Но сам программирования не знаю и попросил чат гпт
После часа мучений добился от него более менее адекватного кода который не выдаёт ошибки в автокликере
Но он всё равно не работает
Помогите пожалуйста найти ошибку или написать рабочий код
Запрос:Напиши код для автокликера
На языке Autolt.
Клик 1 начинает игру координаты(1483,272)
Только если цвет(13899008)
Через 51 секунду
Клик 2 выбирает персонажа
Координаты (1180,1105)
Через 1 секунду
Клик 3 координаты(1561,767 )
Через 300 миллисекунд
Клик 4 координаты (1561,767)
Ставит персонажа
Через 1 секунду
Клик 5 координаты (1561,767)
Открывает меню улучшения
Клик 6 каждый раз в случае если в координатах ( 480,789) цвет (14721486)
Улучшает персонажа
Если в координатах (1483,272)
Цвет (13899008)
Цикл повторяется
Код:
#include < MsgBoxConstants.au 3>
; Координаты и цвета
Local $startButtonX = 1483
Local $startButtonY = 272
Local $startButtonColorDec = HexToDec("14721486") ; Преобразование в десятичное
Local $characterSelectX = 1180
Local $characterSelectY = 1105
Local $placeCharacterX = 1561
Local $placeCharacterY = 767
Local $upgradeMenuX = 1561
Local $upgradeMenuY = 767
Local $upgradeButtonX = 480
Local $upgradeButtonY = 789
Local $upgradeButtonColorDec = HexToDec("14721486") ; Преобразование в десятичное
; Задержки (в миллисекундах)
Local $delayStart = 51000
Local $delayCharacterSelect = 1000
Local $delayPlaceCharacter = 300
Local $delayUpgradeMenu = 1000
Local $delayCheckUpgrade = 500 ;Проверка цвета кнопки улучшения
; Функция для преобразования шестнадцатеричного цвета в десятичный
Func HexToDec($hex)
Return Number(StringReplace($hex, "0x", "")) ;Удаление "0x" перед преобразованием
EndFunc
While 1
; Проверка цвета кнопки старта
If PixelGetColor($startButtonX, $startButtonY) = $startButtonColorDec Then
ConsoleWrite("Кнопка старта найдена. Начинаем игру..." & @CRLF)
MouseClick(1, $startButtonX, $startButtonY)
Sleep($delayStart)
ConsoleWrite("Выбираем персонажа..." & @CRLF)
MouseClick(1, $characterSelectX, $characterSelectY)
Sleep($delayCharacterSelect)
ConsoleWrite("Размещаем персонажа..." & @CRLF)
MouseClick(1, $placeCharacterX, $placeCharacterY)
Sleep($delayPlaceCharacter)
MouseClick(1, $placeCharacterX, $placeCharacterY)
Sleep($delayUpgradeMenu)
ConsoleWrite("Открываем меню улучшений..." & @CRLF)
MouseClick(1, $upgradeMenuX, $upgradeMenuY)
; Цикл улучшения
While PixelGetColor($upgradeButtonX, $upgradeButtonY) = $upgradeButtonColorDec
ConsoleWrite("Кнопка улучшения найдена. Улучшаем персонажа..." & @CRLF)
MouseClick(1, $upgradeButtonX, $upgradeButtonY)
Sleep($delayCheckUpgrade)
WEnd
ConsoleWrite("Цикл улучшений завершен." & @CRLF)
Else
ConsoleWrite("Кнопка старта не найдена. Ожидание..." & @CRLF)
Sleep(2000)
EndIf
WEnd
цвет надо наоборот декТоХекс.
Ну и попрови гпт написать для автохоткея, у них язык вроде один.