-             条件结束
-         条件结束
-     循环结束
-     鼠标移到 272 , 344
-     延时1000毫秒
-     循环 11 遍
-         调用外部VBScript子程序  得到鼠标当前位置(xd,yd)
-         鼠标移到 xb+40 , yb
-         延时200毫秒
-         右键单击
-         延时200毫秒
-         如果 (429,15) 的颜色大约等于 #b5ebf7 则
-             如果 (416,52) 的颜色大约等于 #b58a5a 则
-                 如果 (430,45) 的颜色大约等于 #000000 则
-                     跳转到标记  药品商人
-                 条件结束
-             条件结束
-         条件结束
-     循环结束
-     鼠标移到 272 , 424
-     延时1000毫秒
-     循环 11 遍
-         调用外部VBScript子程序  得到鼠标当前位置(xd,yd)
-         鼠标移到 xb+40 , yb
-         延时200毫秒
-         右键单击
-         延时200毫秒
-         如果 (429,15) 的颜色大约等于 #b5ebf7 则
-             如果 (416,52) 的颜色大约等于 #b58a5a 则
-                 如果 (430,45) 的颜色大约等于 #000000 则
-                     跳转到标记  药品商人
-                 条件结束
-             条件结束
-         条件结束
-     循环结束
-     鼠标移到 272 , 504
-     延时1000毫秒
-     循环 11 遍
-         调用外部VBScript子程序  得到鼠标当前位置(xd,yd)
-         鼠标移到 xb+40 , yb
-         延时200毫秒
-         右键单击
-         延时200毫秒
-         如果 (429,15) 的颜色大约等于 #b5ebf7 则
-             如果 (416,52) 的颜色大约等于 #b58a5a 则
-                 如果 (430,45) 的颜色大约等于 #000000 则
-                     跳转到标记  药品商人
-                 条件结束
-             条件结束
-         条件结束
-     循环结束
-     鼠标移到 272 , 584
-     延时1000毫秒
-     循环 11 遍
-         调用外部VBScript子程序  得到鼠标当前位置(xd,yd)
-         鼠标移到 xb+40 , yb
-         延时200毫秒
-         右键单击
-         延时200毫秒
-         如果 (429,15) 的颜色大约等于 #b5ebf7 则
-             如果 (416,52) 的颜色大约等于 #b58a5a 则
-                 如果 (430,45) 的颜色大约等于 #000000 则
-                     跳转到标记  药品商人
-                 条件结束
-             条件结束
-         条件结束
-     循环结束
-     //找药瓶商人并和药品商人对话的循环,想用图片查找,但始终做不好图片,于是改用400X400范围间隔右键点击,通过头像状态的颜色进行判别
-     标记  药品商人
-     左键单击
-     延时1000毫秒
-     鼠标移到 92 , 321
-     延时1000毫秒
-     左键单击
-     延时1000毫秒
-     鼠标移到 172 , 429
-     延时1000毫秒
-     左键单击
-     延时500毫秒
- 子程序结束,回到调用处
- //此段为修理装备子程序
- 子程序  买药
-     延时500毫秒
-     鼠标移到 170 , 213
-     延时1000毫秒
-     循环 3 遍
-         右键单击
-         延时500毫秒
-     循环结束
-     延时500毫秒
-     鼠标移到 238 , 212
-     延时1000毫秒
-     循环 3 遍
-         右键单击
-         延时500毫秒
-     循环结束
-     延时1000毫秒
-     调用子程序  红蓝
-     按键<B>
-     延时1000毫秒