易語言製作QQ前臺全自動無限加好友的代碼

今天小編就爲大家分享一篇關於易語言製作QQ前臺全自動無限加好友的代碼,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

全局變量表

.版本 2
.全局變量 局_句柄, 整數型
.全局變量 a, 整數型
.全局變量 局1_句柄, 整數型
.全局變量 b, 整數型

常量數據表

.版本 2
.常量 GW_CHILD, "5", , 查找子窗口
.常量 GW_HWNDNEXT, "2", , 查找下一窗口

QQ前臺全自動加好友

此功能需要加載精易模塊5.6,利用模擬的方式添加好友,需要自行打開添加窗口,填寫自己的QQ名稱。

.版本 2
.支持庫 spec
.程序集 窗口程序集_啓動窗口
.子程序 __啓動窗口_創建完畢
.子程序 _無限加按鈕_被單擊
功能1_取句柄 ()
b = 局1_句柄
鼠標_消息 (b, 119, 100, 1, 1)
鼠標_消息 (b, 119, 100, 1, 1)
文本_投遞 (b, 文本_取隨機範圍數字 (100000000, 999999999, ))
鼠標_消息 (b, 635, 119, 1, 1)
延遲 (500)
鼠標_消息 (b, 126, 308, 1, 1)
延遲 (1000)
功能_取句柄 ()
a = 局_句柄
鼠標_消息 (a, 343, 346, 1, 1)
鼠標_消息 (a, 343, 346, 1, 1)
延遲 (1000)
鼠標_消息 (a, 448, 20, 1, 1)
_無限加按鈕_被單擊 ()
.子程序 功能_取句柄, 整數型, , 本子程序採用【精易編程助手】生成,成功返回窗口句柄,失敗返回0
局_句柄 = 窗口_取句柄 (, , “TXGuiFoundation”, 編輯框1.內容 + “ - 添加好友”)
返回 (局_句柄)
.子程序 功能1_取句柄, 整數型, , 本子程序採用【精易編程助手】生成,成功返回窗口句柄,失敗返回0
局1_句柄 = 窗口_取句柄 (, , “TXGuiFoundation”, “查找”)
返回 (局_句柄)
.子程序 __啓動窗口_將被銷燬
結束 ()
.子程序 _加一次按鈕_被單擊
功能1_取句柄 ()
b = 局1_句柄
鼠標_消息 (b, 119, 100, 1, 1)
鼠標_消息 (b, 119, 100, 1, 1)
文本_投遞 (b, 文本_取隨機範圍數字 (100000000, 999999999, ))
鼠標_消息 (b, 635, 119, 1, 1)
延遲 (500)
鼠標_消息 (b, 126, 308, 1, 1)
延遲 (1000)
功能_取句柄 ()
a = 局_句柄
鼠標_消息 (a, 343, 346, 1, 1)
鼠標_消息 (a, 343, 346, 1, 1)
延遲 (1000)
鼠標_消息 (a, 448, 20, 1, 1)

運行結果:

總結

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

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章