教你生成注册码.docx

教你生成注册码.docx

《教你生成注册码.docx》由会员分享，可在线阅读，更多相关《教你生成注册码.docx（28页珍藏版）》请在冰点文库上搜索。

教你生成注册码

教你生成注册码

第一课…………………………………………………………（02）

第二课…………………………………………………………（04）

第三课…………………………………………………………（10）

第四课…………………………………………………………（16）

第五课………………………………………………………（22

算法注册机编写---第一课

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

编者注：

　大家好，看着一些兄弟的算法破文，感觉上该写该找的算法都找到找对了，好事，现在的cracker的水平可以说走上了一个新的台阶，内存注册机的制作对大多数人来说，已经熟门熟路，驾轻就熟的。

但你写出算法的破文，想必在破解过程比追明码的要累的多，你成功的找到软件的加密算法，好，你不在是莱鸟的级别，已经进入中高级的程度。

但由于不懂算法注册机的编写，发的算法破文，配的是内存注册机，这总有点美中不足的！

怎么办，难不成要专一心重学一门语言？

这就是我发此文的目的所在，让大家在轻松的情况下达到写出算法注册机目的。

怎么样，想知道应该从哪里起步学习了吧！

你不懂编程？

没事，就写出个算法注册机而言，只应用相对的编程语言的百分之一就够了。

　晕，你懂才这样说的吧，我丁点不懂怎办？

我连什么叫VB、VC、TC等，是什么东东都根本没个慨念，学，从何学起？

！

真有这种想法的朋友，你别在日后继续你逆向学习了，这最为起码的认知都没有，你靠的什么去找注册码和算法？

所以嘛，闲话不多说了，进入正题吧！

 本篇原创作者--我要[DFCG]，版权没有，人权我有^_^所以凡转此帖的友站及各路朋友兄弟们，必注明此文出自DFCG组织及我要[DFCG]原创为先决条件，否则谢绝转帖转载。

网路本一家，但总不至于没个出处明示的吧！

感谢你的阅读！

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

一、工具篇

　就写算法注册机而言，本人推荐你使用VB去做，为何？

简单易学就是它的好处及我推荐的原因之所在根本，有兄弟说TC不更简单吗？

也许吧，世界本无绝对只有相对，或许我这莱鸟只适合这种思维的方式。

　学不学是你的自由，想学的就得需要这个工具--MicrosoftVisualBasic6.0，版本与注册机的编译关系不大，不过VB6都出来这么久了，想想还是用这个版本吧，更因为在网上有它的精简中文版，大小才6M多的，不错，要的就是它，编写注册机之类的小东东，这个精简版足矣，到此还真的要感谢开发出这个精简版的朋友。

你太好了，因为有你，所以才有我的这篇拙作。

^_^

二、了解VB6（当然以这个VB6精简版为框），你下载后就是安装，安装后在你的电脑桌面多了一个相应的快捷图标。

呵，有点爽了，开始我们的学习吧！

三、看三眼后，搓搓手，来吧，谁怕谁了？

！

我非得玩转你不可的。

启动软件，晕眼了，我以前怎从没见过这种界面的。

什么的什么。

。

@#$%^_^

四、再看一次界面，哦，窗口里有一个框，框里看看，默认位置“标准EXE”已经点蓝，等着你去用它，看到这个框里的“打开”按钮没有？

点一下它再看看，呵，出来一个新的窗体，这就是你的模板，但因为你什么都没做，所以是白板一个来的，不信你现在就在工具栏，文件→点“生成工程1.exe”→选到你要保存的目标文件夹里。

打开这个文件夹，你就会看到多了一个名为“工程1.exe”的东东，双击它看看，这下有点明白了吧。

哈，你的处女作原来是个什么都没有的怪物。

五、好了，放飞的心情别过于兴奋，回到学习上来，从复第四项，不过这次你别再去生成个白板怪物了。

因为你的第一次只有一次，啊，有点象。

。

。

？

？

？

六、言归正传，学习编写注册机，你得先学会在VB6上学好编写四则运算及异或计算等的方法，怎样写啊！

快说，再不说拉出去斩了这个“我要”得了。

七、嘿，泡MM你们就有耐心，学编译就没个耐心的，再这样我看不起你。

来吧，看下面的公式：

1+2*3/3=3，这应该谁都能随口算出结果。

不过在VB里变成一个程式，让它给我们算出结果才是我写此文的目的。

明眼的朋友已经看出门道了，能做到这点，呵，算法注册机不就。

。

。

。

^_^

八、回看上面的算式，因为它由算式与结果的表现为根本，那么你就应该用2个文本框来实现它，文本框？

什么东东，在说什么了？

别急嘛！

在你的白板模板窗口看看，左边竖立的一串按钮，这里有你想要的一切，没有的在以后你需要时可以添加进去，此为后话。

九、嗯，你现在点一下里面的“ab”按钮，然后将光标回到你的白板模板上，拉出一个框来，里面有“Text1”的提示，从复这步，再拉出一个框，这次来的就是“Text2”，好了，现在填算式及出结果的框有了，但“=”的键还没有，这个就等同于算法注册机里的算号键，因为是初学，这个键你就一定非添加不可，以后你上手了，用其它方式同样可以表示算式的结果，网上有些注册机这边输入注册码，另一边就出来结果（注册码），这不是初学者的范围，打住先。

十、有了上面的2个框，现在来建一个“=”的功能键，点一下刚才的“ab”按钮正对下面的那个按钮，因为没注明功能在上面，我只能这样说了，点一下后，将光标回到你的白板模板上，拉出一个框来，这次出来的你一看就知道它是一个按钮功能键，里面有“Command1”的提示。

好了，你的白板现在已经不再是白板了，你大可以回复到第四步，生成一个工程文件来看看。

十一、不过，虽然现在的不是白板，但它还是不能计算的，因为你还没有将相应的源码填进去啊，源码？

哦，有点明白了！

^_^

十二、以上面的算式为例，开始编写你的处女注册机，看下面：

　1+2*3/3=3←这就是算式

十三、因为本文以教学算法注册机为主，所以，上面算式结合算法来演示它一下，将上面的1假设为机器码，我找到它的算法就是（机器码+2*3/3=3←注册码），好，现在再进一步设机器为“a”，注册码为“b”，有了这些的成立，源码就可以编写出来，看下面：

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=a+2*3/3

Text2.Text=b

EndSub

十四、特别说明的题外话，我的VB源码，常有朋友说我偷懒，都简到不能再简的地步了，这对编程可不是一个好习惯。

嘿嘿，不过作为写算法注册机，我以为这可是最好最省力的。

高手老大们别笑啊，我菜嘛！

^_^

十五、将上面的源码帖进VB里去，在你的模板上右键打开下拉菜单，点“查看代码”，出来一个写入窗口，将源码粘贴进去。

哈哈，你的算法注册机成功了，晕，我几时成功了？

哦，你还得往上看工具栏，找到黑色的小三角按钮，点一下，呵，出来了吧，你现大可以在它的Text1框里填入机器码1，记住先删了Text1那几个字了啊，当然以后真做注册机时，这里是一定没有这个Text1提示的，因为在编写的时候已经干掉它了。

此为后话或下一课我再说。

大家先消化一下，此文作为第一课就到此够用的。

十六、上面填入机器码后，点一下“Command1”按钮，嘿嘿，看到了吧，在Text2框里的是什么，是结果3，呵，成功了，真的成功了，再去工具栏，文件→点“生成工程1.exe”→选到你要保存的目标文件夹里。

打开这个文件夹，你就会看到多了一个名为“工程1.exe”的东东。

好了，现在退出VB6，直接去应用一下你的杰作注册机，有点成就感没有？

你的处女注册机就这样生成了！

^_^

十七、本文作为“算法注册机编写扫盲”的第一课，过几天有空我将继续写这个题目的第二课，大家以为有用我才有继写下一课的动力与必要的吧！

十八、本篇原创作者--我要[DFCG]，版权没有，人权我有，所以凡转此帖的友站及各路朋友兄弟们，必注明此文出自DFCG组织及我要[DFCG]原创为先决条件，否则谢绝转帖转载。

网路本一家，但总不至于没个出处明示的吧！

感谢你的阅读！

算法注册机编写---第二课

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

一、上节所说的只是一个最为基本的算式，要做到应用在以后的算法总结编译注册机还差得很多，好，看下面算式：

 机器码Xor123456=注册码

二、假设我的3台PC上各自的机器码为：

12121212；13131313；14141414。

那应该怎样去处理或编写出算法注册机呢？

大家回看上节我的VB源码，嘿嘿，偷懒的我现在就去用我的精简原码用到上面这个算式上。

怎么？

通用的？

看吧！

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=aXor123456

Text2.Text=b

EndSub

三、原码里的a就是我们要填的机器码，b就是算式的结果，也就是注册码了，用上面这个源码，试一下自己去做一次，看看这个注册机是否能算出上面3个机器码的对应真注册码。

我的结果是下面：

机器码：

12121212

注册码：

12129852

机器码：

13131313

注册码：

13220977

机器码：

14141414

注册码：

14034342

五、晕，你老这样算不行啊，我的不是十进制，算法我找到的是十六进制值，我怎么写了，再看下面源码，用这个源码编译注册机来看看吧！

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=aXor&H1E240

Text2.Text=b

EndSub

六、还是以上面的3个机器码为例，我得到的注册码见下面：

机器码：

12121212

注册码：

12129852

机器码：

13131313

注册码：

13220977

机器码：

14141414

注册码：

14034342

七、哦，与上面的计算结果完全一样的？

是的，因为十六进制1E240的十进值就是前面所列的123456，明白了吧！

其实不管它是不是十进制或十六进制，一样地可以应用这个源码编译出注册机来的。

大家可以多试多练，自已编一个计算器，应用你自编的计算器，得到的结果与windows计算器计算结果对比一下，本人以为多做有益的吧！

最好的方式就是自编crackMe，因为你已经知道它的算法，所以写出它的算法注册机当是随手可得的了！

怎写？

这在第三课我再说，此节打住先。

八、好，你现在已经上手，可以自己就能编写出算法注册机了！

那么，就找几个软柿子下手，找到算法后，写出属于你的算法注册机吧。

我找到几个东东，是N久以前的，因为它简单，适合下手，所以就用它。

此处声明，算法破文非全是我之所写，是随手拿来一用，但请原破文作者见谅了！

^_^

九、安利管理销售系统V1.2个人版，这个东东算法超简单，就用它来开刀吧！

算法总结：

机器码：

0375458006（转十六进制值为：

166108D6）

用166108D6与810613F异或运算的结果（1E7169E9），再将它转化为十进制就是你的注册码（510749161）。

比如我机器码：

0375458006

真实我注册码：

510749161

十、好，找到算法了，那就用我的超省源码再次应用到这个算法注册机来，看：

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=aXor&H810613F

Text2.Text=b

EndSub

十一、编译方式参考上面文章内容，这里不再重复，免又“胡说八道”了！

@_@

十二、不过瘾了？

好！

再来一个，凌鹏光盘出租与销售系统2.0算法简析，找到算法，列出算式看看，晕晕的，怎样去写算法注册机了啊？

看下面：

机器码转十六进值为A，注册码为Key，那么：

Key＝（A＋A＋87568F＋875A6B＋4F5DA2）＋（A＋A＋87568F＋875A6B＋4F5DA2）*4

　　　（将上面计算结果十六进制值转化为十进制值就是你的注册码）

如我的机器码为：

65526转化为十六进制值为：

FFF6

Key＝（A＋A＋87568F＋875A6B＋4F5DA2）＋（A＋A＋87568F＋875A6B＋4F5DA2）*4

　＝6E048A8（转十进值就是：

115361960）

比如我机器码：

65526

真实我注册码：

115361960

十三、知道算法及结果，那怎样去将算式编译成算法注册机，还是我的源码：

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=a+a

c=b+&H15E0E9C

d=c*&H4

e=c+d

Text2.Text=e

EndSub

十四、用这个源码去编译生成算法注册机，呵，算号成功，全对了！

上面这段算法列算式时，你看着有点头晕眼花，但到我的源码上，嘿，看的爽心！

^_^

十五、好了，回头作为复习，再来一个简单的加深一下你的学习过程，这个就是前些月的软件---六屏V1.2，记得DFCG里的兄弟写过这个破文，先将该破文的算法总结借来一用先，看下面：

这软件真的很可爱！

！

！

将机器码xor11677831就是注册码！

VB注册机源码如下（在win98+vb6.0下调试通过）

PrivateSubCommand1_Click（）

strtmp=Text1.Text

nlen=Len（strtmp）

k=1

Fori=1Tonlen

j=Asc（Mid（strtmp,i,1））

Ifj<47Orj>58Then

k=2

EndIf

Nexti

Ifk<>2Then

Text2.Text=Val（Text1.Text）Xor&H11677831

Else

e=MsgBox（\"你输入的机器码有误，请重新输入!

\",0,\"Error!

!

!

\"）

EndIf

EndSub

PrivateSubCommand2_Click（）

aa=MsgBox（\"逆风飞扬电脑工作室倾力制作\",0,\"退出\"）

UnloadMe

EndSub

如果您要转载本文档，请保持本文档内容完整。

谢谢（对不起逆风，我没做到）

十六、上面的注册机源码是正确无误的，不过我就说我的偷懒源码，比较一下两者的重要部份：

这是逆风的源码，不错的，我顶一下先！

^_^

PrivateSubCommand1_Click（）

strtmp=Text1.Text

nlen=Len（strtmp）

k=1

Fori=1Tonlen

j=Asc（Mid（strtmp,i,1））

Ifj<47Orj>58Then

k=2

EndIf

Nexti

Ifk<>2Then

Text2.Text=Val（Text1.Text）Xor&H11677831

EndIf

EndSub

这是我的偷懒精简源码，还行吧！

倒~~　黄婆什么的啊~~~~

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=aXor&H11677831

Text2.Text=b

EndSub

十七、编译的过程不再重复，大家自己去做一下，这样就可以加深对用VB写算法注册机的理解及认识的。

努力啊，兄弟们，没理由你比我还菜的吧！

^_^

十八、此文作为算法注册机编写扫盲第二课，希望能真的能给予你帮助，学海无止境，大家一起共同学习，将来的DFCG都可以得心应手的写出各自的算法注册机时，我就老怀安慰了！

别啊~~~别掷砖头啊！

我闪不就得了~~~嘿嘿！

十九，下一课的主题是注册机的窗口简单设计及编写简单的crackMe，当然，用的还是VB6，想继续看的话，先顶此帖，不顶我不写了！

^_^

二十、本篇原创作者--我要[DFCG]，版权没有，人权我有，所以凡转此帖的友站及各路朋友兄弟们，必注明此文出自DFCG组织及我要[DFCG]原创为先决条件，否则谢绝转帖转载。

网路本一家，但总不至于没个出处明示的吧！

感谢你的阅读！

算法注册机编写---第三课

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

注：

接第二课，我又来了，这次又得“胡说八道”题内话多多的了！

为何？

这样才可以更详细的说出个其所以然，还得保证你的心情轻松啊！

好，来了，下面就以实例接着来吧。

^_^

一、看过前2课的朋友，现在你已经完全可以自己编译出难度为中的算法注册机，再难点的，比如，大数的，移位的，带小数点多位注册机，你还是不行，因为要应用相应的函数和控件什么的，这是后话，已经不是本篇的扫盲范围了，在以后的日子，你有需要时，可以找书本翻翻，找懂的朋友问一下，只要你虚心，应该是完全可以再进一步的。

二、写到这里，有点晕头，用文字去表达这一课的内容可真有点范难的，真想随便做个动画就带过此课，哎，不过已经是开始了2课，没理由就这样不负责任的作出放弃的啊！

嗯，好吧，我尽量写得哆嗦一点，详尽一点，希望大家真的能消化并看得明了就是！

更因为我也菜的不行啊！

^_^

三、先以编写最简单的算法注册机开始，说一下窗体的构建及应用吧！

看这个之前，最好请先回看上2课的内容，作为加深一下认识，要不下面的你可能就不知我在说的是什么了。

四、现在启动VB6，打开你的白板模板（此后就用模板表示，注意），上2课说过VB6左侧的功能应用，到这里该说说右面的功能应用，要不你是写不出个有个性的工程文件的。

这就是要哆嗦的地方，我的用词已经尽量地不用专有名词，用最好理解的方式去表达了。

嘿嘿~~是我要[DFCG]你自己不懂吧！

哦，也许！

^_^

五、好，看到没有，VB6的界面靠右侧，有一功能框，里面想要的都有，怎么用它啊？

一般写注册机之类的小东东，你不需要全知道它的每一个选单的作用，这在你以后应用中一定会明了的，只不过是没个开始或没人引路而已。

六、第一个框是工程框，你要构建你的个性化窗体，这里的你一定要认识它。

因为以后你要添加个性化的说明或其它功能添加时，你就得用它去添加窗体等。

好，你已经启动了你的模板，那这个框里就可见有“Form1（Form1）”，用右键点出下拉菜单看看，里面有好多的选项，但其它的先别去看或暂时并不需要它。

你看到里面有一个选项“添加”，光标放到这个行上，会出来选单的，看看：

添加窗体

添加MDI窗体

添加模块

添加类模块

添加用户控件

添加属性页

添加用户文档

添加文件

七、看好了，上面的几个选项，从扫盲角度来说，只要知道第一个就够了，“添加窗体”的功能，这个能让你在以后的注册机上另添加上只属于你的说明文件或相片之类的。

八、第二个框（属性框）看看，里面一大串由E文注明的应用选项，晕啊，我不懂E文怎办了啊？

没事，只要记好常用的就行。

看看：

Alignment←所选项目的位置，有：

左对齐，右对齐，居中

Appearance

AutoRedraw

BackColor←改变特定文本框或窗体的颜色

BorderStyle←改变标题栏的功能项，如“最小化”、“最大化”的开启关闭

Caption←改变标题栏名称的地方，如写入“XXX注册机”

ClipControls

ControlBox

DrawMode

DrawStyle

DrawWidth

Enabled

FillColor

FillStyle

Font←改变写入字体的大小等设定

FontTransparen

ForeColor←改变写入字体的颜色

HasDC

Height

HelpContexID

Icon←添加你的个性化图标，也就是注册机的图标了

KeyPreview

Left

LinkMode

LinkTopic

MaxButton

MDIChild

MinButton

MouseIcon

MousePointer

Moveable

NegotiateMenus

OLEDropMode

Palette

PeletteMode

Picture←添加个性化图片，就是注册机窗体里的图版，需要配合左侧工具应用

RightToLeft

ScaleHeight

ScaleLeft

ScaleMode

ScaleTop

ScaleWidth

ShowInTaskbar

StartUpPositio←设定你的注册机弹出时所处窗口的位置

Tag

Top

Visible

WhatsThisButto

WhatsThisHelp

Width

windowSTate

九、初学的只要知道这些足够，还有我没注明的，以后再说或你查一下书本就会知道的。

十、现在引用上一课我给出的VB算法注册机源码来继续课程，看下面：

PrivateSubCommand1_Click（）

strtmp=Text1.Text

a=Val（Text1.Text）

b=a+a

c=b+&H15E0E9C

d=c*&H4

e=c+d

Text2.Text=e

EndSub

PrivateSubCommand2_Click（）

    Form2.Show

EndSub

PrivateSubCommand3_Click（）

UnloadMe

EndSub

十一、仔细看看，这段源码里多了几句在里面，解析如下：

Command1←第一个拉出来的功能按钮（你可以定名为“算号”）

Command2←第二个拉出来的功能按钮（你可以定名为“关于”）

Command3←第三个拉出来的功能按钮（你可以定名为“退出”）

PrivateSubCommand2_Click（）

    Form2.Show

EndSub

这一段就是调用第二个窗体的语句，就是点“关于”时，弹出另一个属于你的说明窗体。

PrivateSubCommand3_Click（）

UnloadMe

EndSub

这一段就是调用关闭窗体的语句，就是点“退出”时，工程也同时退出

十二、看明白就试一下去，别老看不动手的，这样你是永远写不出你的注册机，窗体的构