Jump to content
Tuts 4 You

[keygenme] KGM 5 by VESA [Simple]


Recommended Posts

Posted

Hey guys,

This is too simple, so plz just make keygen... don't post any serial ! B)

Cheerz

KGM5.rar

Posted

here is my C source and keygen Compiled by Pelles C :

makeserial(HWND hWnd)
{
char szname[50]="",szserial[1024]="";long int s=0;
int m;GetDlgItemText(hWnd,4004,szname,50);
m=lstrlen(szname);
if (m>0)
{
s=((m*0x0BA2CD0)/2)+0x200;
wsprintf(szserial,"%x",s); SetDlgItemText(hWnd,4005,szserial);
}
else if (m<1)
{
SetDlgItemText(hWnd,4005,"Enter More Char ...");
SetFocus(GetDlgItem(hWnd,4004));
}
return 0;
}

keygen attached ;)

Bye , GioTiN - Under SEH Team

Keygen.rar

Posted (edited)

tnx guys...

Edited by VESA
  • 6 months later...
Posted (edited)

I am a bit late but anyway, here is my KG:

Edited by thanos713
  • 3 weeks later...
Posted (edited)

Keygen in one string ;)


ULONG nLen = (GetDlgItemText(hWnd, IDC_EDIT1, lpName, 25) * 0x0BA2CD0 >> 1) + 0x200;

keygen.rar

Edited by Coderess
  • 5 weeks later...
Posted (edited)

Heres my solution, I did'nt bother uploading a exe keygen because there are so many already, instead ill just paste my source, which is a asm rip :)


procedure TForm1.Button1Click(Sender: TObject);
var
iTmp: Integer;
beginiTmp:= length(edit1.Text);asm
mov eax,iTmp
imul eax,eax,$0ba2cd0
sar eax,1
add eax,$200
push eax
mov iTmp, eax
end;edit2.text:= AnsiLowerCase(inttohex(iTmp,1));end;

Thanks for the easy keygenme, I like easy ones ;)

Edited by Departure
Posted (edited)

Thank you,

this one of my first keygens.

KEYgen.rar

Edited by grizzmo
  • 2 months later...
Posted

lol even i can do this BTW ive been RCE only 2 days doing every tut here for like 12 hours lol

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...