[crackme] VicCrkMe #1 by vic4key {CiN1}

[Vic]

Name: VicCrckMe #1

Author: vic4key

Team: CiN1

Level: Hard

Request: Found the Unlock Code & Registration.

Maby: Patch, Fish, but so good if you can Keygen it.

Link to download it...

Hard to crack it. G.lucky to all my friend. Fightin'!!!

ALL FOR FUN

VicCrkMe #1.by.vic4key.CiN1.zip

[Teddy Rogers]

The [crackme] tag has been added to your topic title.

Please remember to follow and adhere to the topic title format - thankyou!

[This is an automated reply]

[Raham]

Hi

Patched

Difficulty: Easy

but it could be better.

Some Hint:

use Main Byte Checking after XOR is very bad method.

Kind Regards.

Raham/SnD

Patched.rar

[Vic]

@Teddy Roger: Tks for warni'.

@Raham: Tks for your interest. But so good if you can keygen it.

[Raham]

hi

no problem in keygenning.

but your keygenMe have a bug

look at:

00457AE4 => MOVZX ECX,BYTE PTR DS:[ECX+EBX]

this line should be:

MOVZX ECX,BYTE PTR DS:[ECX+EBX-1] // else it will dont start with index 1

am right?

Edited May 12, 2012 by Raham

[Vic]

Oh no. You was confused. It is not a bug. It saves the real result from the function calculation-size function. An essential for my function need to use.

Can I wait algorithm of you for my crackme?

Edited May 12, 2012 by vic4key

[Vic]

Oh no you. Your file fixed was failed for my algorithm. It not right when to test with real unlock code. =.=

Edited May 12, 2012 by vic4key

[Raham]

hi Guys

First Key of Original CrackMe (posted by Vic4key,not my fixed one):

××××××××××××××××××××××××××××××

// its 30 character on key ascii 0xD7

Register Key:

User: Raham
Code:513450
Code: 00
Code :476A
Code : AAAAA3
Code: CBBBW62
Code: SnD54

Kind Regards

Edited May 13, 2012 by Raham

[Vic]

Hi, It's real code. U're success and so good. )

[SReg]

Level: Hard

hard?

procedure TForm1.Button1Click(Sender: TObject);

var

i,k,n:integer; sn:string;

begin

randomize;

k := 0;

sn := Edit1.Text;

for i := 1 to length(sn) do k := k+ord(sn)*2;

k := k mod 10;

repeat

n:=0;

sn:='';

for i := 1 to random(10) do sn := sn + chr (random(10) + 48);

for i := 1 to length(sn) do n := n + ord(sn)*2 + ord(sn);

until n mod 10 = k;

Edit2.Text:=sn;

end;

Edited May 18, 2012 by SReg

[SReg]

add:

+ unlock code geterator

Project1.rar

Edited May 19, 2012 by SReg