核心提示:	充值领取NPC脚本如下:		[@main]		10元充值领取/@奖励10 50元充值领取/@奖励50 100元充值领取/@奖励100 500元充值领取/@奖励500		[@奖励10]		尊敬的玩家,...
      
	充值领取NPC脚本如下:
	
	[@main]
	 
	<10元充值领取/@奖励10>  <50元充值领取/@奖励50>  <100元充值领取/@奖励100>  <500元充值领取/@奖励500>
	 
	[@奖励10]
	 
	尊敬的玩家,感谢您对布衣传说所做的贡献!\ \ \
	请输入<宣传码/@@InputString1
	>领取奖励\ \
	<关闭/@EXIT>
	 
	[@InputString1]
	#IF
	CheckStringlength S1 = 8
	#ACT
	GOTO @领奖励10
	#ELSESAY
	您输入的宣传码不正确
	 
	 
	[@领奖励10]
	#IF
	CHECKTEXTLIST ..\QuestDiary\10元充值领取\未领取宣传码.txt S1
	#ACT
	GIVE 100元宝
	SENDMSG 1 提示:恭喜【<$USERNAME>】领取宣传礼包,快人一步走向人生巅峰!想领取快去群里联系管理员吧!
	DelTextList ..\QuestDiary\10元充值领取\未领取宣传码.txt S1
	AddTextList ..\QuestDiary\10元充值领取\已领取宣传码.txt S1
	AddTextList ..\QuestDiary\10元充值领取\领取日志.txt <$DATETIME> <$USERID>_<$str(S1)>
	close
	#ELSESAY
	您输入的宣传码不正确或已被使用
	 
	 
	[@奖励50]
	{
	尊敬的玩家,感谢您对布衣传说所做的贡献!\ \ \
	请输入<宣传码/@@InputString1
	>领取奖励\ \
	<关闭/@EXIT>
	 
	[@InputString1]
	#IF
	CheckStringlength S1 = 8
	#ACT
	GOTO @领奖励50
	#ELSESAY
	您输入的宣传码不正确
	 
	 
	[@领奖励50]
	#IF
	CHECKTEXTLIST ..\QuestDiary\50元充值领取\未领取宣传码.txt S1
	#ACT
	GIVE 100元宝
	SENDMSG 1 提示:恭喜【<$USERNAME>】领取宣传礼包,快人一步走向人生巅峰!想领取快去群里联系管理员吧!
	DelTextList ..\QuestDiary\50元充值领取\未领取宣传码.txt S1
	AddTextList ..\QuestDiary\50元充值领取\已领取宣传码.txt S1
	AddTextList ..\QuestDiary\50元充值领取\领取日志.txt <$DATETIME> <$USERID>_<$str(S1)>
	close
	#ELSESAY
	您输入的宣传码不正确或已被使用
	 
	[@奖励100]
	{
	尊敬的玩家,感谢您对布衣传说所做的贡献!\ \ \
	请输入<宣传码/@@InputString1
	>领取奖励\ \
	<关闭/@EXIT>
	 
	[@InputString1]
	#IF
	CheckStringlength S1 = 8
	#ACT
	GOTO @领奖励100
	#ELSESAY
	您输入的宣传码不正确
	 
	 
	[@领奖励100]
	#IF
	CHECKTEXTLIST ..\QuestDiary\100元充值领取\未领取宣传码.txt S1
	#ACT
	GIVE 100元宝
	SENDMSG 1 提示:恭喜【<$USERNAME>】领取宣传礼包,快人一步走向人生巅峰!想领取快去群里联系管理员吧!
	DelTextList ..\QuestDiary\100元充值领取\未领取宣传码.txt S1
	AddTextList ..\QuestDiary\100元充值领取\已领取宣传码.txt S1
	AddTextList ..\QuestDiary\100元充值领取\领取日志.txt <$DATETIME> <$USERID>_<$str(S1)>
	close
	#ELSESAY
	您输入的宣传码不正确或已被使用
	 
	[@奖励500]
	{
	尊敬的玩家,感谢您对布衣传说所做的贡献!\ \ \
	请输入<宣传码/@@InputString1
	>领取奖励\ \
	<关闭/@EXIT>
	 
	[@InputString1]
	#IF
	CheckStringlength S1 = 8
	#ACT
	GOTO @领奖励500
	#ELSESAY
	您输入的宣传码不正确
	 
	 
	[@领奖励500]
	#IF
	CHECKTEXTLIST ..\QuestDiary\500元充值领取\未领取宣传码.txt S1
	#ACT
	GIVE 100元宝
	SENDMSG 1 提示:恭喜【<$USERNAME>】领取宣传礼包,快人一步走向人生巅峰!想领取快去群里联系管理员吧!
	DelTextList ..\QuestDiary\500元充值领取\未领取宣传码.txt S1
	AddTextList ..\QuestDiary\500元充值领取\已领取宣传码.txt S1
	AddTextList ..\QuestDiary\500元充值领取\领取日志.txt <$DATETIME> <$USERID>_<$str(S1)>
	close
	#ELSESAY
	您输入的宣传码不正确或已被使用
	 
      
			

