1.     条件结束
  2.     调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  3.     n=308+ydlx-0.6*jj
  4.     如果表达式 (xx<=n and yy>175+ydly and yy<181+ydly) 为真,则
  5.         调用子程序 读取补血蓝坐标
  6.     条件结束
  7.     调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  8.     n=391+ydlx-0.35*k
  9.     如果表达式 (xx<=n and yy>163+ydly and yy<169+ydly) 为真,则
  10.         调用子程序 读取补血蓝坐标
  11.     条件结束
  12.     调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  13.     n=391+ydlx-0.35*kk
  14.     如果表达式 (xx<=n and yy>175+ydly and yy<181+ydly) 为真,则
  15.         调用子程序 读取补血蓝坐标
  16.     条件结束
  17. 子程序结束,回到调用处
  18. 子程序 判断是否选头像
  19.     如果 (460,245) 的颜色等于 #ffff00 则
  20.         调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  21.     否则
  22.         如果 (460,245) 的颜色等于 #f8fc00 则
  23.             调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  24.         条件结束
  25.     条件结束
  26. 子程序结束,回到调用处
  27. 子程序 碰盗贼
  28.     如果 (321+ydlx,451+ydly) 的颜色大约等于 #ffff 则
  29.         鼠标移到 321+ydlx , 451+ydly
  30.     条件结束
  31. 子程序结束,回到调用处
  32. 子程序 组队
  33.     如果 (402+ydlx,403+ydly) 的颜色大约等于 #20e498 则
  34.         鼠标移到 458+ydlx , 428+ydly
  35.         延时20毫秒
  36.         左键单击
  37.     否则
  38.         如果 (402+ydlx,403+ydly) 的颜色大约等于 #21e79c 则
  39.             鼠标移到 458+ydlx , 428+ydly
  40.             延时20毫秒
  41.             左键单击
  42.         条件结束
  43.     条件结束
  44. 子程序结束,回到调用处
  45. 子程序 读取人物坐标
  46.     鼠标移到 x , y
  47.     延时300毫秒
  48.     鼠标相对移动 rwx , rwy
  49.     延时150毫秒
  50.     按键<F2>
  51.     延时200毫秒
  52.     左键双击
  53. 子程序结束,回到调用处
  54. 子程序 读取召唤兽坐标
  55.     鼠标移到 x , y
  56.     延时300毫秒
  57.     鼠标相对移动 zhsx , zhsy
  58.     延时150毫秒
  59.     按键<F2>
  60.     延时200毫秒
  61.     左键双击
  62.     右键单击
  63. 子程序结束,回到调用处
  64. 子程序 读取补血蓝坐标
  65.     延时200毫秒
  66.     鼠标移到 xx , yy
  67.     延时500毫秒
  68.     左键双击
  69. 子程序结束,回到调用处
  70. 子程序 点怪
  71.     标记 点怪
  72.     标记 判断回合是否结束
  73.     调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  74.     调用外部VBScript子程序 quse1=得到指定点的颜色(768+ydlx,244+ydly)
  75.     如果表达式 (q>0 and r>0) 为真,则
  76.         延时100毫秒
  77.         鼠标移到 495+ydlx , 160+ydly
  78.         延时10毫秒
  79.         左键双击
  80.         循环 4 遍
  81.             鼠标相对移动 -60 , 40
  82.             延时10毫秒
  83.             左键双击
  84.         循环结束
  85.         延时10毫秒
  86.         鼠标移到 495+ydlx , 195+ydly
  87.         延时10毫秒
  88.         左键双击
  89.         循环 4 遍
  90.             鼠标相对移动 -60 , 40
  91.             延时10毫秒
  92.             左键双击
  93.         循环结束
  94.         鼠标移到 550+ydlx , 220+ydly
  95.         延时10毫秒
  96.         左键双击
  97.         循环 4 遍
  98.             鼠标相对移动 -60 , 40
  99.             延时10毫秒
  100.             左键双击