国产片侵犯亲女视频播放_亚洲精品二区_在线免费国产视频_欧美精品一区二区三区在线_少妇久久久_在线观看av不卡

服務器之家:專注于服務器技術及軟件下載分享
分類導航

PHP教程|ASP.NET教程|Java教程|ASP教程|編程技術|正則表達式|C/C++|IOS|C#|Swift|Android|VB|R語言|JavaScript|易語言|vb.net|

服務器之家 - 編程語言 - 易語言 - 易語言獲取群內全部成員利用模擬按鍵的方式艾特成員

易語言獲取群內全部成員利用模擬按鍵的方式艾特成員

2022-02-21 16:26易語言源碼教程 易語言

今天小編就為大家分享一篇關于易語言獲取群內全部成員利用模擬按鍵的方式艾特成員,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

DLL命令表

?
1
2
3
4
.版本 2
.DLL命令 _鼠標取坐標句柄, 整數型, "user32", "WindowFromPoint"
  .參數 xPoint, 整數型, , x點值
  .參數 yPoint, 整數型, , y點值;

全局變量表

?
1
2
3
4
.版本 2
.全局變量 全_Uin, 文本型
.全局變量 全_Bkn, 文本型
.全局變量 全_Cookie, 文本型

常量數據表

?
1
2
3
.版本 2
.常量 正則表達式_群列表, "<文本長度: 22>", , gc":(\d+),"gn":"(.*?)"
.常量 正則表達式_群成員, "<文本長度: 53>", , nick":"(.*?)"[\s\S]*?"role":(\d+),[\s\S]*?uin":(\d+)}

計算群列表群成員

?
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
.版本 2
.程序集 集_QQ功能
.子程序 QQ群_計算Bkn, 文本型
.參數 skey, 文本型
.局部變量 基值, 整數型
.局部變量 計數, 整數型
.局部變量 長度, 整數型
.局部變量 結果, 整數型
基值 = 5381
計數 = 0
長度 = 取文本長度 (skey)
.判斷循環首 (計數 < 長度)
  基值 = 基值 + 左移 (基值, 5) + 取代碼 (skey, 計數 + 1)
  計數 = 計數 + 1
.判斷循環尾 ()
結果 = 位與 (基值, 2147483647)
返回 (到文本 (結果))
.子程序 QQ群_群列表, 文本型
.參數 模式, 整數型, , 0=群驗證;1=獲取群列表
.參數 Group, 文本型, 可空
.局部變量 Text, 文本型
.如果真 (模式 = 0)
  全_Bkn = QQ群_計算Bkn (文本_取出中間文本 (全_Cookie, “skey=”, “;”, , ))
  Text = 編碼_utf8到gb2312 (網頁_訪問S (“http://qun.qq.com/cgi-bin/qun_mgr/get_group_list”, 1, “bkn=” + 全_Bkn, 全_Cookie, , , , , , , , , , , , , ))
  .如果真 (尋找文本 (Text, Group, , 假) ≠ -1)
    返回 (“驗證成功”)
  .如果真結束
  返回 (“驗證失敗”)
.如果真結束
.如果真 (模式 = 1)
  全_Bkn = QQ群_計算Bkn (文本_取出中間文本 (全_Cookie, “skey=”, “;”, , ))
  Text = 文本_替換 (編碼_URL解碼 (網頁_訪問S (“http://qun.qq.com/cgi-bin/qun_mgr/get_group_list”, 1, “bkn=” + 全_Bkn, 全_Cookie, , , , , , , , , , , , , ), 真), , , , “&nbsp;”, “”, , , , , , , , )
  返回 (Text)
.如果真結束
返回 (Text)
.子程序 QQ群_群成員, 文本型
.參數 模式, 整數型, , 0=獲取群成員數量;1=獲取群成員
.參數 Group, 文本型
.參數 st, 文本型, 可空
.參數 end, 文本型, 可空
.局部變量 Text, 文本型
.如果真 (模式 = 0)
  全_Bkn = QQ群_計算Bkn (文本_取出中間文本 (全_Cookie, “skey=”, “;”, , ))
  Text = 文本_替換 (編碼_URL解碼 (網頁_訪問S (“http://qun.qq.com/cgi-bin/qun_mgr/search_group_members”, 1, “gc=” + Group + “&st=0&end=20&sort=0&bkn=” + 全_Bkn, 全_Cookie, , , , , , , , , , , , , ), 真), , , , “&nbsp;”, “”, “&#39;”, “”, , , , , , )
  Text = 文本_取出中間文本 (Text, “count” + #引號 + “:”, “,”, , )
.如果真結束
.如果真 (模式 = 1)
  全_Bkn = QQ群_計算Bkn (文本_取出中間文本 (全_Cookie, “skey=”, “;”, , ))
  Text = 文本_替換 (編碼_URL解碼 (網頁_訪問S (“http://qun.qq.com/cgi-bin/qun_mgr/search_group_members”, 1, “gc=” + Group + “&st=” + st + “&end=” + end + “&sort=0&bkn=” + 全_Bkn, 全_Cookie, , , , , , , , , , , , , ), 真), , , , “&nbsp;”, “”, “&#39;”, “”, , , , , , )
.如果真結束
返回 (Text)

QQ群艾特功能

此功能需要加載精易模塊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
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
.版本 2
.支持庫 shellEx
.支持庫 iext
.程序集 窗口程序集_窗口1
.程序集變量 集_開始工作, 邏輯型
.程序集變量 集_窗口標題, 文本型
.程序集變量 集_熱鍵F4, 整數型
.程序集變量 集_窗口句柄, 整數型
.程序集變量 集_獲取群員防卡線程, 整數型
.程序集變量 集_熱鍵F3, 整數型
.子程序 _窗口1_創建完畢
集_開始工作 = 假
通用對話框1.過濾器 = “圖片文件|*.png;*.jpg”
集_熱鍵F4 = 注冊熱鍵 (取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F4鍵)
集_熱鍵F3 = 注冊熱鍵 (取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F3鍵)
全_Uin = 文本_取出中間文本 (全_Cookie, “uin=o”, “;”, , )
標簽1.標題 = “QQ號碼:” + 全_Uin
初始化 ()
.子程序 初始化
.局部變量 a, 整數型
.局部變量 正則, 正則表達式類
.局部變量 局_表項數, 整數型
正則.創建 (#正則表達式_群列表, QQ群_群列表 (1, ), , , , )
.計次循環首 (正則.取匹配數量 (), a)
  局_表項數 = 超級列表框1.插入表項 (, , , , , )
  超級列表框1.置標題 (局_表項數, 0, 到文本 (超級列表框1.取表項數 ()))
  超級列表框1.置標題 (局_表項數, 1, 正則.取子匹配文本 (a, 2, ))
  超級列表框1.置標題 (局_表項數, 2, 正則.取子匹配文本 (a, 1, ))
  處理事件 ()
.計次循環尾 ()
' ====================================================================
編輯框1.內容 = 讀配置項 (取運行目錄 () + “\@Set.ini”, “編輯框”, “宣傳語”, )
編輯框2.內容 = 讀配置項 (取運行目錄 () + “\@Set.ini”, “編輯框”, “圖片地址”, )
.判斷開始 (讀配置項 (取運行目錄 () + “\@Set.ini”, “選擇框”, “跳過群主/管理”, ) = “1”)
  選擇框1.選中 = 真
.默認
  選擇框1.選中 = 假
.判斷結束
.子程序 _超級列表框1_當前表項被改變
線程_啟動 (&防卡_獲取群員, , 集_獲取群員防卡線程)
.子程序 防卡_獲取群員
.局部變量 a, 整數型
.局部變量 正則, 正則表達式類
.局部變量 局_表項數, 整數型
.局部變量 局_群人數量, 文本型
.局部變量 局_群人數, 文本型
.局部變量 局_循環次數, 整數型
.局部變量 局_群人數前, 整數型
.局部變量 b, 整數型
狀態條1.置文本 (1, “正在獲取群成員數量...”)
選擇夾1.現行子夾 = 1
局_群人數量 = QQ群_群成員 (0, 超級列表框1.取標題 (超級列表框1.現行選中項, 2), , )
狀態條1.置文本 (1, “該群共有人數:” + 局_群人數量 + “人...”)
局_循環次數 = 取整 (到整數 (局_群人數量) ÷ 100)
局_群人數前 = 0
.計次循環首 (局_循環次數 + 1, )
  局_群人數 = QQ群_群成員 (1, 超級列表框1.取標題 (超級列表框1.現行選中項, 2), 到文本 (局_群人數前), 到文本 (到整數 (局_群人數前) + 100))
  局_群人數前 = 局_群人數前 + 101
  正則.創建 (#正則表達式_群成員, 局_群人數, , , , )
  .計次循環首 (正則.取匹配數量 (), a)
    局_表項數 = 超級列表框2.插入表項 (, , , , , )
    超級列表框2.置標題 (局_表項數, 0, 到文本 (超級列表框2.取表項數 ()))
    超級列表框2.置標題 (局_表項數, 1, 正則.取子匹配文本 (a, 1, ))
    超級列表框2.置標題 (局_表項數, 2, 正則.取子匹配文本 (a, 3, ))
    .如果真 (正則.取子匹配文本 (a, 2, ) = “0”)
      超級列表框2.置標題 (局_表項數, 3, “群主”)
    .如果真結束
    .如果真 (正則.取子匹配文本 (a, 2, ) = “1”)
      超級列表框2.置標題 (局_表項數, 3, “管理”)
    .如果真結束
    .如果真 (正則.取子匹配文本 (a, 2, ) = “2”)
      超級列表框2.置標題 (局_表項數, 3, “群員”)
    .如果真結束
    處理事件 ()
  .計次循環尾 ()
  超級列表框2.保證顯示 (超級列表框2.取表項數 () - 1)
  處理事件 ()
  狀態條1.置文本 (1, “已獲取群員” + 到文本 (超級列表框2.取表項數 ()) + “個...”)
.計次循環尾 ()
狀態條1.置文本 (1, “已獲取群員” + 到文本 (超級列表框2.取表項數 ()) + “個,線程已銷毀...”)
線程_銷毀 (集_獲取群員防卡線程)
.子程序 _標簽1_反饋事件, 整數型
.參數 參數一, 整數型
.參數 參數二, 整數型
.局部變量 聊天窗口, 整數型
.局部變量 a, 整數型
.局部變量 Firends, 文本型, , "0"
.局部變量 Count, 整數型
.局部變量 Number, 整數型
.如果真 (參數一 = 集_熱鍵F4)
  狀態條1.置文本 (1, “任務開始...”)
  集_開始工作 = 真
  集_窗口句柄 = _鼠標取坐標句柄 (取鼠標水平位置 (), 取鼠標垂直位置 ())
  聊天窗口 = 聊天窗口_取句柄 (集_窗口標題)
  .判斷循環首 (聊天窗口 = 0)
    聊天窗口 = 聊天窗口_取句柄 (集_窗口標題)
  .判斷循環尾 ()
  .計次循環首 (超級列表框2.取表項數 (), a)
    .判斷開始 (選擇框1.選中 = 真)
      .如果真 (超級列表框2.取標題 (a - 1, 3) = “群員”)
        加入成員 (Firends, 超級列表框2.取標題 (a - 1, 2)) ' 加入非群主\管理數組
      .如果真結束
    .默認
      加入成員 (Firends, 超級列表框2.取標題 (a - 1, 2)) ' 加入全部成員數組
    .判斷結束
  .計次循環尾 ()
  Count = 絕對取整 (取數組成員數 (Firends) ÷ 20) ' 計算外循環次數
  .如果真 (Count × 20 < 取數組成員數 (Firends)) ' 判斷余數
    Count = Count + 1 ' 有余數,加上1
  .如果真結束
  .計次循環首 (Count, )
    .如果真 (集_開始工作 = 假)
      跳出循環 ()
    .如果真結束
    .計次循環首 (20, )
      .如果真 (集_開始工作 = 假)
        跳出循環 ()
      .如果真結束
      Number = Number + 1
      .如果真 (Number > 取數組成員數 (Firends))
        Number = 0
        跳出循環 ()
      .如果真結束
      文本_投遞 (聊天窗口, “@” + Firends [Number])
      程序_延時 (100, )
      鍵盤_消息 (聊天窗口, #回車鍵, 5, )
    .計次循環尾 ()
    .如果真 (集_開始工作 = 假)
      跳出循環 ()
    .如果真結束
    剪輯板_置圖片 (讀入文件 (編輯框2.內容))
    文本_投遞 (聊天窗口, 編輯框1.內容)
    程序_延時 (100, 0)
    鍵盤_組合按鍵 (#V鍵, #Ctrl鍵, , )
    .如果真 (Number ≥ 0)
      程序_延時 (100, ) ' 這里模擬到20次發送的按鍵
      鍵盤_消息 (聊天窗口, #回車鍵, 5, )
    .如果真結束
  .計次循環尾 ()
.如果真結束
.如果真 (參數一 = 集_熱鍵F3)
  狀態條1.置文本 (1, “正在結束任務...”)
  集_開始工作 = 假
.如果真結束
狀態條1.置文本 (1, “任務已結束...”)
.子程序 聊天窗口_取句柄, 整數型
.參數 昵稱, 文本型
.局部變量 局_句柄, 整數型
.局部變量 rest, 文本型
.局部變量 窗口標題, 文本型
.局部變量 jx, 精易_矩形
.局部變量 arr, 整數型, , "0"
.局部變量 n, 整數型
窗口_模糊遍歷窗口 (, “TXGuiFoundation”, , arr)
.計次循環首 (取數組成員數 (arr), n)
  rest = 窗口_取控件內容 (arr [n])
  窗口標題 = 窗口_取標題 (arr [n])
  .如果真 (rest ≠ “” 且 rest = 窗口標題 且 rest ≠ “TXMenuWindow” 且 rest ≠ “QQ” 且 rest ≠ “增加時長” 且 rest ≠ “電腦管家” 且 rest ≠ “勛章墻”)
    jx = 窗口_取位置和大小 (arr [n])
    窗口_還原 (arr [n])
    .如果真 (jx.右邊 > 596 且 jx.底邊 > 520)
      .如果真 (尋找文本 (rest, 昵稱, , 假) ≠ -1)
        返回 (arr [n])
      .如果真結束
    .如果真結束
  .如果真結束
.計次循環尾 ()
返回 (0)
.子程序 取窗口信息
.局部變量 矩形, 精易_矩形
.局部變量 窗口坐標, 精易_坐標
.局部變量 屏幕坐標, 精易_坐標
處理事件 ()
矩形 = 窗口_取位置和大小 (集_窗口句柄)
集_窗口標題 = 窗口_取標題 (集_窗口句柄)
屏幕坐標 = 鼠標_取位置 ()
窗口坐標 = 鼠標_取窗口坐標 (窗口_取鼠標處窗口句柄 ())
.子程序 _按鈕1_被單擊
通用對話框1.類型 = 0
.如果真 (通用對話框1.打開 () = 真)
  編輯框2.內容 = 通用對話框1.文件名
  寫配置項 (取運行目錄 () + “\@Set.ini”, “編輯框”, “圖片地址”, 編輯框2.內容)
.如果真結束
.子程序 _選擇框1_被單擊
.判斷開始 (選擇框1.選中 = 真)
  寫配置項 (取運行目錄 () + “\@Set.ini”, “選擇框”, “跳過群主/管理”, “1”)
.默認
  寫配置項 (取運行目錄 () + “\@Set.ini”, “選擇框”, “跳過群主/管理”, “0”)
.判斷結束
.子程序 _編輯框1_內容被改變
寫配置項 (取運行目錄 () + “\@Set.ini”, “編輯框”, “宣傳語”, 編輯框1.內容)

QQ快捷登陸啟動窗口

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
.版本 2
.支持庫 HtmlView
.程序集 窗口程序集_啟動窗口
.程序集變量 集_QQ群號, 文本型
.子程序 __啟動窗口_創建完畢
網頁_清除Cookie (“qun.qq.com”)
.子程序 _超文本瀏覽框1_跳轉完畢
.如果真 (超文本瀏覽框1.地址 = “http://qun.qq.com/member.html”)
  全_Cookie = 網頁_取Cookie (“qun.qq.com”, )
  .' 如果真 (QQ群_群列表 (0, 集_QQ群號) = “驗證成功”)
    ' 信息框 (“驗證成功”, 0, , )
    載入 (窗口1, , 假)
    _啟動窗口.銷毀 ()
  .如果真結束
  .' 如果真 (QQ群_群列表 (0, 集_QQ群號) = “驗證失敗”)
    ' 信息框 (“驗證失敗”, 0, , )
    ' 結束 ()
  .如果真結束
.如果真結束

運行結果:

易語言獲取群內全部成員利用模擬按鍵的方式艾特成員

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接

延伸 · 閱讀

精彩推薦
  • 易語言一步一步跟我學易語言之第二個易程序菜單設計

    一步一步跟我學易語言之第二個易程序菜單設計

    今天小編就為大家分享一篇關于的一步一步跟我學易語言之第二個易程序菜單設計,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要...

    易語言幫助手冊7092021-06-17
  • 易語言易語言設置進度條邊框樣式的方法

    易語言設置進度條邊框樣式的方法

    今天小編就為大家分享一篇關于易語言設置進度條邊框樣式的方法,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨...

    易語言幫助手冊4422022-01-20
  • 易語言易語言生成exe文件的方法

    易語言生成exe文件的方法

    在本篇內容中小編給大家分享的是關于易語言生成exe文件的方法知識點,需要的朋友們參考下。...

    易語言教程網14792022-03-01
  • 易語言實例操作易語言載入窗口

    實例操作易語言載入窗口

    在本文中小編給大家整理的是關于易語言載入窗口的教程和步驟內容,需要的可以跟著學習下...

    易語言教程網19162022-03-02
  • 易語言易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏

    易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏

    今天小編就為大家分享一篇關于易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,...

    易語言幫助手冊9092022-01-12
  • 易語言易語言獲取指定磁盤的名稱

    易語言獲取指定磁盤的名稱

    今天小編就為大家分享一篇關于易語言獲取指定磁盤的名稱,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來...

    易語言幫助手冊12662022-01-04
  • 易語言易語言關于程序進程和線程的基礎知識

    易語言關于程序進程和線程的基礎知識

    今天小編就為大家分享一篇關于易語言關于程序進程和線程的基礎知識,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起...

    三葉資源網6662022-02-24
  • 易語言一步一步跟我學易語言之關于變量

    一步一步跟我學易語言之關于變量

    今天小編就為大家分享一篇關于一步一步跟我學易語言之關于變量,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨...

    易語言幫助手冊10822021-06-17
主站蜘蛛池模板: 久久国产精品久久 | 国产美女www爽爽爽免费视频 | 免费成人av网站 | 亚洲免费精品 | 一本久道视频一本久道 | 亚洲性在线 | 亚洲欧美激情视频 | 国产精品成人观看视频国产奇米 | 日韩欧美一二三区 | 午夜成年人 | 欧美日韩不卡 | 日韩免费在线 | 国产精品女同一区二区免费站 | 成人精品一区二区三区中文字幕 | 色av综合网 | 久久精品中文 | 久久99精品久久久久久久青青日本 | av黄色在线 | 99精品网站| av成人一区二区 | 国产视频二 | 在线免费观看色视频 | 日韩国产一区二区三区 | 国产日韩精品一区二区 | 欧美在线亚洲 | 色婷婷一区二区三区 | 国产亚洲精品成人 | 在线二区 | 美女网站黄视频 | 国产精品视频一区二区三区 | 国产99久久| 黄色高清视频在线观看 | 成人午夜网站 | 91麻豆精品国产91久久久资源速度 | 自拍av在线 | 久久国产精品视频 | 久久99操 | 久久香视频 | 国产不卡免费视频 | 亚洲视频免费观看 | 国产精品成人一区二区三区夜夜夜 |