1.     调用 zhangou
  2. 子程序结束
  3. 子程序 altq
  4.     (键盘)按下 "Alt" 键
  5.     延时 500 毫秒
  6.     (键盘)按下 "Q" 键
  7.     延时 500 毫秒
  8.     (键盘)弹起 "Alt" 键
  9.     延时 500 毫秒
  10. 子程序结束
  11. 子程序 alta
  12.     (键盘)按下 "Alt" 键
  13.     延时 500 毫秒
  14.     (键盘)按下 "A" 键
  15.     延时 500 毫秒
  16.     (键盘)弹起 "Alt" 键
  17.     延时 500 毫秒
  18. 子程序结束
  19. 子程序 altd
  20.     延时 300 毫秒
  21.     (键盘)按下 "Alt" 键
  22.     延时 500 毫秒
  23.     (键盘)按下 "d" 键
  24.     延时 500 毫秒
  25.     (键盘)弹起 "Alt" 键
  26.     延时 500 毫秒
  27. 子程序结束
  28. 子程序 fashu
  29.     标记 fash(子程序 fashu)
  30.     令 i = 0
  31.     循环当 i = 0 时
  32.         从左上到右下查找图片 "Attachment:\fas.bmp",把找到的坐标保存到 (fasX, fasY),指定区域(左:0 上:0 右:650 下:500),相似度 0.8
  33.         如果 fasX > 0 并且 fasY > 0 则
  34.             令 i = 1
  35.         条件结束
  36.     循环结束
  37.     如果 jikai = "a" 则
  38.         调用 zhandoua
  39.     否则如果 jikai = "b" 则
  40.         调用 zhandoub
  41.     否则如果 jikai = "c" 则
  42.         调用 zhandouc
  43.     否则如果 jikai = "d" 则
  44.         调用 zhandoud
  45.     否则如果 jikai = "e" 则
  46.         调用 在战斗
  47.     条件结束
  48.     跳转到标记 fash(子程序 fashu)
  49. 子程序结束
  50. 子程序 zhandoua
  51.     调用 ckclb(d1ID)
  52.     延时 300 毫秒
  53.     如果 d1anj = "alt+q" 则
  54.         (键盘)按下 "Alt" 键
  55.         延时 50 毫秒
  56.         (键盘)按下 "Q" 键
  57.         延时 50 毫秒
  58.         (键盘)弹起 "Alt" 键
  59.         延时 50 毫秒
  60.     否则如果 d1anj = "alt+d" 则
  61.         (键盘)按下 "Alt" 键
  62.         延时 50 毫秒
  63.         (键盘)按下 "D" 键
  64.         延时 50 毫秒
  65.         (键盘)弹起 "Alt" 键
  66.         延时 50 毫秒
  67.     否则如果 d1anj = "alt+a" 则
  68.         (键盘)按下 "Alt" 键
  69.         延时 50 毫秒
  70.         (键盘)按下 "A" 键
  71.         延时 50 毫秒
  72.         (键盘)弹起 "Alt" 键
  73.         延时 50 毫秒
  74.     条件结束
  75.     如果 d1banj = "alt+q" 则
  76.         (键盘)按下 "Alt" 键
  77.         延时 50 毫秒
  78.         (键盘)按下 "Q" 键
  79.         延时 50 毫秒
  80.         (键盘)弹起 "Alt" 键
  81.         延时 50 毫秒
  82.     否则如果 d1banj = "alt+d" 则
  83.         (键盘)按下 "Alt" 键
  84.         延时 50 毫秒
  85.         (键盘)按下 "B" 键
  86.         延时 50 毫秒
  87.         (键盘)弹起 "Alt" 键
  88.         延时 50 毫秒
  89.     否则如果 d1banj = "alt+a" 则
  90.         (键盘)按下 "Alt" 键
  91.         延时 50 毫秒
  92.         (键盘)按下 "A" 键
  93.         延时 50 毫秒
  94.         (键盘)弹起 "Alt" 键
  95.         延时 50 毫秒
  96.     条件结束
  97. 子程序结束
  98. 子程序 zhandoub
  99.     调用 ckclb(d1ID)
  100.     延时 300 毫秒