收藏本站|设为首页
#在理解各条命令的基础上，您可以修改这个文件的内容
#您修改的结果将会在普通视图上有所反映
UserVar luj=E:\Game\mir\Mir.exe 热血传奇的完整路径 如：E:\Game\mir\Mir.exe
UserVar xuanqu=DropList{免费区:0|百区:1}=0 选择登陆区域
UserVar xuanfuwuqi=DropList{第一个:0|第二个:1|第三个:2|第四个:3|第五个:4|第六个:5|第七个:6|第八个:7}=1 登陆第几个服务器
UserVar txz=DropList{通行证登陆:0|帐号登陆:1}=0 登陆方式
UserVar ZhangHao=输入你的帐号 你的帐号
UserVar MiMa=输入你的密码 你的密码
//运行程序
VBSCall RunApp(luj)
Rem 开启游戏前等待
Delay 500
IfColor 157,531,3fffe,1
Goto 开启游戏前等待
EndIf
IfColor 159,567,96ee2,1
Goto 开启游戏前等待
EndIf
//判断免费区 或 百区
If xuanqu=0
MoveTo 326,557
EndIf
If xuanqu=1
MoveTo 635,552
EndIf
LeftClick 1
Rem 登陆界面前等待
Delay 500
If xuanqu=0
IfColor 496,114,318cbd,1
Goto 登陆界面前等待
EndIf
IfColor 499,114,318cbd,1
Goto 登陆界面前等待
EndIf
EndIf
If xuanqu=1
IfColor 515,180,318cbd,1
Goto 登陆界面前等待
EndIf
IfColor 520,180,29a5c6,1
Goto 登陆界面前等待
EndIf
Delay 1000
Goto 输入帐号密码
EndIf
//判断服务器数量
If xuanqu=0
IfColor 314,146,ffffff,0
fwqY=159
Goto 判断服务器数量
EndIf
IfColor 314,230,ffffff,0
fwqY=243
Goto 判断服务器数量
EndIf
IfColor 314,251,ffffff,0
fwqY=264
Goto 判断服务器数量
EndIf
IfColor 314,272,ffffff,0
fwqY=285
Goto 判断服务器数量
EndIf
IfColor 314,293,ffffff,0
fwqY=159
Goto 判断服务器数量
EndIf
Rem 判断服务器数量
For xuanfuwuqi
fwqY=fwqY+42
EndFor
MoveTo 391,fwqY
LeftClick 1
EndIf
Rem 输帐号前等待
Delay 1000
If xuanqu=0
IfColor 516,159,318cbd,1
Goto 输帐号前等待
EndIf
IfColor 519,159,397b9c,1
Goto 输帐号前等待
EndIf
If txz=1
MoveTo 329,192
EndIf
If txz=0
MoveTo 457,189
EndIf
LeftClick 1
EndIf
Rem 输入帐号密码
SayExpression ZhangHao
Delay 500
KeyPress 9 1
Delay 200
SayExpression MiMa
Delay 500
KeyPress 13 1
Rem end
EndScript
