首页
社区
课程
招聘
[旧帖] [原创]启明英语口语计算机考试系统——单机版本算法分析及Delphi注册机 0.00雪花
发表于: 2008-1-15 16:33 16091

[旧帖] [原创]启明英语口语计算机考试系统——单机版本算法分析及Delphi注册机 0.00雪花

2008-1-15 16:33
16091
本文已经被作者屏蔽于看雪论坛,详情请看博客:
http://hi.baidu.com/beyond0769/blog/category/Cracking%20For%20Fun

[培训]内核驱动高级班,冲击BAT一流互联网大厂工作,每周日13:00-18:00直播授课

收藏
免费 0
支持
分享
最新回复 (26)
雪    币: 207
活跃值: (12)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
呵呵!你也是大牛啊!
精华好象无缘,国产软件是个敏感话题!
看雪已经改行搞加密了!
2008-1-15 17:25
0
雪    币: 259
活跃值: (10)
能力值: ( LV8,RANK:130 )
在线值:
发帖
回帖
粉丝
3
分析的不错,支持,可惜现在国产软件不能加精了,呵呵
2008-1-15 17:47
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
4
不加精也无所谓,都只是兴趣!!
2008-1-15 19:06
0
雪    币: 182
活跃值: (55)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
5
s := '0000000000';
CopyMemory(@s[11 - length(RegCode)],@RegCode[1],length(RegCode));
RegCode := s;
2008-1-15 19:16
0
雪    币: 557
活跃值: (10)
能力值: ( LV8,RANK:130 )
在线值:
发帖
回帖
粉丝
6
详细  学习
2008-1-15 19:21
0
雪    币: 400
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
学习一下...难得有人分享.
2008-1-15 19:33
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
8
学习了,不过不太明白呀
2008-1-15 19:54
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
9
[QUOTE=pathletboy;405974]s := '0000000000';
CopyMemory(@s[11 - length(RegCode)],@RegCode[1],length(RegCode));
RegCode := s;[/QUOTE]

谢谢Pathletboy的提示,正在尝试……
2008-1-15 21:02
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
ltr
10
很详细...
2008-1-16 10:58
0
雪    币: 212
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
没有精华了啊
这样的文章不加精华真是遗憾了
很有意义的一篇文章,自己心里自动精华了
希望老大能把文章加入论坛精华里面,虽然本来没有个精字
2008-1-16 12:01
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
12
谢谢这位朋友的认可!!
毕竟网上要求破这个软件的人很多,有破解过的,但也只停留在爆破层面
要不我才不会花一个月时间去弄它。只要大家接受,我就满足啦!!贵在学习
2008-1-16 14:40
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
13
更改错漏
_____________________________________________________________
第三步:验证注册正确性
        1. 调用GetVolumeInformation函数获得硬盘序列号十六进制结果,把它转化
          为十进制无字符数字型字符串,记为SN1
        2. 如果SN1长度小于10位,则添加1为第1位组成一个10位数字型字符串记为SN2
_______________________________________________________________
      第2步应该是:在SN1的前面添加1,再截取前10位为SN2。
    因此,源代码部分需要修改,这里不再呈现,有兴趣的朋友可以自行更新。OVER
2008-1-17 12:08
0
雪    币: 242
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
14
谢谢分享,学习中。。。
2008-1-18 17:32
0
雪    币: 414
活跃值: (531)
能力值: ( LV9,RANK:170 )
在线值:
发帖
回帖
粉丝
15
[QUOTE=pathletboy;405974]s := '0000000000';
CopyMemory(@s[11 - length(RegCode)],@RegCode[1],length(RegCode));
RegCode := s;[/QUOTE]

regcode:=rightstr('0000000000'+S,10);
2008-1-18 18:48
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
16
这位朋友的想法不错,但是注册机最好是纯API写,rightstr函数用了StrUtils单元。
那样大大增加文件体积。不过还是非常感谢大家的分享!!
2008-1-18 21:04
0
雪    币: 347
活跃值: (25)
能力值: ( LV9,RANK:420 )
在线值:
发帖
回帖
粉丝
17
爆破真的比较简单

算法注册机并不完美,但是我也解决不了

观望,期待高人放出完美注册机
2008-1-18 21:06
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
18
注册机已经做出来了,可以用哦。
http://hi.baidu.com/beyond0769/blog/item/deaca208267f56d563d9860c.html
2008-1-18 21:22
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
19
多谢楼主的分析,我还有一些看不明白:"4. 再以 MorningstarSPK + 机器码 + SN3 的形式组合新的字符串,记为SN4.      5. 对SN4进行标准的MD5加密,结果记忆为 SN5;" 请问 :MorningstarSPK 是什么意思,还有,如何"进行标准的MD5加密"?盼指教!
2008-3-13 22:55
0
雪    币: 1844
活跃值: (35)
能力值: ( LV3,RANK:30 )
在线值:
发帖
回帖
粉丝
20
大牛可以共享一下软件吗?让我们小菜学习一下
2008-3-13 23:44
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
21
看过楼主的qq空间,觉得你的注册机有点像内存注册机,毕竟,你没有机器码的输入。不知道对否?
2008-3-14 12:34
0
雪    币: 200
能力值: (RANK:10 )
在线值:
发帖
回帖
粉丝
22
谢谢,学习中
2008-3-14 13:10
0
雪    币: 241
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
23
或者你没有认真分析透整个算法吧?其实机器码并没有参与计算,只是发送到服务器进行登记。就好像每张手机充值卡都有一个序列号,但你只需输入后面的密码就可以充值成功。序列号只起到防止某人暴力破解,或者实现一机一码而已。
2008-3-16 19:43
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
24
要是这样的话,那么我做一个假设:有一个人买了一套产品,他就有一个可用的产品序列号和一套对应的注册码,他在一台电脑用过之后还可以在另外的电脑再注册(不通过网上注册,用已有的这一套就行!),但这明显不能,或者应该是电脑的特征码和续列号对应,不同的电脑有不同的电脑特征码,而产品序号才不参加注册过程的运算,只用于网上的登记、验证。不知道是不是这样。
2008-3-16 20:31
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
25
从楼主qq空间上的图片来看,明显是用产品序列号算注册码的,还是想不通。还是爆破简单!
2008-3-16 20:53
0
游客
登录 | 注册 方可回帖
返回
//