crack source / speedhack method

08/16/2007 07:29 behelit#1

hi
source code for my crack proxy (vb6)
also shows the method for unlimited speed hacking (no 500 ms restriction)

if you want to add unlimited speed to your apps learn about the timegettime module.
all you have to do is alter the time section of a packet to return valid times that are larger than the required minimum. simple!

there are hardly any comments in the code and it is quite sloppy so if you have questions just ask here and i'll try reply within a year.

some of the features no longer work due to changes in packet structures of the latest patch.

have fun..

08/20/2007 13:02 *M*#2

Is this based on your old COPROXY 1.3?

08/21/2007 03:06 m_t_w#3

Quote:

Originally Posted by *M*

Could you fix this link?, this new forum software seems to have destroyed all the old file attachments

Also is this based on your old COPROXY 1.3?

The link is a rar file, rename the ext.

08/21/2007 05:45 XtremeX-CO#4

if u release the sacob source, ill post all the fixes for the packets :D (3f6, 3ee, 3ec - i dun think any others)

08/21/2007 12:09 behelit#5

*M* : yup it was originally based off coproxy i released 10 years ago.

XtremeX-CO : I'm still thinking about it, i don't want to see people making money off it. The bot check reply packets are in crack anyway. F2 03 but not F4 03's which is the sync packet.

Just ask if you want any packets, i'd rather just post them and help you make your own bot then release the source just now.

Code:

                aid = Mid(str, 5, 4)
                ta = txa(timeGetTime, aid)
                end4 = crypt_name(name1)
                
                x4 = random '0 - FFFF & FFFF
                x5 = random
                x6 = random
                x7 = random
                
                pack = MakeHex2("20 00 F4 03") & aid & MakeHex2(ta & x4 & x5 & x6 & x7) & end4
                gsend (pack)

Code:

Function crypt_name(cname As String) As String

    z1 = XOREncryption(Mid(cname, 1, 1), Chr(&H23))
    z2 = XOREncryption(Mid(cname, 2, 1), Chr(&H98))
    
    crypt_name = Chr("&H" & z1) & Chr("&H" & z2) & Chr(0) & Chr(0)

End Function

08/21/2007 14:37 flowerpot!#6

Quote:

Just ask if you want any packets, i'd rather just post them and help you make your own bot then release the source just now.

Agree - sharing info is better than sharing source. If standalone becomes widespread TQ will change stuff and I don't want to have to re-write mine... :(

And there are more packets changed than just those three that Dan mentions.

08/21/2007 16:51 XtremeX-CO#7

ah yes thats better actually :), thankyou very much, been lookin for these

08/23/2007 15:55 compwiz#8

Thanks a lot for releasing this, behelit. I'll play around with the source once I get home.

I look forward to the possibility of you releasing the source to your stand alone bot too. =)