downloadbrowseLaFarge's Crackme v0.2

Download lafarge__s.crackme.0.2.crackme-icu.zip, 34 kb (password: crackmes.de)
Browse contents of lafarge__s.crackme.0.2.crackme-icu.zip

Easy crackme (??) for newbies who wanna learn keygenning.

I implemented some simple algo so there should be no problems in keygenning it. Not packed, no code obfuscations, plain MASM32, so go keygen it

Difficulty: 1 - Very easy, for newbies
Platform: Windows
Language: Assembler

Published: 20. Jan, 2006
Downloads: 1957

Rating

Votes: 3
Crackme is boring.

Rate this crackme:

Send a message to LaFarge »

View profile of LaFarge »

Solutions

Solution by red477, published 24. jan, 2006; download (5 kb), password: crackmes.de or browse.

red477 has not rated this crackme yet.

Solution by Ox87k, published 22. jan, 2006; download (53 kb), password: crackmes.de or browse.

Ox87k has not rated this crackme yet.

Solution by Kerberos, published 22. jan, 2006; download (39 kb), password: crackmes.de or browse.

Kerberos has not rated this crackme yet.

The submission of solutions is closed.

Discussion and comments

astigmata
20. Jan 2006
easy keygenme
point H, F8, serial in stack.
I ll look how it's generated
thx 4 n00b
Ank83
20. Jan 2006
Hi,
I'm missing one part of the app ! I didn't understand it. I will look it again. If some one has the key what is happening on the IDIV EBX line please help me.
Here is the code:

Dim Cons, Name, Char, Char1 As String
Dim Xored, Xored1 As Integer
Cons = "_r <()<1-Z2[l5,^"
Name = Text1.Text
Text2.Text = ""
While Len(Name) < 16
Name = Name & Name
Wend
For i = 1 To Len(Cons)
Char = Mid(Name, i, 1)
Char = Asc(Char)
Char1 = Mid(Cons, i, 1)
Char1 = Asc(Char1)
Xored = Char Xor Char1
'MISSING PART
'MISSING PART
If Abs(Xored1) <> Xored1 Then
Xored1 = Xored
End If
Xored1 = Xored1 + 65
Text2.Text = Text2.Text + Chr(Xored1)
Next i
Thanks and regard
Ank83
astigmata
20. Jan 2006
004011EE CDQ // convert double to quad
004011EF IDIV EBX //integer divide

I try to understand me too
but :P
Kerberos
20. Jan 2006
In EAX you have I-th char your name XORed with I-th char from that constant string, EDX = 0 and EBX = 0x19 so

IDIV EBX ...
EAX = EAX / EBX
EDX = EAX % EBX
astigmata
20. Jan 2006
damn, you right Kerberos
I didn't know that, thank U.
astigmata
20. Jan 2006
selfkeygen

Patches
Address Size State Old New Comment
0040120B 8. Active MOVS DWORD PTR ES:[EDI],DWORD PTR DS:[ESI] JMP crackme.0040128E
00401290 5. Active PUSH crackme.0040630C PUSH EDI
Ox87k
21. Jan 2006
i submitted my solution yesterday... however thanks 4 this crackme lafarge! g00d j0b!
Kerberos
22. Jan 2006
Hey red477, you've nice keygen, but it doesn't works well for all inputs :-/
For example on input : "1234567890321456987777778" your serial key is KOTI-EGLJ-UGBF-SBAE, but correct key is OTYB-OMXA-JGBF-SBAE :-/
red477
23. Jan 2006
Kerberos,Yes,u r quite right and thank you very much for tell me this.and i made such a big mistake on this little simple crackme...:(
i will improve myself in my later solutions.
but probably after a time coz i am a little occupied for now.
red477
24. Jan 2006
and again a little problem on Ox87k solution.it wont generate key for inputs whose length is exactly 26.for example "12345678903214569877777781"=>"OTYB-OMXA-JSBF-SBAE".that's it (such a small flaw)and i really learned a lot from all of you.thank you.
:)
red477
24. Jan 2006
since i dont want to send a newer version of solution again so i will leave maybe my last comment on my solution here:the solution is still not perfect,you will still find bugs(i have found some:)).
toshimi
25. Jan 2006
ZZZzzzz.. very easy..!!! thanks LaFarge's
Jailani
14. Feb 2006
How do i submit the key gen here well i did,nt write the solution i made the keygen but i can explain what i used i can paste the coding i used it is

ser = "0000000000000000"
tl = 0
a = "_r <()<1-Z2[l5,^"
b = Trim(Text2.Text)
If Len(a) > Len(b) Then tl = Len(a) Else tl = Len(b)
For i = 0 To tl - 1
ai = (i Mod Len(a)) + 1
bi = (i Mod Len(b)) + 1
seri = (i Mod 16) + 1
Mid(a, ai, 1) = Chr(((Asc(Mid(a, ai, 1)) Xor Asc(Mid(b, bi, 1))) Mod &H19) + &H41)
Mid(ser, seri, 1) = Mid(a, ai, 1)
Next i
For i = 1 To 16 Step 4
sr = sr & Mid(ser, i, 4) & "-"
Next i
Text1.Text = Mid(sr, 1, Len(sr) - 1)
Jailani
15. Feb 2006
Its just Xor Algorithm is,nt It
r-Evolution
05. Oct 2010
What a nice and interesting keygenme...I suppose i am gonna write my first keygen on it!!!!
r-Evolution
08. Nov 2010
i finished the keygen now..Solution on the way
r-Evolution
08. Nov 2010
@jailani xor eax, edx
eax % 0x19
eax + 0x41
aldeid
05. Dec 2015
My solution posted here: https://www.aldeid.com/wiki/Solution-LaFarges-crackme-2

You may leave your comment, thoughts and discuss this crackme with other reversers here.
Acting childish will not be tolerated.
HTML and such will be left as-is, so don't try.