Brauche Hilfe beim BOT

[dave131]

Hallo alle zusammen.
Ich habe gestern gesehen, das es Bots gibt.
Die vom Pferd absteigen , die gewünschte Fertigkeit benutzt, wieder aufsteigt
und dann vom Pferd aus solange schlägt bis die Fertigkeit wieder zu ende ist und sich danach alles wieder holt.

Habe dann ein paar Bots ausprobiert, habe aber am Ende nichts gefunden.

Dann habe ich halt gedacht machst du dann selber ein.

So nun sieht mein Script in AutoIt wie folt aus:

HotKeySet ("{F5}","Start")
HotKeySet ("{F6}","Ende"

Func Start ()
While 1Send
Send ("{Space down}")
Sleep (109000)
Send ("{Space up}")
Send ("{LCTRL down}")
Sleep (500)
Send ("{h down}")
Sleep (500)
Send ("{h up}")
Send ("{LCTRL up}")
Sleep (1000)
Send ("{F1 down}")
Sleep (500)
Send ("{F1 up}")
Sleep (2000)
Send ("{LCTRL down}")
Sleep (500)
Send ("{h down}")
Sleep (500)
Send ("{h up}")
Sleep (500)
Send ("{LCTRL up}")
Sleep (500)

WEnd

Mein zweiter versuch war so (eigentlich nur strg+h geändert):

HotKeySet ("{F5}","Start")
HotKeySet ("{F6}","Ende"

Func Start ()
While 1Send
Send ("{Space down}")
Sleep (109000)
Send ("{Space up}")
Sleep (500)
Send ("{^h}")
Sleep (1000)
Send ("{F1 down}")
Sleep (500)
Send ("{F1 up}")
Sleep (2000)
Send ("{^h}")
Sleep (500)

WEnd

Jedoch fehlt das schlagen wieder. Habe aber ein mal aus versucht:

HotKeySet ("{F5}","Start")
HotKeySet ("{F6}","Ende"

Func Start ()
While 1Send
Send ("{Space down}")

WEnd

Und er hat angefangen zu schlagen, aber jetzt fehlt ja das andere wichtige.


Würde mich um Hilfe freuen Danke

[dave131]

Kann jemand vllt. den Threadnamen ändern, da ich glaube das wenn
es einige lesen gar nicht drauf klicken.

neuer Threadname:
Brauche Hilfe beim programmieren eines BOT

[Renozerus]

Den Threadnamen ändern geht glaube ich nicht. Naja Du bist noch ein neuer User da hören die meisten nicht so wirklich zu. Ging mir auch so denn wer weiß wielang Du dich hier rum treiben wirst wenn Du erstmal hast was Du willst :P *bissl spaß muss sein*

hier das geht

 Spoiler

HotKeySet ("{F5}","Start")
HotKeySet ("{F6}","Ende")

While 1  ;ohne das gehts gleich wieder aus
    Sleep(200)
WEnd

Func Start ()
	If WinActive("METIN2") Then   ;wenn metin2 fenster aktiv ist dann
	While 1
		Send ("{Space down}")
		Sleep (9000)     ;die 9 sekunden musst Du für Deine Fertigkeit noch anpassen. war nur zum Test
		Send ("{Space up}")
		Sleep (500)
		Send ("{LCTRL down}{h down}")
		Sleep (500)
		Send ("{LCTRL up}{h up}")
		Sleep (500)
		Send ("{F1}")
		Sleep (1000)
		Send ("{LCTRL down}{h down}")
		Sleep (500)
		Send ("{LCTRL up}{h up}")
		Sleep (500)
	WEnd 
	EndIf ;wenn dann ende
EndFunc

geht wunderbar bis auf ein Problem wenn Du ständig irgend eine Taste gedrückt hälst reagieren keine anderen Tasten. Also beenden nur über symbolleiste.

es gibt hier in Elitepvp außerhalb der Metin2 Sektion auch eine für Autoit scripting schau doch mal dort vorbei wenn es ums scripten geht. Auch in Youtube gibts viele schöne Video TuTs. Ansonsten schreib mir, helfe wo ich kann.

[dave131]

Danke für deine HIlfe