易语言怎么制作机器码?

如题,不要说什么取硬盘特征字,那样不行,有些机器取出来的结果是0,还有没有另外的方法,最好付上源码,谢谢

制作机器码代码如下,只需要取即可:

.版本 2
.支持库 eAPI

.子程序 取机器码, 文本型
.局部变量 输入内容, 文本型
.局部变量 输出内容, 文本型
.局部变量 文本长度, 整数型
.局部变量 i, 整数型
.局部变量 临时变量I, 整数型
.局部变量 临时变量J, 整数型
.局部变量 转换后文本, 文本型
.局部变量 临时, 字节集
.局部变量 网卡地址, 网卡信息, , "0"
.局部变量 网卡mac, 文本型
.局部变量 CPU信息, CPU信息
.局部变量 CPU, 文本型
.局部变量 大写字母, 文本型, , "26"
.局部变量 小写字母, 文本型, , "26"
.局部变量 数字, 文本型, , "26"
.局部变量 计次, 整数型
.局部变量 总计, 文本型

数字 = { “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “10”, “11”, “12”, “13”, “14”, “15”, “16”, “17”, “18”, “19”, “20”, “21”, “22”, “23”, “24”, “25”, “26” }
大写字母 = { “A”, “B”, “C”, “D”, “E”, “F”, “G”, “H”, “I”, “J”, “K”, “L”, “M”, “N”, “O”, “P”, “Q”, “R”, “S”, “T”, “U”, “V”, “W”, “X”, “Y”, “Z” }
小写字母 = { “a”, “b”, “c”, “d”, “e”, “f”, “g”, “h”, “i”, “j”, “k”, “l”, “m”, “n”, “o”, “p”, “q”, “r”, “s”, “t”, “u”, “v”, “w”, “x”, “y”, “z” }
取CPU信息 (CPU信息)
CPU = 取文本左边 (CPU信息.序列号, 18)
网卡地址 = 取网卡信息列表 ()
.判断开始 (取数组成员数 (网卡地址) ≥ 1)
网卡mac = 网卡地址 [1].物理地址
.默认
网卡mac = “10-11-11-11-11-11”
.判断结束

输入内容 = 子文本替换 (网卡mac, “-”, “”, , , 真) + 子文本替换 (CPU, “-”, “”, , , 真)
文本长度 = 取文本长度 (输入内容)
.计次循环首 (文本长度, i)
转换后文本 = 取文本中间 (输入内容, i, 1)
.如果真 (转换后文本 ≥ “A” 且 转换后文本 ≤ “Z” 或 转换后文本 ≥ “a” 且 转换后文本 ≤ “z”)
转换后文本 = “”
.如果真结束
输出内容 = 输出内容 + 转换后文本
.计次循环尾 ()

.计次循环首 (取文本长度 (输入内容), 临时变量I)
.计次循环首 (取数组成员数 (大写字母), 临时变量J)
.如果真 (取文本中间 (输入内容, 临时变量I, 1) = 大写字母 [临时变量J] 或 取文本中间 (输入内容, 临时变量I, 1) = 小写字母 [临时变量J])
编辑框1.加入文本 (数字 [临时变量J])
.如果真结束
' 本源码来自易语言资源网(www.5A5X.com)
.计次循环尾 ()
.计次循环尾 ()

临时 = 到字节集 (子文本替换 (网卡mac, “-”, “”, , , 真) + 子文本替换 (CPU, “-”, “”, , , 真))
.计次循环首 (4, 计次)
.如果真 (临时 [计次] ≠ 45 且 临时 [计次] < 48 或 临时 [计次] > 57)
到循环尾 ()
.如果真结束
.如果真 (临时 [计次] = 48)
临时 [计次] = 74
到循环尾 ()
.如果真结束
.如果真 (临时 [计次] = 45)
临时 [计次] = 77
到循环尾 ()
.如果真结束
临时 [计次] = 临时 [计次] + 16
.计次循环尾 ()
返回 (到文本 (临时))
温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2016-04-06

精易模块3.46版本中有这一特殊命令, 算法超前,你可以看一看

 

 

精易这个命令,基本上没有错误的,都有会特征字的,

 

第二个方法是自己创造特征 字,方法是,  通过自己的一套算法,  例如,你用 AEMNF,这五个字母的多少进制的后得到的数字,* 500   之后得到的一组数字,然后,生成一组字母和数字的串

 

但最后,你在服务器上一定要判断,,这个数字串一定要除小于多少或者什么其它的条件,这个条件只有自己知道, ,  或者是什么其它的

本回答被提问者采纳
第2个回答  2013-12-03
不光只是取硬盘特征字。很多都可以取,而且并不是取出来就直接用,而是把这些值取出来之后,你要给他写个算法
第3个回答  2013-11-30
用api或者汇编,你自己搜索易语言 api取硬盘序列号或者搜索 易语言汇编取CPUID