制作
机器码代码如下,只需要取即可:
.版本 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
.计次循环尾 ()
返回 (到文本 (临时))