hey all here is another nice keygen source for deurus crackme#1 by me

here is keygenme link :

http://crackmes.de/users/deurus/crackme01/

here is Keygen Source in ASM Language :

.data?
szname		db	512 Dup(?)
buf		db	512 Dup(?)
buf3		db	512 Dup(?)
s1	dd	?generate proc  hWin:HWND    		invoke GetDlgItemText,hWin,1001,addr szname,512
		test eax,eax
		je error
	    MOV EAX,offset szname
        PUSH EAX
        call lstrlen 
        MOV ESI,EAX
        TEST ESI,ESI
        JLE @Crackme_0044DE3A  
        MOV DWORD PTR DS:[s1],0@Crackme_0044DDC5:
        PUSH EAX
        MOV ECX,1    
        MOV EAX,s1
        XOR ECX,ECX
        MOV CL,BYTE PTR DS:[szname+eax]
        MOV EAX,001Ah
        XOR EAX,ECX
        ADD EBX,EAX
        MOV EAX,0005h
        PUSH EAX
        MOV EAX,ECX
        POP EDX
        MOV EDI,EDX
        CDQ
        IDIV EDI
        ADD EBX,EDX
        MOV EAX,07DAh
        XOR ECX,EAX
        ADD EBX,ECX
        invoke wsprintf,addr buf,chr$("%d-"),EBX
        invoke lstrcat,addr buf3,addr buf
        invoke RtlZeroMemory,addr buf,sizeof buf
        INC DWORD PTR DS:[s1]
        invoke lstrlen,addr szname
        cmp s1,eax
        JNZ @Crackme_0044DDC5		@Crackme_0044DE3A:        invoke RtlZeroMemory,addr buf,sizeof buf
        invoke lstrlen,addr szname
        invoke wsprintf,addr buf,chr$("%d"),eax		invoke lstrcat,addr buf3,addr buf	invoke SetDlgItemText,hWin,1009,addr buf3
	ret	error:
	invoke SetDlgItemText,hWin,1009,NULL
	RET
generate EndP

Good luck ,

GioTiN ^ UST

Good Job GioTiN!

I attach the crackme for fun