tcp协议调试工具,拦截/接收/发送/处理数据

易语言 2020-02-28 22:07:03

tcp协议调试工具,拦截/接收/发送/处理数据

置入代码 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' 保护开始
.如果真 (选择框8.选中 = 真)
编辑框16.内容 = “发送数据:” + 字节集到十六进制 (网络数据.到字节集 ()) + #换行符
.如果真结束
.如果真 (abc = 1)
.如果真 (拦截数量 > 0)
abc = 2
状态条1.置文本 (0, “正在拦截数据:”)
.如果真结束

.如果真结束
.如果真 (文件_取文件名 (调用者信息.取进程名 (), 假) = 编辑框9.内容)
处理数据 = 字节集到十六进制 (网络数据.到字节集 ())
.如果真 (选择框1.选中 = 真)
加入文本2 (处理数据, 1)
.如果真结束
.如果 (xxxxxx55)
加入文本1 (处理数据, 1)
返回 (1)
.否则
处理文本 = 取文本中间 (处理数据, 1, 32)
.如果真 (选择框14.选中)
.如果真 (寻找文本 (处理文本, 编辑框20.内容, , 假) ≠ -1)
加入文本1 (处理数据, 0)
返回 (1)
.如果真结束

.如果真结束
.计次循环首 (超级列表框4.取表项数 (), x)
.如果真 (处理文本 = 取文本中间 (超级列表框4.取标题 (x - 1, 0), 1, 32))
加入文本1 (处理数据, 0)
返回 (1)
.如果真结束

.计次循环尾 ()
.如果真 (选择框16.选中)
.如果真 (取文本中间 (处理文本, 到整数 (编辑框26.内容), 到整数 (编辑框25.内容)) = 编辑框24.内容)
.如果 (选择框15.选中)
.如果真 (取文本中间 (处理文本, 到整数 (编辑框22.内容), 到整数 (编辑框21.内容)) = 编辑框23.内容)
加入文本1 (处理数据, 0)
返回 (1)