TC官方合作论坛

标题: QQ消息自动发送 [打印本页]

作者: 章昊    时间: 2011-7-13 14:45
标题: QQ消息自动发送
QQ消息自动发送示例这里发的所有源码附件需要用户下载安装TC开发工具使用,打开开发工具---在菜单栏中点击文件---打开---打开现有项目---找到该解压后的源码打开---启动调试生成.exe程序运行脚本。

【脚本介绍】该脚本模拟键盘自动重复的发送QQ消息,让大家熟悉自动发送消息的流程,对以后学习写游戏后台自动喊话作为一个铺垫,同时脚本中还涉及到了线程、循环语句、超级键盘以及界面设计控件的使用,希望大家认真学习,掌握如何控制循环的使用。

【原理】找到窗口---确认重复发送的次数---获取输入发送的内容---判断选择重复的次数---进入循环---将内容写入剪切板---启动超级键盘---使用复制组合键粘贴内容---发送消息---循环结束。

【使用说明】:
1、首先登陆游戏,打开发送消息窗口,然后运行脚本;
2、由于这里只是一个示例,并没有作出一些判断,若没有输入一个正确的窗口名称,程序将无法运行;
3、该脚本只适合QQ自动发送重复3、5、10、1000次4种选择;
4、使用时,建议关闭360,因为此操作涉及到后台键盘的使用。

[attach]219[/attach]

【源码如下】:

空间 QQ消息自动发送
//这是一个以"我的程序"命名的空间,下面的语句都在这个空间里实现
整型 线程编号
整型 选项
字符型 窗口名称
整型 次数
字符型 发送内容
整型 窗口类型
整型 标志

功能 逻辑型 获取窗口名称()
窗口名称 = 编辑框.获得文本("编辑框0")
//获取窗口名称
窗口类型 = 窗口.找到窗口(窗口名称)
如果(窗口类型==0)
辅助.消息框("窗口名称输入有误,请查正后输入")
否则
窗口.置顶(窗口类型,"")
//显示窗口在当前屏幕最前面
如果结束
返回

功能结束

功能 整型 获取重复次数()
整型 个数
选项=下拉框.得到选项("下拉框0")
//获取选择类型,共有3、5、10、1000四种选择
如果(选项==0)
次数 = 3
如果结束
如果(选项==1)
次数 = 5
如果结束

如果(选项==2)
次数 = 10
如果结束

如果(选项==3)
次数 = 1000
如果结束
返回 次数

功能结束

功能 逻辑型 获取发送内容()
发送内容 = 编辑框.获得文本("编辑框1")
返回

功能结束

功能 逻辑型 线程_执行()
字符型 内容
QQ消息自动发送.获取窗口名称()
//调用获取窗口名称函数获取窗口名称
QQ消息自动发送.获取重复次数()
//调用获取重复次数函数获取选择的重复次数
QQ消息自动发送.获取发送内容()
//调用获取发送内容函数获取内容
辅助.写入剪切板(发送内容)
//将获取的内容写入剪切板
内容=辅助.读取剪切板()

如果(次数==3)
//当重复次数选择3时,执行下面语句
重复(3)
超级键盘.按下(17)
//按下ctrl键
辅助.等待(50)
超级键盘.按键(86,1)
//按下V键,粘贴消息
辅助.等待(50)
超级键盘.ps弹起(17)
//ctrl键弹起
辅助.等待(50)
超级键盘.按下(17)
//按下ctrl键辅助.等待(50)
超级键盘.按键(13,1)
//回车键按下,发送消息
辅助.等待(50)
超级键盘.ps弹起(17)
重复结束
如果结束

如果(次数==5)
//当重复次数选择5时,执行下面语句
重复(5)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(86,1)
辅助.等待(100)
超级键盘.ps弹起(17)
辅助.等待(100)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(13,1)
辅助.等待(100)
超级键盘.ps弹起(17)
重复结束
如果结束

如果(次数==10)
//当重复次数选择10时,执行下面语句
重复(10)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(86,1)
辅助.等待(100)
超级键盘.ps弹起(17)
辅助.等待(100)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(13,1)
辅助.等待(100)
超级键盘.ps弹起(17)
重复结束
如果结束

如果(次数==1000)
//当重复次数选择1000时,执行下面语句
重复(1000)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(86,1)
辅助.等待(100)
超级键盘.ps弹起(17)
辅助.等待(100)
超级键盘.按下(17)
辅助.等待(100)
超级键盘.按键(13,1)
辅助.等待(100)
超级键盘.ps弹起(17)
重复结束
如果结束
返回

功能结束

功能 逻辑型 开始_点击()
线程编号=线程.开启("QQ消息自动发送.线程_执行")
//线程开启,开始执行程序
如果(线程编号==0)
辅助.消息框("线程开启失败")
//判断线程是否开启
如果结束
返回

功能结束

功能 逻辑型 退出_点击()
辅助.退出()
返回
功能结束

空间结束












作者: liu274724842    时间: 2011-7-13 15:57
学习中。。。。
作者: 小风子    时间: 2011-7-13 18:16
前台的?失望中…
作者: z419216713    时间: 2011-7-14 23:36
学学做
作者: z419216713    时间: 2011-7-15 01:33
fdddd
作者: z419216713    时间: 2011-7-15 22:43
在吗
作者: 章昊    时间: 2011-7-16 08:43
回复 6楼z419216713的帖子

在,有什么事?
作者: z419216713    时间: 2011-7-16 15:08
伟大的第一步
成功
要多谢昊歌
作者: 章昊    时间: 2011-7-16 15:10
回复 8楼z419216713的帖子

:+谢谢!
作者: ↘夢想飛舞√    时间: 2011-7-20 09:09
给力
作者: maple185    时间: 2011-8-4 18:14
:P我拿去群里试试
作者: sunny    时间: 2011-8-12 17:13
可以做个带参数的方法(次数) 这样代码简化很多
作者: laozuma10    时间: 2011-8-22 12:48
MOON到此一游
作者: 小丶笨笨    时间: 2011-8-23 16:53
也学习下
作者: 淘淘星梦缘    时间: 2011-9-6 11:12
不会,学习中
作者: 抓耳挠腮笨到家    时间: 2011-9-22 20:47
顶顶顶
作者: 4568524    时间: 2011-9-22 21:34
hao   hao   hao   hao   hao   hao
作者: long254229962    时间: 2011-9-27 09:31
什么用户组能下载附件  也不来个提示  哥郁闷了
作者: 961560902    时间: 2011-10-5 03:15
不会,看看
作者: q405047127    时间: 2011-10-30 19:01
学习了。:D
作者: 迩比可比克    时间: 2011-11-1 21:49
留迹   非水
作者: xiaojun1195    时间: 2011-11-17 12:26
生成程序了,但不能发送信息,继续努力
作者: xiaojun1195    时间: 2011-11-17 12:39
下载的源程序也不能发送消息
作者: 浪子    时间: 2011-11-21 10:22
为了能下载,只好无耻的顶贴,
作者: fujinuu    时间: 2011-11-21 16:11
顶一下.好东西
作者: yhw321    时间: 2011-11-22 08:43
看看
作者: 迷失    时间: 2011-11-24 21:34
不错顶
作者: 许小四    时间: 2011-11-27 17:36
回复看看。
作者: 568988502    时间: 2011-11-28 23:09
向窗口发送内容  用模拟按键 和用 键盘.发送内容()有什么区别啊
作者: sannuo    时间: 2011-11-29 09:58
学习学习。。
作者: mb000000000    时间: 2011-11-30 21:14
gggggggggggggggggggggggggggggggggggggggggggggggggg
作者: yjrc7410    时间: 2011-12-2 21:23
不错!易懂!易学!
作者: 丿_旧情人〃    时间: 2011-12-5 20:03
怎么下载?
作者: 小发    时间: 2011-12-7 17:34
看看..........
作者: 1084097057    时间: 2011-12-7 19:00
恩。。很好我很喜欢
作者: 619310577    时间: 2011-12-8 22:12
学习
作者: shi317920304    时间: 2011-12-9 14:31
这不是逼人 拉黑么……
作者: v11ks    时间: 2011-12-11 17:07
QQ短消息轰炸机啊 。
作者: willim1982    时间: 2011-12-16 11:58
值得学习
作者: wxt19870517    时间: 2011-12-16 14:10
顶一个!!
作者: 小米    时间: 2011-12-18 10:17
:|ding 你所在的用户组
作者: nan123456789    时间: 2011-12-18 10:30
dingdingding
作者: xiaotang    时间: 2011-12-18 10:30
11111111111
作者: liaosamuel    时间: 2011-12-19 18:40
不错哟,学习学习
作者: 245120345    时间: 2011-12-19 21:20
谢谢分享!!
作者: 939958665    时间: 2011-12-19 21:29
升级啊
作者: 939958665    时间: 2011-12-19 21:30
XUE XI A
作者: daoxiaoxia    时间: 2011-12-28 02:38
刚接触还真有点不明白不的地方
作者: daoxiaoxia    时间: 2011-12-28 16:42
很深奥 啊
作者: 随风大侠111    时间: 2012-1-9 02:31
好好给力,学习
作者: 爱倩柔    时间: 2012-1-9 03:45
学习 学习!
作者: 海绵宝宝    时间: 2012-1-10 18:36
回复 1楼章昊的帖子

行号:50 错误信息:’’是错误的实参数列表
求助
作者: piaoliloveling    时间: 2012-1-12 11:33
前台的
作者: 海绵宝宝    时间: 2012-1-12 16:12
垃圾了   TM都生成出错  问题见52#
作者: lhr520zyc    时间: 2012-1-20 02:19
我有很多问题搞不明白!!!
作者: 88888    时间: 2012-1-24 11:10
ereeeeee
作者: q815255545    时间: 2012-2-4 22:55
:P顶顶顶顶顶顶顶顶顶
作者: elex    时间: 2012-2-15 09:10
多多回帖:D
作者: 打瞌睡的老虎    时间: 2012-2-23 13:37
怎么样才能下载呀
作者: 奔跑的菠萝    时间: 2012-2-23 15:20
好吧我是来刷分的
作者: 4661654    时间: 2012-3-10 15:46
好,很好,非常好
作者: ocean    时间: 2012-3-10 16:01
我怎么下不了
作者: lei0461648    时间: 2012-3-20 16:41
学习中....
作者: yizhenge    时间: 2012-3-21 11:10
这个用来骚扰不错。嘿嘿
作者: dsa32156    时间: 2012-3-23 03:33
谁能给我做个脚本 很简单的脚本  就是游戏捡取物品的那个键 最快的速度无限按的
作者: dsa32156    时间: 2012-3-23 03:34
回复 1楼dsa32156的帖子

我QQ309199589
作者: 灬澄澄丶    时间: 2012-4-2 18:08
前台的我都不会呢! 额,学习学习吧!
作者: 己莫为    时间: 2012-4-22 15:45
很不错啊
作者: 512110215    时间: 2012-4-23 16:16
hehe~~~
作者: m199    时间: 2012-4-23 20:41
看看,能用不?
作者: yvyan    时间: 2012-4-26 17:25
领悟精髓。。
作者: ruddia    时间: 2012-5-15 16:30
新手啊,伤不起啊
作者: iamlxm2012    时间: 2012-5-18 12:58
学习了。:D
作者: fang2018    时间: 2012-5-18 21:25
学习下
作者: lutingli1    时间: 2012-5-26 14:19
谢谢············
作者: 1176018799    时间: 2012-5-26 15:52
- -!前台的-------无语
作者: 5933    时间: 2012-5-27 01:31
顶昊哥
作者: kankanba1001    时间: 2012-7-16 20:33
DDDDDDDDDDDDDDDDD
作者: scj2zxy    时间: 2012-9-2 17:26
学习了
作者: 844955551    时间: 2013-1-3 13:16
看一下先,是不是我需要的
作者: menglovelili    时间: 2015-3-14 16:13
我初学者,正打算研究webqq,路过,对于学习态度,赞一个!                 [不断学习]**快捷签名**作者:缘ManGo  QQ:35611068**签名快捷**[不断进步]




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1