daily pastebin goal
27%
SHARE
TWEET

Intline9 - Easy keygenme1

a guest Jun 7th, 2010 555 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Format          db      "%u",0
  2. xorBuffer       db      100 dup(0)
  3. rotBuffer       db      100 dup(0)
  4.  
  5. .data?
  6. NameBuffer      db      100 dup(?)
  7. FinalSerial     db      100 dup(?)
  8. NameLen         dd      ?
  9.  
  10. .code
  11. DoKey   proc    hWnd:DWORD
  12.  
  13. mov esi, OFFSET NameBuffer
  14. mov edi, OFFSET xorBuffer
  15. mov ecx, NameLen
  16.  
  17. xor eax, eax
  18. mov edx, 40h
  19.  
  20. xorCalc:
  21.         mov al, [esi]
  22.         xor eax, edx
  23.         mov [edi], al
  24.         inc esi
  25.         inc edi
  26.         dec ecx
  27. jnz xorCalc
  28.  
  29. xor edx, edx
  30. xor eax, eax
  31. mov esi, OFFSET xorBuffer
  32. mov edi, OFFSET rotBuffer
  33. mov ecx, NameLen
  34. mov dl, [NameBuffer]
  35.  
  36. rotCalc:
  37.         mov al, [esi]
  38.         imul eax, edx
  39.         add eax, edx
  40.         rol eax, 4
  41.         xor eax, 14h
  42.         ror eax, 4
  43.         mov [edi], al
  44.         inc esi
  45.         inc edi
  46.         dec ecx
  47. jnz rotCalc
  48.  
  49. xor eax, DWORD PTR DS:[rotBuffer]
  50. mov edx, eax
  51.  
  52.  
  53. ; Serial to screen
  54. push edx
  55. push offset Format
  56. push offset FinalSerial
  57. call wsprintf
  58.  
  59. Ret
  60. DoKey EndP
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top