[JavaScript] 纯文本查看 复制代码
.版本 2
.子程序 EventFriendMsg, 整数型, 公开, 私聊消息事件(收到私聊消息时,运行这里) for 5.0有改动
.参数 robot_wxid, 文本型, , 机器人账号id(就是这条消息是哪个机器人的,因为可能登录多个机器人)
.参数 type, 整数型, , 1/文本消息 3/图片消息 34/语音消息 42/名片消息 43/视频 47/动态表情 48/地理位置 49/分享链接 2001/红包 2002/小程序 2003/群邀请
.参数 from_wxid, 文本型, , 来源用户ID
.参数 from_name, 文本型, , 来源用户昵称
.参数 to_wxid, 文本型, , 接收消息的人ID(一般都是机器人收到了,所以这里是机器人ID,如果是机器人发出的,这里就是对方的ID)
.参数 to_name, 文本型, , 接收消息的人昵称
.参数 msg, 文本型, , 消息内容
.参数 msgid, 文本型, , 消息唯一ID
.参数 json_msg, 文本型, , 原始消息JSON集合,进阶开发者使用,版本要求 > 5.0
.局部变量 群id, 整数型
.局部变量 群id数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 关键字数组, 文本型, , "0"
关键字数组 = { “关键字”, “关键字”, “关键字”, “关键字”, “关键字”, “关键字”, “关键字” }
.如果真 (文本_取行数 (插件面板.编辑框1.内容) ≥ 600)
插件面板.编辑框1.内容 = “”
.如果真结束
.如果真 (from_wxid = 插件面板.编辑框其他机器人id.内容)
.计次循环首 (取数组成员数 (关键字数组), a)
.如果真 (文本_寻找文本 (msg, 关键字数组[a], , )!=-1)
.如果真 (文本_寻找文本 (msg, 关键字数组, , ) ≠ -1)
插件面板.编辑框1.加入文本 (“检测到关键字:” + 关键字数组 + #换行符 + “原内容:” + msg + #换行符)
M.转发消息 (robot_wxid, 插件面板.编辑框私人号id.内容, msg)
跳出循环 ()
.如果真结束
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (from_wxid = 插件面板.编辑框私人号id.内容)
M.转发消息 (robot_wxid, 插件面板.编辑框其他机器人id.内容, msg)
插件面板.编辑框1.加入文本 (“收到的信息:” + msg + #换行符)
.如果真结束