bINARy ShocK
October 30th, 2001, 12:11
ive cracked the crackme#2 fromBengaly and know the algo:
a=9360 + 195(+1)
b=9555 + 196(+3)
c=9751 +199(...)
d=9950 ...
after input ("abc"

: Key= 9360(a) + 9550(b) + 9751(c)
but how can i create a keygen??? thx
stealthFIGHTER
October 30th, 2001, 15:22
procedure Keygen;
var counter : Byte;
___ Eachar, Eachar1, Temp, Temp1, Serial : Integer;
begin
__Eachar := 0;
__Eachar1 := 0;
__Temp := 0;
__Temp1 := 0;
__Serial := 0;
__for counter := 1 to length(edtName.text) do
__begin
____Eachar := Ord(edtName.text[counter]);
____Eachar1 := Eachar;
____Temp := Eachar * Eachar1;
____Serial := Serial + Temp;
____Temp1 := Eachar;
____asm
______sar Temp1, 1
____end;
____Serial := Serial + Temp1;
____Serial := Serial - Eachar;
__end;
end;
Powered by vBulletin® Version 4.2.2 Copyright © 2018 vBulletin Solutions, Inc. All rights reserved.