Gom引擎脚本-测试奖励

GM版本库

[@main]
#if
#act
OPENMERCHANTBIGDLG 14 86 1 0 1 1 1 409 21

#if
isadmin
#say
　 　　 <测试奖励/SCOLOR=154><Img:126:14:-95:-6>   \
　 　　 <接待员/SCOLOR=19> <尊敬的游戏玩家,您好/SCOLOR=151> <〖新区测试奖励会员〗/SCOLOR=87> \
<---------------------------------------------------------/AUTOCOLOR=91>\
<只要参与测试,提示到一定的等级即可获取相应的奖励,/AUTOCOLOR=156>\
<测试区充值元宝的金额自动返还到正式区,/AUTOCOLOR=155>\
<---------------------------------------------------------/AUTOCOLOR=91>\
<测试区提升等级奖励：/SCOLOR=250>\
<48级奖励1000元宝/SCOLOR=250> 　 　　 　 　　 <50级奖励2000元宝/SCOLOR=250>\
<51级奖励3000元宝/SCOLOR=250>　 　　 　 　　  <52级奖励5000元宝/SCOLOR=250>\
<53级奖励10000元宝/SCOLOR=250>\
<---------------------------------------------------------/AUTOCOLOR=91>\
<添加领取人账号/@@InPutString77>\
<---------------------------------------------------------/AUTOCOLOR=91>\
<Img:166:14:0:-12|146#领取测试区奖励/@领取>  ?                           <Img:140:14:0:-12|146#关闭对话框/@exit>\


#ELSESAY
?\
　 　　 <测试奖励/AUTOCOLOR=154><Img:126:14:-99:-12>   \
　 　　 <工作人员/SCOLOR=19> <尊敬的玩家您好/SCOLOR=151><【开战传奇感谢一路有您!】/SCOLOR=239>\
<----------------------------------------------------------/AUTOCOLOR=91>\
<只要参与测试,提示到一定的等级即可获取相应的奖励,/AUTOCOLOR=151>\
<测试区充值元宝的金额自动返还到正式区,/AUTOCOLOR=151>\
<注意：测试区【奖励】与【充值返还】只能在开区当天领取，第二/AUTOCOLOR=145>\
<　　　天合区之后将取消所有未领取的资格,请牢记/AUTOCOLOR=145>\
<----------------------------------------------------------/AUTOCOLOR=91>\
<测试区提升等级奖励：/SCOLOR=250>\
<45级奖励500元宝/SCOLOR=156> 　 　　 　 　　 <48级奖励1000元宝/SCOLOR=156>\
<50级奖励2000元宝/SCOLOR=156>　 　　 　 　　 <51级奖励3000元宝/SCOLOR=156>\
<52级奖励5000元宝/SCOLOR=156>　 　　 　 　　 <53级奖励10000元宝/SCOLOR=156>\
<注意：测试区每台电脑只记录等级最高的账号.>\
<----------------------------------------------------------/AUTOCOLOR=91>\
<Img:166:14:0:-12|146#领取测试区奖励/@领取>  ?                           <Img:140:14:0:-12|146#关闭对话框/@exit>\



[@领取]
#if
checkaccountlist ..\QuestDiary\数据文件\测试奖励.txt
#ACT
delaccountlist ..\QuestDiary\数据文件\测试奖励.txt
GAMEGOLD + 500
MESSAGEBOX \\提示：领取元宝成功，感谢您对本网络的大力支持！
SendMsg 0 {测试奖励ぐ|151:0:1}：恭喜玩家「{%s|227:0:1}」领取测试区奖励！
#ELSEACT
MESSAGEBOX \\对不起，只有在测试区升级至45级的玩家才可领取！\\如果您在测试区已经升级至45级，请联系QQ群管理员发放！
BREAK

[@InPutString77]
#if
EQUAL S77
#ACT
MESSAGEBOX \\提示：发放奖励的人物对象不能为空，如张三、李四等等！
BREAK
#IF
CHECKTEXTLIST ..\QuestDiary\数据文件\测试奖励.txt <$STR(S77)>
#ACT
messagebox \\提示：[<$STR(S77)>]该帐号测试区奖励已经发放,无须重新发放！
MOV S77
#elseact
AddTextListex ..\QuestDiary\数据文件\测试奖励.txt <$STR(S77)> 0
messagebox \\提示：[<$STR(S77)>]测试玩家帐号已经添加成功！
MOV S77
BREAK