daxuaaaaa

#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=E:\Duc\Downloads\super_daxua.ico
#AutoIt3Wrapper_Outfile=Auto_pick_1.0.exe
#AutoIt3Wrapper_Res_Description=Con cặc
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_Language=1066
#AutoIt3Wrapper_Res_Field=ProductName|Tool pick tranh tướng
#AutoIt3Wrapper_AU3Check_Stop_OnWarning=y
#Tidy_Parameters=/reel /sf
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>

#Region ### START Koda GUI section ### Form=
Global $Form1_1 = GUICreate("AutoPicker", 281, 123, 377, 177)
Global $menu = GUICtrlCreateMenu("Menu")
Global $op = GUICtrlCreateMenuItem("Options", $menu)
Global $exit = GUICtrlCreateMenuItem("Exit", $menu)
Global $Input1 = GUICtrlCreateInput("Yasuo", 74, 33, 137, 21)
Global $Label1 = GUICtrlCreateLabel("Nhâp tên tướng", 88, 9, 105, 18, $SS_CENTER)
Global $Button1 = GUICtrlCreateButton("Bật auto", 88, 57, 105, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
opengame()
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $exit
            Exit
        Case $Button1
            WinMove('League of Legends', '', 0, 0)
            $size = WinGetClientSize('League of Legends')
            $cp = GUICtrlRead($Input1)
            MsgBox(0, 'Picker', 'Đã set pick ' & $cp, '0.8')
            While 1
                $pixel1 = PixelSearch(740, 100, 755, 110, 0x676861)
                If IsArray($pixel1) Then
                    WinActivate('League of Legends')
                    ControlClick('League of Legends', '', '[classnn:Chrome_RenderWidgetHostHWND1]', 'left', 1, $pixel1[0], $pixel1[1])
                    ControlSend('League of Legends', '', '[classnn:Chrome_RenderWidgetHostHWND1]', $cp) ;=> pick daxua
                    Sleep(400)
                    While 1
                        $daxua = PixelSearch(417, 199, 417, 199, 0x3C3C41)
                        If IsArray($daxua) Then
                            ControlClick('League of Legends', '', '[classnn:Chrome_RenderWidgetHostHWND1]', 'left', 1, 398, 166)
                            ExitLoop
                        EndIf
                    WEnd
                    MsgBox(0, 'AutoPicker', 'Đã pick ' & $cp)

                    ExitLoop
                EndIf
            WEnd

    EndSwitch
WEnd
Func opengame()
    If Not WinExists('League of Legends') Then Sleep(1)
EndFunc   ;==>opengame

Func out()
    WinClose("Auto pick")
    MsgBox($MB_SYSTEMMODAL, "", "mở game chưa?")
    Exit
EndFunc   ;==>out