不能将“逻辑型”数据转换到“文本型”数据。这个、怎么解决、谢谢了、你们看下代码、

[复制链接]
查看11 | 回复1 | 2011-8-21 19:24:01 | 显示全部楼层 |阅读模式
.版本 2
.程序集 窗口程序集1
.程序集变量 a套接字, 整数型, , , 用来保存拦截到封包的套接字
.程序集变量 自动准备包, 文本型
.程序集变量 a, 整数型
.子程序 自动准备, 整数型
.参数 套接字, 整数型
.参数 封包地址, 整数型
.参数 封包长度, 整数型
.参数 内容
内容 = 寻找文本 (字节集查看 (指针到字节集 (封包地址, 封包长度)), “0000010000000000”, 21, 假)
.判断开始 (内容 = -1)
.默认

自动准备包 = 字节集查看 (指针到字节集 (封包地址, 封包长度))
.判断结束
a套接字 = 套接字
返回 (0)
.子程序 _窗口1_将被销毁
卸载send ()
.子程序 _自动准备_被单击
.判断开始 (自动准备.选中)

自动准备.选中 = 真

安装send (&自动准备)

发送准备.时钟周期 = 100

过滤准备.时钟周期 = 100
.默认

自动准备.选中 = 假

卸载send ()

自动准备包 = “”

发送准备.时钟周期 = 0

过滤准备.时钟周期 = 0
.判断结束
.子程序 _功能_周期事件
内存_读整数型 (-1, 十六到十 (“ea21c”), 自动按键)
内存_读整数型 (-1, 十六到十 (“C8910”), 背景)
内存_读整数型 (-1, 十六到十 (“120e194”), 地址)
内存_读整数型 (-1, 地址 + 十六到十 (“190”), 偏移)
.如果真 (a = 1)

内存_写整数型 (-1, 偏移 + 十六到十 (“4C”), 到整数 (“4”))

内存_写整数型 (-1, 偏移 + 十六到十 (“5C”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“10C”), 到整数 (“65536”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“110”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“116”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“1E7”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“1EB”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“1EE”), 到整数 (“0”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“a8”), 到整数 (“1”))

内存_写整数型 (-1, 自动按键 + 十六到十 (“ac”), 到整数 (“0”))
.如果真结束
.如果真 (关闭背景.选中 = 真)

内存_写整数型 (-1, 背景 + 十六到十 (“4B5”), 到整数 (“0”))
.如果真结束
.子程序 _关闭背景_被单击
.如果真 (关闭背景.选中 = 假)

内存_写整数型 (-1, 背景 + 十六到十 (“4B5”), 到整数 (“1”))
.如果真结束
.子程序 _发送准备_周期事件
.局部变量 封包, 字节集
封包 = 字节集还原 (自动准备包)
send (a套接字, 取字节集指针 (封包), 取字节集长度 (封包), 0)
.子程序 _过滤准备_周期事件
.判断开始 (寻找文本 (自动准备包, “0000010000000000”, 21, 假) = -1)
.默认

卸载send ()
.判断结束

回复

使用道具 举报

千问 | 2011-8-21 19:24:01 | 显示全部楼层
他提示错误的时候,易语言的指针会停留在某一段代码的前面,就说明这段代码有错误。 您查找一下啊!...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行