Wie macht man einen PickupBot ?[Help pls]

02/03/2009 01:27 waswaswas#1
Hi
Da ich nicht viel ahnung von Computer-sprachen habe und auch keine ahnung von Hacks...
wollte ich mal fragen ob mir jemand erklären kann wie man ein einfachen Metin 2 PickupBot macht.

Ich würde gerne ein kleinen Blick in die"hacker-welt" werfen.

ich habe mich in den letzen Tagen viel damit beschäftigt und ich weiß auch das man ein bisschen mehr als ein paar Tage braucht.

aber ich würde gerne mal wissen wie man ein einfachen bot macht der nur den befehl ausführt Y bzw ^ zu drücken.

und mit welchen Programmen sowas möglich ist

AutoIT ?
DEV +++ ?

Vielen Danke

und MFG Waswaswas :D
02/03/2009 01:55 waswaswas#2
Quote:
Originally Posted by waswaswas View Post
Hi
Da ich nicht viel ahnung von Computer-sprachen habe und auch keine ahnung von Hacks...
wollte ich mal fragen ob mir jemand erklären kann wie man ein einfachen Metin 2 PickupBot macht.

Ich würde gerne ein kleinen Blick in die"hacker-welt" werfen.

ich habe mich in den letzen Tagen viel damit beschäftigt und ich weiß auch das man ein bisschen mehr als ein paar Tage braucht.

aber ich würde gerne mal wissen wie man ein einfachen bot macht der nur den befehl ausführt Y bzw ^ zu drücken.

und mit welchen Programmen sowas möglich ist

AutoIT ?
DEV +++ ?

Vielen Danke

und MFG Waswaswas :D



/edit Upss :rolleyes: Bisschen spät :D ich hoffe ihr helft mir morgen :D bzw. heute :D

DANKE
02/03/2009 05:30 Lexx0505#3
Ungetestet

Autohotkey

Loop
{
Send, y
Sleep 400
}
02/03/2009 06:37 mihkroh#4
Hi
also als erstes würde ich dir dieses tutorial empfehlen:
[Only registered and activated users can see links. Click Here To Register...]
wenn du das alles kannst dann kannste dir auchschon nen pickup bot schreiben
die "zeit" das zu lesen lohnt sich
Danach kannst du dann z.b. ein tutorial von Marcopolo für nen fishbot machen
02/03/2009 08:55 Benhero#5
Ansonsten:
AutoIt

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

While 1
sleep(1000)
WEnd

Func Start()
While 1
Send("yyyyyyyy")
Sleep(10)
WEnd
EndFunc

Func Pause()
Sleep(1000)
EndFunc

Func Ende()
Exit
EndFunc
02/03/2009 10:47 waswaswas#6
DANKE ERSTMAL AN ALLE :D

Eine frage bleibt noch übrig :D

Oben bei Benhero, was bedeutet

HotKeySet("{F5}", "Start") KLAR
HotKeySet("{F6}", "Pause") ist mir auch klar
HotKeySet("{End}", "Ende") und das kann ich mir auch noch denken ;D

while 1 unklar
sleep(1000) unklar
WEnd unklar

Func Start() ist mir klar :D
While 1 unklar
Send("yyyyyyyy") ist mir klar
Sleep(10) denke mal nach wann er aufhören soll y zu senden ...oder ?
WEnd unklar
EndFunc ist mir klar

Func Pause() klar :D
Sleep(1000) unklar
EndFunc klar

Func Ende()
Exit
EndFunc


Ich wollte euch fragen ob mir das jmd beantworten kann damit ich auch ein bisschen mehr anhnung habe was ich da überhaupt mache :D

Ich danke euch für eure Zeit :D

MFG waswaswas
02/03/2009 12:03 Benhero#7
Quote:
Originally Posted by waswaswas View Post
DANKE ERSTMAL AN ALLE :D

Eine frage bleibt noch übrig :D

Oben bei Benhero, was bedeutet

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

while 1 <-- Damit der Bot sich nicht Sofort Wieder schliest
leep(1000) <-- Damit die Computer Auslatung nicht zu hoch geht
WEnd <-- Damit der Bot sich nicht Sofort Wieder schliest

Func Start()
While 1 <-- Damit der Bot die ganze zeit immer wider y drückt, net nur einmal
Send("yyyyyyyy")
Sleep(10) <-- Damit die Computer Auslatung nicht zu hochgeht
WEnd <-- Damit der Bot die ganze zeit immer wider y drückt, net nur einmal
EndFunc

Func Pause() <-- Damit du Pause machen kannst wenn du mal was schreiben willst...
Sleep(1000) <-- Damit die Computer Auslatung nicht zu hoch geht
EndFunc

Func Ende()
Exit
EndFunc


Ich wollte euch fragen ob mir das jmd beantworten kann damit ich auch ein bisschen mehr anhnung habe was ich da überhaupt mache :D

Ich danke euch für eure Zeit :D

MFG waswaswas
Hoffe ich konnte helfen...

Mfg. Benhero
02/03/2009 13:05 waswaswas#8
Sooo Hab jetzt versucht nen SpamBot zu erstellen mit VB :D und siehe da "große Erfolge"




das wäre mein code




Public Class Form

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Spammer.Tick
SendKeys.Send(TextBox1.Text)
SendKeys.Send("{ENTER}")

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Spammer.Enabled = False
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Spammer.Enabled = True
End Sub



Aber ich hab eine frage, immer wenn ich ihn an mache dann schreibt er
ENTER und drückt nicht ENTER xD kann mir da jmd helfen ?

Noch eine sache, ich hab jetzt

2 Buttons
1 TextmessageBox
1 Label

wie kann ich es schaffen das ich dieses "Programm" zu einem icon auf dem Desktop mache, und ich dann einfach Doppelklick rauf machen muss, damit es startet


Vielen dank und MFG Waswaswas
02/03/2009 19:43 fieser-hund#9
oh gott benutz autoit ;)