A few java functions i dont understand.

Question

The following functions i need translated into VB6 i have tried so very hard to this but i cant figure it out so i was hoping the people here on the sun forums could possibly help me i thank anyone who can remotely help me with this problem.
private BitSet a(BitSet bitset)
BitSet bitset1 = new BitSet(64);
boolean flag = false;
for(int i1 = 0; i1 < 64; i1++)
  if(flag != bitset.get(i1))
  bitset1.set(i1);
  flag = bitset.get(i1);
  return bitset1;
  private BitSet a(char ac[])
  int i1 = ac.length * 8;
  BitSet bitset = new BitSet(i1);
  for(int j1 = 0; j1 < i1; j1++)
    int k1 = j1 & 7;
    int l1 = j1 >> 3;
    if((ac[l1] & 0xff & 1 << 7 - k1) != 0)
    bitset.set(j1);
    return bitset;
    private char[] a(BitSet bitset, int i1)
    int j1 = i1 * 8;
    char ac[] = new char[i1];
    for(int k1 = 0; k1 < j1; k1++)
      int l1 = k1 & 7;
      int i2 = k1 >> 3;
      if(bitset.get(k1))
      ac[i2] = (char)(ac[i2] | 1 << 7 - l1);
      return ac;
      private void n(String s1)
      boolean flag = false;
      String as[] = {"MNfw9809", "90981qFS", "412.Fdq.", "..13fS4.", "41!!vs%&"
      StringTokenizer stringtokenizer = new StringTokenizer(s1 + "#", "#");
      BitSet bitset = new BitSet(64);
      for(int i1 = 0; i1 < 5; i1++)
        BitSet bitset1 = a(as[i1].toCharArray());
        int j1 = Integer.parseInt(stringtokenizer.nextToken());
        for(int l1 = 0; l1 < j1; l1++)
          bitset1 = a(bitset1);
          bitset.xor(bitset1);
          char ac[] = a(bitset, 8);
          for(int k1 = 0; k1 < 8; k1++)
            if(ac[k1] == 0 || ac[k1] == &apos;\n&apos; || ac[k1] == &apos;\r&apos;)
            ac[k1] = (char)(ac[k1] | 0x80);
            try
              a_java_io_DataOutputStream_fld.writeBytes("~b#" + 13 + "#");
              for(int i2 = 0; i2 < ac.length; i2++)
                a_java_io_DataOutputStream_fld.write((byte)(ac[i2] & 0xff));
                a_java_io_DataOutputStream_fld.writeBytes("\n");
                a_java_io_DataOutputStream_fld.flush();
                return;
              catch(Exception exception)
                a(exception);
                }- Brian

Answer 1

briansykes wrote:
Well i'm trying to convert this code, i didn't decompile it but the person who gave it to me might have i'm just trying to port it to Visual Basic 6 i figured the java forums would be a good place to start. It's a handshake code for a chat server just wondering if its possible to port to Visual Basic 6.Of course it's possible, but this is a Java forum. You want to write VB6 code, so you need to find a VB6 forum.