| View previous topic :: View next topic |
| Author |
Message |
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
 Posted: Sat Mar 29, 2003 1:27 am Post subject: kk |
 |
|
thanks - ACE
I will keep thoses in mind 
_________________
Have a nice day |
|
| Back to top |
|
 |
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Sat Mar 29, 2003 3:15 am Post subject: |
|
|
well good news and bad news
i have the ini type of file working (that is the good news) BUT i can't get the subtract code to work...grrrrrrrr (this is the bad news)
anyways the reg write commads i can't get to work all i should be able to do is just replace the ini with the reg write code right?
any tips on writting to reigsters?
thanks
_________________
Have a nice day |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Sat Mar 29, 2003 3:20 am Post subject: |
|
|
ohhh and is:
| Code: |
@EQUAL(<string1>,<string2> {, EXACT})
|
i'am trying to make it so if its 0 runs left goto to a label...for some reason i can't get this to work to
_________________
Have a nice day |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Sat Mar 29, 2003 3:24 am Post subject: ahhhhh |
|
|
ahhhh duhhhh maybe using this would help
| Code: |
IF @ZERO(%V)
INFO Result is zero.
END
|
sorry
_________________
Have a nice day |
|
| Back to top |
|
|
tim6389
Professional Member
Joined: 01 Aug 2002
Posts: 790
|
| Posted: Sat Mar 29, 2003 6:21 am Post subject: |
|
|
here is code
yea i know this is not the best BUT its a start....again if any one makes it better please post here OR if you find a bug.....just make the serial number BE 0 when decryted so if they del the ini file it will make one with a value of 0
I will post keygen for this when i get it done
| Code: |
OPTION ERRORTRAP, error
title tim run test
EXTERNAL @WINDIR(S)\vdsinout.dll
%%Pass = 7B754A8E
INIFILE OPEN,@WINDIR(S)\runone1.ini
%%serial = @INIREAD(runone,key)
if %%serial
%%nothing = nothing
else
%%key = "858969A2"
INIFILE OPEN,@WINDIR(S)\runone1.ini
INIFILE WRITE,runone,key,"858969A2"
end
INIFILE OPEN,@WINDIR(S)\runone1.ini
%%serial = @INIREAD(runone,key)
info %%serial
%d = @io(DECSTR,%%serial,%%pass)
%c = @DIFF(%d,1000)
IF @ZERO(%C)
:error
INFO NO more runs left
exit
END
%z = @DIFF(%c,1)
%m = @FADD(%z,1000)
%%out = @io(ENCSTR,%m,%%pass)
INIFILE OPEN,@WINDIR(S)\runone1.ini
INIFILE WRITE,runone,key,%%out
info hello YOU have %Z runs left
:close
exit
|
_________________
Have a nice day |
|
| Back to top |
|
|
DW
Contributor
Joined: 21 Mar 2003
Posts: 175
Location: UK
|
| Posted: Fri Apr 04, 2003 8:43 pm Post subject: |
|
|
| im not so smart when it comes to encription or anything like that but wouldnt a brute force program make easy work of that way of encription? |
|
| Back to top |
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You can attach files in this forum
You can download files in this forum
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
@vdsworld