易语言写酷Q机器人钱包转账功能插件

易语言写酷Q机器人钱包转账功能插件

易语言怎么写酷Q机器人钱包转账功能插件呢

打开易语言，选择打开，然后找到酷Q开发SDK文件位置下com.example.demo.e文件，选择打开并进入到酷Q开发程序集

在程序集左边点“程序”-“模块引用表”，加入“精益模块”

在程序集中找到_eventGroupMsg子程序，选择左边的“+”号展开。

新加一个子程序，命名为钱包转账子程序，新加参数及代码内容如下：

.参数 群号, 长整数型

.参数 来源QQ, 长整数型

.参数 金额, 整数型

.参数 转账QQ, 长整数型

.如果真 (读配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, ) ＝ “”)

写配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, “1000”)

.如果真结束

.判断开始 (金额 ≤ 0)

CQ.发送群消息 (群号, CQ.CQ码_At (来源QQ) ＋ CQ.CQ码_emoji (49) ＋ “亲爱的,请输入阿拉伯数字。例：钱包转账@某人 100”)

.判断 (到整数 (读配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, )) ＜ 金额)

CQ.发送群消息 (群号, CQ.CQ码_At (来源QQ) ＋ “钱包转账” ＋ 到文本 (金额) ＋ “ 金币失败！您的钱包只有 ” ＋ 读配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, ) ＋ “ 金币。”)

.默认

CQ.发送群消息 (群号, CQ.CQ码_At (来源QQ) ＋ “已成功转账给” ＋ CQ.CQ码_At (转账QQ) ＋ “ ” ＋ 到文本 (金额) ＋ “ 金币！”)

写配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, 到文本 (到整数 (读配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (来源QQ), “钱包”, )) － 金额))

写配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (转账QQ), “钱包”, 到文本 (到整数 (读配置项 (应用目录 ＋ “个人数据.ini”, 到文本 (转账QQ), “钱包”, )) ＋ 金额))

在_eventGroupMsg子程序下，声明变量和写入代码并编译：

.局部变量 msg_左, 文本型

.局部变量 msg_右, 文本型

.如果真 (取文本左边 (msg, 18) ＝ “钱包转账[CQ:at,qq=”)

msg_左 ＝ 文本_取出中间文本 (msg, “钱包转账[CQ:at,qq=”, “]”)

msg_右 ＝ 子文本替换 (msg, “钱包转账[CQ:at,qq=” ＋ msg_左 ＋ “]”, “”, , , 真)

钱包转账 (fromGroup, fromQQ, 到整数 (删首尾空 (msg_右)), 到长整数 (删首尾空 (msg_左)))

运行酷Q，在应用中点击刚编译的插件，然后启用

我们在群里测试，看是否能够转账成功。成功后，一个钱包转账功能插件就做好了。