富翁排行榜系列脚本

传奇服务端

[@main]
<富翁排行榜第一名获得称号奖励，并且上线1.3倍攻击，1.3倍经验/SCOLOR=253>\ \

<富翁排行榜第二名获得称号奖励，并且上线1.2倍攻击，1.2倍经验/SCOLOR=253>\ \

<另外充值多少元宝就可以得到多少积分，积分可以换取本服特色装备/SCOLOR=253>\ \
<查看富翁排行榜单/@排行>        \
<积分兑换装备/@兑换装备>\
<查询我的充值积分/@充值积分>     \

[@兑换装备]
<使用2000000个充值积分可以换取非卖品面巾一个/SCOLOR=253>       <【点击换取】/@卖品面巾>\
<使用5000000个充值积分可以换取李嘉城之剑一把/SCOLOR=253>       <【点击换取】/@李嘉城之剑>\
<使用6000000个充值积分可以换取无血勋章(防复活)一枚/SCOLOR=253> <【点击换取】/@abc>\
<使用7000000个充值积分可以换取无义勋章(防护身)一枚/SCOLOR=253> <【点击换取】/@fgfg>\
<使用8000000个充值积分可以换取无情勋章(防麻痹)一枚/SCOLOR=253> <【点击换取】/@zj50>\
<温馨提示:所有物品都是超极品，全属性+50满属性+10以及都额外加HP和MP/SCOLOR=254>\

[@abc]
#IF
CHECKVAR HUMAN 消费积分 > 5999999
#act
GIVE 无血勋章 1
AutoTakeOnItem 无血勋章 2
ChangeItemNameColor 2 253
gmexecute 改属性 2 0 50
gmexecute 改属性 2 1 50
gmexecute 改属性 2 2 50
gmexecute 改属性 2 3 50
gmexecute 改属性 2 4 50
SetNewIteMValue 2 0 = 5
SetNewIteMValue 2 1 = 5
SetNewIteMValue 2 2 = 5
SetNewIteMValue 2 3 = 5
SetNewIteMValue 2 4 = 5
SetNewIteMValue 2 5 = 5
CALCVAR HUMAN 消费积分 - 6000000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\充值积分系统\消费积分.txt
SENDMSG 0 恭喜<$USERNAME>使用5000000充值积分兑换了1枚无血勋章(防复活)
#ELSESAY
积分数量不足

[@fgfg]
#IF
CHECKVAR HUMAN 消费积分 > 6999999
#act
GIVE 无义勋章 1
AutoTakeOnItem 无义勋章 2
ChangeItemNameColor 2 253
gmexecute 改属性 2 0 50
gmexecute 改属性 2 1 50
gmexecute 改属性 2 2 50
gmexecute 改属性 2 3 50
gmexecute 改属性 2 4 50
SetNewIteMValue 2 0 = 5
SetNewIteMValue 2 1 = 5
SetNewIteMValue 2 2 = 5
SetNewIteMValue 2 3 = 5
SetNewIteMValue 2 4 = 5
SetNewIteMValue 2 5 = 5
CALCVAR HUMAN 消费积分 - 7000000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\充值积分系统\消费积分.txt
SENDMSG 0 恭喜<$USERNAME>使用5000000充值积分兑换了1枚无义勋章(防护身)
#ELSESAY
积分数量不足

[@zj50]
#IF
CHECKVAR HUMAN 消费积分 > 7999999
#act
GIVE 无情勋章 1
AutoTakeOnItem 无情勋章 2
ChangeItemNameColor 2 253
gmexecute 改属性 2 0 50
gmexecute 改属性 2 1 50
gmexecute 改属性 2 2 50
gmexecute 改属性 2 3 50
gmexecute 改属性 2 4 50
SetNewIteMValue 2 0 = 5
SetNewIteMValue 2 1 = 5
SetNewIteMValue 2 2 = 5
SetNewIteMValue 2 3 = 5
SetNewIteMValue 2 4 = 5
SetNewIteMValue 2 5 = 5
CALCVAR HUMAN 消费积分 - 8000000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\充值积分系统\消费积分.txt
SENDMSG 0 恭喜<$USERNAME>使用5000000充值积分兑换了1枚无情勋章(防麻痹)
#ELSESAY
积分数量不足

[@李嘉城之剑]
#IF
CHECKVAR HUMAN 消费积分 > 4999999
#act
GIVE 李嘉城之剑 1
AutoTakeOnItem 李嘉城之剑 1
ChangeItemNameColor 1 253
gmexecute 改属性 1 0 50
gmexecute 改属性 1 1 50
gmexecute 改属性 1 2 50
gmexecute 改属性 1 3 50
gmexecute 改属性 1 4 50
SetNewIteMValue 1 0 = 5
SetNewIteMValue 1 1 = 5
SetNewIteMValue 1 2 = 5
SetNewIteMValue 1 3 = 5
SetNewIteMValue 1 4 = 5
SetNewIteMValue 1 5 = 5
CALCVAR HUMAN 消费积分 - 5000000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\充值积分系统\消费积分.txt
SENDMSG 0 恭喜<$USERNAME>使用5000000充值积分兑换了1把李嘉城之剑
#ELSESAY
积分数量不足



[@卖品面巾]
#IF
CHECKVAR HUMAN 消费积分 > 1999999
#act
GIVE 非卖品面巾 1
CALCVAR HUMAN 消费积分 - 2000000
SAVEVAR HUMAN 消费积分 ..\QuestDiary\充值积分系统\消费积分.txt
SENDMSG 0 恭喜<$USERNAME>使用2000000充值积分兑换了1个非卖品面巾
#ELSESAY
积分数量不足


非卖品面巾

[@充值积分]
#IF
#SAY
您当前的充值积分值为：<$HUMAN(充值积分)>\ \ \
<返回/@MAIN>
#ACT
BREAK







[@排行]
#ACT
#CALL [\充值积分系统\显示充值排行.txt] @显示充值排行
BREAK

[@上期排行]
#ACT
#CALL [\充值积分系统\显示充值积分排行.txt] @显示充值积分排行
BREAK