1.         如果表达式 (mddx>0 and mddy>0) 为真,则
  2.             跳转到标记 点装备老板
  3.         条件结束
  4.         延时3000毫秒
  5.         跳转到标记 寻路去装备店
  6.     否则
  7.         跳转到标记 找店铺
  8.     条件结束
  9. 否则
  10.     跳转到标记 修装备
  11. 条件结束
  12. 标记 点装备老板
  13. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  14. 如果表达式 (x>0 and y>0) 为真,则
  15.     鼠标移到 x+26 , y+120
  16.     延时1000毫秒
  17.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  18.     如果表达式 (Shape=922059533) 为真,则
  19.         左键单击
  20.         跳转到标记 点全修
  21.     否则
  22.         跳转到标记 翻
  23.     条件结束
  24. 否则
  25.     标记 翻
  26.     鼠标移到 mddx-50 , mddy
  27.     延时1000毫秒
  28.     右键按下
  29.     延时1000毫秒
  30.     鼠标移到 mddx+50 , mddy
  31.     延时1000毫秒
  32.     右键弹起
  33.     延时3000毫秒
  34.     跳转到标记 点装备老板
  35. 条件结束
  36. 标记 点全修
  37. 延时2000毫秒
  38. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  39. 如果表达式 (x>0 and y>0) 为真,则
  40.     鼠标移到 x+46 , y+12
  41.     延时1000毫秒
  42.     左键单击
  43.     延时1000毫秒
  44. 否则
  45.     跳转到标记 点全修
  46. 条件结束
  47. //关物品
  48. 调用插件命令 Bkgnd.KeyPress(hwnd,66)
  49. 延时500毫秒
  50. 标记 出城捉妖
  51. 延时100毫秒
  52. //打开大地图
  53. 调用插件命令 Bkgnd.KeyPress(hwnd,77)
  54. 延时2000毫秒
  55. 鼠标移到 shoux+310 , shouy+89
  56. 左键单击
  57. 延时1000毫秒
  58. 标记 选大地图
  59. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  60. 如果表达式 (x>0 and y>0) 为真,则
  61.     鼠标移到 x , y
  62.     左键单击
  63.     延时1000毫秒
  64.     鼠标移到 ljx , ljy
  65.     左键单击
  66.     延时1000毫秒
  67.     //关大地图
  68.     调用插件命令 Bkgnd.KeyPress(hwnd,77)
  69.     跳转到标记 去地点
  70. 否则
  71.     跳转到标记 出城捉妖
  72. 条件结束
  73. ///////////////////////////////////////刷怪部分//////////////////////////////////////////////
  74. ///////////////////////////////////////刷怪部分//////////////////////////////////////////////
  75. ///////////////////////////////////////刷怪部分//////////////////////////////////////////////
  76. 标记 刷怪部分
  77. 标记 怪去地点
  78. 延时1000毫秒
  79. //5键寻路
  80. 调用插件命令 Bkgnd.KeyPress(hwnd,53)
  81. 延时2000毫秒
  82. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,w,h,"Attachment:\小手.bmp",0.8,shoux,shouy)
  83. 如果表达式 (mddx>0 and mddy>0) 为真,则
  84.     //如果是奇门
  85.     如果表达式 (qimen=1) 为真,则
  86.         //0招兵
  87.         调用插件命令 Bkgnd.KeyPress(hwnd,48)
  88.         延时7000毫秒
  89.         （VBScript语句） starttime=timer
  90.     条件结束
  91.     //标记,没找到怪番
  92.     a=0
  93.     m=0
  94.     跳转到标记 怪开始刷怪
  95. 条件结束
  96. 延时3000毫秒
  97. //没到循环寻路
  98. 跳转到标记 怪去地点
  99. 标记 怪开始刷怪
  100. //判断是否是在捉妖