.版本 2.支持庫 EThread.支持庫 BmpOperate.支持庫 spec.程序集 窗口程序集1.程序集變量 圖_原始, 字節集.程序集變量 圖_塊, 字節集.程序集變量 圖_模版, 字節集.程序集變量 初始高度, 整數型.程序集變量 圖_高度, 整數型.程序集變量 圖_寬度, 整數型.子程序 圖片處理, , , 加載圖片，并轉格式.局部變量 返回文本, 文本型.局部變量 vsig, 文本型返回文本 ＝ 網頁_訪問S (“https://ssl.captcha.qq.com/cap_union_new_getsig?aid=549000912&asig=&captype=&protocol=https&clientype=2&disturblevel=&apptype=2&curenv=inner&sess=5QXrJewkDEwg1vPDw8VhkcvqqFlg-iqmUkB2hmpkZr760j54ow_O5Ral9Mvn0FWnd8MNbzjTOfo0q13_o19RgaBSGxg1y7SvtwQtfjQYUmYJXehr0kAIofDGNQoChv6fmDfSHJMR6ecpe3cLGDNPdFwLNjGnT_9nRQTot36qu3sdKPWviiomNZHo7LOzDEe05ovs_u73D60*&theme=&noBorder=noborder&fb=1&showtype=embed&uid=2113494574&cap_cd=xkkVG0XdCXOo-yGWoBCds9jdJ0uWpmRxSEUCS8Y73GUbqzOpFCXCgw**&lang=2052&rnd=566947&rand=0.” ＋ 文本_取隨機數字 (16))vsig ＝ 文本_取出中間文本 (返回文本, “vsig” ＋ #引號 ＋ “:” ＋ #引號, #引號)初始高度 ＝ 到整數 (文本_取出中間文本 (返回文本, “inity” ＋ #引號 ＋ “:” ＋ #引號, #引號))圖_原始 ＝ 網頁_訪問 (“https://ssl.captcha.qq.com/cap_union_new_getcapbysig?aid=549000912&asig=&captype=&protocol=https&clientype=2&disturblevel=&apptype=2&curenv=inner&sess=5QXrJewkDEwg1vPDw8VhkcvqqFlg-iqmUkB2hmpkZr760j54ow_O5Ral9Mvn0FWnd8MNbzjTOfo0q13_o19RgaBSGxg1y7SvtwQtfjQYUmYJXehr0kAIofDGNQoChv6fmDfSHJMR6ecpe3cLGDNPdFwLNjGnT_9nRQTot36qu3sdKPWviiomNZHo7LOzDEe05ovs_u73D60*&theme=&noBorder=noborder&fb=1&showtype=embed&uid=2113494574&cap_cd=xkkVG0XdCXOo-yGWoBCds9jdJ0uWpmRxSEUCS8Y73GUbqzOpFCXCgw**&lang=2052&rnd=566947&rand=0.8316309340056851&vsig=” ＋ vsig ＋ “&img_index=0”)圖_塊 ＝ 網頁_訪問 (“https://ssl.captcha.qq.com/cap_union_new_getcapbysig?aid=549000912&asig=&captype=&protocol=https&clientype=2&disturblevel=&apptype=2&curenv=inner&sess=5QXrJewkDEwg1vPDw8VhkcvqqFlg-iqmUkB2hmpkZr760j54ow_O5Ral9Mvn0FWnd8MNbzjTOfo0q13_o19RgaBSGxg1y7SvtwQtfjQYUmYJXehr0kAIofDGNQoChv6fmDfSHJMR6ecpe3cLGDNPdFwLNjGnT_9nRQTot36qu3sdKPWviiomNZHo7LOzDEe05ovs_u73D60*&theme=&noBorder=noborder&fb=1&showtype=embed&uid=2113494574&cap_cd=xkkVG0XdCXOo-yGWoBCds9jdJ0uWpmRxSEUCS8Y73GUbqzOpFCXCgw**&lang=2052&rnd=566947&rand=0.8316309340056851&vsig=” ＋ vsig ＋ “&img_index=2”)圖_模版 ＝ 網頁_訪問 (“https://ssl.captcha.qq.com/cap_union_new_getcapbysig?aid=549000912&asig=&captype=&protocol=https&clientype=2&disturblevel=&apptype=2&curenv=inner&sess=5QXrJewkDEwg1vPDw8VhkcvqqFlg-iqmUkB2hmpkZr760j54ow_O5Ral9Mvn0FWnd8MNbzjTOfo0q13_o19RgaBSGxg1y7SvtwQtfjQYUmYJXehr0kAIofDGNQoChv6fmDfSHJMR6ecpe3cLGDNPdFwLNjGnT_9nRQTot36qu3sdKPWviiomNZHo7LOzDEe05ovs_u73D60*&theme=&noBorder=noborder&fb=1&showtype=embed&uid=2113494574&cap_cd=xkkVG0XdCXOo-yGWoBCds9jdJ0uWpmRxSEUCS8Y73GUbqzOpFCXCgw**&lang=2052&rnd=566947&rand=0.8316309340056851&vsig=” ＋ vsig ＋ “&img_index=1”)圖片_轉換 (圖_模版, 1, , 圖_模版)圖片_轉換 (圖_原始, 1, , 圖_原始)圖片_轉換 (圖_塊, 1, , 圖_塊, )圖片框2.圖片 ＝ 圖_塊圖片框3.圖片 ＝ 圖_模版圖_高度 ＝ 圖片_取高度 (圖_模版)圖_寬度 ＝ 圖片_取寬度 (圖_模版)圖片框2.頂邊 ＝ 初始高度滑動 (圖_原始, 圖_模版, 3000000).子程序 _載入圖片按鈕_被單擊啟動線程 (&圖片處理, , ).子程序 滑動, , , 滑動的過程.參數 原始圖, 字節集.參數 模版圖, 字節集.參數 閥值, 整數型.局部變量 原始位圖, 位圖.局部變量 模版位圖, 位圖.局部變量 塊位圖, 位圖.局部變量 a, 整數型.局部變量 b, 整數型.局部變量 是否跳出, 邏輯型.局部變量 模版X, 整數型.局部變量 連續差異次數, 整數型, 靜態.局部變量 塊X, 整數型原始位圖.創建 (圖_寬度, 圖_高度, 24, )原始位圖.載入數據 (原始圖)模版位圖.創建 (圖_寬度, 圖_高度, 24, )模版位圖.載入數據 (模版圖)塊位圖.創建 (圖片_取寬度 (圖_塊), 圖片_取高度 (圖_塊), 24, )塊位圖.載入數據 (圖_塊).計次循環首 (圖片_取寬度 (圖_塊), a)  .計次循環首 (圖片_取高度 (圖_塊), b)    .如果 (塊位圖.取某點顏色 (a, b) ＝ 9895935)      調試輸出 (“當前塊” ＋ 到文本 (a))      塊X ＝ a      是否跳出 ＝ 真      跳出循環 ()    .否則      是否跳出 ＝ 假    .如果結束  .計次循環尾 ()  .如果真 (是否跳出 ＝ 真)    是否跳出 ＝ 假    跳出循環 ()  .如果真結束.計次循環尾 ().計次循環首 (圖_寬度, a)  .計次循環首 (圖_高度, b)    .如果 (取絕對值 (原始位圖.取某點顏色 (a, b) － 模版位圖.取某點顏色 (a, b)) ＞ 閥值)      連續差異次數 ＝ 連續差異次數 ＋ 1      .如果真 (連續差異次數 ≥ 5)        模版X ＝ a        調試輸出 (“當前模版” ＋ 到文本 (a))        是否跳出 ＝ 真        跳出循環 ()      .如果真結束    .否則      連續差異次數 ＝ 0    .如果結束  .計次循環尾 ()  .如果真 (是否跳出 ＝ 真)    跳出循環 ()  .如果真結束.計次循環尾 ()連續差異次數 ＝ 0圖片框2.左邊 ＝ 模版X － 塊X信息框 (“滑動結果” ＋ #換行符 ＋ “X:” ＋ 到文本 (圖片框2.左邊) ＋ “,Y:” ＋ 到文本 (初始高度), 0, , ).子程序 二值化, 字節集, , （無用）本想先二值化處理一下，但是后來發現效果很差，所以放棄了.參數 原始圖, 字節集.參數 閥值, 整數型.局部變量 位圖, 位圖.局部變量 局_y, 整數型.局部變量 局_x, 整數型.局部變量 亮度, 整數型位圖.創建 (圖_寬度, 圖_高度, 24, )位圖.載入數據 (原始圖).計次循環首 (圖_高度, 局_y)  .計次循環首 (圖_寬度, 局_x)    亮度 ＝ 位與 (位圖.取某點顏色 (局_x － 1, 局_y － 1), 255)    .如果 (亮度 ＜ 閥值)      位圖.置某點顏色 (局_x － 1, 局_y － 1, #黑色)    .否則      位圖.置某點顏色 (局_x － 1, 局_y － 1, #白色)    .如果結束  .計次循環尾 ().計次循環尾 ()返回 (位圖.取位圖數據 ())