Hier ist das Script :
################################################## ##
Und zwar möchte ich gerne das bei der Inputbox wenn ich die Namen reinschreibe zB. Teemo,dass dann per pixelsearch sucht und auf ihn klickt ich freue mich über jede Hilfe. :handsdown:
PHP Code:
Global $Paused
$passwort = InputBox ("Passwort Manager","Bitte geben sie das Passwort ein!","","*")
If $passwort = "" Then
MsgBox(64, "Passwort Manager", "Das Passwort wurde richtig eingegeben!",1)
Else
MsgBox(16, "ERROR 405", "Zugriff Verweigert! " &@CRLF& " Bitte geben sie das Passwort richtig ein!",2)
Exit
EndIf
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#NoTrayIcon
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("League of Legends afk Bot made by ", 418, 227, 196, 126)
$Group1 = GUICtrlCreateGroup("LOL afk Bot", 0, 0, 417, 225)
$Button1 = GUICtrlCreateButton("Start", 8, 176, 43, 41)
$Button2 = GUICtrlCreateButton("Exit", 56, 176, 75, 41)
$Label1 = GUICtrlCreateLabel("Bot made by ", 144, 192, 266, 24)
GUICtrlSetFont(-1, 12, 800, 2, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("F2: Start", 16, 16, 61, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("F3: Login", 16, 40, 67, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Pic1 = GUICtrlCreatePic("C:\Users\Privat\Desktop\Afk Bot\Pentakill.jpg", 96, 8, 321, 161)
$Button3 = GUICtrlCreateButton("Go LOL", 8, 136, 73, 33)
$Label4 = GUICtrlCreateLabel("F5: Stop", 16, 88, 61, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label5 = GUICtrlCreateLabel("F7: Pause", 16, 112, 73, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label6 = GUICtrlCreateLabel("F4: Spiel", 16, 64, 65, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
GUICtrlSetOnEvent($Button1, "_Start")
GUICtrlSetOnEvent($Button2, "_Exit")
GUICtrlSetOnEvent($Button3, "_Login")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_Start()
Case $Button2
_Exit()
Case $Button3
_Login()
EndSwitch
HotKeySet("{F2}","Start")
HotKeySet("{F3}","Login")
HotKeySet("{F4}","Start_Spiel")
HotKeySet("{F5}","Stop")
HotKeySet("{F7}", "TogglePause")
WEnd
Func Login()
$acountname = ""
$passwort = ""
If Run("C:\Riot Games\League of Legends\lol.launcher.exe") Then
MsgBox(64,"League of Legends Launcher!","Launcher wird gestartet " &@CRLF& " und wirst eingeloggt!",12)
Else
MsgBox(16,"ERROR 426!","League of Legends nicht insatlliert " &@CRLF& " bitte installieren sie LOL!",6)
Exit
EndIf
Sleep(1500)
MouseClick("left", 942, 630, 1)
Sleep(13000)
MouseClick("left", 313, 302, 2)
Sleep(1000)
Send("{BACKSPACE 13}")
Sleep(1000)
Send ($acountname)
MouseClick("left",286,358,1)
Sleep(1500)
Send($passwort)
Sleep(2500)
MouseClick("left",406,428,1)
Sleep(6000)
MsgBox(64,"Erfolgreich","Login erfolgreich",2)
EndFunc
Func _Login()
$acountname = ""
$passwort = ""
If Run("C:\Riot Games\League of Legends\lol.launcher.exe") Then
MsgBox(64,"League of Legends Launcher!","Launcher wird gestartet " &@CRLF& " und wirst eingeloggt!",12)
Else
MsgBox(16,"ERROR 426!","League of Legends nicht insatlliert " &@CRLF& " bitte installieren sie LOL!",6)
Exit
EndIf
Sleep(1500)
MouseClick("left", 942, 630, 1)
Sleep(13000)
MouseClick("left", 313, 302, 2)
Sleep(1000)
Send("{BACKSPACE 13}")
Sleep(1000)
Send ($acountname)
MouseClick("left",286,358,1)
Sleep(1500)
Send($passwort)
Sleep(2500)
MouseClick("left",406,428,1)
Sleep(6000)
MsgBox(64,"Erfolgreich","Login erfolgreich",2)
EndFunc
Func Start()
MsgBox(64,"Erfolg","AFK Bot wird gestartet",6)
While 1
Sleep(10)
Sleep(3000)
MouseClick("right",1189,695,1)
Sleep(9000)
MouseClick("right",940,427,1)
Sleep(9000)
MouseClick("right",717,429,1)
Sleep(8000)
MouseClick("right",702,421,1)
Sleep(8000)
MouseClick("right",703,429,1)
Sleep(8000)
MouseClick("right",721,427,1)
Sleep(6000)
MouseClick("right",696,437,1)
Sleep(7000)
MouseClick("right",674,434,1)
Sleep(10000)
Send("b")
Sleep(200)
WEnd
EndFunc
Func _Start()
MsgBox(64,"Erfolg","AFK Bot wird gestartet",6)
While 1
Sleep(3000)
MouseClick("right",1189,695,1)
Sleep(9000)
MouseClick("right",940,427,1)
Sleep(9000)
MouseClick("right",717,429,1)
Sleep(8000)
MouseClick("right",702,421,1)
Sleep(8000)
MouseClick("right",703,429,1)
Sleep(8000)
MouseClick("right",721,427,1)
Sleep(6000)
MouseClick("right",696,437,1)
Sleep(7000)
MouseClick("right",674,434,1)
Sleep(10000)
Send("b")
Sleep(200)
WEnd
EndFunc
Func Start_Spiel()
MsgBox(64,"Bot Game","/Bot Game\/Kluft der Beschwörer\/Anfänger\",5)
Sleep(100)
MouseClick("left",685,45,1)
Sleep(1999)
MouseClick("left",380,173,1)
Sleep(100)
MouseClick("left",587,145,1)
Sleep(100)
MouseClick("left",759,152,1)
Sleep(100)
MouseClick("left",956,146,1)
Sleep(100)
MouseClick("left",796,682,1)
Sleep(1000)
While 1
$Annehmen = PixelSearch(541,417,635,442,0x224C7F,0)
If IsArray($Annehmen) Then
MouseClick("left",585,431,1)
EndIf
Sleep(100)
WEnd
Sleep(4000)
$Teemo = PixelSearch(1,1)
$Darius = PixelSearch(1,1)
$Akali = PixelSearch(1,1)
$Morgana = PixelSearch(1,1)
$Shaco = PixelSearch(1,1)
$Garen = PixelSearch(1,1)
$Vaigar = PixelSearch(1,1)
$Teemo= InputBox("Champ Auswahl","Bitte wähle dir einen " &@CRLF& " von den Champs aus:" &@CRLF& " -Teemo- " &@CRLF& " -Darius- " &@CRLF& " -Akali- " &@CRLF& " -Morgana- " &@CRLF& " -Shaco- " &@CRLF& " -Garen- " &@CRLF& " -Vaigar- ")
$Ausgabe =
If IsArray($Teemo) Then
MouseMove($Teemo[0],$Teemo[1],0)
MouseClick("left")
EndFunc
Func _Exit()
Exit
EndFunc
Func Stop()
Exit
EndFunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip("Bot wird pausiert!",0,0)
WEnd
ToolTip("Pause beendet!",0,0)
Sleep(1500)
ToolTip("")
EndFunc
Und zwar möchte ich gerne das bei der Inputbox wenn ich die Namen reinschreibe zB. Teemo,dass dann per pixelsearch sucht und auf ihn klickt ich freue mich über jede Hilfe. :handsdown: