首先我们可以取硬盘特征字、CPU序列号等等、对其进行加密。
下面举一个简单的例子。
.版本 2
.支持库 dp1

.程序集 窗口程序集1
.程序集变量 变量, 文本型
.程序集变量 变量4, 文本型
.程序集变量 变量3, 文本型

.子程序 __启动窗口_创建完毕

变量 ＝ 到文本 (取硬盘特征字 ())   /变量被取硬盘特征字/

变量3 ＝ 到文本 (到字节集 (读入文件 (取运行目录 () ＋ “\key.v7”))) /变量三读取密钥/

变量4 ＝ 到文本 (解密数据 (到字节集 (变量3), “v7”, #DES算法))/变量4解密变量三的文本/
.判断开始 (文件是否存在 (取运行目录 () ＋ “\key.v7”)) /判断密钥是否存在/
    .判断开始 (变量 ＝ 变量4)  /再判断变量是否等于变量四/
        按钮1.可视 ＝ 真  /如果等于 那么按钮1则可视/
        编辑框1.可视 ＝ 真 /如果等于  那么编辑框1则可视/
    .默认
        信息框 (“密钥错误”, 0, ) /变量不等于变量四，则出现密钥错误 按钮1 和编辑框1 都不可视/
    .判断结束

.默认
    信息框 (“密钥不存在”, 0, ) /如果密钥文件不存在 则出现 密钥不存在 信息框/
    载入 (窗口1, , 真)

.判断结束
---------------------------以上是限制部分功能的使用----------只是简单的加密---------------
下面是注册机的编写。

.

.判断开始 (编辑框1.内容 ≠ “”) /判断 编辑框1的内容不为空/
    编辑框2.内容 ＝ 到文本 (加密数据 (到字节集 (编辑框1.内容), “v7”, #DES算法))
        /编辑框2显示加密后的数据/

.默认
    信息框 (“无硬件地址”, 0, ) /为空则返回假，弹出信息框/
————————————————————————下面是写密钥——————

.版本 2

.子程序 _按钮2_被单击

.判断开始 (编辑框2.内容 ≠ “”) /判断编辑框2的内容是否为空/
    写到文件 (取运行目录 () ＋ “\key.v7”, 到字节集 (编辑框2.内容)) /写到当前运行目录下写出的是文本文件/
.默认
    信息框 (“无密钥信息，无法写出”, 0, )  /为空则返回假 无法写出/

以上就是简单的 密钥功能 测试

要发送 硬件地址  

可以取硬件地址 发送文件到右键或者HTTP发信都可以。
在这里就不一一介绍了

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