1.             延时hongT毫秒
  2.             //补血延时
  3.         条件结束
  4.     条件结束
  5.     延时10毫秒
  6.     标记 补蓝
  7.     如果 (lan/100*(d-f)+f,e) 的颜色大约等于 #A06812 则
  8.         延时2000毫秒
  9.         如果 (lan/100*(d-f)+f,e) 的颜色大约等于 #A06812 则
  10.             //x2=蓝条在屏幕最右端坐标，x1=蓝条在屏幕最左端坐标，
  11.             //y=x1,x2在蓝条中的同一纵坐标，color=蓝条的空蓝颜色值。
  12.             按键#chilan
  13.             //按下补蓝快捷键
  14.             延时lanT毫秒
  15.             //补蓝延时
  16.         条件结束
  17.     条件结束
  18.     延时10毫秒
  19. 子程序结束,回到调用处
  20. 子程序 喂宠
  21.     调用插件命令 T2=Sys.GetTime()
  22.     如果表达式 (T2-T1>=T3) 为真,则
  23.         延时10毫秒
  24.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  25.         如果表达式 (x>=0 and y>=0) 为真,则
  26.             g=x-51
  27.             h=y+24
  28.             r=g-82
  29.             延时10毫秒
  30.             循环 wcc 遍
  31.                 如果 (baoshi/100*85+r,h) 的颜色等于 #9F6711 则
  32.                     鼠标移到 g , h
  33.                     延时300毫秒
  34.                     右键单击
  35.                     延时300毫秒
  36.                     按键#weichongwu2
  37.                     延时300毫秒
  38.                     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  39.                     如果表达式 (x>=0 and y>=0) 为真,则
  40.                         鼠标移到 x+10 , y+10
  41.                         延时400毫秒
  42.                         左键单击
  43.                         延时400毫秒
  44.                     否则
  45.                         鼠标移到 500 , 400
  46.                         延时10毫秒
  47.                     条件结束
  48.                 条件结束
  49.             循环结束
  50.         条件结束
  51.         延时100毫秒
  52.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  53.         如果表达式 (x>=0 and y>=0) 为真,则
  54.             i=x-51
  55.             j=y+29
  56.             s=i-82
  57.             延时50毫秒
  58.             循环 wcc 遍
  59.                 如果 (baoshi/100*85+s,j) 的颜色等于 #9F6711 则
  60.                     鼠标移到 i , j
  61.                     延时300毫秒
  62.                     右键单击
  63.                     延时300毫秒
  64.                     按键#weichongwu2
  65.                     延时300毫秒
  66.                     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  67.                     如果表达式 (x>=0 and y>=0) 为真,则
  68.                         鼠标移到 x+10 , y+10
  69.                         延时400毫秒
  70.                         左键单击
  71.                         延时400毫秒
  72.                     否则
  73.                         鼠标移到 500 , 400
  74.                         延时10毫秒
  75.                     条件结束
  76.                 条件结束
  77.                 延时100毫秒
  78.             循环结束
  79.         条件结束
  80.         延时10毫秒
  81.         T1=T2
  82.     否则
  83.         延时100毫秒
  84.     条件结束
  85. 子程序结束,回到调用处
  86. 子程序 回定点
  87.     延时100毫秒
  88.     //Plugin T2=GetSysInfo.GetTime()
  89.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  90.     //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
  91.     如果表达式 (x>=0 and y>=0) 为真,则
  92.         鼠标移到 x , y
  93.         延时800毫秒
  94.         左键单击
  95.         延时800毫秒
  96.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
  97.         //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
  98.         如果表达式 (x>=0 and y>=0) 为真,则
  99.             鼠标移到 x+3 , y+3
  100.             延时800毫秒