CiN1 TeAm - Cracking Is Number 1

CiN1 TeAm - Cracking Is Number 1 (http://www.cin1team.biz/index.php)
-   KeygenMe's (http://www.cin1team.biz/forumdisplay.php?f=46)
-   -   Keygenme MT01 (Created by me) (http://www.cin1team.biz/showthread.php?t=7199)

Mr.Teo 28-09-2013 04:14 PM

Keygenme MT01 (Created by me)
 
Target: Keygenme MT01
Language: Delphi
Level: Who care
Packer: UPX
Rules:
- Not patch
- Valid serial: Silver
- Keygen: Gold

Try to do your best
Best regards
Mr.Teo

:dow3:

SkinneR 28-09-2013 07:28 PM

Reg name : SkinneR
Reg code : SAYS-EB8X-YES!
;))

Mr.Teo 28-09-2013 08:30 PM

SkinneR, thank you for trying this ^_^!

SkinneR 28-09-2013 09:57 PM

And for being such a good sport, here are 100 Reg codes for your name:
TXZV-Z1VS-N1SX XDC3-FRTN-WD36 3A7D-WRUJ-ZHPC WT4J-EY8X-B4V7 CSKD-D2RX-ZN13
MS7K-LC1Y-YYFC GSVL-161G-MZYV 2G7P-8QPV-CJ6F MYWY-84QM-MYMH 36ZZ-GM8D-VN79
1GBN-PQRM-1GDW B4KJ-9EAQ-BW89 1N94-S9VJ-5NXC BV28-YKA2-WKC9 F77E-17DW-2T29
HKBS-M2VY-T638 AFE8-7JJP-CAKP CQLW-JCUW-YTKF FLQE-1WVG-PHGX EMMK-TU9H-ATEP
1WNP-VA4S-D17Z M39E-VDG1-1TEK JS86-TLPP-LQ22 DL44-WY12-TM72 4QQS-V7VU-GJ7Q
V3CY-CWTP-X41U P34N-535F-FJ4L 3WD3-UKGX-F8AU 3TD5-2E1U-EWEL MA7Q-K6VG-HA86
8V6H-5DPP-6YCR F8ED-Q7XV-51MX PRZ5-SF1B-DNFY VXBR-JQUP-XYUK Y4HY-FCD4-HRHD
31AM-BGCM-4MMT 8EPN-E516-N43B EMB5-YDAB-JRM4 TTF1-9LKV-KVLN A6GJ-2AFL-GXMC
PT8E-7P38-6282 56LR-BNJC-R12Q VGZL-G9K2-B8A2 BNJB-T5YS-5V6C HKXX-BLRF-PKSJ
R8ZM-29DE-ZLYE KY57-7V2S-UT1P QFZF-D582-5WPY MZ1V-XFLD-DU4T YNPA-FYBY-MEK7
TMTL-PAMZ-FR2G TEBG-FMJT-MWKY ZC9F-8YZZ-QND2 E33J-2TDP-G5Z1 U1BH-CDHL-TRW4
V1KQ-SMVP-XZ7J FDQC-R8CN-D7FK 2MZ5-LJ25-JBSC S69C-5URH-WHAF ZYNL-DEEP-1W3L
13NL-JWC2-MCJ8 5DKF-9W3C-R3T5 DQ5S-A66D-LC89 W2M3-6ECN-XM8Z THQZ-2ZDY-FXZQ
9K6Z-V2PP-7M4N GUUF-7UAN-F9QF UK9Q-H8CQ-X4PZ VD68-7X7M-VUMX GJD6-98TV-5PMU
PB2Q-SPK1-YH2L WAPD-PCCC-11N9 5515-LTRU-G33B 5FPA-KUGF-XXZC HZET-NPGP-KYBW
T9MW-32GJ-X1Q8 NK93-3X9V-UJCL LY1E-3LZK-NM4B UDQ3-5TKZ-GFFM BH3C-NXW5-TBLC
48FG-4RT5-NK3L FM72-C2NJ-AH86 VBCX-FRCJ-REAM RGCR-JEB5-CLNN ZKCT-GYDH-TGJ8
ECRW-QXWP-FUT7 VQXC-FYCQ-WZDL BTJR-MZ22-R8M6 4HHL-JFWK-2LQB 8NR7-VA4N-7B8M
H6QE-FAP2-6D26 VW5Y-BF8E-29C9 CHC5-A3MX-ZLPJ YSQ9-UH92-HTQH Y766-BSGF-QWCX
5TCW-NF7P-3CA1 T699-ZAEC-333L LDNV-NJF3-13US PUJP-AXK3-46W4 A51U-L9TQ-DKA1

Thanks

Serial_Killer 29-09-2013 03:08 AM

not a good idea, too much serials for 1 name!

anyway, good starting

i tried and this cames up, if it works... fine, if not who cares ;) =))

Code:

CalcKey proc pName:Dword, dwLen:DWORD, Output:DWORD
local sumName,P1,P2,P3,P4 :DWORD
Local dwXOR:DWORD
       
        and P1,0
        and P2,0
        and P3,0
       
        invoke RtlZeroMemory,addr pBuf,304
        mov esi, pName
        lea edi,pBuf
        mov ecx,4
        .while ecx != 0
                mov al, byte ptr[esi]
                .if al >= 'a' && al <= 'z'
                        sub al, 20h
                .endif
                mov byte ptr[edi],al
                inc edi
                inc esi
                dec ecx
        .endw
            xor eax,eax
            mov ebx,0
        invoke Base33,addr pBuf
        mov sumName,eax
        .repeat
                invoke Random,addr szP3,4
                invoke Base33,addr szP3
                mov P3,eax
                xor eax,sumName
                mov dwXOR,eax
                invoke Random,addr szP4,4
                invoke Base33,addr szP4
                mov P4,eax               
                xor [dwXOR],eax
                invoke ToB33,[dwXOR],addr szP2
                  invoke wsprintf,Output,addr szFormat,addr szP3,addr szP2, addr szP4
                  mov eax, sumName
                  xor eax,[dwXOR]
                  mov ebx,P3
                  xor ebx,[P4]
        .until eax == ebx
        RET
CalcKey endp

it needs a little overview for optimation, but this you can do it on your own guys.

br
sk

Mr.Teo 29-09-2013 05:26 PM

Serial_Killer, thanks for taking your time to look at my target. =d>

Serial_Killer 01-10-2013 01:45 AM

you welcome Mr.Teo

here a compiled version (little modificated code)
Code:

http://www.sendspace.com/file/ecjjg5
br
SK

tarequl.hassan 07-10-2013 03:32 PM

Dear SK

Where is invoke Base33 and invoke ToB33,[dwXOR],addr szP2

Serial_Killer 07-10-2013 11:36 PM

why you made a request here and the same time on PM?
you in hurry?
We have real life and not online 24/7 , so be patient in future, until you get an answer.

Anyway, if you need the two functions i will post them too.

br
SK

tarequl.hassan 09-10-2013 10:09 AM

SK
Sorry for the inconvenient caused. I need the two functions.

Sorry again mate.

Tareq


All times are GMT +8. The time now is 03:33 AM.

Powered by vBulletin® Version 3.xx
Copyright ©2000 2018, Jelsoft Enterprises Ltd. Help
Licensed to: cin1team.biz