這篇文章給大家分享的是有關易語言如何模擬騰訊實現滑塊條自動驗證的內容。小編覺得挺實用的,因此分享給大家做個參考,一起跟隨小編過來看看吧。
模擬騰訊滑動自動驗證的代碼
此功能需要加載精易模塊5.6
.版本 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, #白色) .如果結束 .計次循環尾 () .計次循環尾 () 返回 (位圖.取位圖數據 ())
運行結果:

感謝各位的閱讀!關于“易語言如何模擬騰訊實現滑塊條自動驗證”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,讓大家可以學到更多知識,如果覺得文章不錯,可以把它分享出去讓更多的人看到吧!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。