需注册才可使用的模块该怎么做？

NewStar2010

我想自己做一个模块，但希望有标题中的功能。也就是其他用户需注册方可使用的模块。还望高手指点下给个例子。（取机器相关信息或网验均可）
在此谢过了！

46316447

.版本 2

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
.局部变量 a, 文本型
.局部变量 机器码, 文本型

机器码 ＝ 到文本 (取硬盘特征字 () ＋ 598651 × 4565415 ÷ 5156 × 5865)  ' 可以自己更改
.如果真 (注册项是否存在 (2, “Software\abc”) ＝ 假)  ' abc可以自己更改
    输入框 (“你的机器码是” ＋ 机器码, “模块注册”, “请输入”, a, 1)
    .判断开始 (a ＝ 到文本 (到数值 (机器码) ＋ 1))  ' 1可以自己更改，这个太简单了
        信息框 (“注册成功！”, 0, )
        写注册项 (2, “Software\abc”, a)
    .默认
        信息框 (“注册失败！”, 0, )
    .判断结束

.如果真结束

_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 _临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

===============
自己看着改吧……

NewStar2010

谢谢，我还不知道有输入框这个命令，我晕。。另外我怎么在注册表找不到abc这个目录？