1.         令 shangb_y = 317
  2.     情况 "2":
  3.         令 shangb_x = 591
  4.         令 shangb_y = 259
  5.     情况 "3":
  6.         令 shangb_x = 420
  7.         令 shangb_y = 469
  8.     情况 "4":
  9.         令 shangb_x = 505
  10.         令 shangb_y = 442
  11.     情况 "5":
  12.         令 shanga_x = 561
  13.         令 shanga_y = 482
  14.     情况 "6":
  15.         令 shanga_x = 578
  16.         令 shanga_y = 377
  17.     情况 "7":
  18.         令 shanga_x = 458
  19.         令 shanga_y = 476
  20.     情况 :
  21.         注释:否则
  22.     选择结束
  23. 子程序结束
  24. 子程序 商队交易(jy_x,jy_y,buy)
  25.     注释:进入交易界面
  26.     调用 Bkgnd.LeftClick(Hwnd,jy_x,jy_y)
  27.     延时 2000 毫秒
  28.     注释:出售
  29.     令 XY = Bkgnd.FindColor(Hwnd,323,173,938,410,"A4FEFF")
  30.     令 ZB = InStr(XY,"|")
  31.     令 X = Clng(Left(XY,ZB - 1))
  32.     令 Y = Clng(Right(XY,Len(XY) - ZB))
  33.     调用 Bkgnd.LeftClick(Hwnd,X,Y)
  34.     延时 500 毫秒
  35.     调用 Bkgnd.LeftClick(Hwnd,572,355)
  36.     延时 2000 毫秒
  37.     注释:购入,如果设置了只卖不买,则跳过购买步骤
  38.     如果 buy = 0 则
  39.         令 XY = Bkgnd.FindColor(Hwnd,323,173,938,410,"B6FFFC")
  40.         令 ZB = InStr(XY,"|")
  41.         令 X = Clng(Left(XY,ZB - 1))
  42.         令 Y = Clng(Right(XY,Len(XY) - ZB))
  43.         调用 Bkgnd.LeftClick(Hwnd,X,Y)
  44.         延时 500 毫秒
  45.         调用 Bkgnd.LeftClick(Hwnd,572,355)
  46.         延时 1000 毫秒
  47.     条件结束
  48.     注释:关闭交易窗口
  49.     调用 Bkgnd.LeftClick(Hwnd,952,68)
  50.     延时 500 毫秒
  51. 子程序结束
  52. 子程序 武将培养()
  53.     延时 200 毫秒
  54.     注释:运行前保证培养界面没有打开
  55.     注释:点击武将培养,进入培养界面
  56.     调用 Bkgnd.LeftClick(Hwnd,208,146)
  57.     延时 2000 毫秒
  58.     注释:选择要培养的武将
  59.     根据 pywj 选择
  60.     情况 "1":
  61.         调用 Bkgnd.LeftClick(Hwnd,375,165)
  62.     情况 "2":
  63.         调用 Bkgnd.LeftClick(Hwnd,445,165)
  64.     情况 "3":
  65.         调用 Bkgnd.LeftClick(Hwnd,515,165)
  66.     情况 "4":
  67.         调用 Bkgnd.LeftClick(Hwnd,375,255)
  68.     情况 "5":
  69.         调用 Bkgnd.LeftClick(Hwnd,445,255)
  70.     情况 "6":
  71.         调用 Bkgnd.LeftClick(Hwnd,515,255)
  72.     情况 "7":
  73.         调用 Bkgnd.LeftClick(Hwnd,375,345)
  74.     情况 "8":
  75.         调用 Bkgnd.LeftClick(Hwnd,445,345)
  76.     情况 "9":
  77.         调用 Bkgnd.LeftClick(Hwnd,515,345)
  78.     情况 "10":
  79.         调用 Bkgnd.LeftClick(Hwnd,375,435)
  80.     情况 "11":
  81.         调用 Bkgnd.LeftClick(Hwnd,445,435)
  82.     情况 "12":
  83.         调用 Bkgnd.LeftClick(Hwnd,515,435)
  84.     情况 :
  85.         注释:否则
  86.     选择结束
  87.     延时 1000 毫秒
  88.     注释:开始培养
  89.     令 i = 0
  90.     循环当 i < pycount 时
  91.         注释:点培养
  92.         调用 Bkgnd.LeftClick(Hwnd,753,370)
  93.         延时 500 毫秒
  94.         注释:洗牌
  95.         调用 Bkgnd.LeftClick(Hwnd,755,416)
  96.         延时 500 毫秒
  97.         注释:选牌
  98.         调用 Bkgnd.LeftClick(Hwnd,878,248)
  99.         延时 500 毫秒
  100.         注释:没有属性确认