Metin2 Angelbot, wie kombinieren?

08/11/2009 18:53 Xenon143#1
Hallo,
Ich habe mir einen Angelbot gemacht für Metin2, ich bin nocht nicht so gut :)

Also der Angelbot:
Sleep(5000)
While 1
Send("{f1 down}")
sleep(300)
Send("{f1 up}")
sleep(2000)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
Do
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
sleep(3000)
send("{f2 down}")
sleep(300)
send("{f2 up}")
sleep(2000)
send("{f4 down}")
sleep(300)
send("{f4 up}")
Do
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
sleep(3000)
send("{f3 down}")
sleep(300)
send("{f3 up}")
sleep(2000)
send("{f4 down}")
sleep(300)
send("{f4 up}")
Do
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
sleep(3000)
wend

Und jetzt wollte ich diesen Fischöffner hinzufügen das er nach jedem Fischen guckt ob da was ist, aber ich weiß nicht wie:
While 1
$fischoeffner=pixelsearch(1008,319,1156,596,0x5D57 37)
if not @Errror then
mousemove($fischoeffner[0],$fischoeffner[1])
sleep(500)
mouseclick("right")
sleep(200)
endif
wend

Wie mache ich das? danke schonmal

Gruß Xenon143
08/12/2009 15:10 N.E.O.#2
Mit "Func"s:

Code:
Sleep(5000)
While 1
_Nummer1()
Sleep(100)
_Nummer2()
Sleep(100)
_Nummer3()
Sleep(100)
_Nummer4()
Sleep(3000)
WEnd

Func _Nummer1()
Send("{f1 down}")
sleep(300)
Send("{f1 up}")
sleep(2000)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
EndFunc ;==>1

Func _Nummer2()
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
sleep(3000)
send("{f2 down}")
sleep(300)
send("{f2 up}")
sleep(2000)
send("{f4 down}")
sleep(300)
send("{f4 up}")
EndFunc ;==>2

Func _Nummer3()
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
sleep(3000)
send("{f3 down}")
sleep(300)
send("{f3 up}")
sleep(2000)
send("{f4 down}")
sleep(300)
send("{f4 up}")
EndFunc ;==>3

Func _Nummer4()
$fischblase=pixelsearch(624,85,842,331,0xFBF7FB)
until isarray($fischblase)
sleep(2500)
Send("{f4 down}")
sleep(300)
Send("{f4 up}")
EndFunc ;==>4
08/12/2009 15:57 Xenon143#3
danke, banjo1 hat mir auch schon geholfen :)