Pwned (22.11.2011)
-
20.11.2011, 23:29 #1
- Registriert seit
- 18.11.2011
- Beiträge
- 457
- Blog Entries
- 1
Thanked 296 Times in 94 Posts[VB.Net] Botkontrollen beantworten?
Ich bin gerade an einem StayOnlineBot, es funktioniert auch alles, bis auf eine Sache: Ich weiß nicht, wie ich es verwirklichen soll, dass der Bot automatisch Botkontrollen beantwortet. Ich hoffe, ich finde hier einen Ansatz.
Edit: Programmhilfe KNLibGeändert von Pwned (20.11.2011 um 23:37 Uhr)
-
21.11.2011, 02:57 #2
AW: [VB.Net] Botkontrollen beantworten?
Versuch es mal so (ausem Kopf)
Code:' Wobei c KSClient ist. ( Dim c As New KNLib.KSClient(New Applet) Private Sub c_OnPrivateMessage(sender As Object, fromNick As String, toNick As String, Message As String) Handles c.OnPrivateMessage If fromNick = c.Butler AndAlso Message.Contains("Überprüfung auf Bot-Benutzung") Then Dim id As String = Nothing id = Regex.Matches(Message, "/ok (\\d+)").Item(1).Value c.SendMessage("/ok" + id) End If End Sub
-
The Following User Says Thank You to uncopyable For This Useful Post:
-
21.11.2011, 18:54 #3
- Registriert seit
- 18.11.2011
- Beiträge
- 457
- Blog Entries
- 1
Thanked 296 Times in 94 PostsAW: [VB.Net] Botkontrollen beantworten?
Und wie kann ich das mit einem Timer verbinden?
Weil wenn ich
PHP-Code:Dim botkontrollenID As String = Nothing
botkontrollenID = Regex.Matches(Message, "/ok (\\d+)").Item(1).Value
client.SendMessage("/ok" & botkontrollenID)
-
21.11.2011, 18:55 #4
- Registriert seit
- 18.11.2011
- Beiträge
- 116
Thanked 68 Times in 48 PostsAW: [VB.Net] Botkontrollen beantworten?
Warum in nen Timer? O.o
-
The Following User Says Thank You to lilpole For This Useful Post:
BL4cK (22.11.2011)
-
21.11.2011, 18:58 #5
- Registriert seit
- 18.11.2011
- Beiträge
- 457
- Blog Entries
- 1
Thanked 296 Times in 94 PostsAW: [VB.Net] Botkontrollen beantworten?
Weil der User das Sendeinterval selbst bestimmen können soll
-
21.11.2011, 18:58 #6
AW: [VB.Net] Botkontrollen beantworten?
In einen Timer ist sinnlos, weil er ja oft es dann absendet.
Bevor er absendet reicht hier ein Thread.Sleep(...) vollkommen aus.
-
The Following User Says Thank You to Diebspiel For This Useful Post:
Pwned (21.11.2011)
-
21.11.2011, 21:01 #7
AW: [VB.Net] Botkontrollen beantworten?
So ungefähr habe ich es bei allen Bots von mir da mit 'Thread.Sleep' nur unnötig der Bot einfriert:
PHP-Code:Dim BKZahl As New TextBox ' Muss am Anfang von der Class gemacht werden damit man es überall benutzen kann so auch auf dem Timer! '
Dim rdm As New Random 'Dasselbe gilt hier, so kann man überall rdm für Random benutzen'
BKZahl.Text = Split(Message, "/ok ")(1)
BKZahl.Text = Split(BKZahl.Text, "<° _, um zu bestätigen")(0)
Timer1.Interval = rdm.Next(XX, XX) * 1000 'So gibt man es vor man kann es auch so machen. Die die beiden XX, XX müssen natürlich in z.B. 5, 120 oder so ersetz werden'
Timer1.Interval = rdm.Next(NumericUpDown1.Value, NumericUpDown2.Value) * 1000 'So gibt man jemand die Möglichkeit zwischen X und Y per Numerics man kann auch TextBoxen oder sonst was nehmen da aber Numerics nur Zahlen erlauben ist das am sinnvollsten.'
Timer1.Enabled = True
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
client.SendMessage("/ok " & BKZahl.Text) 'Dann einfach absenden lassen'
Timer1.Enabled = False
End Sub
Mfg DBZFreakGeändert von Dbzfreak1337 (21.11.2011 um 21:19 Uhr) Grund: Natürlich den Timer starten und unten stoppen
-
21.11.2011, 21:07 #8
AW: [VB.Net] Botkontrollen beantworten?
-
The Following User Says Thank You to Diebspiel For This Useful Post:
ESC (23.11.2011)
-
22.11.2011, 01:14 #9
AW: [VB.Net] Botkontrollen beantworten?
Man könnte das ganze auch in einem extra Thread ausführen
Code:Dim t as New Thread(AddressOf Thread1) Shared sub Thread1() 'Mach was Thread.Sleep(500) ' warte ' mach noch was End Sub
-
26.08.2012, 02:11 #10
AW: [VB.Net] Botkontrollen beantworten?
Bei deinem Code steht:
PHP-Code:BKZahl.Text = Split(Message, "/ok ")(1)
BKZahl.Text = Split(BKZahl.Text, "<° _, um zu bestätigen")(0)
Danke.
Mfg
Ähnliche Themen
-
[Sammelthread] Botkontrollen
Von AFU im Forum Knuddels AllgemeinAntworten: 12Letzter Beitrag: 14.10.2012, 11:51 -
[S] Botkontrolle beantworten
Von rVs14 im Forum SourcecodeAntworten: 1Letzter Beitrag: 16.02.2012, 12:06 -
Achtung Botkontrollen
Von Marc im Forum Knuddels-NewsAntworten: 2Letzter Beitrag: 23.12.2011, 16:37
Diese Seite nutzt Cookies, um das Nutzererlebnis zu verbessern. Klicken Sie hier, um das Cookie-Tracking zu deaktivieren.