How to make keygen for JubeCrackme

Version 1.0 by Jube

Written by tnHuAn


Introduction

Well, as I say in the last tutorial , in this tutorial , I will show you : How to make a keygen for Jube Crackme1. This Crackme is very is, and I think it is a very good example for newbie try to make a keygen.To make keygen for this crackme, all you need is a simple XOR. 

NOTE: this crackme only working in win9x, so you must run it in Win9x , or You can't run it.

Now, let's do....

Tools required

You can find all tool at : http://crackpltools.prv.pl and at your home.

Target's URL

    http://crackmes.prv.pl

Essay

First, You must run this crackme, and you will see 2 textbox, you must enter your name and find the correct serial. Now I enter my name , and fake serial as :

Don't click OK button, press Ctrl+D, to pop up SoftIce, get a breakpoint at GetWindowtextA, so type :     bpx GetWindowTextA, press Enter. Then press F12 , until you are in this crackme code, press F10 to trace over the code. Keep pressing F10 until you see this code :

Look, at the line : Xor Eax, 007BF , type in SoftIce : ? Eax, you will see : Eax=123456789, and this is my fake serial. Ok, it get my fake serial, then XOR it with 007BF ( =1983 ). Well, continue trace the code, until you see this code :

OK, look at this part of code, this is a loop, and this loop will get hex value in every character in my name, then add all of value. Ex : my name : tnhuan, then : Eax =  116+110+104+117+97+110=654. Then it XOR this result with 7D0 ( = 2000 ). And I will register if (1)=(2).

Now, I will calculate my serial :

And my correct serial is : 737, hey the calculation very simple, all you need is : XOR.

Here is my keygen source code , I code it in Visual Basic.

Private Sub Command1_Click()
    Dim Dodai As Integer
    Dodai = Len(Text1.Text)
    If Dodai < 4 Then MsgBox ("Length of name must >= 4")
    Dim i As Integer
    Dim Char As String
    Dim Ten As String, Hang As Integer
    Dim A As Integer, B As Integer
    B = 0
    Ten = Text1.Text
    For i = 1 To Dodai
        Char = Mid(Ten, i, 1)
        A = Asc(Char)
        B = B + A
    Next i
    B = B Xor 2000
    B = B Xor 1983
    Text2.Text = B
End Sub

Well , I hope you will make this keygen by yourseft... That is all ..... 

Final Notes

If you want to comment me anything about this tutorial , please email to me :

    tnhuan19@hotmail.com


My Greetz Goes to:


All member of Tres2000: McCodEMaN, Sphinx, Leon,....

All member of HAH, and Eddile in Digital Insight

Acid_Cool_178 ( Crack my crackme#6), BiSHoP, a_evil, tKc,....

And all I miss. Oh yes! My girl friend, huh?



When ever there is a door,
there is an entrance.
And behind an entrance can no secret hide,
when a cracker takes his knowledge for a ride
                                                                               McCodEMaN



ObDuh

The information in this essay is for educational purpose only!
You are only allow to crack, reverse engineer, modify code and debugg programs that you legaly bought and then for personal use only!!
To ignore this warning is a criminell act and can result in lawful actions!

So please note!
I take no responebility for how you use the information in this essay, i take NO responebility for what might happen to you or your computer!
You use this information on your own risk!!

What i mean is: Please buy the software!








Essay written by tnHuAn ŠTRES2000. All Rights Reserved.