//下面这句是得到窗口句柄的边框大小(包括标题栏) Plugin Rect = Window.GetWindowRect(Hwnd01) MyArray = Split(Rect, "|") A1 = CInt(MyArray(2)) -CInt(MyArray(0)) B1 = CInt(MyArray(3))-CInt(MyArray(1)) MoveTo 180,180 For 10 MoveR 10,10 //下面这句是得到鼠标指向的窗口句柄 Plugin Hwnd02 = Window.MousePoint() If Hwnd02<>Hwnd01 Goto 000.得到需要的句柄 EndIf EndFor Rem 000.得到需要的句柄 VBS filename="..\句柄.txt" txt = Hwnd02 Gosub CX.句柄_02 A = 10 : B = 10 While A >0 and B >0 //下面这句是得到窗口句柄的边框大小(包括标题栏) Plugin Rect = Window.GetWindowRect(Hwnd02) MyArray = Split(Rect, "|") A = CInt(MyArray(2)) -CInt(MyArray(0))-960 B = CInt(MyArray(3))-CInt(MyArray(1))-560 A_1 = A1-A : B_1 = B1-B Plugin Window.Size(Hwnd01, A_1, B_1) Delay 500 EndWhile VBS filename="..\窗口.txt" txt= A_1 & "|" & B_1 Gosub CX.句柄_02 Delay 500 //下面这句是最小化窗口 //Plugin Window.Min(Hwnd01) //txt_record="调整后浏览器边框大小,X:" & A1-A & " Y:" & B1-B //Gosub CX.日志.记录 //下面这句是还原窗口 //Plugin Window.Restore(Hwnd01) //窗口句柄的边框大小,X:960 Y:560 Goto 启动无扰赛尔号完毕 EndIf Rem 启动无扰赛尔号完毕 Gosub CX.读句柄 Rem STAR For 50 Delay 300 Gosub CX.位置判断 If txt_record = "0" ElseIf txt_record = "传送仓" or txt_record = "机械室" Goto 持续攻击 ElseIf txt_record00 = "地球仪" Goto 持续攻击 ElseIf txt_record = "勇者塔内" Goto 持续攻击 ElseIf txt_record = "挑战平台" Goto 持续攻击 ElseIf txt_record = "火星一层" Goto 持续攻击 ElseIf txt_record = "云霄星一层" Goto 持续攻击 ElseIf txt_record = "海洋星一层" Goto 持续攻击 ElseIf txt_record = "地球仪" Goto 持续攻击 ElseIf txt_record = "精灵太空站左翼" Goto 持续攻击 ElseIf txt_record = "火星二层" Goto 持续攻击 ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "火星二层" ElseIf txt_record = "选择服务器" X01=167:Y01=189:time01=500 Gosub CX.直接点击 Delay 6000 If Var_QD = "3" //X00=783:Y00=532 //X01= X00 : Y01= Y00 : COL01 = "00CFFF" : time01=80 : xiaosh=1 //Gosub CX.点击判断 If KKK = 0 KKK = 1 Var_user=Cint(Var_user01)-1 Goto 打开页面 Else Delay 300 KeyPress 117,1 Goto END EndIf EndIf ElseIf txt_record = "开始" X01=476:Y01=498:time01=500 Gosub CX.直接点击 ElseIf txt_record = "选择其他用户" X01=437:Y01=488:time01=500 Gosub CX.直接点击