[@抽奖0]
#IF
RANDOM 5
#ACT
GAMEGOLD - 38888
READRANDOMSTR .\QuestDiary\抽取物品.txt S3
GIVE <$STR(S3)> 1
CALCVAR HUMAN 元宝消费 + 1
SAVEVAR HUMAN 元宝消费 ..\QuestDiary\XXXXXX\重要数据\元宝消费Save.txt
#CALL [\系统功能\排行刷新.txt] @排行刷新
SENDMSG 0 恭喜玩家[%s]抽取祝福宝箱获得【<$STR(S3)>】！ 249 250
MOV M9 0


元宝充值NPC脚本：

[@领取1]
#IF
CHECKACCOUNTLIST  ..\QuestDiary\ybczpt\5y1.txt
#ACT
GAMEGOLD + 50000
CALCVAR HUMAN 消费积分 + 50000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\XXXXX.com\重要数据\消费积分Save.txt
CALCVAR HUMAN 元宝消费 + 50000
SAVEVAR HUMAN 元宝消费 ..\QuestDiary\XXXXXX.com\重要数据\元宝消费Save.txt
DELACCOUNTLIST  ..\QuestDiary\ybczpt\5y1.txt

[@领取2]
#IF
CHECKACCOUNTLIST ../Npc_Def/crown/5j/2.txt
#ACT
GAMEGOLD + 2500
DELACCOUNTLIST ../Npc_Def/crown/5j/2.txt
CALCVAR HUMAN 消费积分 + 2500
SAVEVAR HUMAN 消费积分 ..\QuestDiary\gm820制作\重要数据\消费积分Save.txt
CALCVAR HUMAN 元宝消费 + 2500
SAVEVAR HUMAN 元宝消费 ..\QuestDiary\gm820制作\重要数据\元宝消费Save.txt
DELACCOUNTLIST ../Npc_Def/crown/5j/16.txt
sendmsg 7 领取成功.您当前的元宝为:<$GAMEGOLD>个
SENDMSG 1 ★恭喜玩家<$USERNAME>使用**购买元宝功能,获得2500元宝。如果你也想要，请赶紧找元宝使者编辑**获取元宝吧！
[@领取3]
#IF
CHECKACCOUNTLIST ../Npc_Def/crown/5j/3.txt
#ACT
GAMEGOLD + 2500
DELACCOUNTLIST ../Npc_Def/crown/5j/3.txt
CALCVAR HUMAN 消费积分 + 2500
SAVEVAR HUMAN 消费积分 ..\QuestDiary\gm820制作\重要数据\消费积分Save.txt
CALCVAR HUMAN 元宝消费 + 2500
SAVEVAR HUMAN 元宝消费 ..\QuestDiary\gm820制作\重要数据\元宝消费Save.txt
DELACCOUNTLIST ../Npc_Def/crown/5j/16.txt
sendmsg 7 领取成功.您当前的元宝为:<$GAMEGOLD>个
SENDMSG 1 ★恭喜玩家<$USERNAME>使用**购买元宝功能,获得2500元宝。如果你也想要，请赶紧找元宝使者编辑**获取元宝吧！
[@领取4]
#IF
CHECKACCOUNTLIST ../Npc_Def/crown/5j/4.txt
#ACT
GAMEGOLD + 2500
CALCVAR HUMAN 消费积分 + 2500
SAVEVAR HUMAN 消费积分 ..\QuestDiary\gm820制作\重要数据\消费积分Save.txt
CALCVAR HUMAN 元宝消费 + 2500
SAVEVAR HUMAN 元宝消费 ..\QuestDiary\gm820制作\重要数据\元宝消费Save.txt
本帖隐藏的内容需要回复才可以浏览
DELACCOUNTLIST ../Npc_Def/crown/5j/16.txt
DELACCOUNTLIST ../Npc_Def/crown/5j/4.txt
sendmsg 7 领取成功.您当前的元宝为:<$GAMEGOLD>个
SENDMSG 1 ★恭喜玩家<$USERNAME>使用**购买元宝功能,获得2500元宝。如果你也想要，请赶紧找元宝使者编辑**获取元宝吧！

传奇一条龙 传奇一条龙服务 传奇开区一条龙 传奇私服一条龙 信誉传奇一条龙