最稳的取机器码方式主板uuid-blosuid

毛超

前言：

机器码两种方式

1.取硬件信息

好处：支持检测重装系统变化

劣势：容易被通用过检测工具hook掉，因为取机器码通常为各类信息综合的id，如果hook更改其中一项，则整个机器码换掉，不准确

2.写入固定隐藏文件

好处：通常外面的hook替换工具无效，因为没有取硬件信息，且更换硬盘等设施能继续识别

劣势：重装系统后会消失

推荐：
硬件更换比较，显卡 > 内存条 > 硬盘 > CPU > 主板

综上所述最合适的方式，取简约的硬件信息，取最少的信息，实现外面的工具替换的信息根本不是你所用到的信息，并且兼容做到唯一值

所以，不要选经常更换的硬件，取主板的唯一id和型号是最小最稳健的办法没有之一

比如，可以轻松防住，以下热门的修改工具，还可以兼容区分用户唯一的能力

  

子程序名	返回值类型	公开	备 注
取机器码bp	文本型

变量名	类 型	静态	数组	备 注
size	整数型
data	字节集
i	整数型
Length	整数型
uuid	文本型
between	字节集
time_low	整数型
n	整数型
withlow	字节集

' 备注：取主板部分参考论坛帖子，稍微修改
' wmic path Win32_ComputerSystemProduct get uuid /value 与另一种模式效果一致
' // no 取主板uuid
size ＝ GetSystemFirmwareTable (1381190978, 0, data, 0)
data ＝ 取空白字节集 (size)
如果真 (size ＜ 1)
返回 (“”)
GetSystemFirmwareTable (1381190978, 0, data, size)
如果真 (size ＜ 1)
返回 (“”)
i ＝ 9  ' 前面8个字节忽略，储存其他信息
判断循环首 (真)
' type 类型 1 系统信息
如果真 (data [i] ＝ 1)
跳出循环 ()

Length ＝ data [i ＋ 1]
i ＝ i ＋ Length
' 调试输出 (编码_utf8到gb2312 (指针到文本 (buffer ＋ i)))
' 长度信息后为字符串 找到字符串信息结束标记 就是下一个type 结构的起始位置
判断循环首 (data [i] ≠ 0 或 data [i ＋ 1] ≠ 0)
i ＝ i ＋ 1
判断循环尾 ()
i ＝ i ＋ 2
判断循环尾 ()
i ＝ i ＋ 8
time_low ＝ 取字节集数据 (data, #整数型, i)
uuid ＝ 进制_十到十六 (time_low, 真)
' 中间部分需要交换下
between ＝ 取字节集中间 (data, i, 4)
' 第二部分 ＝ 字节集_交换 (第二部分)
withlow ＝ between
计次循环首 (4 ÷ 2, n)
withlow [n × 2 － 1] ＝ between [n × 2]
withlow [n × 2] ＝ between [n × 2 － 1]
计次循环尾 ()
between ＝ withlow
计次循环首 (4, n)  ' 中间四位
uuid ＝ uuid ＋ 进制_十到十六 (between [n], )  ' 直接用精益模块就行
计次循环尾 ()
i ＝ i ＋ 4
计次循环首 (8, )  ' 最后八位
uuid ＝ uuid ＋ 进制_十到十六 (data [i], )
i ＝ i ＋ 1
计次循环尾 ()
' // no 取主板型号
uuid ＝ uuid ＋ 取文本注册项 (4, “HARDWARE\DESCRIPTION\System\BIOS\BaseBoardProduct”, )
' // no 生成机器码
uuid ＝ 校验_取md5_文本 (uuid, , , )
返回 (uuid)

.版本 2<br /> <br /> .子程序 取机器码bp, 文本型, 公开<br /> .局部变量 size, 整数型<br /> .局部变量 data, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 Length, 整数型<br /> .局部变量 uuid, 文本型<br /> .局部变量 between, 字节集<br /> .局部变量 time_low, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 withlow, 字节集<br /> <br /> <br /> <br /> <br /> ' 备注：取主板部分参考论坛帖子，稍微修改<br /> <br /> ' wmic path Win32_ComputerSystemProduct get uuid /value 与另一种模式效果一致<br /> <br /> ' // no 取主板uuid<br /> <br /> size ＝ GetSystemFirmwareTable (1381190978, 0, data, 0)<br /> data ＝ 取空白字节集 (size)<br /> .如果真 (size ＜ 1)<br />     返回 (“”)<br /> .如果真结束<br /> GetSystemFirmwareTable (1381190978, 0, data, size)<br /> .如果真 (size ＜ 1)<br />     返回 (“”)<br /> .如果真结束<br /> i ＝ 9  ' 前面8个字节忽略，储存其他信息<br /> .判断循环首 (真)<br />     ' type 类型 1 系统信息<br /> <br />     .如果真 (data <i> ＝ 1)<br />         跳出循环 ()<br />     .如果真结束<br /> <br />     Length ＝ data [i ＋ 1]<br />     i ＝ i ＋ Length<br />     ' 调试输出 (编码_utf8到gb2312 (指针到文本 (buffer ＋ i)))<br />     ' 长度信息后为字符串 找到字符串信息结束标记 就是下一个type 结构的起始位置<br />     .判断循环首 (data <i> ≠ 0 或 data [i ＋ 1] ≠ 0)<br />         i ＝ i ＋ 1<br />     .判断循环尾 ()<br />     i ＝ i ＋ 2<br /> .判断循环尾 ()<br /> i ＝ i ＋ 8<br /> time_low ＝ 取字节集数据 (data, #整数型, i)<br /> <br /> uuid ＝ 进制_十到十六 (time_low, 真)<br /> ' 中间部分需要交换下<br /> between ＝ 取字节集中间 (data, i, 4)<br /> ' 第二部分 ＝ 字节集_交换 (第二部分)<br /> withlow ＝ between<br /> .计次循环首 (4 ÷ 2, n)<br />     withlow [n × 2 － 1] ＝ between [n × 2]<br />     withlow [n × 2] ＝ between [n × 2 － 1]<br /> .计次循环尾 ()<br /> between ＝ withlow<br /> <br /> .计次循环首 (4, n)  ' 中间四位<br />     uuid ＝ uuid ＋ 进制_十到十六 (between [n], )  ' 直接用精益模块就行<br /> .计次循环尾 ()<br /> i ＝ i ＋ 4<br /> .计次循环首 (8, )  ' 最后八位<br />     uuid ＝ uuid ＋ 进制_十到十六 (data <i>, )<br />     i ＝ i ＋ 1<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> ' // no 取主板型号<br /> <br /> uuid ＝ uuid ＋ 取文本注册项 (4, “HARDWARE\DESCRIPTION\System\BIOS\BaseBoardProduct”, )<br /> <br /> <br /> ' // no 生成机器码<br /> uuid ＝ 校验_取md5_文本 (uuid, , , )<br /> <br /> <br /> <br /> <br /> 返回 (uuid)

取机器码的方法.zip (250.87 KB, 下载次数: 852)

2022-6-19 08:58 上传

点击文件名下载附件

sosvps

感谢分享，很给力！~

zpzpzpp

易语言取

zpzpzpp

客户价格较高

8386559

看看是什么

luya665

666666666666666

lisher

这个在XP WIN7 WIN10 WIN11上都可行么

8386559

不错。好东西

a3363558

支持开源~！感谢分享

w1285378872

66666666666666

w1285378872

牛B硬件信息修改大师 可以分享测试下不  这个工具