| View previous topic :: View next topic |
| Author |
Message |
SnarlingSheep
Professional Member
Joined: 13 Mar 2001
Posts: 759
Location: Michigan
|
 Posted: Tue Mar 25, 2003 8:57 pm Post subject: |
 |
|
Here's a basic example of how you might try it.
| Code: |
EXTERNAL @WINDIR(S)\vdsinout.dll
%%Pass = Test
%%Name = User Name
%%Drive = @VOLINFO(C,Z)
REM Make Serial
%%DriveEnc = @io(ENCSTR,%%Drive,%%Pass)
%%Serial = @IO(ENCSTR,%%Name,%%Pass)-@IO(ENCSTR,%%DriveEnc,%%Pass)
INFO Info:@CHR(10)@CHR(13)%%Name@CHR(10)@CHR(13)%%Drive
INFO Serial:@CHR(10)@CHR(13)%%Serial
REM Decrypt Info.
OPTION FIELDSEP,"-"
PARSE "%%SerialName;%%SerialDrive",%%Serial
%%SerialNameDec = @IO(DECSTR,%%SerialName,%%Pass)
%%SerialDriveDec = @IO(DECSTR,%%SerialDrive,%%Pass)
%%SerialDriveDec = @IO(DECSTR,%%SerialDriveDec,%%Pass)
INFO Decrypted Info:@CHR(10)@CHR(13)%%SerialNameDec@CHR(10)@CHR(13)%%SerialDriveDec
REM Test Different Drive Serial
%%Drive2 = -23653789
%%Drive2Enc = @io(ENCSTR,%%Drive2,%%Pass)
%%Serial2 = @IO(ENCSTR,%%Name,%%Pass)-@IO(ENCSTR,%%Drive2Enc,%%Pass)
IF @EQUAL(%%Serial,%%Serial2)
INFO Serials Match@CHR(10)@CHR(13)%%Serial@CHR(10)@CHR(13)%%Serial2
ELSE
INFO Serials Do Not Match@CHR(10)@CHR(13)%%Serial@CHR(10)@CHR(13)%%Serial2
END
|
_________________
-Sheep
My pockets hurt... |
|
| Back to top |
|
 |
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Tue Mar 25, 2003 9:50 pm Post subject: |
|
|
WOW - i wouldn't have came close to that 
i'am trying to find out how that scripts works.....i run that script and i get "Serials Do Not Match" i see it compares Serial,Serial2 and it looks to me that one part of the code would be the keygen...all i can say is wow i wouldn't have gotten that in a million years i will play with it to see what i can mess-up...hehhehe
thanks
_________________
Have a nice day  |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Tue Mar 25, 2003 11:30 pm Post subject: |
|
|
SnarlingSheep - can you explain what some of this code is doing? the part i don't get it that drive2?
| Code: |
%%Drive2 = -23653789
|
what is this in there for?
thanks
_________________
Have a nice day |
|
| Back to top |
|
|
SnarlingSheep
Professional Member
Joined: 13 Mar 2001
Posts: 759
Location: Michigan
|
| Posted: Wed Mar 26, 2003 12:05 am Post subject: |
|
|
%%Drive2 is really just random numbers, but in the actual program that would be where you make sure the current drive serial matches the one from the program's serial.
_________________
-Sheep
My pockets hurt... |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Wed Mar 26, 2003 12:33 am Post subject: |
|
|
hummmm kk i think i follow you
thanks
_________________
Have a nice day |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Wed Mar 26, 2003 2:49 am Post subject: |
|
|
ok
i'am right saying that the first part of that code would be the keygen part? part to make the serial number for the user?
_________________
Have a nice day |
|
| Back to top |
|
|
SnarlingSheep
Professional Member
Joined: 13 Mar 2001
Posts: 759
Location: Michigan
|
| Posted: Wed Mar 26, 2003 2:52 am Post subject: |
|
|
Yeah, that part that says "REM Make Serial" shoulda told you that 
_________________
-Sheep
My pockets hurt... |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Wed Mar 26, 2003 2:52 am Post subject: |
|
|
lol
i didn't even see that.... 
sorry
_________________
Have a nice day |
|
| Back to top |
|
|
cnodnarb
Professional Member
Joined: 11 Sep 2002
Posts: 768
Location: Eastman, GA
|
| Posted: Wed Mar 26, 2003 4:41 am Post subject: |
|
|
You guys have a pretty kick butt ideal there if I understand correctly...which I probably don't but here's my interpretation...
You have a generic key they recieve, the program reads there information one time and sets a flag that is has been initialized and modifies the key according to the system information where it cannot be used on another computer?
Is that where your going...i'm interested in the concept but i'm not understanding the code examples because I don't use VDS 4 ;-(
NodNarb |
|
| Back to top |
|
|
SnarlingSheep
Professional Member
Joined: 13 Mar 2001
Posts: 759
Location: Michigan
|
| Posted: Wed Mar 26, 2003 4:57 am Post subject: |
|
|
Which part of my code was for VDS 4 only?
The idea is for the users harddrive serial to be part of their program registration.
Honestly, I'm not sure this adds anymore protection to your registration method. If it's deciphered then just like any other registration method it won't be much good.
On the other hand, an encrypted harddrive serial is one more hurdle for a cracker to jump.
I know some programs use this type of method, not sure of how much more effective it is though. Can't hurt.
_________________
-Sheep
My pockets hurt... |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Wed Mar 26, 2003 6:44 am Post subject: well |
|
|
well i took some of that code and tried to make a key gen....BUT I'am having problem with this:
| Code: |
%%Name = @dlgtext(name)
|
it don't put anything in there meaning in the main string
this one:
| Code: |
%%Serial = @IO(ENCSTR,%%Name,%%Pass)-@IO(ENCSTR,%%DriveEnc,%%Pass)
|
and yes i have a dlgtest for pass to when i do a info it just shows -
BUT the more i play with this code the more i start to understand what is going on...i hope heheheheh
thanks
_________________
Have a nice day |
|
| Back to top |
|
|
FreezingFire
Admin Team
Joined: 23 Jun 2002
Posts: 3508
|
| Posted: Wed Mar 26, 2003 8:11 pm Post subject: |
|
|
| cnodnarb wrote: | | Is that where your going...i'm interested in the concept but i'm not understanding the code examples because I don't use VDS 4 ;-( |
It looks like it would be compatible with both VDS 3 and 4 (correct me if
I'm wrong) but the INOUT functions/commands are used by the VDSINOUT.DLL
_________________
FreezingFire
VDSWORLD.com
Site Admin Team |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
@vdsworld