GOM引擎传奇版本按顺序领取的会员大使脚本

[@main]
#IF
#act
CloseBigDialogBox
#say


<Hi.◆靓仔·Welcome/AUTOCOLOR=253,224><·本服低消费可白嫖·/AUTOCOLOR=116,151><爆率全开一切靠打/AUTOCOLOR=254,239>\
<-------------------------------------------------------------/SCOLOR=13>\
< ><消费300W金币领取/SCOLOR=250>  <【青铜赞助】1—1攻道魔 1.1经验/SCOLOR=239>   <点击领取/@300W>\
< ><消费500W金币领取/SCOLOR=250>  <【白银赞助】2—2攻道魔 1.2经验/SCOLOR=147>   <点击领取/@500W>\
< ><消费800W金币领取/SCOLOR=250>  <【黄金赞助】3—3攻道魔 1.3经验/SCOLOR=116>   <点击领取/@800W>\
< ><消费1000W金币领取/SCOLOR=250> <【铂金赞助】5—5攻道魔 1.4经验/SCOLOR=19>   <点击领取/@1000W>\
< ><消费2000W金币领取/SCOLOR=250> <【钻石赞助】8—8攻道魔 1.5经验/SCOLOR=249>   <点击领取/@2000W>\
<-------------------------------------------------------------/SCOLOR=13>\
<消费300w金币可以使用命令: 【@会员】  或者点击桌面会员服务/SCOLOR=253>\




[@300W]
#IF
check [11] 1
#act
MESSAGEBOX 对不起，你已经是青铜赞助大使！\　\无需重复开通！
BREAK


#IF
CheckGold 3000000
check [11] 0
#act
SET [11] 1
Take 金币 3000000
CONFERTITLE  青铜赞助大使
RENEWLEVEL 1 0  0
#CALL [\数据文件\属性调整.txt] @属性
#CALL [\数据文件\经验倍数.txt] @经验
#CALL [\星爷制作\游戏登录\称号顶戴.txt] @称号顶戴
addnamelist ..\QuestDiary\赞助大使封号\赞助大使名单.txt
GuildNoticeMsg 5 255 大家注意啦！玩家[<$USERNAME>]领取了300万金币消费回馈...
GOTO @main
#ELSEACT
MESSAGEBOX 你没有300万金币,无法办理青铜赞助大使!
BREAK


[@500W]
#IF
check [11] 0
#act
MESSAGEBOX 对不起，你还不是青铜赞助大使\　\请按照顺序加入大使!
BREAK


#IF
check [12] 1
#act
MESSAGEBOX 恭喜，你已经是白银赞助大使！\　\无需重复开通！
BREAK




#IF
CheckGold 5000000
check [12] 0
#act
SET [12] 1
Take 金币 5000000
CONFERTITLE  白银赞助大使
DEPRIVETITLE  青铜赞助大使
#CALL [\数据文件\属性调整.txt] @属性
#CALL [\数据文件\经验倍数.txt] @经验
#CALL [\星爷制作\游戏登录\称号顶戴.txt] @称号顶戴
GuildNoticeMsg 5 255 大家注意啦！玩家[<$USERNAME>]领取了500万金币消费回馈...
GOTO @main
#ELSEACT
MESSAGEBOX 你没有500万金币,无法办理白银赞助大使!
BREAK




[@800W]


#IF
check [12] 0
#act
MESSAGEBOX 对不起，你还不是白银赞助大使\　\请按照顺序加入大使!
BREAK


#IF
check [13] 1
#act
MESSAGEBOX 恭喜，你已经是黄金赞助大使！\　\无需重复开通！
BREAK




#IF
CheckGold 8000000
check [13] 0
#act
SET [13] 1
Take 金币 8000000
CONFERTITLE  黄金赞助大使
DEPRIVETITLE  白银赞助大使
DEPRIVETITLE  青铜赞助大使
#CALL [\数据文件\属性调整.txt] @属性
#CALL [\数据文件\经验倍数.txt] @经验
#CALL [\星爷制作\游戏登录\称号顶戴.txt] @称号顶戴
GuildNoticeMsg 5 255 大家注意啦！玩家[<$USERNAME>]领取了800万金币消费回馈...
GOTO @main
#ELSEACT
MESSAGEBOX 你没有800万金币,无法办理黄金赞助大使!
BREAK




[@1000W]
#IF
check [13] 0
#act
MESSAGEBOX 对不起，你还不是黄金赞助大使\　\请按照顺序加入大使!
BREAK


#IF
check [14] 1
#act
MESSAGEBOX 恭喜，你已经是铂金赞助大使！\　\无需重复开通！
BREAK




#IF
CheckGold 10000000
check [14] 0
#act
SET [14] 1
Take 金币 10000000
CONFERTITLE  铂金赞助大使
DEPRIVETITLE  黄金赞助大使
DEPRIVETITLE  白银赞助大使
DEPRIVETITLE  青铜赞助大使
#CALL [\数据文件\属性调整.txt] @属性
#CALL [\数据文件\经验倍数.txt] @经验
#CALL [\星爷制作\游戏登录\称号顶戴.txt] @称号顶戴
GuildNoticeMsg 5 255 大家注意啦！玩家[<$USERNAME>]领取了1000万金币消费回馈...
GOTO @main
#ELSEACT
MESSAGEBOX 你没有1000万金币,无法办理铂金赞助大使!
BREAK


[@2000W]
#IF
check [14] 0
#act
MESSAGEBOX 对不起，你还不是铂金赞助大使\　\请按照顺序加入大使!
BREAK


#IF
check [15] 1
#act
MESSAGEBOX 恭喜，你已经是钻石赞助大使！\　\无需重复开通！
BREAK


#IF
CheckGold 20000000
check [15] 0
#act
SET [15] 1
Take 金币 20000000
CONFERTITLE  钻石赞助大使
DEPRIVETITLE  铂金赞助大使
DEPRIVETITLE  黄金赞助大使
DEPRIVETITLE  白银赞助大使
DEPRIVETITLE  青铜赞助大使
#CALL [\数据文件\属性调整.txt] @属性
#CALL [\数据文件\经验倍数.txt] @经验
#CALL [\星爷制作\游戏登录\称号顶戴.txt] @称号顶戴
GuildNoticeMsg 5 255 大家注意啦！玩家[<$USERNAME>]领取了2000万金币消费回馈...
GOTO @main
#ELSEACT
MESSAGEBOX 你没有2000万金币,无法办理钻石赞助大使!
BREAK