|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
答题线程,在是线程的时候没问题,开启线程就会重复截图求问题
循环(真)
X1,Y1
循环(真)
插件功能.插件对象.FindStrFast(249,209,397,282,"三个不|同的|怪物1","00fcf8-000000",0.9,X1,Y1)
如果(X1>0)
aMemo=编辑框.获得文本("ReportText","日志")
编辑框.设置文本("ReportText","开始答题"&"\r\n"&aMemo,"日志")
跳出
否则
继续
如果结束
循环结束
dd=辅助.随机数(1,999999999)
插件功能.插件对象.Capture(131,225,714,434,help.getrcpath("C:\\xaxx112\\")&"\\"&dd&".bmp")
aMemo=编辑框.获得文本("ReportText","日志")
路径=辅助.获取资源路径("C:\\xaxx112\\"&"\\"&dd&".bmp")
aFilePath=路径
aStrs=AX.SendFile(aUserName,aUserPassWord,aItemNo,aFilePath,aTimeOut)
编辑框.设置文本("ReportText","发送题号="&aStrs&"\r\n"&aMemo,"日志")
返回答案,返回串,i,分隔符=","
循环(真)
返回答案=AX.GetAnswer(aStrs)
aMemo=编辑框.获得文本("ReportText","日志")
如果(返回答案!="")
如果(字符串.截取(返回答案,0,1)=="#")
//辅助.消息框("答题错误代码:"&返回答案)
goto 标记1 //答错或断线跳出重新发图
如果结束
编辑框.设置文本("ReportText","答案="&返回答案&"\r\n"&aMemo,"日志")
跳出//跳出把答案提交
如果结束
辅助.等待(2000)
循环结束
辅助.等待(1000)
字符串.分割(返回答案,",",返回串)
辅助.等待(500)
插件功能.插件对象.moveto(62+返回串,165+返回串[i+1])
辅助.等待(500)
插件功能.插件对象.LeftDoubleClick()
辅助.等待(500)
插件功能.插件对象.moveto(2,574)
goto 标记1
循环结束
上面是答题的功能
功能 验证()
Xd1,Yd1
插件功能.插件对象.FindStrFast(175,157,306,208,"三个不|同的|怪物1","00fcf8-000000",0.9,Xd1,Yd1)
如果(Xd1>0)
线程.暂停(战斗线程)
TC实例.答题()
辅助.等待(3000)
线程.恢复(战斗线程)
如果结束
辅助.等待(15000)
功能结束
把这个功能验证开启了线程,出现循环截图发送图片,高手解决下
|
|