1.     调用子程序 [shaomiao]
  2.     如果表达式 (intX>0 or intY >0) 为真,则
  3.         //下面这句按从中间到四周的顺序查找窗口句柄(变量：HwndEx)窗口的指定的矩形区域内指定颜色
  4.         调用插件命令 XY = Bkgnd.FindCenterColor(HwndEx, 320,179, 641, 222, "E9A95B")
  5.         //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
  6.         MyArray = Split(XY, "|")
  7.         //下面这句将字符串转换成数值
  8.         intX = CInt(MyArray(0)): intY = CInt(MyArray(1))
  9.         如果表达式 (intX>0 and intY >0) 为真,则
  10.             调用插件命令 Bkgnd.LeftClick(HwndEx,intX ,intY )
  11.             调用插件命令 Bkgnd.MoveTo(HwndEx,690,480)
  12.             调用子程序 yanchi
  13.             调用子程序 [tanchuang]
  14.         否则
  15.             调用插件命令 Bkgnd.LeftClick(HwndEx,378,195)
  16.             调用子程序 yanchi
  17.             调用插件命令 Bkgnd.LeftClick(HwndEx,421,195)
  18.             跳转到标记 bye
  19.         条件结束
  20.     否则
  21.         跳转到标记 bye
  22.     条件结束
  23.     跳转到标记 [zuoce]
  24.     标记 bye
  25. 子程序结束,回到调用处
  26. 子程序 [shawen]
  27.     //再查找一次看是否有蚊子
  28.     调用子程序 [shaomiao]
  29.     如果表达式 (intX>0 or intY >0) 为真,则
  30.         调用插件命令 Bkgnd.LeftClick(HwndEx,395,145)
  31.         延时100毫秒
  32.         调用插件命令 Bkgnd.LeftClick(HwndEx,395,145)
  33.         延时100毫秒
  34.         调用插件命令 Bkgnd.LeftClick(HwndEx,395,145)
  35.         延时100毫秒
  36.         调用插件命令 Bkgnd.LeftClick(HwndEx,512,151)
  37.         延时100毫秒
  38.         调用插件命令 Bkgnd.LeftClick(HwndEx,512,151)
  39.         延时100毫秒
  40.         调用插件命令 Bkgnd.LeftClick(HwndEx,512,151)
  41.         延时100毫秒
  42.     条件结束
  43. 子程序结束,回到调用处
  44. 子程序 shezhi
  45.     //下面这句取窗口句柄(变量：HwndEx)窗口的客户区(坐标：938, 249)处的颜色
  46.     调用插件命令 GetColor = Bkgnd.GetPixelColor(HwndEx, 938, 249)
  47.     如果表达式 (GetColor = "7D7D7D") 为真,则
  48.         //下面这句用于向后台窗口句柄(变量：HwndEx)的客户区域(坐标：938, 249)处发送一个鼠标左键单击
  49.         调用插件命令 Bkgnd.LeftClick(HwndEx, 938, 249)
  50.         延时1000毫秒
  51.         调用插件命令 Bkgnd.LeftClick(HwndEx, 930, 96)
  52.     否则
  53.         //刷新
  54.         调用插件命令 Bkgnd.LeftClick(HwndEx, 930, 96)
  55.         调用子程序 dengdai
  56.     条件结束
  57.     调用子程序 dengdai
  58.     调用子程序 dengdai
  59.     //下面这句取窗口句柄(变量：HwndEx)窗口的客户区(坐标：826,467)处的颜色
  60.     调用插件命令 GetColor = Bkgnd.GetPixelColor(HwndEx, 826,467)
  61.     如果表达式 (GetColor = "7D7D7D") 为真,则
  62.         跳转到标记 likai
  63.     否则
  64.         调用子程序 dengdai
  65.         调用子程序 [tanchuang]
  66.     条件结束
  67.     标记 likai
  68. 子程序结束,回到调用处
  69. 子程序 jiankang
  70.     //下面部分用于点击健康模式弹出窗口
  71.     调用插件命令 XY = Bkgnd.FindCenterColor(HwndEx,453,310,490,322, "FFFFFF")
  72.     //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
  73.     MyArray = Split(XY, "|")
  74.     //下面这句将字符串转换成数值
  75.     intX = CInt(MyArray(0)): intY = CInt(MyArray(1))
  76.     如果表达式 (intX>0 and intY >0) 为真,则
  77.         调用插件命令 Bkgnd.LeftClick(HwndEx,intX,intY )
  78.         调用子程序 yanchi
  79.         跳转到标记 bye
  80.     条件结束
  81. 子程序结束,回到调用处