(@@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
