Что нового

Автоматизация Нужен аутокликер для игры Idling to Rule the God.

Suslik

Новичок
Сообщения
2
Репутация
0
В игре имеется вот такой экран:
1.jpg
Необходимо нажать клавишу HIT когда синяя полоса в белой зоны. После каждого попадания белая зона меняет положение, также она с увеличением уровня меняет уменьшает размер. Синяя шкала движется постоянно, с увеличением уровня ускоряется!
2.jpg
После каждого перерождения муторно тут набивать заново все. Прошу помогите создать кликер для этого дела
 

TiranCool

Новичок
Сообщения
78
Репутация
0
В игре имеется вот такой экран:
Посмотреть вложение 3903
Необходимо нажать клавишу HIT когда синяя полоса в белой зоны. После каждого попадания белая зона меняет положение, также она с увеличением уровня меняет уменьшает размер. Синяя шкала движется постоянно, с увеличением уровня ускоряется!
Посмотреть вложение 3904
После каждого перерождения муторно тут набивать заново все. Прошу помогите создать кликер для этого дела
Попробуй такой скрипт:
Код:
#include <Misc.au3>
#include <Timers.au3>

Opt("MouseClickDelay")
Opt("MouseClickDownDelay")
Opt("MouseCoordMode", 1)
Global $bPaused, $hDll, $aXY, $iDiff
OnAutoItExitRegister("_OnExit")
HotKeySet("{f5}", "_Start")
HotKeySet("{f6}", "_Pause")
HotKeySet("{0}", "_Exit")

$hDll = DllOpen("user32.dll")
_Start()

While 1
                                       $hTimer = TimerInit()
    Sleep(8000); Указать время, через которое будет нажиматься левая клавиша мыши
    MouseClick("left")
     $iDiff = TimerDiff($hTimer)
;~       MsgBox(0, "Разница во времени", $iDiff)
WEnd

Func _Start()
    ToolTip("Script _Started... Press F6 to _Pause, 0 Exit", 1, 1);F5- старт, F6 - пауза, 0 - закрывает программу
    $bPaused = False
EndFunc   ;==>_Start

Func _Pause()
    $bPaused = True
     $i=0
    ToolTip("Script _Paused... Press F5 to _Start, 0 Exit", 1, 1)
    While $bPaused
        Sleep(100)
    WEnd
EndFunc   ;==>_Pause

Func _OnExit()
    DllClose($hDll)
EndFunc   ;==>_OnExit

Func _Exit()
    Exit
EndFunc   ;==>_Quit
 
Автор
S

Suslik

Новичок
Сообщения
2
Репутация
0
Попробуй такой скрипт:
Код:
#include <Misc.au3>
#include <Timers.au3>

Opt("MouseClickDelay")
Opt("MouseClickDownDelay")
Opt("MouseCoordMode", 1)
Global $bPaused, $hDll, $aXY, $iDiff
OnAutoItExitRegister("_OnExit")
HotKeySet("{f5}", "_Start")
HotKeySet("{f6}", "_Pause")
HotKeySet("{0}", "_Exit")

$hDll = DllOpen("user32.dll")
_Start()

While 1
                                       $hTimer = TimerInit()
    Sleep(8000); Указать время, через которое будет нажиматься левая клавиша мыши
    MouseClick("left")
     $iDiff = TimerDiff($hTimer)
;~       MsgBox(0, "Разница во времени", $iDiff)
WEnd

Func _Start()
    ToolTip("Script _Started... Press F6 to _Pause, 0 Exit", 1, 1);F5- старт, F6 - пауза, 0 - закрывает программу
    $bPaused = False
EndFunc   ;==>_Start

Func _Pause()
    $bPaused = True
     $i=0
    ToolTip("Script _Paused... Press F5 to _Start, 0 Exit", 1, 1)
    While $bPaused
        Sleep(100)
    WEnd
EndFunc   ;==>_Pause

Func _OnExit()
    DllClose($hDll)
EndFunc   ;==>_OnExit

Func _Exit()
    Exit
EndFunc   ;==>_Quit

Это простой кликер! Я не знаю как реализовать возможность пиксельного анализа экрана! Необходимо щелкнуть мышкой только когда синяя зона доходит до белой, если ты не попадание то ты теряешь один левл, если попадаешь то +1. С увеличением уровня белая зона становится меньше, а скорость синего бегунка увеличивается
 

TiranCool

Новичок
Сообщения
78
Репутация
0
Подбери диапазон и цвет (диапазон пометил ???):
Функция - pixelsearch (https://autoit-script.ru/docs/functions/pixelsearch.htm)
Код:
#include <Misc.au3>
#include <Timers.au3>

Opt("MouseClickDelay")
Opt("MouseClickDownDelay")
Opt("MouseCoordMode", 1)
Global $bPaused, $hDll, $aXY, $iDiff
OnAutoItExitRegister("_OnExit")
HotKeySet("{f5}", "_Start")
HotKeySet("{f6}", "_Pause")
HotKeySet("{0}", "_Exit")

$hDll = DllOpen("user32.dll")
_Start()

While 1
       $hTimer = TimerInit()
    PixelSearch(@DesktopWidth/???,@DesktopHeight/???,@DesktopWidth/???,@DesktopHeight/???, 0x273E96, 10); указать диапазон поиска и подобрать цвет
     If Not @error Then
        MouseClick("Left")
     Endif
       $iDiff = TimerDiff($hTimer)
;~       MsgBox(0, "Разница во времени", $iDiff)
WEnd

Func _Start()
    ToolTip("Script _Started... Press F6 to _Pause, 0 Exit", 1, 1);F5- старт, F6 - пауза, 0 - закрывает программу
    $bPaused = False
EndFunc   ;==>_Start

Func _Pause()
    $bPaused = True
     $i=0
    ToolTip("Script _Paused... Press F5 to _Start, 0 Exit", 1, 1)
    While $bPaused
        Sleep(100)
    WEnd
EndFunc   ;==>_Pause

Func _OnExit()
    DllClose($hDll)
EndFunc   ;==>_OnExit

Func _Exit()
    Exit
EndFunc   ;==>_Quit

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

Это простой кликер! Я не знаю как реализовать возможность пиксельного анализа экрана! Необходимо щелкнуть мышкой только когда синяя зона доходит до белой, если ты не попадание то ты теряешь один левл, если попадаешь то +1. С увеличением уровня белая зона становится меньше, а скорость синего бегунка увеличивается
Тебе все равно нужно найти область где искать пиксели
Код:
#include <WinAPIEx.au3>
#include <misc.au3>
#include <GUIConstants.au3>
#include <WindowsConstants.au3>

Opt("MouseClickDelay")
Opt("MouseClickDownDelay")
Opt("MouseCoordMode", 1)
Global $bPaused, $hDll, $aXY, $iDiff
OnAutoItExitRegister("_OnExit")
HotKeySet("{f5}", "_Start")
HotKeySet("{f6}", "_Pause")
HotKeySet("{0}", "_Exit")

AutoItSetOption("MouseCoordMode", 2)
$hWnd = WinGetHandle("[ACTIVE]")

_Area(945, 500, 950, 350); - показать область поиска пикселя
$hDll = DllOpen("user32.dll")

_Start()

Func _Area($iLeft, $iTop, $iRght, $iBottom, $iTrans=150)
    Local $hWin = GUICreate('Win', $iTop, $iBottom, $iLeft, $iBottom, $WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW, $WS_EX_TRANSPARENT))

    WinSetTrans($hWin, '',      $iTrans)
    GUISetBkColor(0x0000e,     $hWin)
    GUISetState(@SW_SHOW,       $hWin)
    EndFunc


While 1
       $hTimer = TimerInit()
    $coord =PixelSearch(@DesktopWidth/945,@DesktopHeight/5,@DesktopWidth/950,@DesktopHeight/350, 0x3E5780, 50, 2, $hWnd); указать диапазон поиска и подобрать цвет
    If IsArray($coord) = True Then
    MouseClick("LEFT")

     Endif
       $iDiff = TimerDiff($hTimer)
WEnd

Func _Start()
    ToolTip("Script _Started... Press F6 to _Pause, 0 Exit", 1, 1);F5- старт, F6 - пауза, 0 - закрывает программу
    $bPaused = False
EndFunc   ;==>_Start

Func _Pause()
    $bPaused = True
     $i=0
    ToolTip("Script _Paused... Press F5 to _Start, 0 Exit", 1, 1)
    While $bPaused
        Sleep(100)
    WEnd
EndFunc   ;==>_Pause

Func _OnExit()
    DllClose($hDll)
EndFunc   ;==>_OnExit

Func _Exit()
    Exit
EndFunc   ;==>_Quit
 
Последнее редактирование:
Верх