1.         调用 识别地图
  2.         如果 x = 511 并且 y = 274 则
  3.             注释：核对坐标511,274AAA
  4.         条件结束
  5.         (语句无法识别，可能有错误): Else //核对坐标511,274AAA
  6.         调用 写坐标(511,274)
  7.         延时 yc + 200 毫秒
  8.         跳转到标记 找坐标1仙子(子程序 去药店买药)
  9.         (语句无法识别，可能有错误): End if//核对坐标511,274AAA
  10.         标记 找坐标1仙子(子程序 去药店买药)
  11.         调用 识别地图
  12.         如果 x = 511 并且 y = 274 则
  13.             注释：核对坐标511,274BBBB
  14.         条件结束
  15.         调用 修正偏移(184,97)
  16.         延时 yc + 5000 毫秒
  17.         调用 识别地图
  18.         令 t点传送 = now
  19.         标记 点传送(子程序 去药店买药)
  20.         如果 ditu = "济世堂" 则
  21.             注释：进入游戏
  22.         条件结束
  23.         延时 yc + 2000 毫秒
  24.         跳转到标记 接任务1(子程序 去药店买药)
  25.         (语句无法识别，可能有错误): Else //进入游戏
  26.         如果 DateDiff("s",t点传送,now) > 11 则
  27.             令 t点传送 = now
  28.             跳转到标记 找坐标仙子(子程序 去药店买药)
  29.         条件结束
  30.         延时 yc + 200 毫秒
  31.         跳转到标记 点传送(子程序 去药店买药)
  32.         (语句无法识别，可能有错误): End if//进入游戏
  33.         (语句无法识别，可能有错误): Else //核对坐标485,278BBBB
  34.         如果 DateDiff("s",t找坐标仙子,now) > 11 则
  35.             令 t找坐标仙子 = now
  36.             调用 写坐标(511,274)
  37.             跳转到标记 找坐标1仙子(子程序 去药店买药)
  38.         条件结束
  39.         延时 yc + 200 毫秒
  40.         跳转到标记 找坐标1仙子(子程序 去药店买药)
  41.         (语句无法识别，可能有错误): End if//核对坐标511,274BBBB
  42.         (语句无法识别，可能有错误): ElseIf DITU="傲来" Then //识别地图傲来33333333333333333333333333333333333333
  43.         调用 瑶池去长安
  44.         (语句无法识别，可能有错误): ElseIf DITU="大唐东" Then //识别地图大唐东44444444444444444444444444444
  45.         调用 瑶池去长安
  46.         (语句无法识别，可能有错误): ElseIf DITU="大唐南" Then //识别地图大唐南55555555555555555555555555
  47.         调用 大唐南去长安
  48.         (语句无法识别，可能有错误): ElseIf DITU="阳关" Then //识别地图阳关、阳关66666666666666666666666666666
  49.         调用 阳关去长安
  50.     否则如果 ditu = "济世堂" 则
  51.         令 T济世堂1 = now
  52.         标记 济世堂1(子程序 去药店买药)
  53.         从左上到右下查找图片 "C:\XYW\n药店.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：807 下：621），相似度 0.9
  54.         如果 intX > 0 并且 intY > 0 则
  55.             注释：找药店老板
  56.         条件结束
  57.         调用 修正偏移(intX + 35,intY - 20)
  58.         令 t点NPC = now
  59.         标记 t点NPC(子程序 去药店买药)
  60.         令 dm_ret = dm.FindStr(0,0,807,621,"买","08f448-000000",1.0,intX,intY)
  61.         如果 intX > 0 并且 intY > 0 则
  62.             注释：找药店老板。点1
  63.         条件结束
  64.         调用 修正偏移(intX + 10,intY + 9)
  65.         令 T出现购买 = now
  66.         延时 yc + 200 毫秒
  67.         标记 等待出现购买(子程序 去药店买药)
  68.         从左上到右下查找图片 "C:\XYW\购买.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：807 下：621），相似度 0.9
  69.         如果 intX > 0 并且 intY > 0 则
  70.             注释： 出现购买
  71.         条件结束
  72.         令 T出现需要的药 = now
  73.         标记 出现需要的药(子程序 去药店买药)
  74.         从左上到右下查找图片 "C:\XYW\" & yao & ".bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：807 下：621），相似度 0.9
  75.         如果 intX > 0 并且 intY > 0 则
  76.             注释：出现需要的药
  77.         条件结束
  78.         调用 修正偏移(intX + 10,intY + 5)
  79.         延时 yc + 200 毫秒
  80.         调用 修正偏移(321,487)
  81.         令 t出现购买成功 = now
  82.         标记 出现购买成功(子程序 去药店买药)
  83.         令 dm_ret = dm.FindStr(0,0,807,621,"购买","f8fcf8-000000",1.0,intX,intY)
  84.         如果 intX > 0 并且 intY > 0 则
  85.             注释：出现购买成功
  86.         条件结束
  87.         调用 修正偏移右键(271,487)
  88.         延时 yc + 200 毫秒
  89.         调用 交任务
  90.         退出子程序
  91.         (语句无法识别，可能有错误): Else //出现购买成功
  92.         如果 DateDiff("s",t出现购买成功,now) > 16 则
  93.             令 t出现购买成功 = now
  94.             跳转到标记 出现需要的药(子程序 去药店买药)
  95.         条件结束
  96.         延时 yc + 200 毫秒
  97.         跳转到标记 出现购买成功(子程序 去药店买药)
  98.         (语句无法识别，可能有错误): End If//出现购买成功
  99.         (语句无法识别，可能有错误): Else//出现需要的药
  100.         如果 DateDiff("s",T出现需要的药,now) > 11 则