Jump to content
Tuts 4 You

[keygenme] KGM 5 by VESA [Simple]


Recommended Posts

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);
if (m>0)
wsprintf(szserial,"%x",s); SetDlgItemText(hWnd,4005,szserial);
else if (m<1)
SetDlgItemText(hWnd,4005,"Enter More Char ...");
return 0;

keygen attached ;)

Bye , GioTiN - Under SEH Team


Link to comment
Share on other sites

  • 6 months later...
  • 3 weeks later...
  • 5 weeks later...

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);
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
Link to comment
Share on other sites

  • 2 months later...

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...