[传奇脚本功能]添加VIP金钻会员功能(Gom引擎)

技术员

[传奇脚本功能]添加VIP金钻会员功能(Gom引擎)

[@main]
#IF
checknamelist ..\QuestDiary\游戏触发\金钻名单.txt
#ACT
#SAY
  <您当前累积充值的积分数量/SCOLOR=250><：<$GAMEPOINT>/SCOLOR=254>   <有钱的捧个钱场，没钱的捧个人场！/SCOLOR=253>\
  <VIP也可以用元宝购买到相应的VIP！/SCOLOR=253>\
  <充值50元领取/@50元>   <V1称号说明:1.05倍攻1.05倍PK怪爆率(送2个通天令牌)/SCOLOR=250>\
  <充值100元领取/@100元>  <V2称号说明:1.1倍攻 1.1倍PK怪爆率(送3个通天令牌)/SCOLOR=250>\
  <充值200元领取/@200元>  <V3称号说明:1.15倍攻1.15倍PK怪爆率(送5个通天令牌)/SCOLOR=250>\
  <充值500元领取/@500元>  <V4称号说明:1.2倍攻 1.2倍PK怪爆率(送10个通天令牌)  /SCOLOR=250>\
\ \
               <下一页/@下一页>      <元宝购买VIP/@ybgm>            <退出/@exit>   \
  <提示：领取VIP称号后，请小退后重新上线激活VIP称号属性/SCOLOR=249>\

#ELSEACT
MESSAGEBOX 您不是会员，无法查看该回馈！

[@下一页]
#IF
CHECKGAMEPOINT > 499
#ACT
#SAY
　 \
  <您当前累积充值的积分数量/SCOLOR=250><：<$GAMEPOINT>/SCOLOR=254>   <有钱的捧个钱场，没钱的捧个人场！/SCOLOR=253>\
  <充值1000元领取/@1000元> <V5称号说明:1.22倍攻 1.3倍爆率 HPMP+5% (职业技能书2本)/SCOLOR=250>\
  <充值2000元领取/@2000元> <V6称号说明:1.25倍攻 1.4倍爆率 HPMP+10%/SCOLOR=250>\
  <充值3000元领取/@3000元> <V7称号说明:1.35倍攻 1.5倍爆率 HPMP+15%/SCOLOR=250>\
  <充值4000元领取/@4000元> <V8称号说明:1.45倍攻 1.6倍爆率 HPMP+20%/SCOLOR=250>\
\ \
               <下一页/@下一页1>    <退出/@exit>   \
<【领取每一样多需要小退上线生效】/SCOLOR=253>\
#ELSEACT
MESSAGEBOX 您没充值满500元哦，不能查看下一页！

[@下一页1]
#IF
CHECKGAMEPOINT > 2499
#ACT
#SAY
　 \
  <您当前累积充值的积分数量/SCOLOR=250><：<$GAMEPOINT>/SCOLOR=254>   <有钱的捧个钱场，没钱的捧个人场！/SCOLOR=253>\
  <充值5000元领取/@5000元> <V9称号说明: 1.6倍攻击 1.7倍PK怪爆率.暗藏特殊属性HPMP+25%/SCOLOR=250>\
  <充值8000元领取/@8000元> <V10称号说明:1.7倍攻击 1.8倍PK怪爆率.暗藏特殊属性HPMP+30%/SCOLOR=250>\
  <充值10000元领取/@10000元> <V11称号说明:1.8倍攻击 2倍PK怪爆率.暗藏特殊属性HPMP+35%/SCOLOR=250>\
\ \
               <下一页/@下一页1>    <退出/@exit>   \
<【领取每一样多需要小退上线生效】/SCOLOR=253>\
#ELSEACT
MESSAGEBOX 您没充值满2500元哦，不能查看下一页！

[@ybgm]
#IF
#ACT
#SAY
  <您当前累积充值的积分数量/SCOLOR=250><：<$GAMEPOINT>/SCOLOR=254>   <有钱的捧个钱场，没钱的捧个人场！/SCOLOR=253>\
  <VIP1购买/@V1>    <说明:需要1万元宝购买/SCOLOR=250>\
  <VIP2购买/@V2>    <说明:需要2万元宝和背包有VIP1购买/SCOLOR=250>\
  <VIP3购买/@V3>    <说明:需要5万元宝和背包有VIP2购买/SCOLOR=250>\
  <VIP4购买/@V4>    <说明:需要8万元宝和背包有VIP3购买  /SCOLOR=250>\
\ \
               <返回菜单/@main>       <退出/@exit>   \
\ \
  <提示：领取VIP称号后，请小退后重新上线激活VIP称号属性/SCOLOR=249>\

[@V1]
#IF
CHECKGAMEGOLD > 9999
#ACT
GAMEGOLD - 10000
GIVE VIP1 1
SendMsg 1 250 0 %s成功用1W元宝购买了VIP1，大家恭喜他。
Break
#elseact
MESSAGEBOX 购买失败！请确定你有1W元宝。

[@V2]
#IF
CHECKGAMEGOLD > 19999
checkitem VIP1 1
#ACT
GAMEGOLD - 20000
TAKE VIP1 1
GIVE VIP2 1
SendMsg 1 250 0 %s成功用2W元宝购买了VIP2，大家恭喜他。
Break
#elseact
MESSAGEBOX 购买失败！请确定你有2W元宝和VIP2。

[@V3]
#IF
CHECKGAMEGOLD > 49999
checkitem VIP2 1
#ACT
GAMEGOLD - 50000
TAKE VIP2 1
GIVE VIP3 1
SendMsg 1 250 0 %s成功用5W元宝购买了VIP3，大家恭喜他。
Break
#elseact
MESSAGEBOX 购买失败！请确定你有5W元宝和VIP2。

[@V4]
#IF
CHECKGAMEGOLD > 79999
checkitem VIP3 1
#ACT
GAMEGOLD - 80000
TAKE VIP3 1
GIVE VIP4 1
SendMsg 1 250 0 %s成功用8W元宝购买了VIP4，大家恭喜他。
Break
#elseact
MESSAGEBOX 购买失败！请确定你有8W元宝和VIP3。


[@50元]
#IF
CHECKGAMEPOINT > 49
CHECKVAR HUMAN 50元奖励 = 0
#ACT
give VIP1 1
give 通天令牌 2
CALCVAR HUMAN 50元奖励 = 1
SAVEVAR HUMAN 50元奖励 ..\QuestDiary\数据文件\充值奖励\50元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX  [失败]：你的充值元宝数量不够！或者已经领取了！


[@100元]
#IF
checkjob wizard
#ACT
GOTO @法师1
#ELSEACT
goto @检测道士1

[@检测道士1]
#IF
checkjob taoist
#ACT
GOTO @道士1
#ELSEACT
goto @检测战士1

[@检测战士1]
#IF
checkjob warrior
#ACT
GOTO @战士1
#ELSEACT
goto @100元

[@法师1]
#IF
CHECKGAMEPOINT > 99
CHECKVAR HUMAN 100元奖励 = 0
checkitem VIP1 1
#ACT
TAKE VIP1 1
give VIP2 1
give 通天令牌 3
take VIP1 1
CALCVAR HUMAN 100元奖励 = 1
SAVEVAR HUMAN 100元奖励 ..\QuestDiary\数据文件\充值奖励\100元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP1吗？否则不能领取！

[@道士1]
#IF
CHECKGAMEPOINT > 99
CHECKVAR HUMAN 100元奖励 = 0
checkitem VIP1 1
#ACT
TAKE VIP1 1
give VIP2 1
give 通天令牌 3
take VIP1 1
CALCVAR HUMAN 100元奖励 = 1
SAVEVAR HUMAN 100元奖励 ..\QuestDiary\数据文件\充值奖励\100元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP1吗？否则不能领取！

[@战士1]
#IF
CHECKGAMEPOINT > 99
CHECKVAR HUMAN 100元奖励 = 0
checkitem VIP1 1
#ACT
TAKE VIP1 1
give VIP2 1
give 通天令牌 3
take VIP1 1
CALCVAR HUMAN 100元奖励 = 1
SAVEVAR HUMAN 100元奖励 ..\QuestDiary\数据文件\充值奖励\100元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP1吗？否则不能领取！

[@200元]
#IF
CHECKGAMEPOINT > 199
CHECKVAR HUMAN 200元奖励 = 0
checkitem VIP2 1
#ACT
give VIP3 1
give 通天令牌 5
take VIP2 1
CALCVAR HUMAN 200元奖励 = 1
SAVEVAR HUMAN 200元奖励 ..\QuestDiary\数据文件\充值奖励\200元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP2吗？否则不能领取！

[@500元]
#IF
CHECKVAR HUMAN 500元奖励 = 0
CHECKGAMEPOINT > 499
checkitem VIP3 1
#ACT
give VIP4 1
give 通天令牌 10
take VIP3
CALCVAR HUMAN 500元奖励 = 1
SAVEVAR HUMAN 500元奖励 ..\QuestDiary\数据文件\充值奖励\500元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP3吗？否则不能领取！

[@1000元]
#IF
CHECKVAR HUMAN 1000元奖励 = 0
CHECKGAMEPOINT > 999
checkitem VIP4 1
CheckJOB Warrior
#ACT
give VIP5 1
give 开天斩 1
give 逐日剑法 1
take VIP4
CALCVAR HUMAN 1000元奖励 = 1
SAVEVAR HUMAN 1000元奖励 ..\QuestDiary\数据文件\充值奖励\1000元奖励.txt
goto @main
break
#IF
CHECKVAR HUMAN 1000元奖励 = 0
CHECKGAMEPOINT > 999
checkitem VIP4 1
CheckJOB Wizard
#ACT
give VIP5 1
give 流星火雨 1
give **龙焰 1
take VIP4
CALCVAR HUMAN 1000元奖励 = 1
SAVEVAR HUMAN 1000元奖励 ..\QuestDiary\数据文件\充值奖励\1000元奖励.txt
goto @main
break
#IF
CHECKVAR HUMAN 1000元奖励 = 0
CHECKGAMEPOINT > 999
checkitem VIP4 1
CheckJOB taoist
#ACT
give VIP5 1
give 诸神剑阵 1
give 挂亡之眼 1
take VIP4
CALCVAR HUMAN 1000元奖励 = 1
SAVEVAR HUMAN 1000元奖励 ..\QuestDiary\数据文件\充值奖励\1000元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP4吗？否则不能领取！

[@2000元]
#IF
CHECKVAR HUMAN 2000元奖励 = 0
CHECKGAMEPOINT > 1999
checkitem VIP5 1
#ACT
give VIP6 1
take VIP5
CALCVAR HUMAN 2000元奖励 = 1
SAVEVAR HUMAN 2000元奖励 ..\QuestDiary\数据文件\充值奖励\2000元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP5吗？否则不能领取！

[@3000元]
#IF
CHECKVAR HUMAN 3000元奖励 = 0
CHECKGAMEPOINT > 2999
checkitem VIP6 1
#ACT
give VIP7 1
take VIP6
CALCVAR HUMAN 3000元奖励 = 1
SAVEVAR HUMAN 3000元奖励 ..\QuestDiary\数据文件\充值奖励\3000元奖励.txt
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP6吗？否则不能领取！

[@4000元]
#IF
CHECKVAR HUMAN 4000元奖励 = 0
CHECKGAMEPOINT > 3999
checkitem VIP7 1
#ACT
give VIP8 1
take VIP7
CALCVAR HUMAN 4000元奖励 = 1
SAVEVAR HUMAN 4000元奖励 ..\QuestDiary\数据文件\充值奖励\4000元奖励.txt
SENDMSG 4 感谢[%s]您对本服的鼎力支持,我们绝对会越做越好,祝您游戏愉快！
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP7吗？否则不能领取！

[@5000元]
#IF
CHECKVAR HUMAN 5000元奖励 = 0
CHECKGAMEPOINT > 4999
checkitem VIP8 1
#ACT
give VIP9 1
take VIP8
CALCVAR HUMAN 5000元奖励 = 1
SAVEVAR HUMAN 5000元奖励 ..\QuestDiary\数据文件\充值奖励\5000元奖励.txt
SENDMSG 4 感谢[%s]您对本服的鼎力支持,我们绝对会越做越好,祝您游戏愉快！
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP8吗？否则不能领取！

[@8000元]
#IF
CHECKVAR HUMAN 8000元奖励 = 0
CHECKGAMEPOINT > 7999
checkitem VIP9 1
#ACT
give VIP10 1
take VIP9
CALCVAR HUMAN 8000元奖励 = 1
SAVEVAR HUMAN 8000元奖励 ..\QuestDiary\数据文件\充值奖励\8000元奖励.txt
SENDMSG 4 感谢[%s]您对本服的鼎力支持,我们绝对会越做越好,祝您游戏愉快！
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP9吗？否则不能领取！

[@10000元]
#IF
CHECKVAR HUMAN 10000元奖励 = 0
CHECKGAMEPOINT > 9999
checkitem VIP10 1
#ACT
give VIP11 1
take VIP10
CALCVAR HUMAN 10000元奖励 = 1
SAVEVAR HUMAN 10000元奖励 ..\QuestDiary\数据文件\充值奖励\10000元奖励.txt
SENDMSG 4 感谢[%s]您对本服的鼎力支持,我们绝对会越做越好,祝您游戏愉快！
goto @main
BREAK
#ELSEACT
MESSAGEBOX [失败]：你的充值元宝数量不够！请确定你背包有VIP10吗？否则不能领取！