-
-
[原创]新文本和16进制数据相互转换工具[易语言源代码]
-
2006-6-27 22:41
9595
-
[原创]新文本和16进制数据相互转换工具[易语言源代码]
【原创】新文本和16进制数据工具[易语言源代码]
看了某个人写的代码，是精华，实在其不过。。。没有别的意思哈。大家自己看代码就行了 反正都是学习。
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 长度, 整数型
编辑框2.内容 ＝ “”
文本 ＝ 编辑框1.内容
.计次循环首 (取文本长度 (文本), 长度)
编辑框2.加入文本 (取文本右边 (“00” ＋ 取十六进制文本 (取代码 (文本, 长度)), 2) ＋ “ ”)
.计次循环尾 ()
.子程序 _按钮2_被单击
.局部变量 文本, 文本型, , "0"
.局部变量 长度, 整数型
.局部变量 tmp, 整数型, 静态
.局部变量 整数, 整数型
.局部变量 字节集, 字节集
.局部变量 短整数, 短整数型
文本 ＝ 分割文本 (编辑框2.内容, “ ”, )
.计次循环首 (取数组成员数 (文本), 长度)
tmp ＝ 取代码 (到大写 (文本 [长度]), 1)
.如果 (tmp ≥ 取代码 (“A”, ) 且 tmp ≤ 取代码 (“F”, ))
整数 ＝ 16 × (tmp － 取代码 (“A”, ) ＋ 10)
.否则
整数 ＝ 16 × (tmp － 取代码 (“0”, ))
.如果结束
tmp ＝ 取代码 (到大写 (文本 [长度]), 2)
.如果 (tmp ≥ 取代码 (“A”, ) 且 tmp ≤ 取代码 (“F”, ))
整数 ＝ 整数 ＋ tmp － 取代码 (“A”, ) ＋ 10
.否则
整数 ＝ 整数 ＋ tmp － 取代码 (“0”, )
.如果结束
字节集 ＝ 字节集 ＋ 到字节集 (到字节 (整数))
.计次循环尾 ()
字节集 ＝ 字节集 ＋ { 0 }
编辑框3.内容 ＝ 到文本 (字节集)
.子程序 _按钮3_被单击
载入 (窗口1, , 真)
简洁了不知道多少倍，这个市完整的代码，界面我就照他的改的 ^_^
附件有完整的工程文件：）
[培训]二进制漏洞攻防（第3期）；满10人开班；模糊测试与工具使用二次开发；网络协议漏洞挖掘；Linux内核漏洞挖掘与利用；AOSP漏洞挖掘与利用；代码审计。
强哎 
