易语言随机生成MAC地址的代码

实现思路

相信大家都了解mac地址的重要性，每块网卡被生产出来后，都会有一个全球唯一的编号来标识自己，不会重复，这个编号就是MAC地址，也就是网卡的物理地址。

查阅了一些资料，16进制中第一组第二个数字一定是个偶数（十进制概念，不知道恰不恰当）。也就是说第二个数字一定是0、2、4、6、8、A、C、E其中的一个。

源码原理，取随机数字16-255，判断是否为偶数不是就+1，这样第一组就出来了，然后我们用取十六进制文本将10进制转换成16进制，再循环随机5组就实现了我们的取随机MAC地址。

随机生成MAC地址的代码

.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.子程序 文本_取随机MAC, 文本型, , 随机返回一个MAC地址
.局部变量 临时整数, 整数型
.局部变量 l1, 整数型
.局部变量 MAC, 文本型
.计次循环首 (6, l1)
  置随机数种子 ()
  临时整数 ＝ 取随机数 (16, 255) ' 代表16进制的00-FF范围
  .如果真 (l1 ＝ 1)
    .如果真 (临时整数 ％ 2 ＝ 1) ' 取随机数后判断是否为偶数不是就+1
      .判断开始 (临时整数 ＝ 255)
        临时整数 ＝ 临时整数 － 1
      .默认
        临时整数 ＝ 临时整数 ＋ 1
      .判断结束
    .如果真结束
  .如果真结束
  .判断开始 (l1 ＝ 6) ' 判断否是最后一组是就不加分隔符
    MAC ＝ MAC ＋ 取十六进制文本 (临时整数)
  .默认
    MAC ＝ MAC ＋ 取十六进制文本 (临时整数) ＋ “:”
  .判断结束
.计次循环尾 ()
返回 (MAC)
.子程序 _生成随机MAC地址按钮_被单击
调试输出 (文本_取随机MAC ())

运行结果：

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

赞 (0)

相关推荐

  • 易语言通过百度错误页面获取北京时间的代码

    易语言通过百度错误页面获取北京时间的代码

    利用百度取北京时间源码 .版本 2 .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 .局部变量 XML对象, 对象 .局部变量 时间文本, 文本型 .局部变量 网络时间, 日期时间型 .如果真 (XML对象.创建 ("WinHttp.WinHttpRequest.5.1", )) XML对象.方法 ("SetTimeouts", 5000, 5000, 10000, 5000) XML对象.写属性 ("Option", 6, 0) XM

  • 易语言监控smtp和反编译获取程序内邮件密码发送信息达到反钓鱼的目的

    易语言监控smtp和反编译获取程序内邮件密码发送信息达到反钓鱼的目的

    监控smtp和反编译获取程序内邮件密码.发送信息达到反钓鱼的目的 反邮箱钓鱼程序源码 .版本 2 .支持库 EThread .支持库 eAPI .支持库 xplib .支持库 edroptarget .支持库 pop3 .支持库 iext .程序集 窗口程序集1 .程序集变量 服务器, 文本型 .程序集变量 帐号, 文本型 .程序集变量 密码, 文本型 .子程序 _拖放对象1_得到文件 .参数 接收到的文件路径, 文本型 .局部变量 钓鱼软件, 字节集 .局部变量 邮箱位置, 整数型 .局部变量

  • 易语言调用墨迹天气实现自动定位获取天气情况的代码

    易语言调用墨迹天气实现自动定位获取天气情况的代码

    常量数据表 .版本 2 .常量 实况头, "<文本长度: 9>" .常量 实况尾, "<文本长度: 2>" .常量 更新时间头, "<文本长度: 28>" .常量 更新时间尾, "<文本长度: 9>" .常量 温度头, "<文本长度: 28>" .常量 温度尾, "<文本长度: 5>" .常量 空气质量头, &quo

  • 易语言修改快捷方式进行微信多开的代码

    易语言修改快捷方式进行微信多开的代码

    此功能配合精易模块使用,需要加载超级模块. 常量数据表 .版本 2 .常量 头, "<文本长度: 11>" .常量 尾, "<文本长度: 4>" .常量 头1, "<文本长度: 8>" .常量 尾1, "<文本长度: 12>" 微信多开的代码 .版本 2 .支持库 shell .支持库 eAPI .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 _路径按钮_被单击 通

  • 易语言验证十八位身份证号码是否正确的代码

    易语言验证十八位身份证号码是否正确的代码

    常量数据表 .版本 2 .常量 行政划位码2, "<文本长度: 20409>", , 各区身份证前六位 .常量 行政划位码1, "<文本长度: 29990>", , 各区身份证前六位 验证十八位身份证号的代码 .版本 2 .程序集 程序集1 .子程序 验证身份证号, 逻辑型 .参数 十八位身份证号, 文本型 .局部变量 系数, 整数型, , "0" .局部变量 余数表, 整数型, , "0" .局部变量

  • 易语言超级列表框点击表头进行排序的代码

    易语言超级列表框点击表头进行排序的代码

    超级列表框排序模块源码 .版本 2 .支持库 iext .程序集 程序集1 .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码 _临时子程序 () ' 在初始化代码执行完毕后调用测试代码 返回 (0) ' 可以根据您的需要返回任意数值 .子程序 _临时子程序 ' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中. 注意不要修改本子程序的名称.参数及返回值类型. .子程序 超级列表框排序, 整数型

  • 易语言通过枚举密码进行破解rar压缩包文件的代码

    易语言通过枚举密码进行破解rar压缩包文件的代码

    rar密码破解源码 此功能需要加载精易模块5.6 .版本 2 .支持库 xplib .程序集 窗口程序集_启动窗口 .程序集变量 程序集_数组1, 文本型, , "0" .程序集变量 程序集_数组2, 文本型, , "0" .程序集变量 程序集_数组3, 文本型, , "0" .程序集变量 程序集_数组4, 文本型, , "0" .程序集变量 程序集_数组5, 文本型, , "0" .程序集变量 程序集_数

  • 易语言制作推箱子小游戏的代码

    易语言制作推箱子小游戏的代码

    DLL命令表 .版本 2 .DLL命令 写配置文件, 整数型, , "WritePrivateProfileStringA", , 如果配置文件不存在则将被创建 .参数 小节名, 文本型, , 就是用中括号括起来的内容 .参数 项目名, 文本型, , 就是等号前边的内容 .参数 项目值, 文本型, , 就是等号后面的内容 .参数 文件名, 文本型, , 就是你要写入的那个文件 .DLL命令 读配置整数, 整数型, , "GetPrivateProfileIntA"

  • 易语言制作一款唯美的cookie分析工具的代码

    易语言制作一款唯美的cookie分析工具的代码

    cookie分析源码 需要加载模块 Ex_DirectUI 3.0 DLL命令表 .版本 2 .DLL命令 GetBitmapBits, 整数型, "gdi32", "GetBitmapBits" .参数 hBitmap, 整数型 .参数 dwCount, 整数型 .参数 lpBits, 整数型 透明编辑框 .版本 2 .程序集 透明编辑框_EX, 编辑框_Ex .程序集变量 img, 整数型 .程序集变量 类_左边, 整数型 .程序集变量 类_顶边, 整数型 .子

  • 易语言通过时钟和计次循环来实现定时任务的代码

    易语言通过时钟和计次循环来实现定时任务的代码

    创建定时任务源码 .版本 2 .支持库 iext .支持库 eAPI .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .局部变量 i, 整数型 .计次循环首 (61, i) .如果真 (i < 25) 时组合框.加入项目 (到文本 (i - 1), ) .如果真结束 分组合框.加入项目 (到文本 (i - 1), ) 秒组合框.加入项目 (到文本 (i - 1), ) .计次循环尾 () 时组合框.现行选中项 ＝ 0 分组合框.现行选中项 ＝ 0 秒组合框.现行选中项 ＝ 0

  • 易语言多线程多任务下载器的代码

    易语言多线程多任务下载器的代码

    多线程多任务下载模块源码 1.DLL命令表 .版本 2 .DLL命令 InternetGetConnectedStateHTTP, , "Wininet.dll", "InternetGetConnectedState", 公开 .参数 lpdwFlags, 整数型, 传址 .参数 dwReserved, 整数型 .DLL命令 InternetOpenAHTTP, 整数型, "Wininet.dll", "InternetOpenA&q

  • 易语言通过解析免费下载QQ付费音乐的代码

    易语言通过解析免费下载QQ付费音乐的代码

    常量数据表 .版本 2 .常量 链接1, "<文本长度: 9>" .常量 链接2, "<文本长度: 2>" QQ付费音乐下载器 此功能配合精易模块5.6使用,需要加载模块. .版本 2 .支持库 downlib .支持库 iext .支持库 spec .支持库 shell .程序集 窗口程序集_启动窗口 .程序集变量 任务, 任务参数 .程序集变量 下载限速, 整数型 .程序集变量 下载对象, 下载对象 .子程序 _按钮1_被单击 .如果 (

  • 易语言实现反OD调试反复附加的代码

    DLL命令表 .版本 2 .DLL命令 ZwQueryInformationProcess, 整数型, "NTDLL.DLL" .参数 ProcessHandle, 整数型 .参数 ProcessInformationClass, 整数型 .参数 ProcessInformation, PROCESS_BASIC_INFORMATION .参数 ProcessInformationLength, 整数型 .参数 ReturnLength, 整数型, 传址 .DLL命令 OpenProc

  • 易语言注册机生成永久或限时注册码的写法

    易语言注册机生成永久或限时注册码的写法

    DLL命令表 .版本 2 .DLL命令 CryptCreateHash, 整数型, "advapi32.dll", "CryptCreateHash", 公开 .参数 hProv, 整数型 .参数 Algid, 整数型 .参数 hKey, 整数型 .参数 dwFlags, 整数型 .参数 phHash, 整数型, 传址 .DLL命令 CryptDestroyHash, 整数型, "advapi32.dll", "CryptDestroy

  • 易语言调用百度图片识别实现的图片转表格的代码

    易语言调用百度图片识别实现的图片转表格的代码

    截图模块代码 .版本 2 .子程序 开始截图, 逻辑型, 公开, 截图成功返回真,图片被自动保存到剪贴板.失败或放弃截图则返回假. .参数 是否截取鼠标, 逻辑型, 可空 .参数 调节框颜色, 整数型, 可空, 默认:Red=10,Green=100,Blue=130 .参数 矩形信息框颜色, 整数型, 可空, 默认黑色 .参数 矩形信息字体颜色, 整数型, 可空, 默认黑色 .子程序 取剪贴板位图, 字节集, 公开 表格图片转表格源码 此功能需要加载精易模块5.6 .版本 2 .支持库 edr

随机推荐