1.     令 scolor(6,0) = "0C0C0C"
  2.     令 scolor(6,1) = "0C0C0C"
  3.     令 scolor(6,2) = "080808"
  4.     令 scolor(6,3) = "080C0C"
  5.     循环当 i < 7 时
  6.         循环当 ii < 4 时
  7.             令 getcolor = 得到指定点 (d2_pyx + 435 + (30 * i), d2_pyy + 330 + (30 * ii)) 的颜色
  8.             注释： TracePrint i&ii&d2_pyx + 435 + (30 * i)&", "&d2_pyy + 330 + (30 * ii)
  9.             注释：TracePrint getcolor
  10.             注释：Call Plugin.File.WriteFileEx("c:\zdkp_log.txt",i&ii&"="&getcolor)
  11.             如果 getcolor = scolor(i,ii) 则
  12.                 向调试窗口输出："yes"
  13.             否则
  14.                 （鼠标）移动到 (d2_pyx + 435 + (30 * i), d2_pyy + 330 + (30 * ii))
  15.                 延时 100 毫秒
  16.                 （鼠标）左键单击, 1次
  17.                 延时 500 毫秒
  18.                 （鼠标）右键单击, 1次
  19.                 延时 500 毫秒
  20.             条件结束
  21.             令 ii = ii + 1
  22.         循环结束
  23.         循环当 ii = 4 时
  24.             令 ii = 0
  25.             令 i = i + 1
  26.             跳出循环
  27.         循环结束
  28.     循环结束
  29. 子程序结束