Port Java to Vb6

[TokersBall_CDXX]

k1 >> 3
is actually

k1 /( 2^3)

and

1 << 7

is
1 * 2 ^ 7


thank you for helping me understand that

now I have another issue

for some reason vb doesn't have XOR as a syntax?

even 10 XOR 10 the XOR is giving me an error?
is there any way to create an XOR like function?

thanx.

[CVMichael]

it DOES have Xor...
post the code where your using it

I'm gonna be gone for couple of hours, cuz i'm gonna format my computer and re-install windows and everything else. I'll check in now and then (between installs).

[TokersBall_CDXX]

some how I don't think it'll be as simple as this

Private Sub cmdTest1_Click()
Dim BitSet1 As BitVector
Dim BitSet As New BitVector
Dim HashArray() As String
Dim ac As String
Dim ParsedNumArray() As String
Dim i1, jtemp, j1 As Integer
    BitSet.NumElements = 64
    HashArray() = Split("LHKf24(),..FWSqw1,783vcSWr,NSW%FGS3,S834VS$!", ",")
    ParsedNumArray() = Split("58#54#58#42#50#", "#")
 
For i1 = 0 To 4
    Set BitSet1 = BitShift(HashArray(i1))
    
        j1 = Val(ParsedNumArray(i1))
        
        For l1 = 0 To j1
            Set BitSet1 = BitFlag(BitSet1)
        Next
        For x = 0 To 63
            BitSet.SetBit (CLng(x)) Xor BitSet1.GetBit(CLng(x))
        Next
        
Next i1
 
 
ac = Characterize(BitSet, 8)

my guess is I screwed up the Xor?

[TokersBall_CDXX]

Anyone?

[CVMichael]

So, what's not working ?

[TokersBall_CDXX]

string ac only ends up containing 2 characters, the first character is a null character and the second is an extended character.
it's not the result I was looking for.

[TokersBall_CDXX]

I'm stumped

[TokersBall_CDXX]

anyone?

[TokersBall_CDXX]

hmm?

[jhermiz]

Originally posted by TokersBall_CDXX
hmm?

What a waste of time ...I got tired just reading this post.

Why dont you take an ordinary algorithm and do it on your own and stop bumping the damn thread...we get the point you need help (maybe mental) ... at the same time all this chit chat prolly cost you more money than actually buying a program which encrypts or decrypts...hell especially if its vb.

[TokersBall_CDXX]

to use other encryption algorythoms, rather port this one.. I am not going to argue with a baiter. is it against the rules to bump? or are all posts required to drop dead when certain forum readers get bored of reading it?


move along