Jump to content
Tuts 4 You

[Keygenme] XorRanger's KeygenMe 1


XorRanger

Recommended Posts

Hello All,


This is My First KeygenMe in Delphi


Solution: Only Keygens Are Allowed.


Language: Delphi


Packer: UPX. Simply Use "upx -d " to Decompress


Cryptos: None. {I Really Hate Cryptos} :winks:


Level: You Decide.


Please Solve. Thanks


Could One Of The Mods Help Me Attach The File. I Am Having Issues Attaching it to The Forum.


 


http://up.ht/1bdwSXM


Edited by XorRanger
  • Like 1
Link to comment

@XorRanger

Awesome Job SReg,

Please One Question?

How Did You Know I Used This Particular Function.

function GetUN: string;const   cnMaxUserNameLen = 254;var   sUserName: string;   dwUserNameLen: DWORD;begin   dwUserNameLen := cnMaxUserNameLen - 1;   SetLength(sUserName, cnMaxUserNameLen);   GetUserName(PChar(sUserName), dwUserNameLen);   SetLength(sUserName, dwUserNameLen);   Result := sUserName;end;function HDD: string;var VolumeName, FileSystemName : array [0..MAX_PATH-1] of Char; VolumeSerialNo : DWord; MaxComponentLength, FileSystemFlags : DWORD;begin GetVolumeInformation(pchar('C:\'), VolumeName, MAX_PATH, @VolumeSerialNo, MaxComponentLength, FileSystemFlags, FileSystemName,MAX_PATH); result := IntToHex(VolumeSerialNo,8);end;
Link to comment

Nice One Sama.
Thanks For Attempting.

I Hope One Day One Would Be Able to Code in ASM Like You.

Edited by XorRanger
Link to comment

@ ChOoki,


I Knew This Would Be a Piece Of Cake For You.


Nice Keygen I Must Confess and Really Funny Of You to ReUse The Chiptune. :king:


Edited by XorRanger
Link to comment

Something tells me that XorRanger wont be getting his answers this year :prop:. Here are things a fortune teller might say:



CALL <JMP.&advapi32.GetUserNameA>                         ;  GetUserNameA


.....


MOV AL,63


CALL <JMP.&KERNEL32.GetVolumeInformationA>                ;  GetVolumeInformationA


.....


And as an added bonus:


CALL <JMP.&KERNEL32.FindResourceA>                        ;  FindResourceA


ResourceName = "Kernel32"


ResourceType = RT_RCDATA



 


:peace:


Edited by ChOoKi
  • Like 1
Link to comment

Something tells me that XorRanger wont be getting his answers this year :prop:. Here are things a fortune teller might say:

 

:peace:

Thanks a Lot For Your Answer.

Link to comment

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