hey habe mich an einem relogger für den pserver Arania2 versucht
aber es gibt ein prob das ich noch nicht lösen konnte
das ist der code
Code:
$read = IniRead("Daten.ini", "Login", "ID", "")
$id = InputBox("ID", "Deine ID", $read)
IniWrite("Daten.ini", "Login", "ID", $id)
$read2 = IniRead("Daten.ini", "Login", "Passwort", "")
$pw = InputBox("Passwort", "Gib dein Passwort ein", $read2)
IniWrite("Daten.ini", "Login", "Passwort", $pw)
$read3 = IniRead("Daten.ini", "Login", "Exe", "")
$exe = InputBox("Exe", "Gib deine Exe ein z.B. Metin2.exe", $read3)
IniWrite("Daten.ini", "Login", "Exe", $exe)
$read4 = IniRead("Daten.ini", "Login", "Window", "")
$win = InputBox("Window", "Gib den fenster namen ein z.B. Metin2", $read4)
IniWrite("Daten.ini", "Login", "Window", $win)
If WinWaitActive($win) Then
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}") das hier habe ich gemacht damit man
das programm auch zwischen durch
starten kann ohne das ein neues fenster geöffnet wird
nur habe ich seit dem das prob das er
es garnicht mehr startet wenn mir einer
sagen könnte woran es liegt wäre ich sehr dankbar
Else
Run($exe)
If WinWaitActive($win) Then
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}")
Else
Sleep(5000)
MsgBox(0, "Error" . "Error Window not found")
Exit
EndIf
EndIf
HotKeySet("^{r}", "start")
Func start()
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}")
EndFunc ;==>start
HotKeySet("^{y}", "pick")
Func pick()
While 20
Send("y")
Sleep(500)
WEnd
EndFunc ;==>pick
HotKeySet("{e}", "end")
Func end()
Exit
EndFunc ;==>end
While 1
Sleep(100)
WEnd
hey habe mich an einem relogger für den pserver Arania2 versucht
aber es gibt prob das ich noch nicht lösen konnte
das ist der code
Code:
$read = IniRead("Daten.ini", "Login", "ID", "")
$id = InputBox("ID", "Deine ID", $read)
IniWrite("Daten.ini", "Login", "ID", $id)
$read2 = IniRead("Daten.ini", "Login", "Passwort", "")
$pw = InputBox("Passwort", "Gib dein Passwort ein", $read2)
IniWrite("Daten.ini", "Login", "Passwort", $pw)
$read3 = IniRead("Daten.ini", "Login", "Exe", "")
$exe = InputBox("Exe", "Gib deine Exe ein z.B. Metin2.exe", $read3)
IniWrite("Daten.ini", "Login", "Exe", $exe)
$read4 = IniRead("Daten.ini", "Login", "Window", "")
$win = InputBox("Window", "Gib den fenster namen ein z.B. Metin2", $read4)
IniWrite("Daten.ini", "Login", "Window", $win)
If WinWaitActive($win) Then
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}") das hier habe ich gemacht damit man
das programm auch zwischen durch
starten kann ohne das ein neues fenster geöffnet wird
nur habe ich seit dem das prob das er
es garnicht mehr startet wenn mir einer
sagen könnte woran es liegt wäre ich sehr dankbar
Else
Run($exe)
If WinWaitActive($win) Then
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}")
Else
Sleep(5000)
MsgBox(0, "Error" . "Error Window not found")
Exit
EndIf
EndIf
HotKeySet("^{r}", "start")
Func start()
MouseClick("left", 732, 560)
MouseClick("left", 765, 874)
Send("" & $id)
Send("{tab}")
Send("" & $pw)
Send("{enter}")
EndFunc ;==>start
HotKeySet("^{y}", "pick")
Func pick()
While 20
Send("y")
Sleep(500)
WEnd
EndFunc ;==>pick
HotKeySet("{e}", "end")
Func end()
Exit
EndFunc ;==>end
While 1
Sleep(100)
WEnd
Die Funktion WinWaitActice unterbricht das Programm und wartet bis das angegebene Fenster existiert außerdem hat die Funktion keinen Rückgabe werte, sodass die If-Schleife nicht weiß, wann sie zu funktionieren hat.
Du solltest die Funktion WinExists benutzen.
Relogger Metin2 DE 11/28/2011 - Metin2 - 2 Replies Hallo....
Ich benutze den Bot vom Slait bekomme aber oft kicks. Ich wollte nun nach einen Relogger fragen hat jemand sowas in der art ... `?
metin2 relogger? 05/22/2011 - Metin2 - 1 Replies hay liebe comunitty
gibt es den zurzeit einen relogger er müsste eig. nur enter pressen weil character auf erstem platz ist aber bräucht halt nen richtigen weil ich bei offi immer kick durch lvl bot bekommen
hoffe auf antwort danke schon im vorraus "!"
Relogger Metin2 Pserver problem
