记录文件播放文件
1 .版本 2
2
3 .局部變量 i, 整數型
4 .局部變量 配置節, 文本型, , "0"
5
6 .如果真 (msg = “開始記錄” 且 fromGroup = #分身)
7 寫配置項 (應用目錄 + “記錄.ini”, “記錄開關”, “狀態”, “開”)
8 .如果真結束
9 .如果真 (msg = “關閉記錄” 且 fromGroup = #分身)
10 寫配置項 (應用目錄 + “記錄.ini”, “記錄開關”, “狀態”, “關”)
11 .如果真結束
12 .如果真 (fromGroup = #分身 且 msg ≠ “關閉記錄” 且 msg ≠ “開始記錄”)
13 .如果真 (讀配置項 (應用目錄 + “記錄.ini”, “記錄開關”, “狀態”, ) = “開”)
14 寫配置項 (應用目錄 + “記錄”, msg, “時間”, 到文本 (取現行時間 ()))
15 .如果真結束
16
17 .如果真結束
18 .如果真 (取文本左邊 (msg, 4) = “播放”)
19 寫配置項 (應用目錄 + “記錄.ini”, “記錄開關”, “狀態”, “關”)
20 配置節 = 取配置節名 (應用目錄 + “記錄.ini”)
21 .計次循環首 (取數組成員數 (配置節), i)
22 CQ.發送群消息 (fromGroup, 配置節 [i])
23 .計次循環尾 ()
24 寫配置項 (應用目錄 + “記錄.ini”, “記錄開關”, “狀態”, “開”)
25 .如果真結束
26 返回 (#消息_忽略) ' 關于返回值說明, 見“_eventFriendMsg”子程序 View Code
?
?
轉載于:https://www.cnblogs.com/acshery/p/8300297.html
總結
- 上一篇: Xmanager – Passive o
- 下一篇: 第148天:js+rem动态计算font