[Metin2] FishingBot

02/25/2008 02:18 td1000#391
gibs da keine möglichkeit mehr köder zu machen zb wenn F3 alle ist dann F2 oder F1 nimmt??? das wär mal praktisch

und kann man das im hintergrund laufen lassen? ohen auf den screan zu habne??? danke
02/25/2008 14:57 ausdemsack#392
Hi Leuts !!!!!

Das mit dem download geht nich sagt dann immer datein nich gefunden also was soll ich machen schickt mir ma pls ein link der geht pls
02/26/2008 01:53 GodLesZ#393
oh man watt en flamerei...
hab mir heute mittag, laut windoof uhr 12:33 autoit3 geladen, ne std tuts gesucht un gelesn
dann auf nem b-fay gefeiert un gesoffen bis ich gegen 21 uhr zuhause war
dann nen script geschrieben...
funzt noch nich ganz bugfrei un mit sicherheit sehr n00big aber für 1std tut's lesen + 5 std rum testen find ichs niedlich o,o

Quote:
HotKeySet("^q", "Close")
HotKeySet("^s", "Start")
HotKeySet("^d", "Debug")
HotKeySet("^p", "Pause")

global const = 510, = 130, = "00F[C|B]F[7|8]F[C|B]"; reg-expression <3 = 0

pause()

; so nah wie möglich an den char, nach oben bis man ihn senkrecht unter ihm sieht, dann ein scroll nach oben

Func Start()
SoundPlay("C:Windowsmediatada.wav")
while 1
if regex() = 1 Then ; ok, farbe gefunden!
while regex() = 1 ; solange farbe unter maus, nixx machen
; nixx
wend
sleep(1850) ; wartezeit, je nach angel-lvl verändern [R> GUI <3]
send("{SPACE}") ; angel einholn
sleep(4000) ; warten wegen fisch bekomm or failed emotion
send("{F4}") ; F4 = köder-key
sleep(2000) ; kurz warten falls laag or so
send("{SPACE}") ; angel rein werfen
; und again
sleep(2000) ; kurz warten falls laag or so
endif
sleep(10)
wend
endfunc

func regex ()
dim = StringRegExp(hex(PixelGetColor(,)), )
return @Extended
endfunc

Func Debug()
=PixelGetColor(,)
MsgBox(0,"Farbwerte", "X ["&&"] Y ["&&"] || Pixel Dezimal: "&&" || Pixel Heximal: "&hex())
pause()
EndFunc

func Pause ()
TrayTip("Metin 2 Fishing Bot", "Pausiert~", 5, 1)
while 1
sleep(10000)
wend
endfunc

Func Close()
SoundPlay("C:WindowsmediaWindows Logoff Sound.wav", 1)
Exit
EndFunc
€dit muss es als quote machen da sonst "$X" usw nich dargestellt wird ~.~

falls mir jemand helfen mag das teil zu verbessern, nur zu =)
hab lede rnich soviel zeit mich mit noch einer programmier / script - sprache zu befassen :|
und, wa sich leider noch niergends gefundne hab un auch wenns hier nich unbedingt rein gehört:
wie zum teufel compile ich das scheiß script da sich die exe ausfürhn kann? muss es immer in scite laden un mit F5 ausfürhn ~.~ wenn ich compile un exe starten will kommt nur "can't run script" oder so ähnlich, weis jemad wieso? :|

thx 4 help un ich hoffe, ich konnte iwie helfn oO
ah btw, bin von meiner resolution ausgegangen, d.h. 1024x786, senkrecht über dem char -> bis ran zoomen + 1 scroll raus

€dit2 hab, weils im quote gay aussieht ~.~ mal inne txt geklatscht, weil man *.au3 ja nich attachen / uploaden kann :| drecks vbulletin software x_x

€dit3 swt xD
hier mal nen kurzes ding, iss mir spontan durchn kopf geangen, wer den compiletem tools der andere nich traut, nen simpler autolooter oO
Code:
HotKeySet("^q", "Close")
HotKeySet("^s", "Start")
HotKeySet("^p", "Pause")

pause()
Func Start()
	SoundPlay("C:Windowsmediatada.wav")
	while 1 
		Send("^",1)
		sleep(200)
	wend
endfunc

func Pause ()
 	SoundPlay("C:WindowsmediaWindows Balloon.wav")
	TrayTip("Metin 2 AutoLooter", "Pausiert~", 5, 1)
	while 1
		sleep(10000)
	wend
endfunc

Func Close()
	SoundPlay("C:Windowsmediaringout.wav", 1)
	Exit
EndFunc
€dit4 der letzte für diese nacht, versprochen ;D
hab grad nen autopotter geschrieen, mit meim ersten GUI <3
irgendwie voll einfach ôo
muss den aber nochn bissl verbessern, funzen tuts trotzdem, auch wenn nen paar checks, buttons usw scheiße ausehn xD
wers selber nich gebacken bekommt, sich nen paar tuts durchzulesen un rumzuprobieren, hab ich das ding au noch attached oô''
liest btw auch auf 1024x768 die farben aus un used dann halt die pots

Quote:
Originally Posted by td1000 View Post
gibs da keine möglichkeit mehr köder zu machen zb wenn F3 alle ist dann F2 oder F1 nimmt??? das wär mal praktisch

und kann man das im hintergrund laufen lassen? ohen auf den screan zu habne??? danke
nein du kannst es nicht im HG laufen lassen..
und ja, wnen man von einer festen auflösung ausgeht un sich die 8 X/Y koordinaten der shortkeys raussucht + nen switch added kann man auch locker auf 7 weitere shortkeys zugreifen indem man eben ne pixelfarbe von dem köder sucht
dazu muss man aber wie gesagt erst 8 punkte von den shortkeys haben, vllt sogar 16 oder 24 um auch würmer dinger un kleine fische als köder zu erkennen
dann wärs aber wieder besser das im gui eingeben zu lassen, was ja au nich das ding wäre o,o
kann auch sein da sich müll laber aber nach paar std programm use un function see'ing würd ich das mal stark behaupten o,o


geb keine Garantie auf irgend eins der dinger xD use das Prog wei gesagt nichmal nen Tag <_<
Un nun geh ich Rausch ausschlafen, g00d n8 x_x'
02/26/2008 07:45 marcopolo1990#394
du machst es dir so schwer xD
den fishing bot sollte man doch in 20-25 zeilenhinkriegen
1. ich will dir ja nix unterstellen aber die sehen aus wie aus nem tut rauskopiert. woran ich das sehe? niemand benutzt wav sounds für nen bot (und da is noch mehr)
2. benutz doch den pixelgetcolor befehl in deinem autopot dann haste für das potten 4 zeilen und nicht 15 lol
02/26/2008 11:50 GodLesZ#395
Quote:
Originally Posted by marcopolo1990 View Post
du machst es dir so schwer xD
den fishing bot sollte man doch in 20-25 zeilenhinkriegen
1. ich will dir ja nix unterstellen aber die sehen aus wie aus nem tut rauskopiert. woran ich das sehe? niemand benutzt wav sounds für nen bot (und da is noch mehr)
2. benutz doch den pixelgetcolor befehl in deinem autopot dann haste für das potten 4 zeilen und nicht 15 lol
ich kopiere keine sache...
die wavs hab ich benutzt weil ich metin2 im fullscreen habe un damit ich teilweise weiss an welcher stelle er im code ist un ob er dnan das richtige macht hab ich mir anfangs nach jemdem command nen wav gesetzt -.-
auserdem mag ich tada wav...

un pixelgetcolor iss im autopotter o_O


Func Start()
SoundPlay("C:\Windows\media\tada.wav")
while 1
$varHP=PixelGetColor(($hppotting+58),740)
$varMP=PixelGetColor(($sppotting+58),750)
If hex($varHP) = '002C2C2C' and $sp = 1 Then
if $hpkey = '1' or $hpkey = '2' or $hpkey = '3' or $hpkey = '4' then
Send($hpkey)
elseif $hpkey = 'F1' or $hpkey = 'F2' or $hpkey = 'F3' or $hpkey = 'F4' then
send("{"&$hpkey&"}")
endif
EndIf
If hex($varMP) = '002C2C2C' and $hp = 1 Then
Send($spkey)
EndIf
sleep(500)
wend
endfunc



kay sogar grad nen fehler beim copy paste entdeckt aber wayne, iss ja eh aus nem tut geklaut =D

von wegen wie aus nem tut, iss richtich
sieht so n00big aus weil ich das progg zu dem zeitpunkt nichmal nen tag kannte du hengst ~.~
mich hats nur aufgeregt das alle jammern das sie den code wollen, deswegen hab ich mir halt das ding gesaugt, geschaut wie der code un parser funzt un halt selber was geschriebn oO

bin kein leecher / stealer der von anderen sachen kopiert / klaut un als seine ausgibt ,,!,,
02/26/2008 13:18 marcopolo1990#396
naja wenn die hier ja alle die quellcodes haben kann ich mich ja eig auf meine faule haut setzten xD
scripted euch doch selber nen metin finder (scheint ja sooooo einfach zu sein)
02/26/2008 15:25 Failix93#397
Könnt ihr bitte eine ganz genaue Anleitung machen bei mir Funktioniert es nich.. pls
02/26/2008 15:58 Failix93#398
Warum zieht er die leine nie ein?????????????
02/26/2008 16:08 k1dk0br4#399
Köder auf F3 und Skill auf F4
Kamera so weit es geht reinzoomen und dann die Kameraperspektive auf den Kopf drehen.

Bot anmachen, Zeit auswählen und ENDE drücken.
Nebenbei kannst du nichts anderes machen.
02/26/2008 19:26 Mr.Hoo#400
Also bei 42 seiten blick ich leider nicht wirklich durch wenn jemand n netten angelbot etc. hat meldet euch mal bei mir über icq 295137498
Danke im Vorraus
02/26/2008 19:29 marcopolo1990#401
es gibt eine search this theard funktion , die den ganzen topic durchsucht
(falls du damit was finden willst)
03/01/2008 00:07 PanTakeo#402
I Have only one question...

This bot work only in active window ?? pls help i cant play if i want use bot :(
03/01/2008 00:21 Speedboy#403
It only can work in the active window, because it has to find the appearing bubble!
03/01/2008 12:35 Jameikaner#404
Könntet ihr vll den Bot nochmal ins I-Net stellen da die Datei irgendwie nicht gefunden wird

vielen dank im vorraus

Jameikaaaaa
03/01/2008 12:56 LordKill#405
also ich habe ma ein problem ich kann den bot benutzen wenn ich meinen pc ausschalte und später wenn ich meinen pc wieder anmachen will kommt da immer ein fehler und ich kann den nit hochfahren und muss die windows CD reintun und die datei die beschädigt ist neu voner CD kopieren...