易语言绑定机器码源码_易语言怎么上机器码易语言源码音乐盒

hacker|
147

文章目录:

易语言机器码源码

可以的,可以根据硬盘号生成随即机器码

也可以在机器码基础上反算出硬盘号

谢了一个简单的,QQ发给你

其实没必要随机的,固定的就行了,因为随机的最后你最后还是要还原到回来才能验证

这个程序只是简单的!根据硬盘号使用简单算法生成20位16进制机器码

.版本2

.程序集窗口程序集1

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

.局部变量随即记录,文本型

.局部变量随即数,整数型

.局部变量硬盘特征字,文本型

.局部变量机器码,文本型

.局部变量循环,整数型

.局部变量变量1,整数型

硬盘特征字=到文本(取硬盘特征字())

编辑框硬盘号.内容=硬盘特征字

随即记录=“”

机器码=“”

.计次循环首(10,循环)

变量1=到数值(取文本中间(硬盘特征字,循环,1))

.如果(变量1<6)

随即数=取随机数(0,9)

.否则

随即数=取随机数(0,6)

.如果结束

随即记录=随即记录+到文本(随即数)

变量1=变量1+随即数

机器码=机器码+取文本中间(“0123456789ABCDEF”,变量1+1,1)

变量1=变量1+随即数

.如果真(变量1>15)

变量1=变量1-15

.如果真结束

机器码=机器码+取文本中间(“0123456789ABCDEF”,变量1+1,1)

.计次循环尾()

编辑框补码.内容=到文本(随即记录)

编辑框机器码.内容=机器码

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

.局部变量硬盘特征字,文本型

.局部变量机器码,文本型

.局部变量循环,整数型

.局部变量变量1,整数型

.局部变量变量2,整数型

.局部变量变量3,整数型

.局部变量变量4,整数型

机器码=编辑框机器码.内容

硬盘特征字=“”

.计次循环首(10,循环)

变量1=寻找文本(“0123456789ABCDEF”,取文本中间(机器码,循环×2-1,1),,真)

变量2=寻找文本(“0123456789ABCDEF”,取文本中间(机器码,循环×2,1),,真)

.如果(变量1>0且变量2>0)

变量1=变量1-1

变量2=变量2-1

.如果(变量1>变量2)

变量3=变量2+15-变量1

.否则

变量3=变量2-变量1

.如果结束

变量3=变量1-变量3

硬盘特征字=硬盘特征字+到文本(变量3)

.否则

编辑框反算.内容=“解码失败”

跳出循环()

.如果结束

.计次循环尾()

编辑框反算.内容=硬盘特征字

求易语言取机器码模块源码,急需!!!!

首先你得理解什么是机器码,机器码是提取电脑本机的cpu序列号,或mac地址之类的,这些每台机器的硬件都是固定的,什么大小写字母数字组合这些是看你自己加密方式的。

易语言怎么设定机器码(给源码)

设定机器码?

什么意思。

就是弄注册吗?

给你源码:

.版本

2

.支持库

xplib

.程序集

窗口程序集1

.子程序

__启动窗口_创建完毕

XP风格

(3)

编辑框1.内容

到文本

(取硬盘特征字

())

.子程序

_按钮1_被单击

.如果

(编辑框2.内容

到文本

(取硬盘特征字

()

×

123

×

123))

信息框

(“注册成功”,

0,

“提示”)

载入

(窗口1,

,

真)

'

或者用写到文件+运行

也可以。

结束

()

.否则

信息框

(“注册失败”,

0,

“提示”)

.如果结束

.子程序

_按钮2_被单击

编辑框2.内容

到文本

(取硬盘特征字

()

×

123

×

123)

需要2个按钮,2个标签,2个编辑框。

易语言怎么制作机器码?

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

.版本 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])

.如果真结束

' 本源码来自易语言资源网()

.计次循环尾 ()

.计次循环尾 ()

临时 = 到字节集 (子文本替换 (网卡mac, “-”, “”, , , 真) + 子文本替换 (CPU, “-”, “”, , , 真))

.计次循环首 (4, 计次)

.如果真 (临时 [计次] ≠ 45 且 临时 [计次] < 48 或 临时 [计次] > 57)

到循环尾 ()

.如果真结束

.如果真 (临时 [计次] = 48)

临时 [计次] = 74

到循环尾 ()

.如果真结束

.如果真 (临时 [计次] = 45)

临时 [计次] = 77

到循环尾 ()

.如果真结束

临时 [计次] = 临时 [计次] + 16

.计次循环尾 ()

返回 (到文本 (临时))

易语言取机器码源码

方法/步骤

1、在程序窗口分别添加一个分组框、编辑框。如图所示

2、双击“启动窗口”跳至程序集,按图示定义一部分系统变量,如图

3、创建“取机器码”子程序,定义如图变量,变量名可以自己随意改。编写的代码如下图

4、运行编译,得到机器码。

3条大神的评论

  • avatar
    访客 2023-01-16 下午 09:15:41

    量,变量名可以自己随意改。编写的代码如下图4、运行编译,得到机器码。

  • avatar
    访客 2023-01-17 上午 06:36:05

    “17”, “18”, “19”, “20”, “21”, “22”, “23”, “24”, “25”, “26” }大写字母 = { “A”, “B”, “C”, “D

  • avatar
    访客 2023-01-17 上午 03:46:38

    -1变量2=变量2-1.如果(变量1>变量2)变量3=变量2+15-变量1.否则变量3=变量2-变量1.如果结束变量3=变量1-变量3硬盘特征字=硬盘特征字+到文本(变量3).否则编辑框反算.内容=“解码失败”跳出循环().如果结束.计次循环尾()编辑框反算.内容=硬盘特征字求易语言取机器码

发表评论