LiquidCode Moderator Team
Joined: 05 Dec 2000 Posts: 1751 Location: Space and Time
|
Posted: Wed May 04, 2011 3:11 pm Post subject: Easy Registration Code |
|
|
I use a variation this of the in a few of my programs and it works well. It ties the registration to the serial of the HD that the software is installed on.
The string returned would be unique to the HD. You can change it up by putting dashes in or reversing the string. If you use VDS 6 you can use CRC instead of MD5 also.
Code: |
:CheckReg
%%drv = @substr(%0,1,1)
%%hd2 = @encrypt(@volinfo(%%drv,Z)"YourExtraProtectionString")
%%md5 = @encrypt(%%hd2,MD5)
if @equal(%1,%%md5)
exit %%md5
end
Exit
|
_________________ Chris
Http://theblindhouse.com |
|