.版本 2
.DLL命令 PostMessageA, 整數(shù)型, "user32.dll", "PostMessageA", , 如果函數(shù)調(diào)用成功，返回非零值：如果函數(shù)調(diào)用失敗，返回值是零
  .參數(shù) hWnd, 整數(shù)型, , 其窗口程序接收消息的窗口的句柄
  .參數(shù) Msg, 整數(shù)型, , 指定被寄送的消息
  .參數(shù) wParam, 整數(shù)型, , 指定附加的消息特定的信息
  .參數(shù) IParam, 整數(shù)型, , 指定附加的消息特定的信息

.版本 2
.支持庫 spec
.支持庫 shell
.支持庫 BmpOperate
.程序集 窗口程序集_啟動(dòng)窗口
.程序集變量 文件路徑, 文本型
.程序集變量 開始, 邏輯型
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
窗口_熱鍵注冊 (取窗口句柄 (), 1, #A鍵, &_按鈕_繪畫_被單擊, 1)
.子程序 _按鈕_繪畫_被單擊
.局部變量 a, 整數(shù)型
.局部變量 b, 整數(shù)型
.局部變量 鼠標(biāo)位置, 精易_坐標(biāo)
程序_延時(shí) (2000, )
鼠標(biāo)位置 ＝ 鼠標(biāo)_取位置 ()
調(diào)試輸出 (1)
開始 ＝ 真
.計(jì)次循環(huán)首 (畫板1.寬度, a)
  .計(jì)次循環(huán)首 (畫板1.高度, b)
    .如果 (畫板1.取點(diǎn) (a, b) ＝ 0)
      程序_延時(shí) (1)
      鼠標(biāo)_移動(dòng) (, 鼠標(biāo)位置.橫 ＋ a, 鼠標(biāo)位置.縱 ＋ b)
      鼠標(biāo)_按鍵 (1, 3)
    .否則
      鼠標(biāo)_按鍵 (1, 4)
    .如果結(jié)束
    系統(tǒng)_處理事件 ()
    .如果真 (開始 ＝ 假)
      跳出循環(huán) ()
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  .如果真 (開始 ＝ 假)
    跳出循環(huán) ()
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
調(diào)試輸出 (2)
.子程序 _按鈕_載入_被單擊
通用對話框1.初始目錄 ＝ 取特定目錄 (3)
通用對話框1.過濾器 ＝ “PNG|*.png|JPG|*.jpg|BMP|*.bmp|JPGE|*.jpge”
通用對話框1.打開 ()
文件路徑 ＝ 通用對話框1.文件名
畫板1.底圖 ＝ 讀入文件 (通用對話框1.文件名)
畫板1.底圖 ＝ 清除雜點(diǎn) (二值化處理 (畫板1.取圖片 (, ), 150), 0)
.子程序 二值化處理, 字節(jié)集
.參數(shù) 圖片, 字節(jié)集
.參數(shù) 二值化值, 整數(shù)型
.局部變量 位圖, 位圖
.局部變量 x, 整數(shù)型
.局部變量 y, 整數(shù)型
.局部變量 RGB, 字節(jié)集
.局部變量 顏色值, 整數(shù)型
位圖.載入數(shù)據(jù) (圖片)
.計(jì)次循環(huán)首 (位圖.取高度 (), y)
  .計(jì)次循環(huán)首 (位圖.取寬度 (), x)
    RGB ＝ 到字節(jié)集 (位圖.取某點(diǎn)顏色 (x － 1, y － 1))
    顏色值 ＝ (RGB [1] ＋ RGB [2] ＋ RGB [3]) ÷ 3
    .如果 (二值化值 ＜ 顏色值)
      位圖.置某點(diǎn)顏色 (x － 1, y － 1, #白色)
    .否則
      位圖.置某點(diǎn)顏色 (x － 1, y － 1, #黑色)
    .如果結(jié)束
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
返回 (位圖.取位圖數(shù)據(jù) ())
.子程序 清除雜點(diǎn), 字節(jié)集
.參數(shù) 圖片, 字節(jié)集, , 二值化后的圖片
.參數(shù) 清除強(qiáng)度, 整數(shù)型, 可空, 默認(rèn)為1
.局部變量 位圖, 位圖
.局部變量 x, 整數(shù)型
.局部變量 y, 整數(shù)型
.局部變量 x_, 整數(shù)型
.局部變量 y_, 整數(shù)型
.局部變量 i, 整數(shù)型
.局部變量 a, 整數(shù)型
.如果真 (是否為空 (清除強(qiáng)度))
  清除強(qiáng)度 ＝ 1
.如果真結(jié)束
位圖.載入數(shù)據(jù) (圖片)
.計(jì)次循環(huán)首 (位圖.取高度 (), y)
  .計(jì)次循環(huán)首 (位圖.取寬度 (), x)
    .如果真 (位圖.取某點(diǎn)顏色 (x － 1, y － 1) ＝ #黑色)
      a ＝ 0
      .計(jì)次循環(huán)首 (8, i)
        x_ ＝ 多項(xiàng)選擇 (i, 0, 1, 1, 1, 0, -1, -1, -1)
        y_ ＝ 多項(xiàng)選擇 (i, -1, -1, 0, 1, 1, 1, 0, -1)
        .如果真 (位圖.取某點(diǎn)顏色 (x － 1 － x_, y － 1 － y_) ＝ #黑色)
          a ＝ a ＋ 1
        .如果真結(jié)束
      .計(jì)次循環(huán)尾 ()
      .如果真 (a ≤ 清除強(qiáng)度)
        位圖.置某點(diǎn)顏色 (x － 1, y － 1, #白色)
      .如果真結(jié)束
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
返回 (位圖.取位圖數(shù)據(jù) ())
.子程序 反色處理, 字節(jié)集
.參數(shù) 圖片, 字節(jié)集
.局部變量 位圖, 位圖
.局部變量 x, 整數(shù)型
.局部變量 y, 整數(shù)型
.局部變量 RGB, 字節(jié)集
位圖.載入數(shù)據(jù) (圖片)
.計(jì)次循環(huán)首 (位圖.取高度 (), y)
  .計(jì)次循環(huán)首 (位圖.取寬度 (), x)
    RGB ＝ 到字節(jié)集 (位圖.取某點(diǎn)顏色 (x － 1, y － 1))
    位圖.置某點(diǎn)顏色 (x － 1, y － 1, 取顏色值 (255 － RGB [1], 255 － RGB [2], 255 － RGB [3]))
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
返回 (位圖.取位圖數(shù)據(jù) ())
.子程序 _按鈕_黑白_被單擊
畫板1.底圖 ＝ 清除雜點(diǎn) (二值化處理 (畫板1.取圖片 (, ), 150), 0)
.子程序 _按鈕_反色_被單擊
畫板1.底圖 ＝ 反色處理 (畫板1.取圖片 (, ))
.子程序 _滑塊條1_位置被改變
調(diào)試輸出 (滑塊條1.位置)
畫板1.底圖 ＝ 讀入文件 (文件路徑)
畫板1.底圖 ＝ 清除雜點(diǎn) (二值化處理 (畫板1.取圖片 (, ), 滑塊條1.位置), 0)