1.     //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
  2.     MyArray = Split(XY, "|")
  3.     //下面这句将字符串转换成数值
  4.     initX = CInt(MyArray(0)): initY = CInt(MyArray(1))
  5.     //MessageBox initX & "|" & initY
  6.     如果表达式 (initX>0 and initY>0) 为真,则
  7.         Xa=initX:Ya=initY+38:Xb=Xa:Yb=Ya-5:COL01="633000"
  8.         调用子程序 CX.多确认二
  9.         如果表达式 (ka=1) 为真,则
  10.             跳转到标记 134.多确认结束
  11.         条件结束
  12.         Xa=initX:Ya=initY+33:Xb=Xa:Yb=Ya-5
  13.         调用子程序 CX.多确认二
  14.         如果表达式 (ka=1) 为真,则
  15.             跳转到标记 134.多确认结束
  16.         条件结束
  17.         Xa=initX+1:Ya=initY+33:Xb=Xa:Yb=Ya-5
  18.         调用子程序 CX.多确认二
  19.         如果表达式 (ka=1) 为真,则
  20.             跳转到标记 134.多确认结束
  21.         条件结束
  22.         Xa=initX:Ya=initY+2:Xb=Xa:Yb=Ya+5
  23.         调用子程序 CX.多确认二
  24.         如果表达式 (ka=1) 为真,则
  25.             跳转到标记 134.多确认结束
  26.         条件结束
  27.         Xa=initX:Ya=initY+35:Xb=Xa:Yb=Ya-5
  28.         调用子程序 CX.多确认二
  29.         如果表达式 (ka=1) 为真,则
  30.             跳转到标记 134.多确认结束
  31.         条件结束
  32.         Xa=initX:Ya=initY+34:Xb=Xa:Yb=Ya-5
  33.         调用子程序 CX.多确认二
  34.         如果表达式 (ka=1) 为真,则
  35.             D_qr=1
  36.             跳转到标记 134.多确认结束
  37.         条件结束
  38.     条件结束
  39.     调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, 526,425)
  40.     如果表达式 (GetColor = "633000") 为真,则
  41.         调用插件命令 Bkgnd.LeftClick(Hwnd, 526,425)
  42.         调用插件命令 Bkgnd.LeftClick(Hwnd, 526,425)
  43.         跳转到标记 134.多确认结束
  44.         //取消升级技能
  45.     否则
  46.     条件结束
  47.     跳转到标记 135.没确认结束
  48.     标记 134.多确认结束
  49.     延时time101 + 500毫秒
  50.     跳转到标记 多确认开始
  51.     标记 135.没确认结束
  52.     txt_record = "END.多确认"
  53.     调用子程序 CX.日志.记录
  54. 子程序结束,回到调用处
  55. 子程序 CX.多确认二
  56.     Ka=0
  57.     //下面这句取窗口句柄(变量：Hwnd)窗口的客户区(坐标：Xa, Ya)处的颜色
  58.     调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, Xa, Ya)
  59.     //MessageBox Xa & "|" & Ya & "|" & Getcolor
  60.     如果表达式 (GetColor = "633000") 为真,则
  61.         //下面这句用于向后台窗口句柄(变量：Hwnd)的客户区域(坐标：Xb, Yb)处发送一个鼠标左键单击
  62.         调用插件命令 Bkgnd.LeftClick(Hwnd, Xb, Yb)
  63.         调用插件命令 Bkgnd.LeftClick(Hwnd, Xb, Yb)
  64.         ka=1
  65.     条件结束
  66. 子程序结束,回到调用处
  67. 子程序 点到玩家
  68.     X = X_last + 194 : Y = 129
  69.     调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, X, Y)
  70.     如果表达式 (GetColor = "633000") 为真,则
  71.         //下面这句用于向后台窗口句柄(变量：Hwnd)的客户区域(坐标：X, Y)处发送一个鼠标左键单击
  72.         调用插件命令 Bkgnd.LeftClick(Hwnd, X, Y)
  73.         延时time101毫秒
  74.     条件结束
  75. 子程序结束,回到调用处
  76. 子程序 CX.确认
  77.     i=0
  78.     D_qr=1
  79.     如果表达式 (D_qr=1) 为真,则循环执行
  80.         调用子程序 CX.多确认
  81.         i = i + 1
  82.     循环结束
  83.     如果表达式 (i > 1) 为真,则
  84.         txt_record="多确认：" & i & "次"
  85.         调用子程序 CX.日志.记录
  86.     条件结束
  87. 子程序结束,回到调用处
  88. 子程序 CX.选择面向精灵
  89.     chose = 0
  90.     //下面这句取窗口句柄(变量：Hwnd)窗口的客户区(坐标：551, 551)处的颜色
  91.     调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, 461, 336)
  92.     如果表达式 (GetColor = "FF0400") 为真,则
  93.         //下面这句取窗口句柄(变量：Hwnd)窗口的客户区(坐标：557, 551)处的颜色
  94.         调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, 465, 338)
  95.         如果表达式 (GetColor = "0004FF") 为真,则循环执行
  96.             chose = 1
  97.             鼠标移到 323 , 258
  98.             鼠标移到 636 , 258
  99.             X = 323 + 1 : Y = 258
  100.             调用插件命令 Bkgnd.LeftClick(Hwnd, X, Y)