Vous trouverez le crackme ici

Très bon site avec plein de crackme!
 

Protections :
- anti Smartcheck
- serial / name

 

1) Anti Smartcheck (SC):

Il y a plusieurs façons de détecter si SC est activé. Je vais vous donner la plus courante:

Le programme regarde la barre des titres de SC et il trouve:
"NuMega SmartCheck"

Puis se ferme tout seul! merde!

La deuxième façon est de regarder l'ID de le fenêtre de SC: NMSCVM50
Et si il le trouve alors il se ferme aussi tout seul!

Comment l'éviter?
Si vous voulez cracker la plupart des applications avec un anti SC, c'est préférable de patcher directement l'exécutable SC. Pour cela, utilisez un hexéditeur et cherchez NuMega SmartCheck. Ensuite changez le en ce que vous voulez!

Pour patcher l'ID de la fenêtre, c'est plus difficile parce que vous ne le voyez pas avec un hexéditeur!
Vous pouvez utiliser le programme de CyberBlade (un ami): UPK.

Mais je ne l'ai pas et je vais vous dire comment j'ai fait!

Tout d'abord, j'ai mis un BPX sur l'API avant le MessageBox qui dit "you are not registered blabla..."
Ensuite, vous devrez charger le crackme dans SC et l'exécuter!!!
On retourne dans SoftIce et vous allez rechercher:
s 0 l ffffffff 'NMSC' (je n'ai pas recherche NMSCWM50... soyez sûr que vous trouverez le bon)
tapez S jusqu'à ce que vous trouviez NMSCVM50. La première fois que vous le verez, réécrivez
par dessus des 00000000. Hehe, le crackme continue son exécution sous SC!!
 

2) Comment l'enregistrer?

Clicker sur Register et entrez un nom et un serial au hasard genre 123456
et cliquez sur "Check It", vous verrez :
Wrong Try again à l'emplacement de votre nom...
Donc ce n'est pas le bon =)!!

Ok, quittez le crackme et retournez dans SC.
D'abord, sauvez votre projet, avec File/Save as...
parce que je pense que vous ne voudrez pas refaire cette première partie du tut plusieurs fois!

Vous verez command5_click, double click and regardez cette chose intéressante:
Maintenant allez sous SC et regardez votre nom, vous verrez:

--------------Start of SC cut--------------------------------

Mid(varian:byReF String:"ACiD BuRN",long1,VARIANT:Integer:1)
Asc(string:"A")returns Integer:65
Trim(VARIANT:Integer:34)
Mid(varian:byReF String:"ACiD BuRN",long2,VARIANT:Integer:1)
Asc(string:"C")returns Integer:67
Trim(VARIANT:Integer:32)
Mid(varian:byReF String:"ACiD BuRN",long3,VARIANT:Integer:1)
Asc(string:"i")returns Integer:105
Trim(VARIANT:Integer:10)
Mid(varian:byReF String:"ACiD BuRN",long4,VARIANT:Integer:1)
Asc(string:"D")returns Integer:68
Trim(VARIANT:Integer:39)
Mid(varian:byReF String:"ACiD BuRN",long5,VARIANT:Integer:1)
Asc(string:" ")returns Integer:32
Trim(VARIANT:Integer:67)
Mid(varian:byReF String:"ACiD BuRN",long6,VARIANT:Integer:1)
Asc(string:"B")returns Integer:66
Trim(VARIANT:Integer:33)
Mid(varian:byReF String:"ACiD BuRN",long7,VARIANT:Integer:1)
Asc(string:"u")returns Integer:117
Trim(VARIANT:Integer:22)
Mid(varian:byReF String:"ACiD BuRN",long8,VARIANT:Integer:1)
Asc(string:"R")returns Integer:82
Trim(VARIANT:Integer:49)
Mid(varian:byReF String:"ACiD BuRN",long8,VARIANT:Integer:1)
Asc(string:"N")returns Integer:78
Trim(VARIANT:Integer:45)
 

------------------End of Smartcheck cut----------------------
 

Regardez maintenant le code : avez-vous trouvé un truc cool?

ici:

Mid(varian:byReF String:"ACiD BuRN",long1,VARIANT:Integer:1) <= 1er caractère
Asc(string:"A")returns Integer:65 <=== Valeur ASCII -> décimal
Trim(VARIANT:Integer:34) <=== la valeur de serial??

Pourquoi ne pas essayer toutes ces valeurs comme un serial?
Donc prenez toutes les valeurs pour chaque lettre et çà donne:

Essayons:
name : ACiD BuRN
serial : 343210396733224945

Clickez sur "Check It" et çà marche!!!!! Bon on l'a cracké!!! Maintenant je vais vous expliquer comment le keygener.
 

3) Keygen it
 

Bon... Comment a-t-il trouvé cette putain de valeur?!!!
hehe!! laissez moi voir...
Pourquoi pas un XOR?
 

Asc(string:"A")returns Integer:65 <== 1st ascii value
Trim(VARIANT:Integer:34) <== 1st good key
Asc(string:"C")returns Integer:67 <== 2nd ascii value
Trim(VARIANT:Integer:32) <== 2nd good key
.....
 

Si nous faisons 65 XOR 34 (à l'aide la calculatrice Windows en mode scientifique)

nous trouvons: 99

hehe !!
Si nous trouvons la même valeur avec 67 XOR 32 alors on a de quoi faire un keygen!
regardez!!
67 XoR 32 = 99 !
Cool!! on l'a fait!!

Parce que si nous faisons 67 XOR 99=32 =) La bonne valeur de la clé!
Donc pour faire un bon serial de votre nom vous devrez prendre la valeur
ASCII de chaque lettre et le XOR 99. Sauvegarder cette valeur et ajouter
à côté le prochain résultat pour chaque lettre de votre nom!!

Comment le coder? Voici le code source VB5:
 

4) Source du Keygen:
 

--------------Start of the source-------------

Private Sub Command1_Click()
For i = 1 To Len(Text1.Text)
code = Asc(Mid$(Text1.Text, i, 1)) Xor 99
Text2.Text = Text2.Text & code
Next i
End Sub

----------------End of the source-------------

Pour le tester, créez un nouveau projet avec un bouton et 2 textbox
double cliquez sur le bouton et copiez le code!
hehe !!

Fini!

Crackme Cracked!! =)