1. #1

    Registriert seit
    22.05.2012
    Beiträge
    203
    Thanked 21 Times in 9 Posts

    Standard KNLib Multi Applet Sample

    Hey,

    bisher gabs dazu kein Tutorial und ich wollte hiermit euch zeigen, wie ihr für jedes Chatsystem ein eigenes Applet benutzen könnt.

    PHP-Code:
    /*
             ____  __.  _________            .__        __   
            |    |/ _| /   _____/ ___________|__|______/  |_ 
            |      <   \_____  \_/ ___\_  __ \  \____ \   __\
            |    |  \  /        \  \___|  | \/  |  |_> >  |  
            |____|__ \/_______  /\___  >__|  |__|   __/|__|  
                    \/        \/     \/         |__|          
            
            KNLib Multi Applet Tutorial
            © The Don of NYC - 2012
     */

    using KNLib;
    using System;
    using System.Threading;
    using System.Windows.Forms;

    namespace 
    Multi_Applet_Tutorial
    {
        class 
    Program
        
    {
            static 
    String appletPath "Applets\\applet_{0}.jar";

            static 
    bool loadDEApplet true;
            static 
    bool loadATApplet true;
            static 
    bool loadCHApplet true;

            static 
    Applet Applet_DE null;
            static 
    Applet Applet_AT null;
            static 
    Applet Applet_CH null;

            static 
    void Main()
            {
                
    Console.Title "Multi Applet Tutorial";
                
    Console.ForegroundColor ConsoleColor.White;

                new 
    Thread(LoadApplets).Start(); // Thread starten um die Applets zu laden

                
    Console.WriteLine("Nickname?");
                
    String Nickname Console.ReadLine();
                
    Console.WriteLine("Passwort?");
                
    String Passwort Console.ReadLine();
                
    Console.WriteLine("Channel?");
                
    String Channel Console.ReadLine();
                
    Console.WriteLine("Chatsystem? DE/AT/CH");
                
    ChatSystem Chatsystem GetChatsystem(Console.ReadLine().ToUpper());

                
    Applet applet GetApplet(Chatsystem);

                if (
    applet == null)
                {
                    
    MessageBox.Show("Es konnte kein Applet gefunden werden.");
                    
    Environment.Exit(0);
                }

                
    KSClient KSC = new KSClient(applet);
                
    KSC.Connect(Chatsystem);
                
    KSC.OnTokenReceived +=new KSClient.ReceivedHandler(KSC_OnTokenReceived);
                
    KSC.Login(NicknamePasswortChannel);
            }

            static 
    void KSC_OnTokenReceived(KSClient KSCString packet)
            {
                if (
    packet.StartsWith("u\0"))
                {
                    
    Console.ForegroundColor ConsoleColor.Green;
                    
    Console.WriteLine("Erfolgreich eingeloggt!");
                }
            }

            
    /// <summary>
            /// Lädt die gewünschten Applets
            /// </summary>
            
    static void LoadApplets()
            {
                try
                {
                    if (
    Applet_DE == null && loadDEApplet)
                        
    Applet_DE = new Applet(String.Format(appletPath"DE"));

                    if (
    Applet_AT == null && loadATApplet)
                        
    Applet_AT = new Applet(String.Format(appletPath"AT"));

                    if (
    Applet_CH == null && loadCHApplet)
                        
    Applet_CH = new Applet(String.Format(appletPath"CH"));
                }
                catch (
    Exception ex)
                {
                    
    MessageBox.Show(ex.ToString()); 
                    
    // Gibt sowieso einen Error zurück ohne diesen Try-Catch-Block wenn die 3 Applets nicht geladen werden können aber sicher ist sicher!
                
    }
            }

            
    /// <summary>
            /// Gibt das via Chatsystem ausgewählte Applet zurück
            /// </summary>
            /// <param name="Chatsystem">Chatsystem</param>
            
    static Applet GetApplet(ChatSystem Chatsystem)
            {
                switch (
    Chatsystem)
                {
                    case 
    ChatSystem.DE:
                        return 
    Applet_DE;

                    case 
    ChatSystem.AT:
                        return 
    Applet_AT;

                    case 
    ChatSystem.CH:
                        return 
    Applet_CH;

                    default: 
    // Natürlich kann man dies für MFC, COM erweitern, ich habs jedoch auf DE, AT & CH begrenzt.
                        
    return Applet_DE;
                }
            }

            
    /// <summary>
            /// Gibt das via String ausgewählte Chatsystem zurück
            /// </summary>
            /// <param name="System">System</param>
            /// <returns>Chatsystem</returns>
            
    static ChatSystem GetChatsystem(String System)
            {
                switch (
    System)
                {
                    case 
    "DE":
                        return 
    ChatSystem.DE;
                    case 
    "AT":
                        return 
    ChatSystem.AT;
                    case 
    "CH":
                        return 
    ChatSystem.CH;
                    default: 
    // Natürlich kann man dies für MFC, COM erweitern, ich habs jedoch auf DE, AT & CH begrenzt.
                        
    return ChatSystem.DE;
                }
            }
        }

    C# KNLib Multi Applet Sample Download

    Sollten eigentlich die meisten verstehen, die sich damit auseinandergesetzt haben. Ist nicht wirklich schwer.

  2. #2
    Avatar von rVs14
    Registriert seit
    18.11.2011
    Beiträge
    985
    Thanked 513 Times in 338 Posts

    Standard KNLib Multi Applet Sample

    Kann jemand es nochmal in VB.NET übersetzen das man es auch benutzen kann denn über den Übersetzer kommt nichts gutes raus

  3. #3
    Avatar von rVs14
    Registriert seit
    18.11.2011
    Beiträge
    985
    Thanked 513 Times in 338 Posts

    Standard KNLib Multi Applet Sample

    Zitat Zitat von rvs14 Beitrag anzeigen
    Kann jemand es nochmal in VB.NET übersetzen das man es auch benutzen kann denn über den Übersetzer kommt nichts gutes raus
    Hat wirklich keiner was ?

  4. #4

    Registriert seit
    30.01.2011
    Beiträge
    17
    Thanked 18 Times in 17 Posts

    Standard KNLib Multi Applet Sample

    Zitat Zitat von rvs14 Beitrag anzeigen
    Hat wirklich keiner was ?
    warte mal bis morgen oder heute abend dann kommt ne überraschung.

  5. #5

    Registriert seit
    17.07.2012
    Beiträge
    24
    Thanked 4 Times in 2 Posts

    Standard KNLib Multi Applet Sample

    VB.Net Version:

    PHP-Code:

    Imports KNLib
    Imports System
    .Threading
    Imports System
    .Windows.Forms

    Namespace Multi_Applet_Tutorial
        
    Class Program
            Shared appletPath 
    As [String] = "Applets\applet_{0}.jar"

            
    Shared loadDEApplet As Boolean True
            Shared loadATApplet 
    As Boolean True
            Shared loadCHApplet 
    As Boolean True

            Shared Applet_DE 
    As Applet Nothing
            Shared Applet_AT 
    As Applet Nothing
            Shared Applet_CH 
    As Applet Nothing

            
    Private Shared Sub Main()
                
    Console.Title "Multi Applet Tutorial"
                
    Console.ForegroundColor ConsoleColor.White

                
    New Thread(AddressOf LoadApplets).Start()
                
    ' Thread starten um die Applets zu laden
                Console.WriteLine("Nickname?")
                Dim Nickname As [String] = Console.ReadLine()
                Console.WriteLine("Passwort?")
                Dim Passwort As [String] = Console.ReadLine()
                Console.WriteLine("Channel?")
                Dim Channel As [String] = Console.ReadLine()
                Console.WriteLine("Chatsystem? DE/AT/CH")
                Dim Chatsystem As ChatSystem = GetChatsystem(Console.ReadLine().ToUpper())

                Dim applet As Applet = GetApplet(Chatsystem)

                If applet Is Nothing Then
                    MessageBox.Show("Es konnte kein Applet gefunden werden.")
                    Environment.[Exit](0)
                End If

                Dim KSC As New KSClient(applet)
                KSC.Connect(Chatsystem)
                KSC.OnTokenReceived += New KSClient.ReceivedHandler(AddressOf KSC_OnTokenReceived)
                KSC.Login(Nickname, Passwort, Channel)
            End Sub

            Private Shared Sub KSC_OnTokenReceived(KSC As KSClient, packet As [String])
                If packet.StartsWith("u" & vbNullChar) Then
                    Console.ForegroundColor = ConsoleColor.Green
                    Console.WriteLine("Erfolgreich eingeloggt!")
                End If
            End Sub

            ''' 
    <summary>
            
    ''' Lädt die gewünschten Applets
            ''' 
    </summary>
            Private 
    Shared Sub LoadApplets()
                Try
                    If 
    Applet_DE Is Nothing AndAlso loadDEApplet Then
                        Applet_DE 
    = New Applet([String].Format(appletPath"DE"))
                    
    End If

                    If 
    Applet_AT Is Nothing AndAlso loadATApplet Then
                        Applet_AT 
    = New Applet([String].Format(appletPath"AT"))
                    
    End If

                    If 
    Applet_CH Is Nothing AndAlso loadCHApplet Then
                        Applet_CH 
    = New Applet([String].Format(appletPath"CH"))
                    
    End If
                Catch 
    ex As Exception
                        
    ' Gibt sowieso einen Error zurück ohne diesen Try-Catch-Block wenn die 3 Applets nicht geladen werden können aber sicher ist sicher!
                    MessageBox.Show(ex.ToString())
                End Try
            End Sub

            ''' 
    <summary>
            
    ''' Gibt das via Chatsystem ausgewählte Applet zurück
            ''' 
    </summary>
            
    ''' <param name="Chatsystem">Chatsystem</param>
            Private Shared Function GetApplet(Chatsystem__1 As ChatSystem) As Applet
                Select Case Chatsystem__1
                    Case ChatSystem.DE
                        Return Applet_DE

                    Case ChatSystem.AT
                        Return Applet_AT

                    Case ChatSystem.CH
                        Return Applet_CH
                    Case Else

                        ' 
    Natürlich kann man dies für MFCCOM erweiternich habs jedoch auf DEAT CH begrenzt.
                        Return 
    Applet_DE
                End Select
            End 
    Function

            
    ''' <summary>
            ''' 
    Gibt das via String ausgewählte Chatsystem zurück
            
    ''' </summary>
            ''' 
    <param name="System">System</param>
            
    ''' <returns>Chatsystem</returns>
            Private Shared Function GetChatsystem(System As [String]) As ChatSystem
                Select Case System
                    Case "DE"
                        Return ChatSystem.DE
                    Case "AT"
                        Return ChatSystem.AT
                    Case "CH"
                        Return ChatSystem.CH
                    Case Else
                        ' 
    Natürlich kann man dies für MFCCOM erweiternich habs jedoch auf DEAT CH begrenzt.
                        Return 
    ChatSystem.DE
                End Select
            End 
    Function
        
    End Class
    End Namespace 

  6. #6

    Registriert seit
    05.08.2012
    Beiträge
    21
    Thanked 7 Times in 7 Posts

    Standard KNLib Multi Applet Sample

    Könnten Sie bitte denn Link erneuern ?

    Danke



    Mfg

Ähnliche Themen

  1. Frage Suche funktionierenden Multi Login Bot & neustes Applet
    Von SphinxDOPE im Forum Knuddels Bots
    Antworten: 6
    Letzter Beitrag: 04.04.2014, 21:20
  2. Wie Chat-Applet in Multi-LogIn einbinden?
    Von SeCuRiTy im Forum Sonstige Knuddels Bots/Software
    Antworten: 0
    Letzter Beitrag: 21.12.2013, 23:12
  3. [Suche] KNLib Sample
    Von AmJano im Forum Knuddels Programmierung
    Antworten: 3
    Letzter Beitrag: 01.11.2012, 23:41
  4. VB.Net [Sample] JappyLib
    Von Snees im Forum .Net
    Antworten: 0
    Letzter Beitrag: 20.03.2012, 17:54
  5. [Suche]KNLib VB 2008 Sample
    Von rVs14 im Forum Knuddels Programmierung
    Antworten: 0
    Letzter Beitrag: 14.02.2012, 21:42
Diese Seite nutzt Cookies, um das Nutzererlebnis zu verbessern. Klicken Sie hier, um das Cookie-Tracking zu deaktivieren.