帝国官衔使者脚本

22pk论坛

[@main]
#act
#SAY
英勇的将士，欢迎来到本服！\
在我这里，你可以查看到神凰称号！玄武称号！\
<神凰称号/@神凰称号>\ \
<玄武称号/@玄武称号><New~/fcolor=58> \ \
<不动如山/@不动如山><New~/fcolor=58> \ \


<删除称号/@@InPutString1> <删除指定称号/FCOLOR=249>　\



[@不动如山]
#if
#act
GIVEFENGHAO <$USERNAME> 不动如山
break


[@评定称号]
\ \
　　　<紫月圣君/FCOLOR=250> <需紫月圣君令牌×1/FCOLOR=243>   <评定此称号/@称号1>\ \
　　　<赤明天帝/FCOLOR=250> <需赤明天帝令牌×1/FCOLOR=243>   <评定此称号/@称号2> \ \
　　　<碧海天王/FCOLOR=250> <需碧海天王令牌×1/FCOLOR=243>   <评定此称号/@称号3>    <特权圣地/@特权1> \ \
　　　<耀阳圣尊/FCOLOR=250> <需耀阳圣尊令牌×1/FCOLOR=243>   <评定此称号/@称号4>    <特权圣地/@特权2>\ \
[@特权2]
#if
checkfenghao 耀阳圣尊
#act
mapmove ttqq2
SENDMSG 0 恭喜：耀阳圣尊<$USERNAME>进入了特权耀阳圣尊-装备狂暴
SENDMSG 0 恭喜：耀阳圣尊<$USERNAME>进入了特权耀阳圣尊-装备狂暴
SENDMSG 0 恭喜：耀阳圣尊<$USERNAME>进入了特权耀阳圣尊-装备狂暴
break
#ELSESAY
您有耀阳圣尊的称号吗？

[@特权1]
#if
checkfenghao 碧海天王
#act
mapmove ttqq1
SENDMSG 0 恭喜：碧海天王<$USERNAME>进入了特权碧海天王-装备狂暴
SENDMSG 0 恭喜：碧海天王<$USERNAME>进入了特权碧海天王-装备狂暴
SENDMSG 0 恭喜：碧海天王<$USERNAME>进入了特权碧海天王-装备狂暴
break
#ELSESAY
您有碧海天王的称号吗？






[@称号4]
#if
checkitem 耀阳圣尊令牌 1
#act
take 耀阳圣尊令牌 1
RECYCFENGHAO <$USERNAME> 紫月圣君
RECYCFENGHAO <$USERNAME> 赤明天帝
RECYCFENGHAO <$USERNAME> 碧海天王
RECYCFENGHAO <$USERNAME> 耀阳圣尊
GIVEFENGHAO <$USERNAME> 耀阳圣尊
ADDSKILL 众志成城
give 主宰令牌 1
SENDMSG 0 特权评定师:【<$USERNAME>】成功使用耀阳圣尊令牌评定为"耀阳圣尊" 151 234
break
#ELSESAY
非常抱歉，您没有我需要的物品！




[@称号3]
#if
checkitem 碧海天王令牌 1
#act
take 碧海天王令牌 1
RECYCFENGHAO <$USERNAME> 紫月圣君
RECYCFENGHAO <$USERNAME> 赤明天帝
RECYCFENGHAO <$USERNAME> 碧海天王
RECYCFENGHAO <$USERNAME> 耀阳圣尊
GIVEFENGHAO <$USERNAME> 碧海天王
ADDSKILL 众志成城
give 主宰令牌 1
SENDMSG 0 特权评定师:【<$USERNAME>】成功使用碧海天王令牌评定为"碧海天王" 151 234
break
#ELSESAY
非常抱歉，您没有我需要的物品！


[@称号2]
#if
checkitem 赤明天帝令牌 1
#act
take 赤明天帝令牌 1
RECYCFENGHAO <$USERNAME> 紫月圣君
RECYCFENGHAO <$USERNAME> 赤明天帝
RECYCFENGHAO <$USERNAME> 碧海天王
RECYCFENGHAO <$USERNAME> 耀阳圣尊
GIVEFENGHAO <$USERNAME> 赤明天帝
ADDSKILL 众志成城
give 主宰令牌 1
SENDMSG 0 特权评定师:【<$USERNAME>】成功使用赤明天帝令牌评定为"赤明天帝" 151 234
break
#ELSESAY
非常抱歉，您没有我需要的物品！




[@称号1]
#if
checkitem 紫月圣君令牌 1
#act
take 紫月圣君令牌 1
RECYCFENGHAO <$USERNAME> 紫月圣君
RECYCFENGHAO <$USERNAME> 赤明天帝
RECYCFENGHAO <$USERNAME> 碧海天王
RECYCFENGHAO <$USERNAME> 耀阳圣尊
GIVEFENGHAO <$USERNAME> 紫月圣君
ADDSKILL 众志成城
give 主宰令牌 1
SENDMSG 0 特权评定师:【<$USERNAME>】成功使用紫月圣君令牌评定为"紫月圣君" 151 234
break
#ELSESAY
非常抱歉，您没有我需要的物品！








[@InPutString1]
#act
RECYCFENGHAO <$USERNAME> <$STR(S1)>
goto @main



[@兑换官衔值]
\ \ \
<虎符×1兑换50点官衔值/@虎符1>      <虎符×10兑换500点官衔值/@虎符2>\ \
<虎符×100兑换5000点官衔值/@虎符3>  <虎符×1000兑换50000点官衔值/@虎符4>\

[@虎符4]
#if
CHECKKIMNEEDLE 虎符 1000
#act
TAKEKIMNEEDLE 虎符 1000
CALCVAR HUMAN 官衔值 + 50000
SAVEVAR HUMAN 官衔值 ..\QuestDiary\游戏数据\官衔值.txt
SENDMSG 0 玩家[%s]通过称号大师成功使用虎符兑换50000点官衔值！
BREAK
#ELSEACT
Messagebox [兑换失败]：你没有我需要的物品无法完成升级！！！


[@虎符3]
#if
CHECKKIMNEEDLE 虎符 100
#act
TAKEKIMNEEDLE 虎符 100
CALCVAR HUMAN 官衔值 + 5000
SAVEVAR HUMAN 官衔值 ..\QuestDiary\游戏数据\官衔值.txt
SENDMSG 0 玩家[%s]通过称号大师成功使用虎符兑换5000点官衔值！
BREAK
#ELSEACT
Messagebox [兑换失败]：你没有我需要的物品无法完成升级！！！




[@虎符2]
#if
CHECKKIMNEEDLE 虎符 10
#act
TAKEKIMNEEDLE 虎符 10
CALCVAR HUMAN 官衔值 + 500
SAVEVAR HUMAN 官衔值 ..\QuestDiary\游戏数据\官衔值.txt
SENDMSG 0 玩家[%s]通过称号大师成功使用虎符兑换500点官衔值！
BREAK
#ELSEACT
Messagebox [兑换失败]：你没有我需要的物品无法完成升级！！！



[@虎符1]
#if
CHECKKIMNEEDLE 虎符 1
#act
TAKEKIMNEEDLE 虎符 1
CALCVAR HUMAN 官衔值 + 50
SAVEVAR HUMAN 官衔值 ..\QuestDiary\游戏数据\官衔值.txt
SENDMSG 0 玩家[%s]通过称号大师成功使用虎符兑换50点官衔值！
BREAK
#ELSEACT
Messagebox [兑换失败]：你没有我需要的物品无法完成升级！！！

[@玄武称号]
\ \
<玄武/fcolor=58>是四大灵兽之一，玄武的本意就是<玄冥/fcolor=58>\
<玄武精华/fcolor=58>乃是玄武掉落在世间的神物\ \
<获取玄武称号/@玄武>    \

[@玄武]
<使用100  个玄武精华升级一重玄武称号/@兑换玄武1>  <魔血值+2000、 抗性+100/fcolor=58>\
<使用300  个玄武精华升级二重玄武称号/@兑换玄武2>  <魔血值+3000、 抗性+200/fcolor=58>\
<使用600  个玄武精华升级三重玄武称号/@兑换玄武3>  <魔血值+4000、 抗性+300/fcolor=58>\
<使用1000 个玄武精华升级四重玄武称号/@兑换玄武4>  <魔血值+5000、 抗性+400/fcolor=58>\
<使用3000 个玄武精华升级五重玄武称号/@兑换玄武5>  <魔血值+6000、 抗性+500/fcolor=58>\
<使用5000 个玄武精华升级六重玄武称号/@兑换玄武6>  <魔血值+8000、 抗性+600/fcolor=58>\
<使用8000 个玄武精华升级七重玄武称号/@兑换玄武7>  <魔血值+10000、抗性+1000/fcolor=58>\
<使用10000个玄武精华升级八重玄武称号/@兑换玄武8>  <魔血值+12000、抗性+1500/fcolor=58>\
<使用15000个玄武精华升级九重玄武称号/@兑换玄武9>  <魔血值+20000、抗性+2000/fcolor=58>\
<使用30000个玄武精华升级十重玄武称号/@兑换玄武10>  <魔血值+30000、抗性+4000/fcolor=58>\


[@兑换玄武10]
#if
CHECKKIMNEEDLE 玄武精华 30000
CHECKFENGHAO 九重玄武
#act
TAKEKIMNEEDLE 玄武精华 30000
RECYCFENGHAO <$USERNAME> 十重玄武
RECYCFENGHAO <$USERNAME> 九重玄武
RECYCFENGHAO <$USERNAME> 八重玄武
RECYCFENGHAO <$USERNAME> 七重玄武
RECYCFENGHAO <$USERNAME> 六重玄武
RECYCFENGHAO <$USERNAME> 五重玄武
RECYCFENGHAO <$USERNAME> 四重玄武
RECYCFENGHAO <$USERNAME> 三重玄武
RECYCFENGHAO <$USERNAME> 二重玄武
RECYCFENGHAO <$USERNAME> 一重玄武
GIVEFENGHAO <$USERNAME> 十重玄武
SENDMSG 5 玩家[%s]通过称号大师成功晋升为【十重玄武】称号！
BREAK
#ELSEACT
Messagebox [晋升失败]：玄武精华不足30000，无法完成升级！！！





[@兑换玄武9]
#if
CHECKKIMNEEDLE 玄武精华 15000
CHECKFENGHAO 八重玄武
#act
TAKEKIMNEEDLE 玄武精华 15000
RECYCFENGHAO <$USERNAME> 十重玄武
RECYCFENGHAO <$USERNAME> 九重玄武
RECYCFENGHAO <$USERNAME> 八重玄武
RECYCFENGHAO <$USERNAME> 七重玄武
RECYCFENGHAO <$USERNAME> 六重玄武
RECYCFENGHAO <$USERNAME> 五重玄武
RECYCFENGHAO <$USERNAME> 四重玄武
RECYCFENGHAO <$USERNAME> 三重玄武
RECYCFENGHAO <$USERNAME> 二重玄武
RECYCFENGHAO <$USERNAME> 一重玄武
GIVEFENGHAO <$USERNAME> 九重玄武
SENDMSG 5 玩家[%s]通过称号大师成功晋升为【九重玄武】称号！
BREAK
#ELSEACT
Messagebox [晋升失败]：玄武精华不足15000，无法完成升级！！！



[@兑换玄武8]
#if
CHECKKIMNEEDLE 玄武精华 10000
CHECKFENGHAO 七重玄武
#act
TAKEKIMNEEDLE 玄武精华 10000
RECYCFENGHAO <$USERNAME> 十重玄武
RECYCFENGHAO <$USERNAME> 九重玄武
RECYCFENGHAO <$USERNAME> 八重玄武
RECYCFENGHAO <$USERNAME> 七重玄武
RECYCFENGHAO <$USERNAME> 六重玄武
RECYCFENGHAO <$USERNAME> 五重玄武
RECYCFENGHAO <$USERNAME> 四重玄武
RECYCFENGHAO <$USERNAME> 三重玄武
RECYCFENGHAO <$USERNAME> 二重玄武
RECYCFENGHAO <$USERNAME> 一重玄武
GIVEFENGHAO <$USERNAME> 八重玄武
SENDMSG 5 玩家[%s]通过称号大师成功晋升为【八重玄武】称号！
BREAK
#ELSEACT
Messagebox [晋升失败]：玄武精华不足10000，无法完成升级！！！



[@兑换玄武7]
#if
CHECKKIMNEEDLE 玄武精华 8000
CHECKFENGHAO 六重玄武
#act
TAKEKIMNEEDLE 玄武精华 8000
RECYCFENGHAO <$USERNAME> 十重玄武
RECYCFENGHAO <$USERNAME> 九重玄武
RECYCFENGHAO <$USERNAME> 八重玄武
RECYCFENGHAO <$USERNAME> 七重玄武
RECYCFENGHAO <$USERNAME> 六重玄武
RECYCFENGHAO <$USERNAME> 五重玄武
RECYCFENGHAO <$USERNAME> 四重玄武
RECYCFENGHAO <$USERNAME> 三重玄武
RECYCFENGHAO <$USERNAME> 二重玄武
RECYCFENGHAO <$USERNAME> 一重玄武
GIVEFENGHAO <$USERNAME> 七重玄武
SENDMSG 5 玩家[%s]通过称号大师成功晋升为【七重玄武】称号！
BREAK
#ELSEACT
Messagebox [晋升失败]：玄武精华不足8000，无法完成升级！！！