1.         延时 50 毫秒
  2.         令 Hwnd = Window.Find(0,父标题)
  3.         令 HwndEx = Window.FindEx(Hwnd,0,0,子标题)
  4.         如果 HwndEx <> 0 则
  5.             令 Coord = Window.GetClientRect(HwndEx)
  6.             令 MyArray = Split(Coord,"|",- 1 ,1)
  7.             循环开始
  8.                 延时 100 毫秒
  9.                 如果点 (Cint(MyArray(0)) + 10,Cint(MyArray(1)) + 10) 的颜色不等于 "676767" 则
  10.                     调用 移动并点击(Cint(MyArray(0)) + Cint(MyArray(2)) / 2 - Ux,Cint(MyArray(1)) + Cint(MyArray(3)) / 2 - Uy,0,1)
  11.                     跳出循环
  12.                 条件结束
  13.             循环结束
  14.             延时 Delay_window 毫秒
  15.             退出子程序
  16.         否则
  17.             MsgBox("出错:找不到子窗口" & 标题,16,"提示")
  18.             脚本停止运行
  19.         条件结束
  20.     循环结束
  21. 子程序结束
  22. 子程序 等待窗口(窗口名)
  23.     定义变量 Array_name, Hwnd, Coord, MyArray, i, k
  24.     定义变量 Array_Feature_form(3)
  25.     令 Array_Feature_form(0) = "选大区,71,86,C9FFFF,71,86,C9FFFF"
  26.     令 Array_Feature_form(1) = "输密码,90,457,FFFFFF,660,450,00605A"
  27.     令 Array_Feature_form(2) = "择频道,332,13,B3F2FF,333,13,B3F2FF"
  28.     令 Array_Feature_form(3) = "挑角色,337,26,78D7F4,337,26,78D7F4,337,26,78D7F4,337,26,78D7F4"
  29.     循环 i 从 0 到 UBound(Array_Feature_form)
  30.         令 Array_name = Split(Array_Feature_form(i),",",- 1 ,1)
  31.         如果 Array_name(0) = 窗口名 则
  32.             循环开始
  33.                 延时 50 毫秒
  34.                 令 Hwnd = Window.Find(0,"地下城与勇士")
  35.                 令 Coord = Window.GetClientRect(Hwnd)
  36.                 令 MyArray = Split(Coord,"|",- 1 ,1)
  37.                 如果 Cint(MyArray(2)) = 687 或者 Cint(MyArray(2)) = 640 则
  38.                     令 Ux = Cint(MyArray(0))
  39.                     令 Uy = Cint(MyArray(1))
  40.                     循环 k 从 0 到 (UBound(Array_name) - 6) / 6
  41.                         如果点 (Ux + Array_name(k * 6 + 1),Uy + Array_name(k * 6 + 2)) 的颜色等于 Array_name(k * 6 + 3) 则
  42.                             如果点 (Ux + Array_name(k * 6 + 4),Uy + Array_name(k * 6 + 5)) 的颜色等于 Array_name(k * 6 + 6) 则
  43.                                 退出子程序
  44.                             条件结束
  45.                         条件结束
  46.                     循环结束
  47.                 条件结束
  48.             循环结束
  49.         条件结束
  50.     循环结束
  51. 子程序结束
  52. 子程序 移动并点击(横坐标,纵坐标,操作方式,左击次数)
  53.     注释:点击次数: 0表示不点击
  54.     注释:操作方式:【0前台模式,1后台模式】
  55.     如果 操作方式 = 0 则
  56.         令 横坐标 = Ux + 横坐标
  57.         令 纵坐标 = Uy + 纵坐标
  58.         (鼠标)移动到 (横坐标, 纵坐标)
  59.         延时 Delay_move 毫秒
  60.         如果 左击次数 <> 0 则
  61.             循环 左击次数 次
  62.                 (鼠标)左键按下
  63.                 延时 100 毫秒
  64.                 (鼠标)左键弹起
  65.                 延时 Delay_click 毫秒
  66.             循环结束
  67.         条件结束
  68.     条件结束
  69. 子程序结束