|
You last visited: Today at 22:16
Advertisement
HILFE bei metin2 pserver farmbot
Discussion on HILFE bei metin2 pserver farmbot within the AutoIt forum part of the Coders Den category.
07/10/2011, 23:51
|
#1
|
elite*gold: 187
Join Date: Aug 2010
Posts: 121
Received Thanks: 96
|
HILFE bei metin2 pserver farmbot
hi..
hatte heute morgen etwas lw und hab mir einfach mal autoit runtergeladen.
Ich habe es jetzt schon geschafft einen Metin pserver lvlbot zu machen.
jetzt wollte ich noch ein exp spende dings einbauen. hatt auch soweit geklappt bis auf das wenn ich den bot starte das er nur 1mal spendet und dann nie wieder.
hier mal mein code:
PHP Code:
HotKeySet("{F8}", "Ende")
HotKeySet("{F7}", "Hilfe")
WinWaitActive( "Metin2" )
MsgBox (0, "Metin2 Farmbot", "blabla")
Sleep(300)
AdlibRegister("Send_3", 1000) ;drückt taste3 wo umhänge sind
Sleep(300)
AdlibRegister("Send_Space",50) ;drückt die leertaste
Sleep(300)
AdlibRegister("Send_y",500) ;drückt y zum aufsammeln von gegenständen
Sleep(300)
AdlibRegister("Send_1",3000) ; drückt taste1 zum potten
Sleep (20000)
MouseClick ("left", 166, 165, 1) ;Hier hänge ich fest.
Send ("99999999") ;Hier hänge ich fest.
MouseClick ("left", 127, 132, 1) ;Hier hänge ich fest.
MouseClick ("left", 299, 360, 1) ;Hier hänge ich fest.
MouseClick ("left", 38, 372, 1) ;Hier hänge ich fest.
MouseClick ("left", 58, 377, 1) ;Hier hänge ich fest
While 1
Sleep(10)
WEnd
Func Ende()
MsgBox (0, "Metin2 Farmbot", "blabla ")
Exit
EndFunc
Func Send_1()
Send("1")
EndFunc
Func Send_3()
Send("3")
EndFunc
Func Send_Space()
Send("{SPACE down}")
EndFunc
Func Send_y()
Send("y")
EndFunc
Func Hilfe()
MsgBox (0, "Metin2 Farmbot", "blabla")
EndFunc
ich habe das jetzt so gemacht:
Man öffnet Metin2 im 800 x 600
dann zieht man sein metinfenster nach ganz oben links in die ecke.
dannöffnet man das gildenfenster wo man exp spenden kann blabla
jetzt startet man halt den bot.
es funktioniert alles wunderbar bis auf das er nur 1mal exp spendet und dann nie wieder-.- wie kann ich das jetzt machen das er z.b alle 2minuten exp spendet.
. danke im vorraus
mfg kevke
|
|
|
07/11/2011, 02:00
|
#2
|
elite*gold: 0
Join Date: Mar 2011
Posts: 8,645
Received Thanks: 3,454
|
Du musst um alles was wiederholt werden soll eine While schleife machen dann wiederholt es sich
|
|
|
07/11/2011, 03:33
|
#3
|
elite*gold: 187
Join Date: Aug 2010
Posts: 121
Received Thanks: 96
|
ups ja habs danke
|
|
|
07/17/2011, 06:30
|
#4
|
elite*gold: 0
Join Date: Jun 2011
Posts: 28
Received Thanks: 4
|
Hey ich wollte fregen machste da nen download also stellste ihn rein oda net  ?
|
|
|
07/17/2011, 13:24
|
#5
|
elite*gold: 0
Join Date: Nov 2008
Posts: 980
Received Thanks: 143
|
Quote:
Originally Posted by lauerjannis
Hey ich wollte fregen machste da nen download also stellste ihn rein oda net  ?
|
Er hat doch schon den quellcode gepostet was willst du mehr?^^
|
|
|
07/18/2011, 03:36
|
#6
|
elite*gold: 0
Join Date: Mar 2011
Posts: 8,645
Received Thanks: 3,454
|
Quote:
Originally Posted by Kronasify
Er hat doch schon den quellcode gepostet was willst du mehr?^^
|
Er möchte warscheinlich dein "Bot" haben wenn er fertig ist.
|
|
|
07/18/2011, 21:00
|
#7
|
elite*gold: 59
Join Date: Jun 2010
Posts: 1,945
Received Thanks: 424
|
Einfach eine Schleife einbauen die zum Schluss 2 Minuten wartet...
zB:
PHP Code:
While 1
;dein Script
WEnd
In deinem Script(Ausschnitt):
PHP Code:
While 1
Sleep(120000);2 Minuten warten..
MouseClick ("left", 166, 165, 1)
Send ("99999999")
MouseClick ("left", 127, 132, 1)
MouseClick ("left", 299, 360, 1)
MouseClick ("left", 38, 372, 1)
MouseClick ("left", 58, 377, 1)
WEnd
In deinem Script eingebaut:
PHP Code:
HotKeySet("{F8}", "Ende")
HotKeySet("{F7}", "Hilfe")
WinWaitActive( "Metin2" )
MsgBox (0, "Metin2 Farmbot", "blabla")
Sleep(300)
AdlibRegister("Send_3", 1000) ;drückt taste3 wo umhänge sind
Sleep(300)
AdlibRegister("Send_Space",50) ;drückt die leertaste
Sleep(300)
AdlibRegister("Send_y",500) ;drückt y zum aufsammeln von gegenständen
Sleep(300)
AdlibRegister("Send_1",3000) ; drückt taste1 zum potten
Sleep (20000)
While 1
Sleep(120000);2 Minuten warten..
MouseClick ("left", 166, 165, 1)
Send ("99999999")
MouseClick ("left", 127, 132, 1)
MouseClick ("left", 299, 360, 1)
MouseClick ("left", 38, 372, 1)
MouseClick ("left", 58, 377, 1)
WEnd
While 1
Sleep(10)
WEnd
Func Ende()
MsgBox (0, "Metin2 Farmbot", "blabla ")
Exit
EndFunc
Func Send_1()
Send("1")
EndFunc
Func Send_3()
Send("3")
EndFunc
Func Send_Space()
Send("{SPACE down}")
EndFunc
Func Send_y()
Send("y")
EndFunc
Func Hilfe()
MsgBox (0, "Metin2 Farmbot", "blabla")
EndFunc
|
|
|
07/19/2011, 03:11
|
#8
|
elite*gold: 0
Join Date: Mar 2011
Posts: 8,645
Received Thanks: 3,454
|
nochbesser wäre es mit ControlSend undso zu machen dann klappt es auch wenn du's minimierst aber ich glaube das funktioniert bei metin nichtmehr musst du testen
|
|
|
All times are GMT +1. The time now is 22:16.
|
|