求购VS对战平台自动跳房间喊话源码 - TC官方合作论坛

#import "dm.dmsoft" dm
空间自动喊话
int hwnd
int c //开启程序个数
int[] d//窗口句柄
int[] n//线程句柄
int[] p//进程句柄
整型线程句柄
功能逻辑型判断输入(字符型返回值)//判断输入的是否数字
整型长度,序号,判断
序号=0
长度=字符串.长度(返回值)
循环(序号<长度)
判断=字符串.返回字符(返回值,序号)
如果( !(判断 >=48 && 判断<= 57))
返回假
如果结束
序号=序号+1
循环结束
返回真
功能结束
功能整型换房间(整型下标)
整型[] 坐标=整型[100]//房间坐标
坐标[1]=280
坐标[2]=301
坐标[3]=343
坐标[4]=364
坐标[5]=385
坐标[6]=406
坐标[7]=427
坐标[8]=448
坐标[9]=469
坐标[10]=490
坐标[11]=511
坐标[12]=532
坐标[13]=553
坐标[14]=574
坐标[15]=595
坐标[16]=616
坐标[17]=637
坐标[18]=658
坐标[19]=679
坐标[20]=700
整型 y=坐标[下标]
dm.MoveTo (415,y)//点击进入房间
辅助.等待(500)
dm.LeftDoubleClick()
辅助.等待(1000)
循环(真)
字符型确定=dm.GetColor(641,527)//房间满
整型坐标点取色=转换.字符型转整型(确定,1)
//辅助.消息框(转换.整型转字符型(坐标点取色))
如果(坐标点取色==16771709)
辅助.等待(2000)
dm.KeyPress(13)
辅助.等待(500)
y=坐标[下标+1]
dm.MoveTo (415,y)//点击进入下一个房间
辅助.等待(500)
dm.LeftDoubleClick()
下标=下标-1
否则
跳出
如果结束
循环结束
辅助.等待(3000)
返回 0
功能结束
功能整型开始喊话()
字符型喊话内容=编辑框.获得文本("编辑框0")
整型长度=字符串.长度(喊话内容)
如果(长度==0)
辅助.消息框("喊话内容不能为空!")
返回 0
如果结束
如果(!(自动喊话.判断输入(编辑框.获得文本("编辑框1"))))
辅助.消息框("“间隔”输入的不是一个有效的字符,请重新输入纯数字!")
返回 0
如果结束
整型间隔=转换.字符型转整型(编辑框.获得文本("编辑框1"),0)
如果(!(自动喊话.判断输入(编辑框.获得文本("编辑框2"))))
辅助.消息框("“次数”输入的不是一个有效的字符,请重新输入纯数字!")
返回 0
如果结束
整型次数=转换.字符型转整型(编辑框.获得文本("编辑框2"),0)
如果(!(自动喊话.判断输入(编辑框.获得文本("编辑框3"))))
辅助.消息框("“房间”数输入的不是一个有效的字符,请重新输入纯数字!")
返回 0
如果结束
整型房间数=转换.字符型转整型(编辑框.获得文本("编辑框3"),0)
如果(房间数<6)
辅助.消息框("“房间数”不能小于6,请重新输入!")
返回 0
如果结束
逻辑型自动换房=复选框.获得状态("复选框0")
辅助.写入剪切板(喊话内容)
整型 b=0
循环(真)
整型 a=0
b=b+1
如果(b>房间数-5)
b=1
如果结束
自动喊话.换房间(b)
循环(次数>a)
a=a+1
字符型确定=dm.GetColor(935,767)//退出准备
整型坐标点取色=转换.字符型转整型(确定,1)
如果(坐标点取色==10603709)
辅助.等待(1000)
dm.MoveTo (935,767)
辅助.等待(500)
dm.LeftClick()
辅助.等待(500)
跳出
如果结束
辅助.等待(间隔*800)//开始喊话
dm.KeyDown (17)
辅助.等待(50)
dm.KeyPress(86)
辅助.等待(50)
dm.KeyUp(17)
辅助.等待(50)
dm.KeyDown (13)
辅助.等待(50)
dm.KeyUp(13)
辅助.等待(50)
循环结束
dm.MoveTo (970,815)//点击退出
辅助.等待(1000)
dm.LeftClick()
循环结束
返回 0
功能结束
功能逻辑型退出_点击()
线程.关闭(线程句柄)
//辅助.等待(2000)
辅助.退出()
返回真
功能结束
功能逻辑型初始化()
控件.可见("定时器0",假)
返回真
功能结束
功能逻辑型销毁()
线程.关闭(线程句柄)
辅助.退出()
返回真
功能结束
功能逻辑型开始1_热键()
线程句柄=线程.开启("自动喊话.开始喊话")
返回真
功能结束
功能逻辑型暂停2_热键()
线程.暂停(线程句柄)
返回真
功能结束
功能逻辑型恢复_热键()
线程.恢复(线程句柄)
返回真
功能结束
功能逻辑型退出3_热键()
线程.关闭(线程句柄)
辅助.退出()
返回真
功能结束
功能逻辑型按钮1_点击()
字符型喊话内容=辅助.读配置("配置","喊话内容","d:\\zdhh.ini")
字符型间隔=辅助.读配置("配置","间隔","d:\\zdhh.ini")
字符型次数=辅助.读配置("配置","次数","d:\\zdhh.ini")
字符型房间数=辅助.读配置("配置","房间数","d:\\zdhh.ini")
编辑框.设置文本("编辑框0",喊话内容)
编辑框.设置文本("编辑框1",间隔)
编辑框.设置文本("编辑框2",次数)
编辑框.设置文本("编辑框3",房间数)
返回真
功能结束
功能逻辑型按钮0_点击()
//这里添加你要执行的代码
辅助.写配置("配置","喊话内容",编辑框.获得文本("编辑框0"),"d:\\zdhh.ini")
辅助.写配置("配置","间隔",编辑框.获得文本("编辑框1"),"d:\\zdhh.ini")
辅助.写配置("配置","次数",编辑框.获得文本("编辑框2"),"d:\\zdhh.ini")
辅助.写配置("配置","房间数",编辑框.获得文本("编辑框3"),"d:\\zdhh.ini")
返回真
功能结束
功能逻辑型定时器0_时钟()//限时使用
//这里添加你要执行的代码
整型进程句柄=进程.获取进程句柄("自动喊话")
辅助.等待(30000)
进程.关闭进程(进程句柄)
返回真
功能结束
空间结束

复制代码