MyArray = Split(sRect, "|")
x = Clng(MyArray(0))
y = Clng(MyArray(1))
L = Clng(MyArray(2))
H = Clng(MyArray(3))
Call inputQQandPaw(x, y)
Call judgeValidate()
Else
MessageBox "没有可输入的QQ和密码!"
Call reStartApp()
End If
End Function
/*---------------------------选择频道—————-----------*/
Function selectChannel()
Delay 40000
Hwnd = Plugin.Window.Find("地下城与勇士", "地下城与勇士")
If Hwnd <> 0 Then
FindPic 107,182,693,470, "Attachment:\" & CH & ".bmp", 1.0, intX, intY
If intX > 0 and intY > 0 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftDoubleClick 1
Call selectorRoles()
Else
MessageBox "找不到所选频道"
Call reStartApp()
End If
Else
MessageBox "找不到所选频道"
Call reStartApp()
End If
End Function
/*
*Fun 选择角色
*arg1 flag调用标致,0 为刚登陆时的
* num 为登录后换角色的情况
**/
/*---------------------------选择角色-----------------------------------------*/
Function selectorRoles()
Delay 7000
Hwnd = Plugin.Window.Find("地下城与勇士", "地下城与勇士")
If Hwnd <> 0 Then
FindPic 340,30,460,65, "Attachment:\selectroles.bmp", 0.8, intX, intY
If intX > 0 and intY > 0 Then
Call selectRoles(0)
Else
MessageBox "找不到所选角色"
Call reStartApp()
End If
Else
MessageBox "找不到所选角色"
Call reStartApp()
End If
End Function
/******************************DNF双开同步版2**********************************************/
/*
*@Fun Top DNF Window
*@arg
*@retun null
**/
Function topDnfWindow(hideOrShow)
handler = Plugin.Window.Find("#32770","DNF双开同步版2.0")
Call Plugin.Window.Restore(handler)
Call Plugin.Window.Top(handler, 0)
sRect = Plugin.Window.GetClientRect(handler)
SKMyArray = Split(sRect, "|")
skL = Clng(SKMyArray(0)) : skT = Clng(SKMyArray(1))
//隐藏窗口
If hideOrShow = 0 Then
MoveTo skL + 85, skT + 100
Delay 300
LeftClick 1
Delay 200
End If
//显示窗口
If hideOrShow = 1 Then
MoveTo skL + 305, skT + 100
Delay 300
LeftClick 1
Delay 200
End If
Delay 1000
Call Plugin.Window.Min(handler)