TC官方合作论坛
标题:
【高级篇】7、2013地下城与勇士自动卖白色或蓝色装备
[打印本页]
作者:
T_暗乄殇灬
时间:
2013-3-4 21:18
标题:
【高级篇】7、2013地下城与勇士自动卖白色或蓝色装备
暂时放出代码,后面将慢慢介绍详情:
代码如下:
功能 变卖装备() //【开始卖东西方法】
ts暗殇 = T_暗乄殇灬.ts暗殇
Plug365_龍吟 = com("网络验证.Plug365")
标记1 = 0,数据 = 数组[5]
//[打开地图]
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
数据[0]=-1
数据 = 通用方法.找字方法(0,0,800,600,"游戏菜单|确认","ffffff-000000|ddc593-000000",ts暗殇)
如果(数据[0]==2)
ts暗殇.KeyPress(27)
辅助.等待(辅助.随机数(20,30))
如果结束
如果(字符串.比较(ts暗殇.GetColor(686,19),"ffffff")==0)
跳出
否则
ts暗殇.KeyPress(78)
辅助.等待(辅助.随机数(20,30))
如果结束
标记1 += 1
如果(标记1==200)
如果(字符串.比较(Plug365_龍吟.IsWindowDead(窗口句柄,20),"无响应")==0)
返回 "游戏卡死"
否则
标记1 = 0
如果结束
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
状态 = ""
如果(下拉框.得到选项("地图")==0)
状态 = 第一图任务.移动人物方法(188,160,171,138,203,177,0) //[移动人物到商店处]
否则
状态 = 第一图任务.移动人物方法(269,454,255,438,275,465,0) //[移动人物到商店处]
如果结束
如果(字符串.比较(状态,"网络连接中断")==0)
返回 "网络连接中断"
如果结束
如果(字符串.比较(状态,"游戏消失")==0)
返回 "游戏消失"
如果结束
如果(字符串.比较(状态,"游戏卡死")==0)
返回 "游戏卡死"
如果结束
辅助.等待(1000)
//[关闭地图]
标记1 = 0
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
如果(字符串.比较(ts暗殇.GetColor(686,19),"ffffff")!=0)
跳出
否则
ts暗殇.KeyPress(78)
辅助.等待(辅助.随机数(20,30))
如果结束
标记1 += 1
如果(标记1==200)
如果(字符串.比较(Plug365_龍吟.IsWindowDead(窗口句柄,20),"无响应")==0)
返回 "游戏卡死"
否则
标记1 = 0
如果结束
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
标记1 = 0
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
如果(下拉框.得到选项("地图")==0)
通用方法.鼠标移动方法(153,199,0,ts暗殇)
通用方法.鼠标移动方法(231,252,1,ts暗殇)
否则
通用方法.鼠标移动方法(562,302,0,ts暗殇)
通用方法.鼠标移动方法(597,355,1,ts暗殇)
如果结束
数据[0]=-1
数据 = 通用方法.找字方法(0,0,800,600,"游戏菜单|确认","ffffff-000000|ddc593-000000",ts暗殇)
如果(数据[0]==2)
ts暗殇.KeyPress(27)
辅助.等待(辅助.随机数(20,30))
如果结束
数据[0] = -1
数据 = 通用方法.找字方法(196,159,292,258,"商店","ffffb8-000000",ts暗殇)
如果(数据[0] == 2)
跳出
否则
ts暗殇.KeyPress(27)
辅助.等待(辅助.随机数(20,30))
如果结束
标记1 += 1
如果(标记1==200)
如果(字符串.比较(Plug365_龍吟.IsWindowDead(窗口句柄,20),"无响应")==0)
返回 "游戏卡死"
否则
标记1 = 0
如果结束
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
如果(复选框.获得状态("修理装备")) //【是否修理装备】
通用方法.鼠标移动方法(412,462,1,ts暗殇)
标记1 = 1
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
数据[0] = -1
数据 = 通用方法.找字方法(0,0,800,600,"确认","ddc593-000000",ts暗殇)
如果(数据[0] == 2)
通用方法.鼠标移动方法(数据[1]+3,数据[2]+5,1,ts暗殇)
数据[0] = -1
数据 = 通用方法.找字方法(0,0,800,600,"确认","ddc593-000000",ts暗殇)
如果(数据[0] == 1)
跳出
如果结束
否则
标记1 = 标记1 + 1
如果(标记1 == 5)
跳出
如果结束
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
如果结束
//【开始变卖白色和蓝色装备】
遍历(次数=0;次数<3;次数++)
通用方法.鼠标移动方法(494,291,0,ts暗殇)
遍历结束
遍历(次数=0;次数<3;次数++)
通用方法.鼠标移动方法(244,461,1,ts暗殇)
遍历结束
整型 x = 484,y = 319,intX,intY,格子数 = 0
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
ts暗殇.MoveTo(辅助.随机数(x-1,x+1),辅助.随机数(y-1,y+1))
辅助.等待(辅助.随机数(200,210))
数据[0] = -1
数据 = 通用方法.找字方法(10,10,800,600,"kg","ffffff-000000",ts暗殇)
如果(数据[0] == 2)
如果(ts暗殇.FindColor(数据[1]-21,数据[2]-44,数据[1],数据[2]-1,"b36bff-000000|ff00f0-000000",1.0,0,intX,intY)==0)
通用方法.鼠标移动方法(243,462,0,ts暗殇) //【点击出售】
辅助.等待(300)
通用方法.鼠标移动方法(x,y,1,ts暗殇) //【出售】
辅助.等待(100)
标记1 = 1
循环(真)
如果(通用方法.检测网络中断(ts暗殇))
返回 "网络连接中断"
如果结束
如果(!窗口.是否存在(窗口句柄))
返回 "游戏消失"
如果结束
数据[0] = -1
数据 = 通用方法.找字方法(0,0,800,600,"确认","ddc593-000000",ts暗殇)
如果(数据[0] == 2)
通用方法.鼠标移动方法(数据[1]+3,数据[2]+5,1,ts暗殇)
辅助.等待(300)
数据[0] = -1
数据 = 通用方法.找字方法(0,0,800,600,"确认","ddc593-000000",ts暗殇)
如果(数据[0] == 1)
跳出
如果结束
否则
标记1 = 标记1 + 1
如果(标记1 == 2)
跳出
如果结束
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
如果结束
如果结束
x = x + 30 //【上下相差28实际是30的间隔位置】
格子数 = 格子数 + 1
如果(格子数==8||格子数==16)
x=484
y=y+30
如果结束
如果(格子数==24)
跳出
如果结束
辅助.等待(辅助.随机数(20,30))
循环结束
遍历(次数=0;次数<3;次数++)
ts暗殇.KeyPress(27)
辅助.等待(辅助.随机数(20,30))
遍历结束
状态 = ""
如果(下拉框.得到选项("地图")==0)
状态 = 第一图任务.移动人物方法(661,279,654,259,674,298,0) //[移动人物到冰宫副本门口]
否则
状态 = 第一图任务.移动人物方法(354,454,344,438,362,471,0) //[移动人物到根特副本门口]
如果结束
返回 ""
功能结束
复制代码
作者:
bsuc
时间:
2013-4-18 13:57
高手
作者:
cybkk
时间:
2013-4-18 20:02
作者:
eri将军
时间:
2013-4-18 21:34
回复
1楼
T_暗乄殇灬
的帖子
看一下
作者:
muyongji1997
时间:
2013-4-19 22:21
看不懂。太乱了。
作者:
937262516
时间:
2013-5-2 15:17
我看到网络连接中断了!!!!!!!!!!!!
作者:
l520124
时间:
2013-5-7 20:10
我看到晕死了.一点都看不明白写什么的
作者:
muyongji1997
时间:
2013-5-7 23:11
晕头转向的。
作者:
as956925604
时间:
2013-6-22 23:51
0. 0看不懂额。。
作者:
sdcygxm
时间:
2013-7-5 11:33
晕了
作者:
一品小牛
时间:
2013-11-1 09:08
骚年,注意代码的重用。开一个线程始终监测网络,不就可以省好多代码了。不过看你还行,请教个问题,获得了一个窗口句柄后,怎么获取窗口内,某个编辑框或者某个控件的值呢?
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1