1.                 令 Fs = ""
  2.                 令 Fs = Fs & GA(i + 1,j) & GA(i + 2,j)
  3.                 令 Fs = Fs & GA(i,j + 1) & GA(i + 3,j + 1)
  4.                 令 Fs = Fs & GA(i + 3,j + 2)
  5.                 令 Fs = Fs & GA(i + 1,j + 3) & GA(i + 2,j + 3)
  6.                 如果 Fs = "1101111" 则
  7.                     令 GetNum = 9
  8.                     跳转到标记 EndOfGetNum(函数 GetNum)
  9.                 条件结束
  10.             循环结束
  11.         循环结束
  12.         循环 i 从 1 到 MyXStep
  13.             循环 j 从 1 到 MyYStep
  14.                 注释： 6 的上半部分特征，空处为0/1
  15.                 注释： 11
  16.                 注释： 1 1
  17.                 注释： 1 0
  18.                 注释： 111
  19.                 令 Fs = ""
  20.                 令 Fs = Fs & GA(i + 1,j) & GA(i + 2,j)
  21.                 令 Fs = Fs & GA(i,j + 1) & GA(i + 3,j + 1)
  22.                 令 Fs = Fs & GA(i,j + 2) & GA(i + 3,j + 2)
  23.                 令 Fs = Fs & GA(i,j + 3) & GA(i + 1,j + 3) & GA(i + 2,j + 3)
  24.                 如果 Fs = "111110111" 则
  25.                     令 GetNum = 6
  26.                     跳转到标记 EndOfGetNum(函数 GetNum)
  27.                 条件结束
  28.             循环结束
  29.         循环结束
  30.         循环 i 从 1 到 MyXStep
  31.             循环 j 从 1 到 MyYStep
  32.                 注释： 4 的类似十型特征，空处为0/1
  33.                 注释： 1
  34.                 注释： 1 1
  35.                 注释： 1111
  36.                 注释： 1
  37.                 注释： 1
  38.                 令 Fs = "" & GA(i + 2,j)
  39.                 令 Fs = Fs & GA(i,j + 1) & GA(i + 2,j + 1)
  40.                 令 Fs = Fs & GA(i,j + 2) & GA(i + 1,j + 2) & GA(i + 2,j + 2) & GA(i + 3,j + 2)
  41.                 令 Fs = Fs & GA(i + 2,j + 3) & GA(i + 2,j + 4)
  42.                 如果 Fs = "111111111" 则
  43.                     令 GetNum = 4
  44.                     跳转到标记 EndOfGetNum(函数 GetNum)
  45.                 条件结束
  46.             循环结束
  47.         循环结束
  48.         循环 i 从 1 到 MyXStep
  49.             循环 j 从 1 到 MyYStep
  50.                 注释： 8 的上下半部特征，空处为0/1
  51.                 注释： 11
  52.                 注释： 1 1
  53.                 注释： 1 1
  54.                 注释： 11
  55.                 注释：注意，因为6和9也有类似结构，
  56.                 注释： 所以要先判断不是6和9。
  57.                 注释： 上面先判断过6和9，是则跳转了。
  58.                 令 Fs = ""
  59.                 令 Fs = Fs & GA(i + 1,j) & GA(i + 2,j)
  60.                 令 Fs = Fs & GA(i,j + 1) & GA(i + 3,j + 1)
  61.                 令 Fs = Fs & GA(i,j + 2) & GA(i + 3,j + 2)
  62.                 令 Fs = Fs & GA(i + 1,j + 3) & GA(i + 2,j + 3)
  63.                 如果 Fs = "11111111" 则
  64.                     令 GetNum = 8
  65.                     跳转到标记 EndOfGetNum(函数 GetNum)
  66.                 条件结束
  67.             循环结束
  68.         循环结束
  69.         循环 i 从 1 到 MyXStep
  70.             循环 j 从 1 到 MyYStep
  71.                 注释： 3 的类似反C型特征，空处为0/1
  72.                 注释： 11
  73.                 注释： 1
  74.                 注释： 1
  75.                 注释： 1
  76.                 注释： 11
  77.                 注释： 1 加这2个特征是为了与2区别
  78.                 注释： 1
  79.                 令 Fs = "" & GA(i,j) & GA(i,j)
  80.                 令 Fs = Fs & GA(i + 2,j + 1)
  81.                 令 Fs = Fs & GA(i + 2,j + 2)
  82.                 令 Fs = Fs & GA(i + 2,j + 3)
  83.                 令 Fs = Fs & GA(i,j + 4) & GA(i + 1,j + 4)
  84.                 令 Fs = Fs & GA(i + 2,j + 5) & GA(i + 2,j + 6)
  85.                 如果 Fs = "111111111" 则
  86.                     令 GetNum = 3
  87.                     跳转到标记 EndOfGetNum(函数 GetNum)
  88.                 条件结束
  89.             循环结束
  90.         循环结束
  91.         循环 i 从 1 到 MyXStep
  92.             循环 j 从 1 到 MyYStep
  93.                 注释： 2 的上半部特征，空处为0/1
  94.                 注释： 11
  95.                 注释： 1 1
  96.                 注释： 1 1
  97.                 注释： 01
  98.                 注释：注意，因为6和9也有类似结构，
  99.                 注释： 所以要先判断不是6和9。
  100.                 注释： 上面先判断过6和9，是则跳转了。