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)