首页
社区
课程
招聘
[原创]历年高考化学试题库v5.0 正式版 - 注册算法分析
发表于: 2005-6-2 02:39 6936

[原创]历年高考化学试题库v5.0 正式版 - 注册算法分析

2005-6-2 02:39
6936
【破文标题】:历年高考化学试题库v5.0 正式版 - 注册算法分析

【破文作者】:KuNgBiM[DFCG]

【作者邮箱】:gb_1227@163.com

【软件简介】:历年高考化学试题库v5.0 正式版

【软件大小】:6902 KB

【软件语言】:简体中文

【整理日期】:2005-05-31

【软件类别】:国产软件 / 共享版 / 理科工具

【发布厂商】:http://free.tcvec.js.cn/trybegin/

【下载地址】:http://free.tcvec.js.cn/trybegin/soft/gkhx5.exe

【软件介绍】:
本软件集:
   电脑评分系统  
   例题投影系统     (相当于PPT)
   题?管理系统
   试卷生成系统
于一体,还整合了网上测试 帮助你更合理,更快捷的组织试题和提取所需试题;在最短时间内完成对学生学习情况的检测,采集最新的学生反馈信息,让你在最短的时间内了解学生掌握知识的情况。组织学生进行网上测试。新增了生成图文并茂的WORD试卷文件功能。
特点:功能丰富,界面友好,操作简单,3分钟内无师自通
宗旨: 为一线化学教师减负!!

【保护方式】:NAG提示框+注册码+试用时间限制+功能限制

【编译语言】:Microsoft Visual FoxPro 6.0

【调试环境】:WinXP、PEiD、FoxTools

【破解日期】:2005-06-02

【破解目的】:研究算法分析

【作者声明】:初学Crack,只是感兴趣,没有其他目的。失误之处敬请诸位大侠赐教!

―――――――――――――――――――――――――――――――――
【破解过程】:

侦测:用PEiD查壳,无壳,Microsoft Visual C++ 5.0 [Overlay] 编译???再仔细看了看,结果是Microsoft Visual FoxPro 6.0的程序。

直捣黄龙:拿出VFP程序的终结武器:FoxTools加载反编译!并保存文件!

我们来到经FoxTools反编译后,生成的VFP源程序目录下,找到相关文件,结果找到了 S_SCR_XTZC.SCT 这个文件,然后用记事本打开:

找到下面这些代码:

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

第一部分:注册码以及版本声明部分

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

ROCEDURE Click
Rele all
zc1=alltrim(THISFORM.text1.value)
zc2=alltrim(THISFORM.text2.value)
zc3=alltrim(THISFORM.text3.value)
zc4=alltrim(THISFORM.text4.value)

USE zc &&5-12
GO 1
REPL zca with zc1,zcb with zc2,zcc with zc3,zcd with zc4
USE
***************注册码的调试***************
&&if val(zc4)/9=val(zc3)+77
*? "zcm"
*? zc4
*? "  ----"
* ? (val(zc3)-543210123456789)*3
* wait
******************************************
*int(val(zc4)/100)=int((val(zc3)+543210123454321)*3/100)         //4.6以下使用的密码

*zc4="17874253806753600"
*zc3="5374865478776870"
*? int(val(zc4)/100)
*? int((val(zc3)+583219123474321)*3/100)183209123411321,473260123410321
*wait"jjjjjjjjjj"
IF int(val(zc4)/100)=int((val(zc3)+473260123410321)*3/100)      //4.6~5.10使用的密码
        SAVE to syzbrz
        a=messagebox("注册成功,谢谢你的支持,我们将为您提供更多服务!",0+48+0,"提示")
       
ELSE
        a=messagebox("您进入的是试用版,注册为正式版可享受更多服务!",0+48+0,"提示")
        **加入各种限制,否则调P。prg
        **加入时间限制
        haszc=1
    mm=year(date())                                                            //最大使用期限为2006年
    if mm>=2006
   * messagebox("试用期已过,支持共享软件,请你注册,谢谢! ",0+48+0,"提示")   //进入程序
                ThisForm.hide
                do form s_src_zc
                wait " 按任意键将结束运行!!!"
                close all
                quit
    endif
    do s_suoding.prg
       
ENDI
Release THISFORM

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

第二部分:检测系统是否为98,是否为系统添加控件部分

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

*******************************加入ocx 注册使程序可运行在win98和winxp下***********************************

**??FILE("d:\vfp6\vfp98\richtx32.ocx")
**?? directory("d:\vfp6\vfp98")
**MD "d:\vfp5\vfp983"
IF directory("C:\WINDOWS\system32\catroot") then
  * MESSAGEBOX("ccccxp ",0+48+0,"提示")                                   // 进入程序
  SET safety off
  COPY file richtx32.ocx to c:\windows\system32\richtx32.ocx
  COPY file riched32.dll to c:\windows\system32\riched32.dll
  *copy file richtx32.ocx to d:\vfp5\vfp982\qq.ocx
ELSE

ENDIF

IF directory("d:\WINDOWS\system32\catroot") then
  *FILE("d:\windows\system32\riched32.dll")
  *FILE("d:\windows\system32\richtx32.ocx")
  *MESSAGEBOX("ddddxp ",0+48+0,"提示")                                   // 进入程序
  SET safety off
  COPY file richtx32.ocx to d:\windows\system32\richtx32.ocx
  COPY file riched32.dll to d:\windows\system32\riched32.dll
ELSE

ENDIF
***判断是否有 win98*******
IF directory("c:\windows\system\catroot") then
  *FILE("c:\windows\system\riched32.dll")
  *FILE("c:\windows\system\richtx32.ocx")
  *MESSAGEBOX("cccc98 ",0+48+0,"提示")                                   // 进入程序
  SET safety off
  COPY file richtx32.ocx to c:\windows\system\richtx32.ocx
  COPY file riched32.dll to c:\windows\system\riched32.dll
  COPY file riched20.dll to c:\windows\system\riched20.dll
  IF FILE("d:\vfp6\vfp98\richtx32.ocx") then
  
  ELSE
    IF  directory("d:\vfp6\vfp98")
      COPY file richtx32.ocx to d:\vfp6\vfp98\richtx32.ocx
    ELSE
      MD "d:\vfp6\vfp98"
      COPY file richtx32.ocx to d:\vfp6\vfp98\richtx32.ocx
    ENDIF
   
  ENDIF

ELSE

ENDIF

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

第三部分:版本获取后,注册码的计算以及注册码验证部分

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

PROCEDURE Activate
THISFORM.text1.value=''
THISFORM.text2.value=''
THISFORM.text4.value=''
Declare Integer DiskID32 In DiskID32.DLL String @, String @
a=replicate(chr(0),31)
b=replicate(chr(0),31)
retval = DiskID32( @a, @b )
jqm=left(b,at(chr(0),b)-1)
THISFORM.text3.value=allt(str(asc(subs(jqm,1,1))))+allt(str(asc(subs(jqm,2,1))))+allt(str(asc(subs(jqm,3,1))))+allt(str(asc(subs(jqm,4,1))))+allt(str(asc(subs(jqm,5,1))))+allt(str(asc(subs(jqm,6,1))))+allt(str(asc(subs(jqm,7,1))))+allt(str(asc(subs(jqm,8,1))))

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

BTW:其实我们拿着FoxTools所反编译过后的以上源程序,很快的就能知道FOX程序都做了些什么。

-------------------------------------------------------------------------------------------------------------------------

【算法总结】(所有版本注册码的计算方法)

测试的版本:注册码=(机器码 - 543210123456789)×3

4.6以下的版本:注册码=(机器码 + 543210123454321)×3

4.6~5.1.0的版本:注册码=(机器码 + 473260123410321)×3

==========================

注册信息:

用户名:KuNgBiM
机器码:5274865066867250   
注册码:17244375570832713

注册后,机器码、注册码、用户名保存在安装目录下“ZC.DBF”文件中。

--------------------------------------------------------------------------

(本文完)

版权所有(C)2005 KuNgBiM[DFCG]         Copyright (C) 2005 KuNgBiM[DFCG]

--------------------------------------------------------------------------
          Cracked BY KuNgBiM[DFCG]

                2005-06-02

                2:34:56 AM

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

收藏
免费 7
支持
分享
最新回复 (11)
雪    币: 671
活跃值: (723)
能力值: ( LV9,RANK:1060 )
在线值:
发帖
回帖
粉丝
2
支持一下,我教物理,有没有物理的,^_^
2005-6-2 08:09
0
雪    币: 235
活跃值: (191)
能力值: ( LV9,RANK:170 )
在线值:
发帖
回帖
粉丝
3
支持兄弟贴
2005-6-2 08:28
0
雪    币: 277
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
不错  好文 收藏学习
2005-6-2 09:02
0
雪    币: 300
活跃值: (521)
能力值: ( LV9,RANK:410 )
在线值:
发帖
回帖
粉丝
5
呵呵,兄弟真是高产哈.
正需要这样的注册机分析.
强烈支持~
2005-6-2 10:29
0
雪    币: 603
活跃值: (617)
能力值: ( LV12,RANK:660 )
在线值:
发帖
回帖
粉丝
6
真是涉猎广泛!
2005-6-2 11:31
0
雪    币: 214
活跃值: (15)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
7
收藏学习!
2005-6-2 11:38
0
雪    币: 221
活跃值: (137)
能力值: ( LV9,RANK:170 )
在线值:
发帖
回帖
粉丝
8
正合我意,没想到我要用的的资料,你帮我搞了。谢了
2005-6-2 12:18
0
雪    币: 328
活跃值: (925)
能力值: ( LV9,RANK:1010 )
在线值:
发帖
回帖
粉丝
9
高产!!!!
2005-6-2 12:21
0
雪    币: 389
活跃值: (912)
能力值: ( LV9,RANK:770 )
在线值:
发帖
回帖
粉丝
10
支持兄弟
2005-6-2 13:38
0
雪    币: 817
活跃值: (1927)
能力值: ( LV12,RANK:2670 )
在线值:
发帖
回帖
粉丝
11
最初由 wenglingok 发布
支持一下,我教物理,有没有物理的,^_^


兄弟在他的官方网站上去看看~~有你想要滴~~~
2005-6-2 16:02
0
雪    币: 202
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
现在已经V6版了呢
2005-8-13 12:28
0
游客
登录 | 注册 方可回帖
返回
//