|
- 初中三年级
- 2220985
- 396
- 0
- 522 朵
- 2506 个
- 334 个
- 480
- 2013-10-27
|
1#
t
T
发表于 2015-01-22 18:21
|
|只看楼主
秒杀所有类似疾风之刃的创建角色思路 本文由按键学院提供技术支持 按键学院交流群（1群已满）：376122403
零基础学按键精灵群（2群）：372671254
上一期院刊中，我们分享了DNF自动登录的思路，以及代码。
今天我们体验下《疾风之刃》的创建角色。
并且附带上，《疾风之刃》自动登录代码。 |
|
疾风之刃自动登录
《疾风之刃》的自动登录和上一期的DNF的思路流程是一样的，套用进去即可。 |
上期院刊链接地址：学会这招，所有的游戏自动登录不在话下创建角色——流程图
 - 您所在的用户组无法下载或查看附件
脚本界面- 您所在的用户组无法下载或查看附件
1、Form1.InputBox1 帐号信息。（帐号多，可使用txt方式记录读取）
2、Form1.InputBox2 密码信息。
3、Form1.ListBox1 角色职业信息。（疾风之刃目前暂时只有四类角色。）
4、Form1.OptionBox1 、Form1.OptionBox1 在该区服是否有创建过角色
（如果在该区服是第一次建立角色，选择区服登录游戏之后，播放完游戏动画后会直接跳转到创建角色的界面）
（如果在该区服已经建立过角色，选择区服登录游戏之后，会跳转到选频道的界面）
|
在该区服已创建过角色
- 您所在的用户组无法下载或查看附件
目前疾风之刃有四个大区。
自动登录里，小编做的选区例子选择的是电信一区的幽眠峡谷。
如果之前在这个区服中创建过角色，点击进入游戏，游戏动画播放完之后会进入选频道的界面。
 那么，问题来了，播放动画很耗时，跳过动画播放的方法是点击游戏窗口按ESC键。
但是，我们在上期的时候提到过，游戏窗口句柄生成并不代表窗口界面已经完全加载好显示出来了。
所以估摸不好，要在什么时候按下ESC键。
性能不好点的电脑，加载游戏的时候，虽然窗口边缘出来了，但是窗口内里还是空的透明的。所以通过找窗口标题条的图片也不得行。
例子中，小编没有跳过动画，而是等动画播放完毕。如果童鞋们有好的解决方法，欢迎跟帖分享~~- 您所在的用户组无法下载或查看附件
所以，选好区服点击 进入游戏 按钮之后，
咱们就开始循环找图，
- 您所在的用户组无法下载或查看附件
找选频道界面的这个选择频道按钮。
如果找到了，说明动画已经播放完毕。
 接着就是绑定窗口了，游戏窗口的类名为"JFZR"
我们就用类名来查找窗口。
与登录窗口不同，游戏窗口是支持后台图色模式的，
测试发现，dx模式可以截取到后台图色。
图色模式：dx模式
鼠标模式：windows模式
键盘模式：windows模式
文本输入：SendString2本例子中，游戏窗口的分辨率为1280*720，窗口模式。- 您所在的用户组无法下载或查看附件
 选择频道默认选中的是上次登录过的频道。不需去改变它。绑定窗口之后我们点击进入频道进入选角色的界面。- 您所在的用户组无法下载或查看附件
循环找图判断 “创建角色” 按钮 是否出现，出现则说明到了选择角色界面。
注意：找到创建角色按钮图片的时候，界面并没有完全加载，所以如果找到就马上点击的话，会出现没有响应的情况。在找到创建角色 按钮图片的代码之后，我们可以加点延时。延时过后再点击创建角色按钮 进入创建角色界面。在该区服未创建过角色未创建过角色，在选好区服点击进入游戏之后，游戏动画播放完毕直接进入到创建角色界面。 |
- 您所在的用户组无法下载或查看附件
我们通过循环找 “生成”按钮，来判断是不是已经到了创建角色界面。
疾风之刃选择角色职业的方式，是靠点击来选择的，点击生成按钮上方的小圈圈选择中意的职业。
每个圈圈之间间隔87个像素点（没有很精确，小编估算了下是87。误差一点没有关系，只要保证四个角色，点击的位置都在有效范围即可。）
第一个职业圈圈的中心点为 500，590.
也就是说，如果我们想要点击第二个的话，要在第一个的基础上，x坐标加上87个像素点，y坐标不变。
第三个的x坐标加上2个87
第四个的x坐标加上3个87 我们用列表框来作为职业选择框，列表框的索引起始是0
剑斗士放在第一位，它的索引为0
刃武者第二位，索引为1
控魔师第三位，索引为2
千月姬第四位，索引为3
列表框的ListIndex属性，返回的是当前列表框选中项的索引值。x坐标 = 500 + 87 * Form1.ComboBox1.ListIndex
这样，一行代码就可以计算出当前要创建的职业的图标x坐标的值。
x坐标的值知道了，y坐标值不变，我们就可以开始点击要创建的职业图标，
点击之后会切换职业画面，我们设置个延时，等画面切完之后，点击“生成”按钮拓展：有的游戏是通过点击左右键来滚动切换角色，进行角色职业的选择。
角色排列顺序是固定的情况下，我们可以 以默认职业作为基点，计算到自己要创建的角色，需要再此基础上点击多少次右键或者左键才能选到。
通过这样的方式，即可选择要创建的职业。 |
取名界面- 您所在的用户组无法下载或查看附件
通过循环找 “名称”字样，来判断是不是已经到了取名界面。用dm插件的 SendString2命令向输入框输入名称，可以是指定的名称，也可以是随机的。 例子中，我们使用 随机取名。  怎么个随机法呢？
我的命令库——》算法- 您所在的用户组无法下载或查看附件
算法下就有随机取姓名函数
直接调用十分方便。
如果不想随机取中规中矩的姓名，
我们也可以自己设置要随机的名字。
详细内容可参见：【院刊】-【201410期】游戏创建角色随机取名输入名称之后，点击 创建角色 按钮。判断名字是否重复- 您所在的用户组无法下载或查看附件
如果取的名字重复了会出现上图中的提示
如果名字可以使用，则角色创建成功，会返回到选择角色的界面。- 您所在的用户组无法下载或查看附件
所以，我们点击创建角色之后，循环判断上图中的“是”按钮有没有出现（出现则返回到随机取名的步骤，重新取名重新输入。） 同时判断 “创建角色” 按钮是否出现，出现则说明创建成功，脚本结束。整体代码- ////////////////////////////////////////////////////////////////////////////////
- // 自动登录 ////////////////
- //////////////////////////////////////////////////////////////////////////////
- 帐号 = Form1.InputBox1.Text
- 密码 = Form1.InputBox2.Text
- //////////////////////////////////
- // 释放附件、注册大漠等 ////////
- /////////////////////////////////
- PutAttachment "D:\test","*.*"'释放附件
- Call register()'调用注册大漠子程序
- dm_ret = dm.SetDict(0, "test.txt")'加载字库
- RunApp "E:\疾风之刃\TCLS\Client.exe"'启动游戏
- ////////////////////////////////////
- //// 查找登录窗口句柄 ////////
- ///////////////////////////////////
- Do
- hwnd = Plugin.Window.find(0, "疾风之刃登录程序") '查找登录窗口句柄
- Delay 200
- Loop While hwnd = 0
- ////////////////////////////////////
- //// 绑定窗口句柄 ////////
- ///////////////////////////////////
- dm_ret = dm.BindWindow(hwnd,"normal","windows","windows",0)'绑定窗口
- dm_ret = dm.GetClientRect(hwnd, x1, y1, x2, y2)'获取窗口客户区大小
- ////////////////////////////////////
- //// 判断是否在帐号输入界面 ////////
- //////////////////////////////////
- Call 判断(x1, y1, x2, y2, "判断是否在帐号输入界面.bmp")
- Rem 输入帐号密码
- Delay 1000
- MoveTo x1 + 966, y1 + 565'点击帐号输入框
- LeftClick 1
- ////////////////////////////////////
- //// 删除之前的帐号 ////////
- //////////////////////////////////
- For 20
- KeyPress 8,1
- Next
- For 20
- KeyPress 46,1
- Next
- ////////////////////////////////////
- //// 输入帐号 ////////
- //////////////////////////////////
- SayString 帐号
- ////////////////////////////////////
- //// 输入密码、点击 进入游戏 按钮 //
- //////////////////////////////////
- moveto x1+974,y1+608 '点击密码输入框
- LeftClick 1
- Delay 1000
- Call Lib.键盘.KeyList(密码, 2, 20)'输入帐号
- dm.moveto 1023,725'点击 进入游戏 按钮
- dm.LeftdoubleClick
- ////////////////////////////////////
- // 判断是否在选区界面、选区 //////
- ///////////////////////////////////
- Do
- dm_ret = dm.FindStr(x1, y1, x2, y2,"电信一区","ffffff-000000",1.0,intX,intY)
- If intX >= 0 and intY >= 0 Then
- dm.moveto intx, inty
- dm.leftclick '点击"电信一区"
- End If
- Delay 200
- Loop While dm_ret = - 1
- Do
- dm_ret = dm.FindStr(x1, y1, x2, y2,"幽眠峡谷","ffffff-000000",1.0,intX,intY)
- If intX >= 0 and intY >= 0 Then
- dm.moveto intx, inty
- dm.leftclick '点击"幽眠峡谷"
- End If
- Delay 200
- Loop While dm_ret = - 1
- ////////////////////////////////////
- //// 点击"进入游戏" 按钮 ///////
- //////////////////////////////////
- dm.moveto 1035,714
- dm.leftclick
- ////////////////////////////////////
- //// 判断登录是否成功 ////////
- //////////////////////////////////
- Do
- ' 查找 密码错误 界面
- dm_ret = dm.FindPic( x1, y1, x2, y2,"确定.bmp","000000",0.9,0,intX,intY)
- If intX >= 0 and intY >= 0 Then
- Delay 1000
- dm.moveto intX, intY
- dm.leftclick
- Goto 输入帐号密码 '出现错误提示，点击确定按钮之后，重新开始输入帐号密码
- Exit Do
- End If
- '查找创建角色窗口句柄
- hwnd = Plugin.Window.find("JFZR",0)
- Delay 200
- Loop While hwnd = 0
- dm_ret = dm.UnBindWindow() '解绑登录窗口
- ////////////////////////////////////////////////////////////////////////////////////
- ////// 创建角色 ////////////////
- //////////////////////////////////////////////////////////////////////////////////
- ///////////////////////////////////////////////////////////////////
- ////// 该区服已创建过角色，则执行选频道操作。未创建过则不选频道 ////
- /////////////////////////////////////////////////////////////////
- If Form1.OptionBox1.Value = 1 Then
- //////////////////////////////////////
- /// 判断是否在选择频道界面 ///////
- /////////////////////////////////////
- Call 判断(0, 0, 2000, 2000, "选择频道界面.bmp")
- ////////////////////////////////////
- //////// 绑定窗口句柄 ////
- ////////////////////////////////////
- dm_ret = dm.BindWindow(hwnd,"dx","windows","windows",0)'绑定窗口
- dm_ret = dm.GetClientRect(hwnd, x1, y1, x2, y2)'获取窗口客户区大小
- //////////////////////////////////////
- /// 点击 选择频道 按钮 ///////
- /////////////////////////////////////
- Delay 1000
- dm.moveto 637,653
- dm.leftclick
- //////////////////////////////////////
- ////// 查找创建角色按钮 ///////
- /////////////////////////////////////
- Do
- dm_ret = dm.FindPic( x1, y1, x2, y2,"创建角色.bmp","000000",0.9,0,intX,intY)
- If intX >= 0 and intY >= 0 Then
- Delay 2000
- dm.moveto intX, intY
- dm.leftclick
- Exit Do
- End If
- Loop While dm_ret = - 1
- End if
- ///////////////////////////////////////
- ////// ////////
- //////////////////////////////////////
- //////////////////////////////////////
- ////// 判断是否在创建角色界面 ////////
- /////////////////////////////////////
- Call 判断(0, 0, 2000, 2000, "判断是否在创建角色界面.bmp")
- ////////////////////////////////////
- //////// 绑定窗口句柄 ////
- ////////////////////////////////////
- dm_ret = dm.BindWindow(hwnd,"normal","windows","windows",0)'绑定窗口
- dm_ret = dm.GetClientRect(hwnd, x1, y1, x2, y2)'获取窗口客户区大小
- ////////////////////////////////////////
- //////// 点击职业图标 ////////
- ///////////////////////////////////////
- 职业序号= Form1.ComboBox1.ListIndex
- x坐标 = 500 + 87 * 职业序号
- dm.moveto x坐标, 590
- dm.leftclick
- ////////////////////////////////////////
- //////// 点击"生成"按钮 ////////
- ///////////////////////////////////////
- Delay 2000
- dm.moveto 634,673
- dm.leftclick
- ////////////////////////////////////////
- //////// 输入随机姓名 ////////
- ///////////////////////////////////////
- rem 输入随机姓名
- Call 判断(x1, y1, x2, y2, "输入名字.bmp")
- 随机姓名 = Lib.算法.随机取姓名()
- dm.moveto 566,576 '点击输入框
- dm.leftclick
- dm.SendString2 hwnd, 随机姓名
- Delay 200
- dm.moveto 630,670
- dm.leftclick
- ////////////////////////////////////////
- //////// 判断名字是否被占用 ////////
- ///////////////////////////////////////
- Do
- dm_ret = dm.FindPic( x1, y1, x2, y2,"名字被占用.bmp","000000",0.9,0,intX,intY)
- If intX >= 0 and intY >= 0 Then
- Delay 1000
- dm.moveto intX, intY
- dm.leftclick
- Goto 输入随机姓名 '出现错误提示，点击确定按钮之后，重新开始输入随机姓名
- Exit Do
- End If
- ks = dm.FindPic( x1, y1, x2, y2,"创建角色.bmp","000000",0.9,0,intX,intY)
- Loop While ks = - 1
- ////////////////////////////////////////
- ////// "判断图片是否存在"子程序 ////
- ///////////////////////////////////////
- Sub 判断(x, y, x2, y2,图片名称)
- Do
- dm_ret = dm.FindPic(x1, y1, x2, y2,图片名称,"000000",0.9,0,intX,intY)
- Delay 200
- Loop While dm_ret = - 1
- End Sub
- ////////////////////////////////////////
- ////// 注册大漠 ////////
- ///////////////////////////////////////
- Sub register()
- Set ws = createobject("Wscript.Shell")
- ws.run "regsvr32 atl.dll /s"
- Set ws = nothing
- call Plugin.RegDll.Reg ( "D:\test\dm.dll")
- Set dm = createobject("dm.dmsoft")
- ver = dm.ver()
- If len(ver) = 0 Then
- MessageBox "插件注册失败,检查系统是否禁用了vbs脚本权限"
- EndScript
- End If
- dm.SetPath "D:\test"
- End Sub
- ////////////////////////////////////////
- ////// "脚本停止子程序" ////////
- ///////////////////////////////////////
- Sub OnScriptExit()
- dm_ret = dm.UnBindWindow() //解绑窗口
- End Sub
-
 - 您所在的用户组无法下载或查看附件
 本文由按键学院提供技术支持
【招生】主流回合制常见功能网络辅助教学——你懂得！
点评
半杯醉
good，，，
发表于 2017/1/5 19:31:33
|
闽公网安备 35010002000112号