Channelhopper

[getsha]

Abend Ks,

Ich wollte gerade ein channel Hopper schreiben mit 3 timers aber es klappt nicht und naya ich wollte es versuchen ob es mit timers geht aber ich bekomm es einfach nicht hin. könnt ihr mir vllt helfen?

Mein Code:
[VB.NET] Imports KNLib Public Class Form1 Dim applet As New Applet Dim WithEve - Pastebin.com

[DANP]

Warum haust du die Channels nicht in ein Array
und gehst dann mit ner schleife & Thread.sleep dadurch.

Wäre denke ich einfacher und besser als timer

E:// besser wäre auch noch dazu zu schreiben was nicht funktioniert login, 1 channelhop 2ter etc...

[The Don of NYC]

Wie ich schon einem anderen User sagte, Timer Intervall VOR dem Start übergeben.

[Sky.NET]

Macht garkeinen Sinn so...

Folgende Vorgehensweise:

Du liest alle Channelnamen des b-tokens aus (oder nutzt gleich das KDF was das für dich macht) und speicherst die irgendwo.

Sobald der Client eingeloggt ist (l-token) startest du einen separaten thread

in diesem sendest du den befehl zum wechseln mit einem zufälligen channel aus der gespeicherten liste --> while(_client.Connected)

Dann wartest du die Zeit die du warten willst/musst(3000ms) mit sleep und der bot ist fertig.

das sind ca. 10 Zeilen Code, solltest du hinbekommen glaub ich.

[The Don of NYC]

Kannst Du selber nach VB.NET übersetzen.

[highlight=csharp]
using KNLib;
using System;
using System.Threading;
using System.Collections.Generic;
using System.Text.RegularExpressions;

namespace Channelhoppler
{
class Program
{
static List<String> Channels = null;
static KSClient KSC = null;

static void Main(string[] args)
{
Console.Title = "Channelhoppler";

KSC = new KSClient(new Applet("applet.jar"));
KSC.OnTokenReceived += new KSClient.ReceivedHandler(KSC_OnTokenReceived);
KSC.Connect(ChatSystem.DE);
KSC.Login("", "", "");
}

static void KSC_OnTokenReceived(KSClient KSC, String packet)
{
String[] token = packet.Split('\0');

switch (token[0])
{
case "u":

if (Channels == null)
{
Console.ForegroundColor = ConsoleColor.Green;
Console.WriteLine("Erfolgreich eingeloggt.");
KSC.SendMessage("/wc");
}

break;

case "k":

if (token[1].Contains("Channel"))
{
Channels = new List<String>();

foreach (Match m in Regex.Matches(token[46], "°>_h([^\\|]+)\\|"))
{
if (!m.Value.Contains("Poker") && !m.Value.Contains("MauMau") && !m.Value.Contains("+") && !m.Value.Contains("only") &&
!m.Value.Contains("Suche") && !m.Value.Contains("Private") && !m.Value.Contains("Psssst"))
{
Channels.Add(m.Groups[1].Value);
}
}

Console.ForegroundColor = ConsoleColor.White;
Console.WriteLine("Es wurden insgesamt {0} Channel geladen.", Channels.Count);

Console.ForegroundColor = ConsoleColor.Gray;
Console.WriteLine("Soll nun gehoppelt werden? <ENTER>");

Console.ReadLine();
new Thread(Hoppeln).Start();
}

break;
}
}

static void Hoppeln()
{
foreach (String Channel in Channels)
{
Console.ForegroundColor = ConsoleColor.Yellow;
Console.WriteLine("Hopple nun in den Channel {0}.", Channel);
KSC.SendMessage(String.Format("/go {0}", Channel));

int sleep = new Random(DateTime.Now.Millisecond).Next(2500, 3500);
Console.ForegroundColor = ConsoleColor.Gray;
Console.WriteLine("Warte nun {0} Millisekunden.\n", sleep);
Thread.Sleep(sleep);
}
}
}
}
[/highlight]

[getsha]

Hi Danke für die codes mach ich die tage dann Don
Und jetzt nochmals zu menen Hopper ich komm nicht weiter Sieht unten

hier nochmals mein code wie er JETZT aussieht
Code: [VB.NET] Channelhopper - Pastebin.com
Fehlermeldung: http://i42.tinypic.com/vijz37.png
Channelhopper: http://i44.tinypic.com/okndhu.png

Bitte Helfen ich weiß net mehr was ich machen soll -.- Danke Schonnmal,
__________________

Kannst Du selber nach VB.NET übersetzen.

[highlight=csharp]
using KNLib;
using System;
using System.Threading;
using System.Collections.Generic;
using System.Text.RegularExpressions;

namespace Channelhoppler
{
class Program
{
static List<String> Channels = null;
static KSClient KSC = null;

static void Main(string[] args)
{
Console.Title = "Channelhoppler";

KSC = new KSClient(new Applet("applet.jar"));
KSC.OnTokenReceived += new KSClient.ReceivedHandler(KSC_OnTokenReceived);
KSC.Connect(ChatSystem.DE);
KSC.Login("", "", "");
}

static void KSC_OnTokenReceived(KSClient KSC, String packet)
{
String[] token = packet.Split('\0');

switch (token[0])
{
case "u":

if (Channels == null)
{
Console.ForegroundColor = ConsoleColor.Green;
Console.WriteLine("Erfolgreich eingeloggt.");
KSC.SendMessage("/wc");
}

break;

case "k":

if (token[1].Contains("Channel"))
{
Channels = new List<String>();

foreach (Match m in Regex.Matches(token[46], "°>_h([^\\|]+)\\|"))
{
if (!m.Value.Contains("Poker") && !m.Value.Contains("MauMau") && !m.Value.Contains("+") && !m.Value.Contains("only") &&
!m.Value.Contains("Suche") && !m.Value.Contains("Private") && !m.Value.Contains("Psssst"))
{
Channels.Add(m.Groups[1].Value);
}
}

Console.ForegroundColor = ConsoleColor.White;
Console.WriteLine("Es wurden insgesamt {0} Channel geladen.", Channels.Count);

Console.ForegroundColor = ConsoleColor.Gray;
Console.WriteLine("Soll nun gehoppelt werden? <ENTER>");

Console.ReadLine();
new Thread(Hoppeln).Start();
}

break;
}
}

static void Hoppeln()
{
foreach (String Channel in Channels)
{
Console.ForegroundColor = ConsoleColor.Yellow;
Console.WriteLine("Hopple nun in den Channel {0}.", Channel);
KSC.SendMessage(String.Format("/go {0}", Channel));

int sleep = new Random(DateTime.Now.Millisecond).Next(2500, 3500);
Console.ForegroundColor = ConsoleColor.Gray;
Console.WriteLine("Warte nun {0} Millisekunden.\n", sleep);
Thread.Sleep(sleep);
}
}
}
}
[/highlight]

Hi Don habe mir den Code Übersetzen lassen von ner seite ist er richtig so also kann man ihn so verwenden?

Code:
[VB.NET] Channelhopper in .net - Pastebin.com

[Grammatikfehler]

Du scheinst dich ja (nicht so gut) mit VB.NET auszukennen, les den Code doch nun einfach mal, guck ob du selbst eventuelle Fehler findest, wenn das keinen Sinn für dich ergibt, dann hats die Seite wohl verkackt, oder du solltest VB.NET mal richtig lernen. Oder dich einer anderen Sprache widmen die du eventuell mehr verstehst.

MfG Grammatikfehler.

[getsha]

Hää Wie? ja sag doch mal den Fehler bitte ich bin da schonn 2 std drann aber er macht mir immer den selben fehler ich hab ka wo da ein fehler sein sollte von meiner ansicht st es eig alles richtig!

[Pwned]

Ohne genaue Fehlermeldung können wir dir nicht helfen, wie oben schon jemand geschrieben hat. Und ich würde den Code von Don vernünftig übersetzen, nur so als Hinweis

[getsha]

Fehlermeldung: http://i42.tinypic.com/vijz37.png
Stand auch oben aber egal