易語(yǔ)言模擬騰訊滑塊條自動(dòng)驗(yàn)證的代碼
模擬騰訊滑動(dòng)自動(dòng)驗(yàn)證的代碼
此功能需要加載精易模塊5.6
.版本 2 .支持庫(kù) EThread .支持庫(kù) BmpOperate .支持庫(kù) spec .程序集 窗口程序集1 .程序集變量 圖_原始, 字節(jié)集 .程序集變量 圖_塊, 字節(jié)集 .程序集變量 圖_模版, 字節(jié)集 .程序集變量 初始高度, 整數(shù)型 .程序集變量 圖_高度, 整數(shù)型 .程序集變量 圖_寬度, 整數(shù)型 .子程序 圖片處理, , , 加載圖片,并轉(zhuǎn)格式 .局部變量 返回文本, 文本型 .局部變量 vsig, 文本型 返回文本 = 網(wǎng)頁(yè)_訪(fǎng)問(wèn)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.” + 文本_取隨機(jī)數(shù)字 (16)) vsig = 文本_取出中間文本 (返回文本, “vsig” + #引號(hào) + “:” + #引號(hào), #引號(hào)) 初始高度 = 到整數(shù) (文本_取出中間文本 (返回文本, “inity” + #引號(hào) + “:” + #引號(hào), #引號(hào))) 圖_原始 = 網(wǎng)頁(yè)_訪(fǎng)問(wèn) (“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”) 圖_塊 = 網(wǎng)頁(yè)_訪(fǎng)問(wèn) (“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”) 圖_模版 = 網(wǎng)頁(yè)_訪(fǎng)問(wèn) (“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”) 圖片_轉(zhuǎn)換 (圖_模版, 1, , 圖_模版) 圖片_轉(zhuǎn)換 (圖_原始, 1, , 圖_原始) 圖片_轉(zhuǎn)換 (圖_塊, 1, , 圖_塊, ) 圖片框2.圖片 = 圖_塊 圖片框3.圖片 = 圖_模版 圖_高度 = 圖片_取高度 (圖_模版) 圖_寬度 = 圖片_取寬度 (圖_模版) 圖片框2.頂邊 = 初始高度 滑動(dòng) (圖_原始, 圖_模版, 3000000) .子程序 _載入圖片按鈕_被單擊 啟動(dòng)線(xiàn)程 (&圖片處理, , ) .子程序 滑動(dòng), , , 滑動(dòng)的過(guò)程 .參數(shù) 原始圖, 字節(jié)集 .參數(shù) 模版圖, 字節(jié)集 .參數(shù) 閥值, 整數(shù)型 .局部變量 原始位圖, 位圖 .局部變量 模版位圖, 位圖 .局部變量 塊位圖, 位圖 .局部變量 a, 整數(shù)型 .局部變量 b, 整數(shù)型 .局部變量 是否跳出, 邏輯型 .局部變量 模版X, 整數(shù)型 .局部變量 連續(xù)差異次數(shù), 整數(shù)型, 靜態(tài) .局部變量 塊X, 整數(shù)型 原始位圖.創(chuàng)建 (圖_寬度, 圖_高度, 24, ) 原始位圖.載入數(shù)據(jù) (原始圖) 模版位圖.創(chuàng)建 (圖_寬度, 圖_高度, 24, ) 模版位圖.載入數(shù)據(jù) (模版圖) 塊位圖.創(chuàng)建 (圖片_取寬度 (圖_塊), 圖片_取高度 (圖_塊), 24, ) 塊位圖.載入數(shù)據(jù) (圖_塊) .計(jì)次循環(huán)首 (圖片_取寬度 (圖_塊), a) .計(jì)次循環(huán)首 (圖片_取高度 (圖_塊), b) .如果 (塊位圖.取某點(diǎn)顏色 (a, b) = 9895935) 調(diào)試輸出 (“當(dāng)前塊” + 到文本 (a)) 塊X = a 是否跳出 = 真 跳出循環(huán) () .否則 是否跳出 = 假 .如果結(jié)束 .計(jì)次循環(huán)尾 () .如果真 (是否跳出 = 真) 是否跳出 = 假 跳出循環(huán) () .如果真結(jié)束 .計(jì)次循環(huán)尾 () .計(jì)次循環(huán)首 (圖_寬度, a) .計(jì)次循環(huán)首 (圖_高度, b) .如果 (取絕對(duì)值 (原始位圖.取某點(diǎn)顏色 (a, b) - 模版位圖.取某點(diǎn)顏色 (a, b)) > 閥值) 連續(xù)差異次數(shù) = 連續(xù)差異次數(shù) + 1 .如果真 (連續(xù)差異次數(shù) ≥ 5) 模版X = a 調(diào)試輸出 (“當(dāng)前模版” + 到文本 (a)) 是否跳出 = 真 跳出循環(huán) () .如果真結(jié)束 .否則 連續(xù)差異次數(shù) = 0 .如果結(jié)束 .計(jì)次循環(huán)尾 () .如果真 (是否跳出 = 真) 跳出循環(huán) () .如果真結(jié)束 .計(jì)次循環(huán)尾 () 連續(xù)差異次數(shù) = 0 圖片框2.左邊 = 模版X - 塊X 信息框 (“滑動(dòng)結(jié)果” + #換行符 + “X:” + 到文本 (圖片框2.左邊) + “,Y:” + 到文本 (初始高度), 0, , ) .子程序 二值化, 字節(jié)集, , (無(wú)用)本想先二值化處理一下,但是后來(lái)發(fā)現(xiàn)效果很差,所以放棄了 .參數(shù) 原始圖, 字節(jié)集 .參數(shù) 閥值, 整數(shù)型 .局部變量 位圖, 位圖 .局部變量 局_y, 整數(shù)型 .局部變量 局_x, 整數(shù)型 .局部變量 亮度, 整數(shù)型 位圖.創(chuàng)建 (圖_寬度, 圖_高度, 24, ) 位圖.載入數(shù)據(jù) (原始圖) .計(jì)次循環(huán)首 (圖_高度, 局_y) .計(jì)次循環(huán)首 (圖_寬度, 局_x) 亮度 = 位與 (位圖.取某點(diǎn)顏色 (局_x - 1, 局_y - 1), 255) .如果 (亮度 < 閥值) 位圖.置某點(diǎn)顏色 (局_x - 1, 局_y - 1, #黑色) .否則 位圖.置某點(diǎn)顏色 (局_x - 1, 局_y - 1, #白色) .如果結(jié)束 .計(jì)次循環(huán)尾 () .計(jì)次循環(huán)尾 () 返回 (位圖.取位圖數(shù)據(jù) ())
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
- 易語(yǔ)言修改指定網(wǎng)頁(yè)為瀏覽器主頁(yè)的代碼
- 易語(yǔ)言通過(guò)模擬的方式實(shí)現(xiàn)對(duì)微信的視頻圖片消息發(fā)送的代碼
- 易語(yǔ)言實(shí)現(xiàn)批量文本替換操作的代碼
- 易語(yǔ)言調(diào)用百度api識(shí)別是否為色情圖片的代碼
- 易語(yǔ)言實(shí)現(xiàn)163郵箱登錄獲取郵件列表等操作的代碼
- 易語(yǔ)言調(diào)用ESPI11.dll實(shí)現(xiàn)禁止指定程序訪(fǎng)問(wèn)網(wǎng)絡(luò)的代碼
- 易語(yǔ)言通過(guò)算法計(jì)算出酷狗音樂(lè)下載地址的代碼
- 易語(yǔ)言調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡(luò)連接名的代碼
- 易語(yǔ)言制作絕地求生視野一鍵優(yōu)化的代碼
- 易語(yǔ)言通過(guò)post實(shí)現(xiàn)對(duì)小米路由器操作的代碼
- 易語(yǔ)言通過(guò)解密微博圖片地址獲取發(fā)布者微博地址的代碼
- 易語(yǔ)言制作王者榮耀刷金幣腳本的代碼
- 易語(yǔ)言制作連連看小游戲的代碼
- 易語(yǔ)言制作語(yǔ)音聊天機(jī)器人的代碼
- 易語(yǔ)言調(diào)用api實(shí)現(xiàn)文件拖放獲取路徑的代碼
相關(guān)文章
易語(yǔ)言創(chuàng)建一個(gè)無(wú)法關(guān)閉窗口的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言創(chuàng)建一個(gè)無(wú)法關(guān)閉窗口的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言設(shè)置拖動(dòng)滾動(dòng)條的位置是否允許拖動(dòng)跟蹤的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言設(shè)置拖動(dòng)滾動(dòng)條的位置是否允許拖動(dòng)跟蹤的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言獲取網(wǎng)絡(luò)下載的文件名方法
在本篇內(nèi)容里小編給各位分享了關(guān)于易語(yǔ)言如何獲取網(wǎng)絡(luò)下載的文件名的操作方法,需要的朋友們來(lái)學(xué)習(xí)下。2019-01-01詳解易語(yǔ)言自適應(yīng)組件的寫(xiě)法與思路
在本篇內(nèi)容里小編給各位分享了關(guān)于易語(yǔ)言自適應(yīng)組件的寫(xiě)法與思路,喜歡易語(yǔ)言的朋友們可以學(xué)習(xí)下。2019-01-01