马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
空间 扫拍卖
字符型 名称
字符型 短语
字符型 价格
功能 读取物品价格()
字符型 物品标示1,物品名称1,价格1,物品标示2,物品名称2,价格2,物品名称3
整型 位置1,位置2,位置3,位置4,位置5
整型 a=1,b=1,c=1
名称
短语
价格
文件句柄 = 文件.打开("rc:价格设置表格.txt")
如果(文件句柄!=0)
循环(真)
//得到物品名称,如:灵魂晶石
字符型 内容=文件.读一行(文件句柄)
如果(字符串.长度(内容)<=0)
跳出
否则
位置1 = 字符串.查找字符(内容,124)
物品标示1 = 字符串.移除(内容,字符串.长度(内容)-位置1,假)
价格1 = 字符串.移除(内容,位置1+1,真)
位置2 = 字符串.查找字符串(内容,":")
物品名称1 = 字符串.移除(物品标示1,位置2+1,真)
名称 = 物品名称1
//得到搜狗短语,如:ab
位置3 = 字符串.查找字符(价格1,124)
物品标示2 = 字符串.移除(价格1,字符串.长度(价格1)-位置3,假)
价格2 = 字符串.移除(价格1,位置3+1,真)
位置4 = 字符串.查找字符串(价格1,":")
物品名称2 = 字符串.移除(物品标示2,位置4+1,真)
短语 = 物品名称2
//得到该物品价格,如:2000
位置5 = 字符串.查找字符串(价格2,":")
物品名称3 = 字符串.移除(价格2,位置5+1,真)
价格 = 物品名称3
如果结束
a = a + 1
b = b + 1
c = c + 1
循环结束
文件.关闭(文件句柄)
否则
辅助.对话框("请检查价格表是否填写准确!","温馨提示",0,true)
返回 " "
如果结束
返回 " "
功能结束
功能 获取键码值( 字母)
次数,结果 = 65
全部字母 = "abcdefghijklmnopqrstuvwxyz"
位置 = 字符串.查找字符串(全部字母,字母)
循环(次数<位置)
结果 = 结果 + 1
次数 = 次数 + 1
循环结束
返回 结果
功能结束
功能 快速扫描()
短语个数,个数,次数,截取数量,a=1,b=1,c=1,d=1
总短语,字母
按键码
扫拍卖.读取物品价格()
//鼠标移动点击一次,输入短语
键盘.按键(66,1)
辅助.等待(100)
鼠标.移动(130,88)
辅助.等待(100)
鼠标.左键单击(1)
辅助.等待(100)
鼠标.左键单击(1)
辅助.等待(100)
标签.设置文本("标签0",字符串.连接("正在搜索:",名称))
短语个数 = 字符串.长度(短语)
总短语 = 短语
个数 = 短语个数
短语个数 = 短语个数 - 1
循环(截取数量<个数)
字母 = 字符串.截取(总短语,0,短语个数)
按键码 = 扫拍卖.获取键码值(字母)
标签.设置文本("标签0",字符串.连接(按键码,名称))
总短语 = 字符串.移除(总短语,1,真)
d = d + 1
短语个数 = 短语个数 - 1
截取数量 = 截取数量 + 1
循环结束
d = 1
循环(真)
如果(按键码==0)
跳出
如果结束
键盘.按键(按键码,1)
辅助.等待(50)
d = d + 1
循环结束
鼠标.移动(508,51)//点击搜索
辅助.等待(50)
鼠标.左键单击(1)
辅助.等待(50)
鼠标.移动(561,124)//移动显示价格框,判断是否是一口价,以及价格判断。
辅助.等待(50)
//下面的代码我相信很简单,只要对比价格即可,如果是自己需要的秒下来,如果不是就添加一个是否需要扫下一页,不需要则换下一个物品。
//循环的话,你只需a,b,c都减少一次就是读取到记事本下一行了,也就是下一个物品,至于下面进行购买步骤我就不写了,大家可以拿去参考,
//代码写完大概200行不到。
返回 真
功能结束
功能 Start()
窗口句柄=窗口.找到窗口("地下城与勇士")
如果(窗口句柄 == 0)
辅助.对话框("请检查游戏是否开启!","温馨提示",0,true)
返回 真
否则
DM=com("dm.dmsoft")
DM.ver()
DM.SetPath(辅助.获取资源路径("rc:"))
DM.SetDict(0,"秒拍卖.txt")
窗口.设置位置(窗口句柄,0,0)
窗口.激活(窗口句柄)
help.sleep(1000)
扫拍卖.快速扫描()
如果结束
返回 真
功能结束
空间结束
|