Tuts 4 You

# [Keygenme] XorRanger's KeygenMe 3

## Recommended Posts

Hello All,
Another Challenge For You All.
Solution: Only Keygens Are Allowed.
A Tutorial Would Be An Added Bonus.
Level: You Decide.

http://up.ht/1a89iC4

• 2
##### Share on other sites

Also easy (

------------

DimitarSerg

B7-6878A-AA

-----------------

I am lazy to rip the algo.

Edited by DimitarSerg
• 1
##### Share on other sites

Also easy (

------------

DimitarSerg

B7-6878A-AA

-----------------

I am lazy to rip the algo.

Lol .

Nice Try.

##### Share on other sites

It was easy to get the serial but don't know how to rip the algorithm. It's MD5 + Custom.

Name: LordCoder//REiS

Serial: 3D9-5E3BD-76

Edited by LordCoder
• 2
##### Share on other sites

Thanks for keygenme

like last time easy and minor bugs.

`MD5 InitvectorsVector 1 == \$87654321Vector 2 == \$ABCDEFDEVector 3 == \$98BADCFEVector 4 == \$12345678const  sODD ='E:3D60>?:5!8e£%\$1=E>¸913[^';  sEven = '@(*"£%^&*?><~#:;.!\$%+-_(!^';implementationuses MD5 ;{\$R *.dfm}procedure TForm1.Btn1Click(Sender: TObject);var  i, Sum, iLen, tmp, X:DWORD;  sName,Serial, sTemp, sHash:string;begin  Serial := '';  sName := Edit1.Text;  iLen := Length(sName);  if (iLen < 5) or (iLen >26) then    Edit2.Text := 'NameLength 5...26'  else  begin    x:= iLen shr 1;    if Odd(iLen)then    begin      for i := 1 to iLen do      begin        tmp := Ord(sName[i]) xor Ord(sODD[i]);        sTemp := IntToStr(tmp);        Serial:= Serial + sTemp;      end;    end    else    begin      for i := 1 to X do      begin        tmp := Ord(sName[i]) xor Ord(sEven[i]);        sTemp := IntToStr(tmp);        Serial:= Serial + sTemp;      end;    end;    sTemp := Serial;    Serial := IntToHex(StrToInt(Copy(Serial,1,3)),0)+ '-';    sHash := Copy(StrMD5(sTemp),2,5);    sTemp := '-' + IntToHex(StrToInt(Copy(sTemp,Length(sTemp)-2,3)),0);    Edit2.Text := Serial + sHash + sTemp;  end;end;`

I was also lazy to rip the algo

• 2
##### Share on other sites

It was easy to get the serial but don't know how to rip the algorithm. It's MD5 + Custom.

Name: LordCoder//REiS

Serial: 3D9-5E3BD-76

##### Share on other sites

Thanks for keygenme

like last time easy and minor bugs.

`MD5 InitvectorsVector 1 == \$87654321Vector 2 == \$ABCDEFDEVector 3 == \$98BADCFEVector 4 == \$12345678const  sODD ='E:3D60>?:5!8e£%\$1=E>¸913[^';  sEven = '@(*"£%^&*?><~#:;.!\$%+-_(!^';implementationuses MD5 ;{\$R *.dfm}procedure TForm1.Btn1Click(Sender: TObject);var  i, Sum, iLen, tmp, X:DWORD;  sName,Serial, sTemp, sHash:string;begin  Serial := '';  sName := Edit1.Text;  iLen := Length(sName);  if (iLen < 5) or (iLen >26) then    Edit2.Text := 'NameLength 5...26'  else  begin    x:= iLen shr 1;    if Odd(iLen)then    begin      for i := 1 to iLen do      begin        tmp := Ord(sName[i]) xor Ord(sODD[i]);        sTemp := IntToStr(tmp);        Serial:= Serial + sTemp;      end;    end    else    begin      for i := 1 to X do      begin        tmp := Ord(sName[i]) xor Ord(sEven[i]);        sTemp := IntToStr(tmp);        Serial:= Serial + sTemp;      end;    end;    sTemp := Serial;    Serial := IntToHex(StrToInt(Copy(Serial,1,3)),0)+ '-';    sHash := Copy(StrMD5(sTemp),2,5);    sTemp := '-' + IntToHex(StrToInt(Copy(sTemp,Length(sTemp)-2,3)),0);    Edit2.Text := Serial + sHash + sTemp;  end;end;`

I was also lazy to rip the algo

Good Job, Sama, But Unfortunately Your Keygen Generates Wrong Results When I Compiled it. Plz Check it Again.

Hint : Error is in sHash Value.

// sHash := Copy(StrMD5(sTemp),2,5);

##### Share on other sites

Really?

I can not imagine that unless the error is up to you as my compilation produces correct key.

Thank you for feedback

check attachement

Sol_XorRanger3.rar

##### Share on other sites

Really?

I can not imagine that unless the error is up to you as my compilation produces correct key.

Thank you for feedback

check attachement

Wow, The Compiled Result in The Attachment Produces Correct Result.

##### Share on other sites

Thanks

ragdog

1FB-B4DDC-179

Keygen can i send you

But you Keygenme has a small bug

Edited by ragdog
• 1
##### Share on other sites

I am starting to think that XorRanger is doing this on purpose to test others, but again, I could be wrong

• 1
##### Share on other sites

I am starting to think that XorRanger is doing this on purpose to test others, but again, I could be wrong

Hehehe ....................

##### Share on other sites

think that XorRanger is doing this on purpose to test others

I think not with your two tables....

##### Share on other sites

~~~ updated ~~~

Packeged (kgm + kgm unpacked + kg + tutorial). Hope someone finds it useful.

P.S: More tutorials on other targets will come soon.

package.7z

Edited by ChOoKi
• 5
##### Share on other sites

thx ChOoKi waiting i see all people just solve keygenmes and no one making tutorials on how to i am sure some people will like to see tutorials

##### Share on other sites

thanks bro ChOoKi