怀抱兔叽 发表于 2019-9-26 05:03:48

添加传奇玩家使用兑换码兑换礼品的脚本

(@@InPutString @@InputInteger)

[@main]
#if
isadmin
#say
\         <提示:输入二区账号,领取补偿.> \
\   <请输入您的二区账号/@@InPutString10><清除数据/@清除>\
\\
\ <注意：每个账号仅可以兑换一次，使用过将作废.>\
       <发现用小号重复领取，封号处理。>\
\             < 两天后自动删除。> \
\   <一共有><$STR(G10)><位玩家兑换成功.>   \
\\
\                                          <关闭对话/@EXIT>\
#elsesay
\         <提示:输入CDKEY,领取奖励.> \
\      <请输入您要兑换的CDKEY/@@InPutString10>\
\\
\ <注意：每个账号仅可以兑换一次，使用过将作废.>\
       <发现用小号重复领取，封号处理。>\
\               < 两天后自动删除。>\
\   <一共有><$STR(G10)><位玩家兑换成功.>   \
\\
\                                          <关闭对话/@EXIT>\

[@@InPutString10]
#if
CheckPullulation < 1680
CheckTextList <$STR(S10)> ..\QuestDiary\数据文件\兑换码.txt
#act
DelTextList <$STR(S10)> ..\QuestDiary\数据文件\兑换码.txt
goto @奖励
#elseact
MESSAGEBOX 提示:\CDKEY码已经失效,请确认后再使用.您的成长值过多！
goto @main
break

[@奖励]
#ACT
movr N12 1680 1680
SendMsg 2恭喜合区玩家#6FFFF/8#6[#7<$USERNAME>#7]#5，得到补偿。
ChangePullulation + <$STR(N12)>
MESSAGEBOX 提示:\恭喜您兑换成功!\您此次使用的CDKEY兑换码为:<$str(s10)>\兑换的是成长值<$STR(N12)>.\欢迎下次使用.
INC G10 1
goto @main
break

[@清除]
#if
isadmin
#act
mov G10 0
mov G11 0
MESSAGEBOX 提示:数据清理完毕.
#elseact
MESSAGEBOX 提示:您不是管理员,不能使用此功能.
break


米_粥 发表于 2019-9-26 05:58:59

顶顶更健康

ghjhgrt1 发表于 2019-9-27 13:45:32

没人回帖。。。我来个吧

leijun276 发表于 2019-10-7 12:12:37

支持，楼下的跟上哈~

601560956 发表于 2019-10-11 08:32:29

珍爱生命，果断回帖。

黄凤龙 发表于 2019-10-15 02:31:33

非常好，顶一下

F123 发表于 2019-10-19 02:06:00

没人回帖。。。我来个吧

小寶 发表于 2019-10-23 04:42:27

无论是不是沙发都得回复下

蜕变的蝴蝶 发表于 2019-11-5 03:08:41

没人回帖。。。我来个吧

dxawsh 发表于 2019-11-5 23:16:52

是爷们的娘们的都帮顶！大力支持
页: [1] 2 3 4 5 6 7
查看完整版本: 添加传奇玩家使用兑换码兑换礼品的脚本