Author Topic: Need help to decrypt (Read 14428 times)

Zénar · « **on:** December 19, 2005, 03:47:40 am »

Hi all! I've having a problem with WinMX and VB. Maybe you think VB is very bad but I know this. I like VB because it's very easy to create applications etc.

My problem is: I want to decrypt winmx to enter a bot into a channel. I will create game bot and I will never create a bot to destroy rooms and I promise. I've tinking to learn C++ but I have no time for the moments.

I learn very fast and to show you, just look my hangman. Metis is very great to create things but it still have many bad bugs.

For more informations, just go at this LINK.

Thanks in advance.

GhostShip · « **Reply #1 on:** December 19, 2005, 07:46:42 am »

Hi Zenar, nice to see again

I along with many others have enjoyed your hangman script and found it to be a great piece of work and hope to see you continue on that path.

The problem with decrypting WinMx is that it requires tables and perhaps more than a little knowledge of the protocol, also as you know Josh of Teen Extreme Teen room was working on the same problem and had to stop work on it due to multithreading problems.

I would suggest you move up to C++ and work on it there as then you can use the MXSock.dll and forget about all the hurdles you will encounter in VB, I,m not saying its impossible just that its not ever going to be as useful as you may wish programmed in VB.

Merry Xmas, If anyone else has any help they can give Zenar lets hear it

Zénar · « **Reply #2 on:** December 20, 2005, 05:21:57 pm »

ok! Thanks for the infos!
Hmmm... I will continue to try until I will find a way!

~~Josh~~ · « **Reply #3 on:** December 21, 2005, 03:14:17 am »

You might find it after a few years. I cant do it because I'M hated by the people who can actually help. So hopefully they will take the time to help you:)

String · « **Reply #4 on:** December 30, 2005, 02:36:50 am »

Well as far as i know, the only one who made a MX tool connecting to a channel is Krishean, the one who hates so much Josh...lol

If i'm not wrong his DCMX is a VB application, shame on him.

http://draconislabs.net/main.php

So enter the files.php section and get the MxSock4VB.zip file.
Maybe this is what your are looking for...

Zénar · « **Reply #5 on:** December 30, 2005, 02:44:45 am »

Wow! I test that now! If it work, "Yahoooo" lolll

I hope this!

I tell you for the info!

Zénar · « **Reply #6 on:** December 30, 2005, 05:51:20 am »

Just to know, this is a version to work with old version of winmx?

String-guest · « **Reply #7 on:** December 30, 2005, 11:51:50 am »

Sorry but i can't read through that Visual Basic code... it's too hard for me.

Remember to give Krish credit for everything you will get with that code.

GhostShip · « **Reply #8 on:** December 30, 2005, 11:34:40 pm »

Hmm cheers String for pointing out that site, its nice to see some of the programs again that where on the old TSC site before it closed.

Zénar · « **Reply #9 on:** December 31, 2005, 06:09:09 am »

Hmmm... Something wrong with this program. I've checked and I don't find the bug. All tables are corrects but when it attempt to connect a room, it bug...

This program will help alot!

thanks again

String · « **Reply #10 on:** January 01, 2006, 03:08:40 pm »

I can't help you with that VB program... but i've tried the Draconis client and it still works...

Zénar · « **Reply #11 on:** January 01, 2006, 04:37:06 pm »

It can enter but it don't see messages!

String · « **Reply #12 on:** January 02, 2006, 12:45:00 am »

That is due to the 0x00C9 key. DraconisMX thinks this is a normal message but i know that nowaday WCS sends message as 0x00D2 or 0x00D3 type. This is why DraconisMx can't see any message...

Zénar · « **Reply #13 on:** January 02, 2006, 03:55:27 am »

Lol you know many things in that! Thanks for your reply!

Zénar · « **Reply #14 on:** January 02, 2006, 11:38:15 pm »

And the MX4VB can't work because it not encrypt the name and the message is too long.

~~Josh~~ · « **Reply #15 on:** January 07, 2006, 05:31:34 am »

same for me. Its like the chat server is rejecting the join packet.

~~Josh~~ · « **Reply #16 on:** January 07, 2006, 06:16:29 am »

Yes i can confirm that the join packet is incorrect.

Code: [Select]


Public Function CreateLogin(buffer() As Byte) As Byte()
    Dim wLen As Long
    Dim strTemp As String
    Dim lngLen As Long
    Dim lngTemp As Long
    Dim i As Long
    
    'Login-Request: (Client)
    '0x0064][00:1][RoomName:N][LineType:2][Room-IP-Address:4][UDP-Port:2][SharedFiles:4][Username:N][00:1]
    'wLen = Util::FormatMXMessage(0x0064, (char*)&buffer, "SWDWDS",
    '                (LPCTSTR)m_strRoom,
    '                m_wLineType,
    '                m_dwClientIP,
    '                m_wClientUDPPort,
    '                m_dwFiles,
    '                (LPCTSTR)m_strUser);
    
    'Prepare login buffer...
    ReDim buffer(1024)
    '*(WORD*)buffer = 0x0064;
    lngTemp = &H64
    buffer(0) = lngTemp And 255
    buffer(1) = (lngTemp \ 256) And 255
    wLen = 4
    'lstrcpy(buffer + nLen, m_strRoom)
    strTemp = RTrim(m_strRoom)
    lngLen = Len(strTemp)
    For i = 0 To lngLen - 1
        buffer(wLen + i) = Asc(Mid$(strTemp, i + 1, 1))
    Next
    buffer(wLen + lngLen + 1) = &H0
    'wLen+=strlen(m_strUser)+1;
    wLen = wLen + (lngLen + 1)
    'memcpy(buffer+wLen, &m_wLineType, 2);
    lngTemp = m_wLineType
    buffer(wLen) = lngTemp And 255
    buffer(wLen + 1) = (lngTemp \ 256) And 255
    wLen = wLen + 2
    'memcpy(buffer+wLen, &m_dwClientIP, 4);
    lngTemp = m_dwClientIP
    buffer(wLen) = lngTemp And 255
    buffer(wLen + 1) = (lngTemp \ 256) And 255
    buffer(wLen + 2) = (lngTemp \ 65536) And 255
    buffer(wLen + 3) = (lngTemp \ 16777216) And 255
    wLen = wLen + 4
    'memcpy(buffer+wLen, &m_wClientUDPPort, 2);
    lngTemp = m_wClientUDPPort
    buffer(wLen) = lngTemp And 255
    buffer(wLen + 1) = (lngTemp \ 256) And 255
    wLen = wLen + 2
    'memcpy(buffer+wLen, &m_dwFiles, 4);
    lngTemp = m_dwFiles
    buffer(wLen) = lngTemp And 255
    buffer(wLen + 1) = (lngTemp \ 256) And 255
    buffer(wLen + 2) = (lngTemp \ 65536) And 255
    buffer(wLen + 3) = (lngTemp \ 16777216) And 255
    wLen = wLen + 4
    'lstrcpy(buffer+wLen, m_strUser);
    strTemp = RTrim(m_strUser)
    lngLen = Len(strTemp)
    For i = 0 To lngLen - 1
        buffer(wLen + i) = Asc(Mid$(strTemp, i + 1, 1))
    Next
    buffer(wLen + lngLen + 1) = &H0
    'wLen+=strlen(m_strUser)+1;
    wLen = wLen + (lngLen + 1)
    '*(WORD*)(buffer+2) = wLen-4;
    lngTemp = wLen - 4 'length
    buffer(2) = lngTemp And 255
    buffer(3) = (lngTemp \ 256) And 255
    ReDim Preserve buffer(wLen)
    CreateLogin = buffer()
End Function

Somthing in this function is incorrect

~~Josh~~ · « **Reply #17 on:** January 07, 2006, 06:35:26 am »

I'm going to set this as a high priority project to make a new project and simple it all up

~~Josh~~ · « **Reply #18 on:** January 07, 2006, 07:57:41 am »

As you notice zenar the project closes itself when you exit the test of the prog.

Or sometimes when you hit connect.

CSocket is causing this

I'M going to try to rewrite theproject using microsoft winsock control. If anyone can help with vb please post

~~Josh~~ · « **Reply #19 on:** January 07, 2006, 08:16:50 am »

Sorry everyone but its impossible.

In order to stop the constant crashing of csocket you need to use a regular winsock control but i cant figure out how i would read the 1 and the key and stuff

I wish someone would help me and stop holding grudges.

Author Topic: Need help to decrypt (Read 14428 times)

String-guest