1.     //下面这句是得到窗口句柄的边框大小(包括标题栏)
  2.     调用插件命令 Rect = Window.GetWindowRect(Hwnd01)
  3.     MyArray = Split(Rect, "|")
  4.     A1 = CInt(MyArray(2)) -CInt(MyArray(0))
  5.     B1 = CInt(MyArray(3))-CInt(MyArray(1))
  6.     鼠标移到 180 , 180
  7.     循环 10 遍
  8.         鼠标相对移动 10 , 10
  9.         //下面这句是得到鼠标指向的窗口句柄
  10.         调用插件命令 Hwnd02 = Window.MousePoint()
  11.         如果表达式 (Hwnd02<>Hwnd01) 为真,则
  12.             跳转到标记 000.得到需要的句柄
  13.         条件结束
  14.     循环结束
  15.     标记 000.得到需要的句柄
  16.     （VBScript语句） filename="..\句柄.txt"
  17.     txt = Hwnd02
  18.     调用子程序 CX.句柄_02
  19.     A = 10 : B = 10
  20.     如果表达式 (A >0 and B >0) 为真,则循环执行
  21.         //下面这句是得到窗口句柄的边框大小(包括标题栏)
  22.         调用插件命令 Rect = Window.GetWindowRect(Hwnd02)
  23.         MyArray = Split(Rect, "|")
  24.         A = CInt(MyArray(2)) -CInt(MyArray(0))-960
  25.         B = CInt(MyArray(3))-CInt(MyArray(1))-560
  26.         A_1 = A1-A : B_1 = B1-B
  27.         调用插件命令 Window.Size(Hwnd01, A_1, B_1)
  28.         延时500毫秒
  29.     循环结束
  30.     （VBScript语句） filename="..\窗口.txt"
  31.     txt= A_1 & "|" & B_1
  32.     调用子程序 CX.句柄_02
  33.     延时500毫秒
  34.     //下面这句是最小化窗口
  35.     //Plugin Window.Min(Hwnd01)
  36.     //txt_record="调整后浏览器边框大小，X：" & A1-A & " Y：" & B1-B
  37.     //Gosub CX.日志.记录
  38.     //下面这句是还原窗口
  39.     //Plugin Window.Restore(Hwnd01)
  40.     //窗口句柄的边框大小，X：960 Y：560
  41.     跳转到标记 启动无扰赛尔号完毕
  42. 条件结束
  43. 标记 启动无扰赛尔号完毕
  44. 调用子程序 CX.读句柄
  45. 标记 STAR
  46. 循环 50 遍
  47.     延时300毫秒
  48.     调用子程序 CX.位置判断
  49.     如果表达式 (txt_record = "0") 为真,则
  50.     否则如果(txt_record = "传送仓" or txt_record = "机械室")为真,则
  51.         跳转到标记 持续攻击
  52.     否则如果(txt_record00 = "地球仪")为真,则
  53.         跳转到标记 持续攻击
  54.     否则如果(txt_record = "勇者塔内")为真,则
  55.         跳转到标记 持续攻击
  56.     否则如果(txt_record = "挑战平台")为真,则
  57.         跳转到标记 持续攻击
  58.     否则如果(txt_record = "火星一层")为真,则
  59.         跳转到标记 持续攻击
  60.     否则如果(txt_record = "云霄星一层")为真,则
  61.         跳转到标记 持续攻击
  62.     否则如果(txt_record = "海洋星一层")为真,则
  63.         跳转到标记 持续攻击
  64.     否则如果(txt_record = "地球仪")为真,则
  65.         跳转到标记 持续攻击
  66.     否则如果(txt_record = "精灵太空站左翼")为真,则
  67.         跳转到标记 持续攻击
  68.     否则如果(txt_record = "火星二层")为真,则
  69.         跳转到标记 持续攻击
  70.     否则如果(txt_record = "火星二层")为真,则
  71.     否则如果(txt_record = "火星二层")为真,则
  72.     否则如果(txt_record = "火星二层")为真,则
  73.     否则如果(txt_record = "火星二层")为真,则
  74.     否则如果(txt_record = "火星二层")为真,则
  75.     否则如果(txt_record = "火星二层")为真,则
  76.     否则如果(txt_record = "火星二层")为真,则
  77.     否则如果(txt_record = "选择服务器")为真,则
  78.         X01=167:Y01=189:time01=500
  79.         调用子程序 CX.直接点击
  80.         延时6000毫秒
  81.         如果表达式 (Var_QD = "3") 为真,则
  82.             //X00=783:Y00=532
  83.             //X01= X00 : Y01= Y00 : COL01 = "00CFFF" : time01=80 : xiaosh=1
  84.             //Gosub CX.点击判断
  85.             如果表达式 (KKK = 0) 为真,则
  86.                 KKK = 1
  87.                 Var_user=Cint(Var_user01)-1
  88.                 跳转到标记 打开页面
  89.             否则
  90.                 延时300毫秒
  91.                 按键 <F6>
  92.                 跳转到标记 END
  93.             条件结束
  94.         条件结束
  95.     否则如果(txt_record = "开始")为真,则
  96.         X01=476:Y01=498:time01=500
  97.         调用子程序 CX.直接点击
  98.     否则如果(txt_record = "选择其他用户")为真,则
  99.         X01=437:Y01=488:time01=500
  100.         调用子程序 CX.直接点击