1.         延时 1000 毫秒
  2.         跳转到标记 按键1(子程序 放河灯)
  3.     条件结束
  4. 子程序结束
  5. 子程序 器衣饰(任务)
  6.     令 UX = CInt(MyArray(0)) - 4 + 30
  7.     令 UY = CInt(MyArray(1)) - 30 + 5
  8.     调用 左键单击()
  9.     调用 清窗()
  10.     调用 人物是否正在移动()
  11.     调用 武器衣服饰品店(任务)
  12. 子程序结束
  13. 子程序 武器衣服饰品店(任务)
  14.     向调试窗口输出：任务
  15.     定义变量 i
  16.     令 i = 0
  17.     标记 判断3(子程序 武器衣服饰品店)
  18.     延时 1000 毫秒
  19.     如果 任务 = "武器" 则
  20.         (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","2|-3|FFFFFF,3|-3|414431,1|-3|414431,3|4|414431,3|2|414431,3|3|FFFFFF,20|2|FFFFFF,20|1|414431,32|-1|414431,33|-1|FFFFFF,48|6|FFFFFF,58|1|FFFFFF,58|0|414431",1)//杭州武器店
  21.     否则如果 任务 = "戒指" 则
  22.         (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","-1|0|414431,2|1|414431,3|1|FFFFFF,1|1|FFFFFF,0|1|414431,4|0|FFFFFF,1|8|FFFFFF,1|9|414431,1|7|414431,5|7|FFFFFF,10|1|FFFFFF,10|3|414431,11|3|414431,12|3|FFFFFF,9|3|FFFFFF,16|10|FFFFFF,18|9|FFFFFF,22|10|414431,21|10|FFFFFF,30|10|FFFFFF,27|0|FFFFFF,28|0|414431,26|0|414431",1)//杭州饰品店
  23.     否则如果 任务 = "衣服" 则
  24.         (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","1|2|414431,-1|2|414431,0|2|FFFFFF,1|7|414431,0|8|414431,1|8|FFFFFF,6|8|414431,7|8|FFFFFF,17|2|414431,18|2|FFFFFF,19|4|FFFFFF,19|5|414431,27|5|414431,28|5|FFFFFF,31|5|FFFFFF,30|9|414431",1)//杭州衣服店
  25.     条件结束
  26.     令 MyArray = Split(XY,"|")
  27.     延时 1000 毫秒
  28.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  29.         令 UX = CInt(MyArray(0)) - 4 + 30
  30.         令 UY = CInt(MyArray(1)) - 30 + 5
  31.         调用 左键单击()
  32.         标记 判断4(子程序 武器衣服饰品店)
  33.         延时 1000 毫秒
  34.         如果 任务 = "武器" 则
  35.             (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"3B38AA","-2|3|312F85,5|-5|313076,6|-8|313076,9|-11|22227C,8|-11|22227C,16|-17|262482,17|-15|252363,21|-18|2D3B6E,23|-18|4D76AD,24|-20|415E90,20|-13|303E76,14|-13|344D84,8|-8|51538A",1)//武器
  36.         否则如果 任务 = "戒指" 则
  37.             注释：因特殊要求需要判断！
  38.             如果 i = 0 则
  39.                 (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"000000","27|8|A5DEE4,31|11|8CCFFF,36|18|162231,44|18|0D1726,41|10|101018,38|9|0B1623,35|5|101C31,30|3|080810,23|3|315063,27|6|BDFFFF,27|10|6396AD,31|10|7BAEC6,31|13|2E4155,36|14|2C3E58,35|18|162231",1)//买32戒指
  40.             否则
  41.                 (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"425F6E","1|-6|000408,1|-4|081829,5|-4|080810,11|0|131726,14|2|0B1623,15|8|0B0E1B,20|10|294152,16|14|182C42,12|12|101926,7|8|2C475A,7|4|8CCFFF,5|-2|6596AA,-1|1|212B37,8|6|000000,12|9|000408",1)//提交32戒指
  42.             条件结束
  43.         否则如果 任务 = "衣服" 则
  44.             (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"4E6192","7|0|2C2F6B,5|-4|3B5084,-2|-6|4462A4,-6|0|596592,11|-2|314279,9|-7|4A7098,5|-7|496496,1|5|4A5E9D,6|7|282E69,6|12|3B4C8D,1|13|252369,1|18|2D338C,8|17|3B4882,11|-2|314279,1|2|3F4887",1)//33衣服
  45.         条件结束
  46.         令 MyArray = Split(XY,"|")
  47.         令 UX = CInt(MyArray(0)) - 4
  48.         令 UY = CInt(MyArray(1)) - 30
  49.         如果 任务 = "戒指" 并且 i = 0 则
  50.             令 UX = CInt(MyArray(0)) - 4 + 26
  51.         条件结束
  52.         如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  53.             调用 右键单击()
  54.             如果 i = 0 则
  55.                 调用 清窗()
  56.                 调用 万流归宗()
  57.                 调用 搜索()
  58.                 调用 师门任务()
  59.                 令 i = 1
  60.                 跳转到标记 判断4(子程序 武器衣服饰品店)
  61.             条件结束
  62.             调用 bgkms3_02.KeyPress(KMData,"X")
  63.             延时 1000 毫秒
  64.             调用 接受()
  65.         否则
  66.             跳转到标记 判断4(子程序 武器衣服饰品店)
  67.         条件结束
  68.     否则
  69.         跳转到标记 判断3(子程序 武器衣服饰品店)
  70.     条件结束
  71.     调用 清窗()
  72.     令 任务 = ""
  73.     令 i = 0
  74.     跳转到标记 接任务(子程序 武器衣服饰品店)
  75. 子程序结束
  76. 子程序 调整窗口大小()
  77.     （鼠标）移动到 (1029, 207)
  78.     延时 50 毫秒
  79.     （鼠标）左键按下
  80.     延时 50 毫秒
  81.     （鼠标）移动到 (1030, 207)
  82.     延时 50 毫秒
  83.     （鼠标）左键弹起
  84.     延时 50 毫秒
  85.     （鼠标）移动到 (168, 791)
  86.     延时 50 毫秒
  87.     （鼠标）左键按下
  88.     延时 50 毫秒
  89.     （鼠标）移动到 (168, 792)
  90.     延时 50 毫秒
  91.     （鼠标）左键弹起
  92.     延时 50 毫秒
  93. 子程序结束
  94. 子程序 邮件短信(提示)
  95.     注释：短信提示必须开通139油箱,且需要开启短信通知功能(免费功能,非飞信)
  96.     令 返回值 = （命令库 网络）发送邮件("账号@139.com","密码","账号@139.com","倩女幽魂-师门任务脚本提示!",提示,"")
  97.     如果 返回值 = True 则
  98.         调用 File.WriteFileEx("C:\Log.txt","短信发送成功!--时间:" & NOW)
  99.     否则
  100.         调用 File.WriteFileEx("C:\Log.txt","短信发送失败!--时间:" & NOW)