This tutorial have 3 part :

	PART I : Fishing Serial.

	PART II: Explain Calculation.

	PART III: Source Code of Keygen.

-------------------------PART I:  Serial Fishing.--------------------------------
				
  Now, We begin.
  This crackme is coded by Visual Basic, so I will use SmartCheck to crack it.
  In this tutorial , I won't  show you how to config SmartCheck. If you want to know it , you can read the Eternal Bliss  tutorials.
  Now, run SmartCheck, and load this crackme in SmartCheck, then press F5 to run this crackme.
  Input your name , and fake serial . I enter :
  	Name:  tnhuan
	Serial : 123456     	
 Then Click Check button. You will see the bad message.
  Ok, look at the main screen of SmartCheck, you will see :

     + _Click

  Click in the ' + ' item. You will see :

      - _Click
         |	Len(Variant: String: "tnhuan") return Long: 6550388
         |	Len(Variant: String: "tnhuan") return Long: 6550388
         |	Integer(1)---> Long (1)
         |	Mid(Variant: String:"tnhuan",long:1,Variant:Integer:1)
         |	Asc(String:"t") return Integer:116
         |	Hex(Variant:Integer:216)
         |	Integer(2)---> Long (2)
         |	Mid(Variant: String:"tnhuan",long:2,Variant:Integer:1)
         |	Asc(String:"n") return Integer:110
         |	Hex(Variant:Integer:210)
         |	Integer(3)---> Long (3)
         |	Mid(Variant: String:"tnhuan",long:3,Variant:Integer:1)
         |	Asc(String:"h") return Integer:104
         |	Hex(Variant:Integer:204)
         |	Integer(4)---> Long (4)
         |	Mid(Variant: String:"tnhuan",long:4,Variant:Integer:1)
         |	Asc(String:"u") return Integer:117
         |	Hex(Variant:Integer:217)	
         |        Msgbox.....
         | _Click......

  Look  at this screen, you can't find any serial.
  So you choose menu: View/ Show All Event.
  Then you looking this function : _vbaVarTstEq (VARIANT: String " D8D2CCD9 "......).
  This Function is Compare : "D8D2CCD9" with "123456"
  "123456": is your fake serial . And it will compare with correct serial.
  So : "D8D2CCD9" is the correct serial.
  Now, I enter my serial to register this crackme:
 	Name: tnhuan
	Serial: D8D2CCD9
 And Crackme is Cracked.Very Easy...huh?

---------------------------PART II: Explain the calculation serial.----------------------------

  Now , I will explain the calculation.
  First , It get 4 character in your name. Ex: tnhuan--->tnhu ,  yourname-->your
  Then , It get the Ascii of this 4 characters. Ex: Asc("t")=116, Asc("n")=110.... 	 
  And, It add 100 into all result. Ex : 116+100=216, 110+100=210,...
  It change all value to Hex.Ex : Hex(216)=D8, Hex(210)=D2
  Finish , it merge all result, and this is your correct serial.
  And you can make keygen for this crackme simply.

--------------------------PART III: Source code of Keygen------------------------------

	Private Sub Command1_Click()
	 Dim name As String, ch As String
	 Dim serial As String, j As Integer
	 Dim i As Integer, k As Variant
	 name = Text1.Text
	 For i = 1 To 4
	    ch = Mid(name, i, 1)
	    j = Asc(ch)
	    j = j + 100
	    k = Hex(j)
	    serial = serial + k
	 Next i
	 Text2.Text = serial
	End Sub

If you want comment me, please email to me: tnhuan19@hotmail.com