酷Q插件已經有很多了,社區分享一大堆,不過還是自己寫才有樂趣,哈哈。
不得不吐槽一下,酷Q竟然不更新了,出了個酷Q pro,還收費!!誒。
不過這也影響不了咱寫插件的心情,今天教大家寫一個酷Q簽到插件,雖然很簡單,但是基本原理已經體現出來了,大家參考着就可以寫出更好的了。
推薦大家瀏覽前幾篇酷Q的插件編寫教程文章。
酷Q簽到插件插件
插件示例
插件下載
插件源碼可以在這里下載: http://yunpan.cn/cyMuSD4Kf8yMV 提取碼 360e
簽到插件源碼供大家研究研究
.版本 2 .支持庫 internet .程序集 程序集1 .子程序 _啟動子程序, 整數型, , 請在本子程序中放置易模塊初始化代碼 _臨時子程序 () ' 在初始化代碼執行完畢后調用測試代碼 返回 (0) ' 可以根據您的需要返回任意數值 .子程序 _臨時子程序 ' 本名稱子程序用作測試程序用,僅在開發及調試環境中有效,編譯發布程序前將被系統自動清空,請將所有用作測試的臨時代碼放在本子程序中。 ***注意不要修改本子程序的名稱、參數及返回值類型。 info () .子程序 info, 文本型, 公開 .局部變量 返回消息, 文本型 ' 返回一個字符串,用於告知插件信息,十個信息用換行分割,不可多不可少 返回消息 = 返回消息 + “公會系統” + #換行符 ' 第1個是插件名稱,必填 返回消息 = 返回消息 + “1.0版” + #換行符 ' 第2個是版本號,必填 返回消息 = 返回消息 + “擦擦擦” + #換行符 ' 第3個是作者,必填 返回消息 = 返回消息 + “簽到” + #換行符 ' 第4個是用途,在機器人輸出插件列表時顯示 返回消息 = 返回消息 + “@簽到” + #換行符 ' 第5個是格式左,選填,插件接收到的數據將從這個信息開始 返回消息 = 返回消息 + “” + #換行符 ' 第6個是格式名稱,選填,將在輸出插件列表時顯示 返回消息 = 返回消息 + “” + #換行符 ' 第7個是格式右,選填,插件將接收到格式左到格式右之間的內容 ' 只要【格式左】為空,則用戶發送的每個消息插件都會完整收到(不支持3.1.25之前的版本) ' (如格式左為“”,格式名稱為“人品”,如格式右為“”,用戶發送“哈哈,看看今天人品咯~!”,插件會收到“哈哈,看看今天人品咯~!”) ' 如果【格式名稱】與【格式右】皆空,則只要含有【格式左】的消息插件就會收到消息(收到的內容為空) ' 如果僅【格式右】空,則返回用戶發送消息的【格式左】之后的內容 ' (如格式左為“@人品 ”,格式名稱為“名字 ”,用戶發送“@人品 酷Q”,插件會收到“酷Q”) ' 如果【格式左】、【格式名稱】、【格式右】都填寫,則返回用戶發送消息的格式左到格式右之間的內容 ' (如格式左為“@人品[”,格式名稱為“名字 ”,如格式右為“]”,用戶發送“@人品[酷Q]”,插件會收到“酷Q”) ' 作者.離騷,機器人插件研發群 224510783 返回消息 = 返回消息 + “plugmain” + #換行符 ' 第8個是調用名,必填,當要調用插件時調用的子程序名 返回消息 = 返回消息 + “1” + #換行符 ' 第9個是類型,必填,填1為在全部功能列表中顯示,填2為不在全部功能列表中顯示 返回消息 = 返回消息 + “假” + #換行符 ' 第10個是是否獲取登錄用戶cookies,必填,填真將可以得到用戶Cookies(需用戶授權),填假則不得到 輸出調試文本 (shuchu (“326794739”, “235891629”)) 返回 (返回消息) .子程序 plugmain, 文本型, 公開, 准備五個參數,均為文本型 .參數 返回數據, 文本型, , 插件收到的數據,由於本插件【格式名稱】與【格式右】都為空,所以返回數據始終為空 .參數 消息類型, 文本型, , 類型(1為好友消息 2為群消息 3為臨時消息) .參數 發送者群號, 文本型, , 群號(群消息為群號,其他為空) .參數 發送者Q號, 文本型, , 發送者QQ .參數 Cookies, 文本型, , Cookies(需要返回Cookies,否則返回空)[無論是否需要請保留此參數] .局部變量 欲返回, 文本型 欲返回 = “本插件僅限群內使用!” + 隨即表情 () .如果真 (到整數 (消息類型) = 2) 欲返回 = shuchu (發送者Q號, 發送者群號) .如果真結束 返回 (欲返回) .子程序 shuchu, 文本型 .參數 發送者Q號, 文本型 .參數 發送者群號, 文本型 .局部變量 輸出值, 文本型 .局部變量 temp, 文本型 ' 發送者群號 = 刪全部空 (發送者群號) ' 發送者群號 = 子文本替換 (發送者群號, #換行符, “”, , , 真) ' 發送者群號 = 子文本替換 (發送者群號, “+”, “”, , , 真) 配置目錄 = 取運行目錄 () + “\config\qiandao” + 發送者群號 + “User.ini” temp = 讀配置項 (配置目錄, 發送者Q號, “是否加入”, ) .如果 (temp ≠ “是”) 寫個人配置 (到文本 (1), 發送者Q號, “簽到次數”) 寫個人配置 (時間格式化 (), 發送者Q號, “簽到時間”) 寫個人配置 (“是”, 發送者Q號, “是否加入”) 輸出值 = 獲取qq昵稱 (發送者Q號) + “-簽到成功,您是第一次簽到!” .否則 ' 開始簽到 ' 判斷今日是否簽到 .如果 (取個人配置 (發送者Q號, “簽到時間”) = 時間格式化 ()) ' 今日已簽 失敗 輸出值 = 獲取qq昵稱 (發送者Q號) + “你今天已經簽過到了!” .否則 ' 可以簽到 寫個人配置 (到文本 (到整數 (取個人配置 (發送者Q號, “簽到次數”)) + 1), 發送者Q號, “簽到次數”) 寫個人配置 (時間格式化 (), 發送者Q號, “簽到時間”) 輸出值 = 獲取qq昵稱 (發送者Q號) + “-簽到成功,共簽到” + 取個人配置 (發送者Q號, “簽到次數”) + “次!” .如果結束 .如果結束 返回 (輸出值 + 隨即表情 ()) .子程序 寫個人配置, 邏輯型, 公開 .參數 值, 文本型 .參數 發送者q號, 文本型 .參數 配置名, 文本型 返回 (寫配置項 (配置目錄, 發送者q號, 配置名, 值)) .子程序 取個人配置, 文本型, 公開 .參數 發送者q號, 文本型 .參數 配置名, 文本型 返回 (讀配置項 (配置目錄, 發送者q號, 配置名, )) .子程序 隨即表情, 文本型, 公開 置隨機數種子 () 返回 (“[bq” + 到文本 (取隨機數 (0, 134)) + “]”) .子程序 時間格式化, 文本型, 公開, 流緒微夢~邪少制作。。。。。QQ群:211973761 .局部變量 日期, 文本型 日期 = 時間到文本 (取現行時間 (), #日期部分) 日期 = 子文本替換 (日期, “年”, “.”, , , 真) 日期 = 子文本替換 (日期, “月”, “.”, , , 真) 日期 = 子文本替換 (日期, “日”, “”, , , 真) 返回 (日期) .子程序 取文本之間, 文本型, 公開, 流緒微夢~邪少制作。。。。。QQ群:211973761 .參數 被搜尋的文本, 文本型 .參數 開始文本, 文本型 .參數 結束文本, 文本型 .局部變量 文本長度, 整數型 .局部變量 開始位置, 整數型 .局部變量 取出長度, 整數型 文本長度 = 取文本長度 (開始文本) 開始位置 = 尋找文本 (被搜尋的文本, 開始文本, , 真) + 文本長度 取出長度 = 尋找文本 (被搜尋的文本, 結束文本, 開始位置, 真) - 開始位置 返回 (取文本中間 (被搜尋的文本, 開始位置, 取出長度)) .子程序 獲取qq昵稱, 文本型, 公開, 流緒微夢~邪少制作。。。。。QQ群:211973761 .參數 QQ號, 文本型 .局部變量 QQ昵稱, 文本型 .局部變量 temp, 文本型 temp = 讀配置項 (配置目錄, QQ號, “QQ昵稱”, ) .如果 (temp = “”) QQ昵稱 = 到文本 (HTTP讀文件 (“http://r.qzone.qq.com/fcg-bin/cgi_get_score.fcg?mask=7&uins=” + QQ號)) QQ昵稱 = 取文本之間 (QQ昵稱, “,” + #引號, #引號 + “,”) .否則 QQ昵稱 = temp .如果結束 輸出調試文本 (QQ昵稱) 返回 (QQ昵稱) .子程序 輸出值
