动网论坛,站长建站首选,国内使用量最多的论坛软件 动网论坛官方技术讨论区 站长工具 申请属于您自己的免费论坛
首页 | 新闻资讯 | 网站运营 | 网络编程 | 数据库 | 服务器 | 网页设计 | 图像媒体 | 网络应用 | 搜索优化 | 资源下载 | 动网主机 | DVBOX
    本站内  互联网 ASP论坛  ASP.Net论坛  PHP论坛
   安全 → 阅读文章

 《 AceReader V4.5》 破文+注册机源码.TXT

作者来源: 
阅读 810 人次 , 2006-4-26 15:24:00 

目标软件: AceReader V4.5
软件介绍:
为改进你的阅读技巧,AceReader包含两种模式:眼扫描训练模式和中心文本模式。 在眼扫描训练模式中,文本从显示区域卷绕穿过,迫使你的眼睛象正常阅读那样移动。 该软件可以作为一种教学工具来使用,通过设置在更高的速度档上的练习,可以使你不论在计算机上还是在书本上都能提高阅读速度。软件能通过不同等级水平的阅读理解来跟踪你的进度。AceReader可以帮你抛弃每个词都在脑子里发音的阅读习惯,从而从整体上改进你的阅读技巧和速度。在中心文本模式中,文本显示在文本区的中央。这种模式可作为一种高效率的阅读工具来使用,从而使阅读更加容易和迅速,因为你的视线无需移动。你可以用该软件作快速阅读、略读文档中或剪贴板上的文字。AceReader的设计是面向所有年龄段的用户的,从需要在现在这个信息时代阅读得更加迅速的繁忙的行政人员,到刚刚学会怎样读书的小孩子都可以使用它。

破解过程:
Hmemcpy,设断,易来到:

PUSH EBX
PUSH ESI
PUSH EDI
MOV [EBP-04],ECX
MOVSX EAX,BYTE [EBP+0C] //查表。
MOV ECX,09 //0x9 送入 ECX。
ADD EAX,BYTE +02 //ECX+0x2。
CDQ
IDIV ECX //除以ECX。
MOV EAX,[EBP+08] //用户名送入EAX。
MOVSX EAX,BYTE [EAX] //取用户名的第一位。
MOV ECX,0B //0xB 送入 ECX。
LEA EAX,[EAX+EDX+08] //EAX+EDX+08 的值保存到 EAX。
CDQ
IDIV ECX //除以ECX。
LEA EAX,[EDX+70] //EDX+0x70 的值保存到EAX。
MOV ECX,[EBP+10] //EBP+0x10 的值送入ECX。
MOV [ECX],AL //AL 的值日送入 ECX。
MOVSX EAX,BYTE [EBP+0C] //查表。
MOV ECX,05 //0x5 送入 ECX。
ADD EAX,BYTE +09 //EAX+0x9。
CDQ
IDIV ECX //除以ECX。
MOV EAX,[EBP+08] //用户名送入EAX。
MOVSX EAX,BYTE [EAX+01] //取用户名的第二位。
LEA EAX,[EAX+EDX+2C] //将 EAX+EDX+2C 的值保存到 EAX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与 0x7 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +41 //EAX+0x41。
MOV ECX,[EBP+10] //EBP+0x10 的值送入ECX。
MOV [ECX+01],AL //AL 的值日送入 ECX+0x1 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
MOV ECX,03 //0x3 送入 ECX。
ADD EAX,BYTE +09 //EAX+0x3。
CDQ
IDIV ECX //除以ECX。
MOV EAX,[EBP+08] //将用户名送入EAX。
MOVSX EAX,BYTE [EAX+02] //取用户名第三位。
ADD EAX,EDX //EAX+EDX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与 0x7 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +32 //EAX+0x32。
MOV ECX,[EBP+10] //EBP+10 处的值送入 ECX。
MOV [ECX+02],AL //将 AL 的值送入 ECX+0x2 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
ADD EAX,BYTE +04 //EAX+0x4。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与 0x7 做与运算。
XOR EAX,EDX //EAX 与 ECX 做异或运算。
SUB EAX,EDX //EAX-EDX。
MOV ECX,[EBP+08] //用户名送入 ECX。
MOVSX ECX,BYTE [ECX+03] //取用户名的第四位。
MOV EBX,05 //将 Ox5 送入EBX。
LEA EAX,[ECX+EAX+02] //将 ECX+EAX+02 的值保存到 EAX。
CDQ
IDIV EBX //除以 EBX。
LEA EAX,[EDX+4A] //EDX+0x4A 的值保存到 EAX。
MOV ECX,[EBP+10] //EBP+10 处的值送入 ECX。
MOV [ECX+03],AL //将 AL 的值送入 ECX+03 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
MOV ECX,06 //将 0x6 送入 ECX。
ADD EAX,BYTE +03 //EAX+0x3。
CDQ
IDIV ECX //除以ECX。
MOV EAX,[EBP+08] //用户名送入 EAX。
MOVSX EAX,BYTE [EAX+04] //取用户名的第五位。
MOV ECX,0B //将 0xB 送入 ECX。
LEA EAX,[EAX+EDX+07] //将 EAX+EDX+07 的值保存到 EAX。
CDQ
IDIV ECX //除以 ECX。
LEA EAX,[EDX+61] //将 EDX+61 的值保存到 EAX。
MOV ECX,[EBP+10] //将 EBP+10 的值送入 ECX。
MOV [ECX+04],AL //将 AL 送入 ECX+04 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
ADD EAX,BYTE +06 //EAX+0x6。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与 0x7 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
MOV ECX,[EBP+08] //用户名送入 ECX。
MOVSX ECX,BYTE [ECX+05] //取用户名的第六位。
LEA EAX,[ECX+EAX+07] //将 ECX+EAX+07 的值保存到 EAX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与0x7 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +32 //EAX+0x32。
MOV ECX,[EBP+10] //将 EBP+10 处的值送入 ECX。
MOV [ECX+05],AL //将 AL 的值送入 ECX+05 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
ADD EAX,BYTE +04 //EAX+0x4。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +03 //EAX 与 0x3 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
MOV ECX,[EBP+08] //用户名送入 ECX。
MOVSX ECX,BYTE [ECX+06] //取用户名第七位。
LEA EAX,[ECX+EAX+01] //将 ECX+EAX+01 的值保存到 EAX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +01 //EAX 与0x1 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +6D //EAX+0x6D。
MOV ECX,[EBP+10] //将 EBP+10 出的值送入 ECX。
MOV [ECX+06],AL //将 AL 的值送入 ECX+06 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
MOV ECX,09 //0x9 送入 ECX。
ADD EAX,BYTE +09 //EAX+0x9。
CDQ
IDIV ECX //除以 ECX。
MOV EAX,[EBP+08] //用户名送入 EAX。
MOVSX EAX,BYTE [EAX+07] //取用户名第八位。
LEA EAX,[EAX+EDX+03] //将 EAX+EDX+03 的值保存到 EAX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +07 //EAX 与 0x7 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +32 //EAX+0x32。
MOV ECX,[EBP+10] //将 EBP+10 处的值送入 ECX。
MOV [ECX+07],AL //将 AL 的值送入 ECX+07 处。
MOVSX EAX,BYTE [EBP+0C] //查表。
INC EAX //EAX+1。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +03 //EAX 与 0x3 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
MOV ECX,[EBP+08] //用户名送入 ECX。
MOVSX ECX,BYTE [ECX+08] //取用户名第九位。
LEA EAX,[ECX+EAX+09] //将 ECX+EAX+09 的值保存到 EAX。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +01 //EAX 与 0x1 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
ADD EAX,BYTE +6D //EAX+0x6D。
MOV ECX,[EBP+10] //将 EBP+10 处的值送入 ECX。
MOV [ECX+08],AL //将 AL 的值送入 ECX+08。
MOVSX EAX,BYTE [EBP+0C] //查表。
ADD EAX,BYTE +08 //EAX+0x8。
CDQ
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
AND EAX,BYTE +01 //EAX 与 0x1 做与运算。
XOR EAX,EDX //EAX 与 EDX 做异或运算。
SUB EAX,EDX //EAX-EDX。
MOV ECX,[EBP+08] //用户名送入 ECX。
MOVSX ECX,BYTE [ECX+09] //取用户名第十位。
MOV EBX,0B //将 0xB 送入 EBX。
LEA EAX,[ECX+EAX+0D] //将 ECX+EAX+0D 的值保存到 EAX。
CDQ
IDIV EBX //除以 EBX。
LEA EAX,[EDX+50] //将 EDX+0x50的值保存到EAX。
MOV ECX,[EBP+10] //将 EBP+10 处的值送入 ECX。
MOV [ECX+09],AL //将 AL 的值送入 ECX+0x09 处。
MOV EAX,[EBP+10] //将 EBP+0x10 处值送入 EAX。
MOV BYTE [EAX+0A],00
JMP 0041BB52
POP EDI
POP ESI
POP EBX
LEAVE
RET 0C //返回。(仅写出关键部分,其余代码略)


VB6 注册机源码:

Dim User_Name As String
Dim Base, CDQ, Mod_Number, SN_1, SN_2, SN_3, SN_4, SN_5, SN_6, SN_7, SN_8, SN_9, SN_10 As Integer

Private Sub Command1_Click()
About_message = MsgBox("This keygen made by fengma(fengma@2911.net) !", 4096 + vbExclamation, "About...")
End Sub

Private Sub Command2_Click()
If Command2.Caption = "Get now !" Then

If Len(Text1.Text) = 0 Then
message_enter_name = MsgBox("Use a name of at least 1 Char,please !", 4096 + vbExclamation, "Information")
Exit Sub
End If

User_Name = Text1.Text

CDQ = 0

Base = 1

SN_1 = ((Base + 2) Mod 9 + Asc(Mid$(User_Name, 1)) + 8) Mod 11 + 112

Mod_Number = (Base + 9) Mod 5
If Mid$(User_Name, 2) <> "" Then
SN_2 = ((((((Asc(Mid$(User_Name, 2)) + Mod_Number + 44) Xor Mod_Number) - Mod_Number) And 7) Xor Mod_Number) - Mod_Number) + 65
Else
SN_2 = ((((((Mod_Number + 44) Xor Mod_Number) - Mod_Number) And 7) Xor Mod_Number) - Mod_Number) + 65
End If

Mod_Number = (Base + 9) Mod 3
If Mid$(User_Name, 3) <> "" Then
SN_3 = (((((Asc(Mid$(User_Name, 3)) + Mod_Number Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
Else
SN_3 = (((((Mod_Number Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
End If

Mod_Number = ((((((Base + 4) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ)
If Mid$(User_Name, 4) <> "" Then
SN_4 = ((Asc(Mid$(User_Name, 4)) + Mod_Number + 2) Mod 5) + 74
Else
SN_4 = ((Mod_Number + 2) Mod 5) + 74
End If

If Mid$(User_Name, 5) <> "" Then
SN_5 = (Asc(Mid$(User_Name, 5)) + (Base + 3) Mod 6 + 7) Mod 11 + 97
Else
SN_5 = ((Base + 3) Mod 6 + 7) Mod 11 + 97
End If

Mod_Number = (((((Base + 6) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ
If Mid$(User_Name, 6) <> "" Then
SN_6 = ((((((Asc(Mid$(User_Name, 6)) + Mod_Number + 7) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
Else
SN_6 = ((((((Mod_Number + 7) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
End If

Mod_Number = ((((Base + 4) Xor CDQ) - CDQ) And 3) Xor CDQ - CDQ
If Mid$(User_Name, 7) <> "" Then
SN_7 = ((((((Asc(Mid$(User_Name, 7)) + Mod_Number + 1) Xor CDQ) - CDQ) And 1) Xor CDQ) - CDQ) + 109
Else
SN_7 = ((((((Mod_Number + 1) Xor CDQ) - CDQ) And 1) Xor CDQ) - CDQ) + 109
End If

Mod_Number = (Base + 9) Mod 9
If Mid$(User_Name, 8) <> "" Then
SN_8 = ((((((Asc(Mid$(User_Name, 8)) + Mod_Number + 3) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
Else
SN_8 = ((((((Mod_Number + 3) Xor CDQ) - CDQ) And 7) Xor CDQ) - CDQ) + 50
End If

Mod_Number = (((((Base + 1) Xor CDQ) - CDQ) And 3) Xor CDQ) - CDQ
If Mid$(User_Name, 9) <> "" Then
SN_9 = ((((((Asc(Mid$(User_Name, 9)) + Mod_Number + 9) Xor CDQ) - CDQ) And 1) Xor CDQ) - CDQ) + 109
Else
SN_9 = ((((((Mod_Number + 9) Xor CDQ) - CDQ) And 1) Xor CDQ) - CDQ) + 109
End If

Mod_Number = (((((Base + 8) Xor CDQ) - CDQ) And 1) Xor CDQ) - CDQ
If Mid$(User_Name, 10) <> "" Then
SN_10 = ((Asc(Mid$(User_Name, 10)) + Mod_Number + 13) Mod 11) + 80
Else
SN_10 = ((Mod_Number + 13) Mod 11) + 80
End If

Text2.Text = Chr(SN_1) + Chr(SN_2) + Chr(SN_3) + Chr(SN_4) + Chr(SN_5) + Chr(SN_6) + Chr(SN_7) + Chr(SN_8) + Chr(SN_9) + Chr(SN_10)
With Command2
.SetFocus
.Font = Tahoma
.Caption = "Bye !"
End With

Else
End
End If

End Sub

小菜鸟,不足之处请高手指点!
  
 
 收藏本文  打印本文  论坛讨论  关闭窗口
· 上一篇:*出租销售系统 5.6--算法分析 下
· 下一篇:文件分割器的算法 上
· 计算机病毒的新特点
· SOLARIS下SSH的安装和自动运行
· 专家揭秘“身份盗窃” 给出预防措施
· 入侵检测方法和缺陷
· Linux操作系统下防垃圾邮件基本功


关于本站 | 联系我们 | 业务合作 | 客户案例 | 诚聘英才 | 广告合作 | 收藏本站
海口动网先锋网络科技有限公司版权所有
Copyright © 2000 - 2006 Cndw.Com
中华人民共和国电信与信息服务业务经营许可证编号 琼 ICP 020077