觅风论坛

标题: QQ影子模拟器 [打印本页]

作者: Boom不 时间: 2017-10-28 14:34
标题: QQ影子模拟器
.版本 2
.支持库 iext

.程序集窗口程序集_窗口1
.程序集变量配置文件号, 整数型
.程序集变量关键词分割, 文本型, , "0"
.程序集变量计次A, 整数型

.子程序 _编辑框1_获得焦点

透明标签2.标题＝ “关键词重复检测中...”

.子程序 _编辑框2_获得焦点

编辑框2.文本颜色＝ #黑色
编辑框2.内容＝ “”

.子程序 _编辑框2_失去焦点

.如果真 (编辑框2.内容 ≠ “” 且编辑框2.内容 ≠ “<这里填写收到关键词要回复的内容>”)
返回 ()
.如果真结束
编辑框2.文本颜色＝ #灰色
编辑框2.内容＝ “<这里填写收到关键词要回复的内容>”

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

.如果真 (编辑框1.内容＝ “”)
信息框 (“请输入关键词!”, 0, , )
返回 ()
.如果真结束
.如果真 (编辑框2.内容＝ “” 或编辑框2.内容＝ “<这里填写收到关键词要回复的内容>”)
信息框 (“请输入回复关键词的内容!”, 0, , )
返回 ()
.如果真结束
透明标签2.标题＝ “写入成功!重启软件生效!”
写配置项 (取运行目录 () ＋ “\word.ini”, 编辑框1.内容, “回复内容”, 编辑框2.内容)

_窗口1_创建完毕 ()

.子程序 _窗口1_创建完毕

超级列表框1.全部删除 ()
.判断开始 (文件是否存在 (取运行目录 () ＋ “\word.ini”) ＝真)
配置文件号＝打开文件 (取运行目录 () ＋ “\word.ini”, , )
关键词分割＝分割文本 (读入文本 (配置文件号, ), #换行符, )
.计次循环首 (取数组成员数 (关键词分割), 计次A)
      输出调试文本 (关键词分割 [计次A])
      .如果真 (寻找文本 (关键词分割 [计次A], “[”, , 假) ≠ -1)
         超级列表框1.插入表项 (0, 到文本 (超级列表框1.取表项数 () ＋ 1), , , , )
         超级列表框1.置标题 (0, 1, 文本_取出中间文本 (关键词分割 [计次A], “[”, “]”))
      .如果真结束

.计次循环尾 ()
.默认

.判断结束

模块_超级列表框排序 (超级列表框1, 0)

.子程序 _超级列表框1_右键单击表项

弹出菜单 (操作, , )

.子程序 _查看回复内容_被选择

编辑框1.内容＝超级列表框1.取标题 (超级列表框1.现行选中项, 1)
编辑框2.内容＝读配置项 (取运行目录 () ＋ “\word.ini”, 编辑框1.内容, “回复内容”, )
编辑框2.文本颜色＝ #黑色

.子程序 _窗口1_将被销毁

关闭文件 (配置文件号)

.子程序 _超级列表框1_左键单击表项

输出调试文本 (超级列表框1.现行选中项)

作者: IUYUYUUYUY 时间: 2017-10-28 14:57
嘻嘻不错支持一个

作者: ... 时间: 2017-10-28 15:21
前来支持~~~~~~~~~~~~~~~~~~~

作者: 风月 时间: 2017-10-28 15:44
很给力。。。。很喜欢

作者: 无痕 时间: 2017-10-28 16:07
这个好好支持一下

作者: 1354541 时间: 2017-10-28 16:31
这个不错，谢谢共享

作者: 天空欣欣天下 时间: 2017-10-28 17:21
前来支持~~~~~~~~~~~~~~~~~~~

作者: 小麦555 时间: 2017-10-28 18:12
很给力。。。。很喜欢

作者: 天空欣欣天下 时间: 2017-10-28 19:02
不错不错支持下

作者: 斯蒂芬 时间: 2017-10-28 19:52
支持你们一下下哈

作者: 2675835142 时间: 2017-10-28 20:43
顶起很好的帖

作者: 封偌丶 时间: 2017-10-28 21:12
前来支持~~~~~~~~~~~~~~~~~~~

作者: 好吧你又赢了 时间: 2017-10-28 21:42
谢谢楼主的辛苦分享

作者: pei002 时间: 2017-10-28 22:12
学习了，这就去试试

作者: 火狐 时间: 2017-10-28 22:41
顶一个了

作者: 舞步 时间: 2017-10-28 23:11
这个不错，谢谢共享

作者: 5555 时间: 2017-10-28 23:32
谢谢楼主，，，收藏ing

作者: wwww 时间: 2017-10-28 23:54
好像还不错！

作者: 4414513216511 时间: 2017-10-29 00:15
路过还不错

作者: 骚年 时间: 2017-10-29 00:37
看帖子的要发表下看法

作者: dsdasf 时间: 2017-10-29 00:58
藕是来打酱油滴...

作者: 阿运 时间: 2017-10-29 04:15
谢谢楼主的辛苦分享

作者: w115182772 时间: 2017-10-29 07:32
不错不错支持下

作者: 火狐 时间: 2017-10-29 10:48
支持你们一下下哈

作者: 卧槽你妹 时间: 2017-10-29 14:05
不错哦喜欢嘿嘿

作者: li123 时间: 2017-10-29 17:22
顶一个了

作者: wz19981007 时间: 2017-10-29 17:42
谢谢楼主，，，收藏ing

作者: 123456 时间: 2017-10-29 18:02
支持一下，期待更多东西

作者: wz19981007 时间: 2017-10-29 18:22
期待中......

作者: Hacker 时间: 2017-10-29 18:42
路过还不错

作者: zf123456 时间: 2017-10-29 19:02
感觉不错

作者: lhq19880526 时间: 2017-10-29 23:16
学习了！！！！

作者: 呵呵 时间: 2017-10-30 03:31
学习一下！十分感谢

作者: 图个简单 时间: 2017-10-30 07:45
学习了，这就去试试

作者: 凌空 时间: 2017-10-30 11:59
抢楼了，前排第一次啊

作者: 呵呵 时间: 2017-10-30 16:14
前来围观，LZ好样的！

作者: qq1124824221 时间: 2017-10-30 16:22
谢谢楼主的辛苦分享

作者: 张庆伟23 时间: 2017-10-30 16:31
还是看不懂，复杂

作者: 骚年 时间: 2017-10-30 16:39
支持你们一下下哈

作者: asd26297 时间: 2017-10-30 16:48
顶一个了

作者: qq1124824221 时间: 2017-10-30 16:57
感谢您的无私精神...

作者: 物语 时间: 2017-10-30 16:58
谢谢楼主，，，收藏ing

作者: 黑崎一宇啊 时间: 2017-10-30 16:59
好像还不错！

作者: 丶断弦 时间: 2017-10-30 17:00
学习了，这就去试试

作者: qq1354596367 时间: 2017-10-30 17:01
不错哦喜欢嘿嘿

作者: 天汇 时间: 2017-10-30 17:02
抢楼了，前排第一次啊

作者: lmx0618 时间: 2017-10-30 17:57
很给力。。。。很喜欢

作者: 光光 时间: 2017-10-30 18:53
这个好好支持一下

作者: gwm231 时间: 2017-10-30 19:48
感谢您的无私精神...

作者: lmx0618 时间: 2017-10-30 20:43
顶起很好的帖

作者: zxx736 时间: 2017-10-30 21:39
支持！！！！前排！！！！

作者: a32d321as 时间: 2017-10-30 22:02
还是看不懂，复杂

作者: 小粑 时间: 2017-10-30 22:26
学习了，这就去试试

作者: a32d321as 时间: 2017-10-30 22:50
感谢您的无私精神...

作者: 好吧你又赢了 时间: 2017-10-30 23:13
这个不错，谢谢共享

作者: 无聊玩玩 时间: 2017-10-30 23:37
看帖子的要发表下看法

欢迎光临觅风论坛 (https://www.eyyba.com/)