1.             延时2000毫秒
  2.             如果 (shoux+155,hongy) 的颜色大约等于 #0000fa 则
  3.             否则
  4.                 跳转到标记 捉妖
  5.             条件结束
  6.             跳转到标记 判断打怪
  7.         否则
  8.             标记 捉妖
  9.             //按7键捉
  10.             调用插件命令 Bkgnd.KeyPress(hwnd,55)
  11.             延时1000毫秒
  12.             //没镜子了回城
  13.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  14.             //包满了就回城
  15.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  16.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  17.             //R标记,是包满回城就只买一个照妖镜
  18.             如果表达式 (bmx>0 and bmy>0) 为真,则
  19.                 r=1
  20.                 跳转到标记 回城
  21.             条件结束
  22.             如果表达式 (zyjx>0 and zyjy>0) 为真,则
  23.                 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  24.                 如果表达式 (x>0 and y>0) 为真,则
  25.                     鼠标移到 x , y
  26.                     延时500毫秒
  27.                     左键单击
  28.                     延时6000毫秒
  29.                     跳转到标记 判断打怪
  30.                 否则
  31.                     r=3
  32.                     跳转到标记 回城
  33.                 条件结束
  34.             条件结束
  35.             如果表达式 (bkzx>0 and bkzy>0) 为真,则
  36.                 跳转到标记 怪判断打怪
  37.             条件结束
  38.             延时3000毫秒
  39.             如果 (shoux+248,shouy+475) 的颜色大约等于 #089a9f 则
  40.             否则
  41.                 跳转到标记 判断打怪
  42.             条件结束
  43.             延时3000毫秒
  44.             跳转到标记 判断打怪
  45.         条件结束
  46.     否则
  47.         跳转到标记 开始捉妖
  48.     条件结束
  49. 否则
  50.     跳转到标记 选怪
  51. 条件结束
  52. //回城部份
  53. 标记 回城
  54. 延时100毫秒
  55. //打开大地图
  56. 调用插件命令 Bkgnd.KeyPress(hwnd,77)
  57. 延时2000毫秒
  58. 鼠标移到 shoux+467 , shouy+89
  59. 左键单击
  60. 延时1000毫秒
  61. 标记 选县城
  62. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  63. 如果表达式 (x>0 and y>0) 为真,则
  64.     鼠标移到 x , y
  65.     左键单击
  66.     延时1000毫秒
  67.     标记 找地图店铺
  68.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  69.     如果表达式 (dpx>0 and dpy>0) 为真,则
  70.         鼠标移到 dpx-8 , dpy+5
  71.         左键单击
  72.         延时1000毫秒
  73.         标记 找杂货
  74.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  75.         如果表达式 (zhahx>0 and zhahy>0) 为真,则
  76.             鼠标移到 zhahx , zhahy
  77.             左键单击
  78.             //关地图
  79.             调用插件命令 Bkgnd.KeyPress(hwnd,77)
  80.             标记 寻路回去
  81.             延时500毫秒
  82.             //寻路回去
  83.             调用插件命令 Bkgnd.KeyPress(hwnd,53)
  84.             延时2000毫秒
  85.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  86.             如果表达式 (mddx>0 and mddy>0) 为真,则
  87.                 跳转到标记 点杂货
  88.             条件结束
  89.             延时3000毫秒
  90.             跳转到标记 寻路回去
  91.         否则
  92.             跳转到标记 找地图店铺
  93.         条件结束
  94.     否则
  95.         跳转到标记 选县城
  96.     条件结束
  97. 否则
  98.     跳转到标记 回城
  99. 条件结束
  100. 标记 点杂货