Metin2 Angelbot!

04/03/2009 20:31 Herr.Vorragend#1
Hey
mich würde mal interesieren, wie so ein Script aussieht von einem Metin2 Angelbot.
Wäre jemand so frei und ihn mir per PN schicken oder hier reinstellen???
danke wär drin!

MFG
04/03/2009 21:46 Rayser9119#2
hey
ich suche auch gerade einen source script hatte mal einen aber gelöscht.
sehr kompliziert sieht der aus^^

KJ

edit hab nen script von marco polo
hier:
#cs ----------------------------------------------------------------------------

Bot Version: v 1.04
Author: MarcoPolo

Script Function:
Dieser Bot angelt automatisch für euch

#ce ----------------------------------------------------------------------------

HotKeySet ( "{Numpad7}" , "Start" ) ; Der Taste Numpad7 ist nun die Info Start hinzugefügt
HotKeySet ( "{Numpad8}" , "Ende" ) ; Der Taste Numpad8 ist nun die Info Ende hinzugefügt

Opt('PixelCoordMode', 2) ; falls window als option gewählt wurde
Opt('MouseCoordMode', 2) ; falls window als option gewählt wurde

While (1) ; Endlosschleife anfang und 1 für an
Sleep (1000) ; Überprüft jetzt jede Sekunde ob die oben genannten Tasten/Infos gedrückt worden sind
Wend ; Endlosschleife ende

Func Start () ; Das Zeil für die Info Start
While (1) ; die vorher fehlende While funktion sry xD
Sleep (5000) ; Wartet 5 sekunden bis er anfängt
Send ( "{F3 down}" , 0 ) ; hält die Taste F3 runter
Sleep (500) ; hält die taste 0,5 Sekunden
Send ( "{F3 up}" , 0 ) ; lässt die Taste F3 wieder los
Sleep (1000) ; Wartet 1ne Sekunde
Send ( "{F4 down}" , 0 ) ; hält die Taste F4 runter
Sleep (500) ; Hält die Taste 0,5 Sekunden
Send ( "{F4 up}" , 0 ) ; lässt die Taste F4 wieder los
Sleep (1000) ; Wartet wieder 1ne Sekunde
While (1)
$Fish1 = Pixelgetcolor ( 449, 131 )
$Fish2 = PixelgetColor ( 340, 109 )
$Fish3 = Pixelgetcolor ( 448, 133 )
$Fish4 = PixelgetColor ( 342, 108 )
$Fish5 = Pixelgetcolor ( 447, 130 )
$Fish6 = PixelgetColor ( 339, 107 )
$Fish7 = Pixelgetcolor ( 450, 134 )
$Fish8 = PixelgetColor ( 343, 110 )
$Fish9 = Pixelgetcolor ( 455, 104 )
$Fish10 = PixelgetColor ( 454, 100 )
$Fish11 = Pixelgetcolor ( 447, 132 )
$Fish12 = PixelgetColor ( 333, 104 )
$Fish13 = Pixelgetcolor ( 457, 130 )
$Fish14 = PixelgetColor ( 340, 119 )
$Fish15 = Pixelgetcolor ( 452, 100 )
If $Fish1 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish1 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish2 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish2 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish3 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish3 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish4 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish4 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish5 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish5 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish6 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish6 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish7 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish7 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish8 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish8 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish9 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish9 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish10 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish10 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish11 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish11 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish12 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish12 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish13 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish13 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish14 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish14 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish15 = 0xFBFBFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
If $Fish15 = 0xFCFCFB Then
Sleep ( 3000 )
Send("{F4 down}")
Sleep(500)
Send("{F4 up}")
ExitLoop
EndIf
Sleep(500) ; Da der While Befehl ist muss auch ein Sleep befehl drin sein sonst überlastet das den PC unnötig
Wend
Sleep(3000) ; wartezeit , bevor er wieder von vorne anfängt
Wend ; die vorher fehlende Wend Funktion sry xD
Endfunc

Func Ende ()
Exit ; Programm beendet sich
EndFunc
thx sind sehr erwünscht



ich will noch mal benoten der ist NICHT (NICHT) von mir
sondern vom marco thx sind trotzdem erwünscht
08/12/2009 17:04 pulermannn#3
kann man nich einfach ein link reinstellen ohne pw und ohne id
08/12/2009 18:57 felixli93#4
Quote:
Originally Posted by pulermannn View Post
omg kann man nich einfach ein link reinstellen ohne pw und ohne id man ich finde sohne ******** immer wieder zum lachen vorallem born2life ist der größte ****!!!!!
flame ftw?

#reported
08/19/2009 15:53 SCORNI#5
den sourcecode wird dir sicher keiner geben der angelbot von marcopolo (oben im post)
ist sehr schlecht und klappt meistens nicht.
08/22/2009 22:23 Kinderkill#6
Woher bekommt man die Script??
12/01/2010 20:02 harrypotter112#7
Mosha ist Server 1 ^^ und nicht server 2
12/01/2010 20:09 omer36#8
Quote:
Originally Posted by harrypotter112 View Post
Mosha ist Server 1 ^^ und nicht server 2
du hast dir wirklich die mühe gemacht, und dich hier angemeldet, nur um die signatur vom vorposter zu "korrigieren"?! hmmm
12/01/2010 20:19 BlackHybrid#9
xD und vorallem den alten thread den er noch ausgegraben hat
02/06/2011 10:50 Cortex7777#10
hey kann mir mal jemand nen guten mt2 angelbot schiken der den hackshield umgeht??
per pn pls ;D

danke schonmal^^