-
-
[原创]CuteSnail's KeygenMe 1.0 版本[下载]
-
发表于: 2009-4-13 23:13
-
[招生]科锐逆向工程师培训(2024年11月15日实地，远程教学同时开班, 第51期)
|
|
|---|---|
|
|
|
|
|
|
|
|
[QUOTE=KazamaRen;606384]Name长度小于3的没看。
Name与Code长度相同 for (int i=0;i<len;i++) Code[i]=Name[i]+2*(i+1);[/QUOTE] LS的可以说清楚点么，你的Code是字符数组还是CString啊！要是CString的话好像不支持这样的格式啊，先前就遇过这样的问题还没解决，请大牛指教！同时也送上一个DELPHI+KOL注册机！  
|
|
|
两个强淫~
这样说来注册名长度不能小于2呀！
|
|
|
楼主真是小气,连程序用什么来编译都不肯说!晕!
|
|
|
用 Free Pascal 在 Dev-Pas 环境下写的，才练手，不足之处还请包涵呀
|
|
|
|
|
|
谢谢楼主告之,看看Free Pascal.实在佩服LZ的强大,菜鸟不动WIDOWS编程;只会DOS的显丑陋了:
program CC; var name:string; code:string; i:integer; BEGIN write('Name: '); readln(name); for i:=1 to ord(name[0]) do begin code := code + chr(ord(name[i])+2*i); end; writeln('Code: ',code); readln; END. |
|
|
|
|
|
万分期待你的巨作!
|
|
|
|
