关于直购礼包的实现方式是什么？

匣中剑他娘官

引擎版本：996M2(2024.03.14.0_64位)
问题描述：技术大哥，关于直购礼包的实现方式是什么？请问下 直购系统  是不是充值后  然后在充值触发里面扣掉货币？     这样写的吗？
是否有其他方式实现直购 请指点！

白久

;----------NPC给礼包类型变量赋值 拉起充值二维码
#if
#act
mov T3 直购礼包1
Pullpay <$cfg_zhigoulibao(0_1)> 3 4
break

;----------NPC正式区检测购买记录
#if
NOT CheckContainsText <$SERVERNAME> 测试
CHECKTEXTLIST ..\QuestDiary\测试名单\直购礼包1.txt <$USERACCOUNT>
#act
messagebox 系统检测您的账号在测试区有直购记录，您可以直接领取该礼包，是否领取到当前角色？ @领取直购礼包1 @取消
break

;----------NPC正式区返还礼包 删除账号唯一ID
#if
CHECKTEXTLIST ..\QuestDiary\测试名单\直购礼包1.txt <$USERACCOUNT>
#act
DelTextList ..\QuestDiary\测试名单\直购礼包1.txt <$USERACCOUNT>
Mailgive <$cfg_zhigoulibao(0_3)> <$cfg_zhigoulibao(0_4)> 0#1#4#5#6#8
Mailgive <$cfg_zhigoulibao(0_6)> <$cfg_zhigoulibao(0_7)> 0#1#4#5#6#8
Sendmail 100 直购礼包 你好<$Username>：你的直购礼包1已发放，请提取!
SENDMSGNEW 253 0 恭喜玩家：<$USERNAME>购买直购礼包，获得海量游戏道具 1 1

;----------充值触发  测试区记录账号唯一ID，用于正式区返还直购礼包
#if
equal T3 直购礼包1
large M0 <$cfg_zhigoulibao(0_2)>
CheckContainsText <$SERVERNAME> 测试
#act
AddTextList ..\QuestDiary\测试名单\直购礼包1.txt <$USERACCOUNT>

;----------充值触发  发放礼包
#if
equal T3 直购礼包1
large M0 <$cfg_zhigoulibao(0_2)>
#act
mov T3
Mailgive <$cfg_zhigoulibao(0_3)> <$cfg_zhigoulibao(0_4)> 0#1#4#5#6#8
Mailgive <$cfg_zhigoulibao(0_6)> <$cfg_zhigoulibao(0_7)> 0#1#4#5#6#8
Sendmail 100 直购礼包 你好<$Username>：你的直购礼包1已发放，请提取!
SENDMSGNEW 253 0 恭喜玩家：<$USERNAME>购买直购礼包1，获得海量游戏道具 1 1

自己整理一下吧:lol

赢家通吃

谢谢你的回复！  你这种就是我说的实现方式，需要在充值触发里扣除充值货币！

损神坏坏

官方只配置一个真实充值，其他所有货币自己写脚本就行了。不存在扣除

追上前面的

论坛不能没有像楼主这样的人才啊！我会一直支持GM爱好者：www.gmahz.com

梨波儿

楼主，我太崇拜你了！我想我是一天也不能离开GM爱好者：www.gmahz.com

你猜我猜不猜

路过支持一下

愿苍生有爱

金币我要攒金币！！！

观人不语

我看不错噢 谢谢楼主！GM爱好者：www.gmahz.com越来越好！

左手写情歌

努力赚币中。。。