以下内容会员跟帖回复才能看到
==============================
//冷雨夜接口↓
#import "LYYDT.LYYDTClass" LYY
功能 逻辑型 答题子程序()
整型 intQ,intW
dm_ret = dm.UseDict(0)
辅助.等待(20)
dm_ret = dm.FindStrFast(299,43,503,97,"验正码", "ffffff-050505", 1.0, intQ, intW)
如果(intQ<0)
返回 真
如果结束
//接取验正码↓
dm_ret = dm.Capture(intQ-6,intW-47,intQ+125,intW-8,"C:\\"+转换.整型转字符型(hwnd)+".bmp")
辅助.等待(1000)
ID=LYY.SendImages("账号","密码","答题类型","60","C:\\"+转换.整型转字符型(hwnd)+".bmp","只有加减","","")
辅助.等待(100)
标签.设置文本("消息提示","数据分析--"+ID)
如果(ID=="账号不存在")
返回 真
如果结束
如果(ID=="密码错误")
返回 真
如果结束
如果(ID=="账号锁定")
返回 真
如果结束
如果(ID=="类型不存在")
返回 真
如果结束
如果(ID=="题分不足")
返回 真
如果结束
如果(ID=="致命错误")
返回 真
如果结束
如果(ID=="图片路径无效")
返回 真
如果结束
如果(ID=="图片格式不支持")
返回 真
如果结束
如果(ID=="参数不全")
返回 真
如果结束
如果(ID=="无法确认")
返回 真
如果结束
整型 fx=转换.字符型转整型(ID)
如果(fx<0)
返回 真
如果结束
字符型 答案
循环(真)
答案=LYY.GetAnswer(ID)
整型 长度=字符串.长度(答案)
标签.设置文本("消息提示","检测答案---等待回答中····")
辅助.等待(30)
如果(长度>0)
跳出
如果结束
循环结束
辅助.消息框(答案)
返回 真
功能结束
//有个小问题 就是调用时要用 tc 插件工具 注册下冷雨夜 插件 |
[复制链接]
/2 
发表于 2013-5-9 19:37:37
