|
发表于 2025-6-7 23:11:42
|
显示全部楼层
浙江省嘉兴市
消息撤回
.版本 2
.支持库 spec
.子程序 撤回群消息, 文本型, 公开, 撤回群消息:成功返回空文本,失败返回错误信息
.参数 机qi人QQ, 文本型, , 机qi人账号
.参数 群号, 文本型, , 需撤回消息的群号
.参数 消息序号, 文本型, , 消息序号(从群消息事件 _eventGroupMsg 的 msgNum 获取)
.参数 消息ID, 文本型, , 消息ID(从群消息事件 _eventGroupMsg 的 msgId 获取)
' 调用 DLL 命令撤回消息
返回 (DLL命令_Api_WithdrawMsg (机qi人QQ, 群号, 消息序号, 消息ID))
' ------------------ DLL 命令声明 ------------------
.DLL命令 DLL命令_Api_WithdrawMsg, 文本型, "MyQQApi.DLL", "Api_WithdrawMsg", 公开
.参数 响应QQ, 文本型, , 机qi人QQ
.参数 群号, 文本型, , 需撤回消息群号
.参数 消息序号, 文本型, , 需撤回消息序号
.参数 消息ID, 文本型, , 需撤回消息ID
文件撤回
.版本 2
.支持库 spec
.子程序 撤回群文件消息, 文本型, 公开, 撤回群文件:成功返回空文本,失败返回错误信息
.参数 机qi人QQ, 文本型, , 机qi人账号
.参数 群号, 文本型, , 需撤回文件的群号
.参数 消息序号, 文本型, , 文件消息的序号(_eventGroupMsg 的 msgNum)
.参数 消息ID, 文本型, , 文件消息的ID(_eventGroupMsg 的 msgId)
' 和普通消息撤回逻辑完全相同
返回 (DLL命令_Api_WithdrawMsg (机qi人QQ, 群号, 消息序号, 消息ID))
' ------------------ DLL 命令复用上面的声明 ------------------
消息监听+撤回
.版本 2
.支持库 spec
' 群消息事件(框架自带,无需自己声明)
.子程序 _eventGroupMsg, , , 群消息事件回调
.参数 robot, 文本型
.参数 subType, 整数型
.参数 msgId, 文本型
.参数 msgNum, 文本型
.参数 fromGroup, 文本型
.参数 fromAccount, 文本型
.参数 msg, 文本型
.参数 timestamp, 文本型
' 需求:撤回所有含“撤回测试”的消息
.如果真 (寻找文本 (msg, “撤回测试”, , 假) ≠ -1)
' 调用撤回函数
调试输出 (“撤回结果:”, 撤回群消息 (robot, fromGroup, msgNum, msgId))
.如果真结束 |
|