Java Chat Visual Basic Basic Client applet Handshake

Java in VB übersetzten

Von: , Frage gestellt am Mi, 19. Jul 2000

---*--> das ist jetzt der text, den ich auch an experten geschickt habe <--*---

Liebe/-r wer-weiss-was Experte/-in,
ich hoffe du kannst mir helfen!
es ist ganz dringend!!
den quellcode um den es sich handelt gibts unter
http://melamphyrum.virtualave.net/royalchat.zip
(den folgenden text hab ich offline geschrieben)

GANZ WICHTIG! BITTE LESEN! BITTE HILF UNS!
hier ist der quellcode des clients von spin-chat.
es ist ein java-applet, welches sich mit dem server auf dem selben pc verbindet.
nun schickt es "~a" und erhält dann eine antwort wie "~a#12#46#34#56#".
daraus wird eine antwort erstellt wie "~bkjergkdsfg4" oder so. die wird dann an
den server geschickt und nur wenn sie richtig verschlüsselt war, kann man
unregistrierte nicks verwenden. das wird für meinen chat-client benötigt.
ich würde dich bitten, den handshake zu knacken. wenn möglich übersetzte das ganze
in visual basic, visual c++, assembler, turbo pascal, delphi oder eine andere
sprache ist auch ok, aber visual basic 6 wäre am besten!! vielen vielen dank für
deine mühe! ach ja, wenn dus hast mails an [E-Mail-Adresse entfernt] und an
[E-Mail-Adresse entfernt] ;) DU BEKOMMST VON mir (ich hab den code herrausgefunden und brauch den handshake ganz dringend)
EINE SUPER PRÄMIE! für mehr dazu setz dich mal mit mir in verbindung.
BITTE, BITTE, BITTE VERSUCH ES! ES IST GANZ DRINGEND! DU WIRST JA AUCH BELOHNT!
Vielen Dank im Vorraus,
-=MeL=-
WENN DU NICHT HELFEN KANNST, LEITE ES AN FREUNDE/PROFIS WEITER!
P.S.: Such mal im Code nach ~a und ~b...
DER HANDSHAKE IST IN CLIENT.JAVA! (CLIENT.CLASS LIEGT AUCH BEI, DU KANNST
DAS APPLET IN AKTION SEHEN BEI: http://www.spinchat.de/chat)

3 Antworten zu dieser Frage

1. Antwort von nach 13 Minuten hilfreich

   Re: Java in VB übersetzten

   das ganze findet statt in
   
   ----start
   private final BitSet a(char ac1[])
   {
   int i1 = ac1.length * 8;
   BitSet bitset = new BitSet(i1);
   for(int j1 = 0; j1 < i1; j1++)
   {
   int k1 = j1 & 0x7;
   int l1 = j1 >> 3;
   if((ac1[l1] & 0xff & 1 << 7 - k1) != 0)
   bitset.set(j1);
   }
   
   return bitset;
   }
   
   private final char[] a(BitSet bitset, int i1)
   {
   int j1 = i1 * 8;
   char ac1[] = new char[i1];
   for(int k1 = 0; k1 < j1; k1++)
   {
   int l1 = k1 & 0x7;
   int i2 = k1 >> 3;
   if(bitset.get(k1))
   ac1[i2] = (char)(ac1[i2] | 1 << 7 - l1);
   }
   
   return ac1;
   }
   
   private final void l(String s1)
   {
   StringTokenizer stringtokenizer = new StringTokenizer(s1 + "#", "#");
   BitSet bitset = new BitSet(64);
   for(int i1 = 0; i1 < 5; i1++)
   {
   BitSet bitset1 = a(b[i1].toCharArray());
   int l1 = Integer.parseInt(stringtokenizer.nextToken());
   for(int i2 = 0; i2 < l1; i2++)
   bitset1 = a(bitset1);
   
   bitset.xor(bitset1);
   }
   
   char ac1[] = a(bitset, 8);
   for(int j1 = 0; j1 < 8; j1++)
   if(ac1[j1] == 0 || ac1[j1] == '\n' || ac1[j1] == '\r')
   ac1[j1] = (char)(ac1[j1] | 0x80);
   
   w.print("~b#" + 4 + "#");
   for(int k1 = 0; k1 < ac1.length; k1++)
   w.write((byte)(ac1[k1] & 0xff));
   
   w.println("");
   }
   ---end
   
   und wird in der run unter
   ---start
   case 126: // '~'
   if(s1.charAt(0) == 'a')
   {
   l(s1.substring(2));
   break;
   }
   if(s1.charAt(0) == 'z')
   w.println("~a");
   break;
   
   }
   ---end
   
   aufgerufen. erspar mir das tippen, bitte
   
   gerhard [Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
   

   • Antwort von nach 22 Stunden hilfreich

     Re^2: Java in VB übersetzten

     thx aber das weiss ich selber ;)
     ich muss das in VISUAL BASIC haben.
     oder turbo pascal oder sonst was
     

     • Antwort von nach einem Tag hilfreich

       Re^3: Java in VB übersetzten

       thx aber das weiss ich selber ;)
       ich muss das in VISUAL BASIC haben.
       oder turbo pascal oder sonst was
       Dann schau auf http://java.sun.com und hol dir Doku, damit du es dir übersetzen kannst.
       
       Oder erwartest du etwa, dass das jetzt irgendjemand für dich macht?
       
       Grüße, Robert
       

Keine passende Antwort gefunden? Jetzt eigene Frage stellen!