模擬騰訊滑動自動驗證的代碼
此功能需要加載精易模塊5.6
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
.版本 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, #白色) .如果結束 .計次循環尾 ().計次循環尾 ()返回 (位圖.取位圖數據 ()) |
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接
