Steinbruch Bot mit Pixelsearch

Steinbruch Bot


HotKeySet("{F1}", "Go")
HotKeySet("{F2}", "Stop")
HotKeySet("{ESC}","Close")

#RequireAdmin
$hWnd = WinGetHandle("NosTale")
$left_x = IniRead("Config.ini","Links","x","")
$right_x = IniRead("Config.ini","Rechts","x","")
$left_y = IniRead("Config.ini","Links","y","")
$right_y = IniRead("Config.ini","Rechts","y","")
$bodenfarbe_l = IniRead("Config.ini","Links","Farbe","")
$bodenfarbe_r = IniRead("Config.ini","Rechts","Farbe","")


While 1
    Sleep(100)
WEnd

Func Go()
    While 1
    If PixelGetColor($right_x,$right_y,$hWnd) not = $bodenfarbe_r  Then
        Send("{Right}")
            ElseIf PixelGetColor($left_x,$left_y,$hWnd) Not = $bodenfarbe_l Then
        Send("{LEFT}")
    Else
        Send("{UP}")
EndIf
        
WEnd
EndFunc

Func Stop()
    While 1
        Sleep(1000)                                         
    WEnd
EndFunc

Func Close()
        Exit
EndFunc