热血传奇新的称号脚本完整版

　　 (@@InPutInteger @@InPutString)
%100
[@main]
这里是本服新的增加的盛大称号系统!!\
在这里您可以获得到可以殊荣!\
传奇之星(物品)可以用来换取巅峰勇士、巅峰战神的称号!\
而本服高手的传奇之星、玛法主宰者称号则需竞价获得! \ \
查看各种称号属性/@称号介绍 传奇之星、玛法主宰者设置追随者/@设置战友 \
竞价传奇之星称号/@竞价传奇之星 竞价玛法主宰者称号/@竞价玛法主宰者 \
兑换巅峰勇士称号/@兑换巅峰勇士 兑换巅峰战神称号/@兑换巅峰战神

　　 [@称号介绍]
传奇之星属性攻魔道增加50-150\
玛法主宰者属性攻魔道增加50-150\
巅峰战神攻魔道增加40-100\
巅峰勇士攻魔道增加25-50\
天下一号战士攻击增加20-50 返回/@main\
天下一号法师魔法增加20-50\
天下一号道士道术增加20-50\
主宰龙卫攻魔道增加15-30\
护花使者攻魔道增加15-30\

　　
[@兑换巅峰勇士]
兑换颠峰勇士需要2个传奇之星!!\
传奇之星在商铺装饰第二页购买!\
我有2个传奇之星!\ \
我要兑换/@巅峰勇士 返回/@main

　　 [@兑换巅峰战神]
兑换颠峰战神需要4个传奇之星!!\
传奇之星在商铺装饰第二页购买!\
我有4个传奇之星!\ \
我要兑换/@巅峰战神 返回/@main

　　 [@巅峰勇士]
#IF
CHECKFENGHAOCOUNT $USERNAME 8
CHECKITEM 传奇之星 2
#act
GIVEFENGHAO $USERNAME 巅峰勇士
TAKE 传奇之星 2
#elseSay
你不能再有更多的称号了或者您的传奇之星不够!

　　 [@巅峰战神]
#IF
CHECKFENGHAOCOUNT $USERNAME 8
CHECKITEM 传奇之星 4
#act
GIVEFENGHAO $USERNAME 巅峰战神
TAKE 传奇之星 4
#elseSay
你不能再有更多的称号了或者您的传奇之星不够!

　　 [@设置战友]
传奇之星可以设置10个护花使者!\
主宰守护者可以设置10个主宰龙卫!\ \
任命主宰龙卫/@任命主宰龙卫 任命护花使者/@任命护花使者

　　 [@竞价传奇之星]
只有女性才能竞价传奇之星,您要是男人请速速离去哦!\
竞价传奇之星每次竞价不得低于10万米宝!\
当前传奇之星称号大部分者:$STR(A231)\
竞价元宝数为:$STR(G231)\
您当前的竞价元宝数为:$HUMAN(竞价元宝)\ \

　　 我要竞价/@@InPutInteger49 任命护花使者/@任命护花使者\

　　 [@InPutInteger49]
#IF
gender woman
LARGE N49 99999
#ACT
MOV G232 $STR(N49)
INC G232 HUMAN 竞价元宝
DelayGoto 1 ~InPutInteger49
BREAK
close
#ELSEACT
messagebox 你要么是一人妖，要么就没米!

　　 [~InPutInteger49]
#IF
LARGE G232 $STR(G231)
#ACT
GAMEGOLD - $STR(N49)
MOV G231 $STR(G232)
MOV A231 $USERNAME
CALCVAR HUMAN 竞价元宝 + $STR(N49)
SAVEVAR HUMAN 竞价元宝 ..\QuestDiary\玩美制作\竞价元宝S呵呵e.txt
Gmexecute 全服触发 @全服称号调整
GIVEFENGHAO $USERNAME 传奇之星
give 护花令牌 1
SENDMSG 0 恭喜%s通过竞价获得本服至高的传奇之星荣誉称号!
SENDMSG 0 恭喜%s通过竞价获得本服至高的传奇之星荣誉称号!
BREAK
close
#ELSEACT
close
MESSAGEBOX 您还是不给力啊!竞价还是没人家多啊!

　　
[@竞价玛法主宰者]
只有男人才能竞价玛法主宰者,您要是女人人请速速离去哦!\
竞价传奇之星每次竞价不得低于10万米宝!\
当前传奇之星称号大部分者:$STR(A232)\
竞价元宝数为:$STR(G233)\
您当前的竞价元宝数为:$HUMAN(竞价元宝)\ \

　　 我要竞价/@@InPutInteger50 任命主宰龙卫/@任命主宰龙卫\

　　
[@InPutInteger50]
#IF
gender man
LARGE N50 99999
#ACT
MOV G234 $STR(N50)
INC G234 HUMAN 竞价元宝
DelayGoto 1 ~InPutInteger50
BREAK
close
#ELSEACT
messagebox 你要么是一人妖，要么就没米!
close

　　 [~InPutInteger50]
#IF
LARGE G234 $STR(G233)
#ACT
GAMEGOLD - $STR(N50)
MOV G233 $STR(G234)
MOV A232 $USERNAME
CALCVAR HUMAN 竞价元宝 + $STR(N50)
SAVEVAR HUMAN 竞价元宝 ..\QuestDiary\玩美制作\竞价元宝S呵呵e.txt
Gmexecute 全服触发 @全服称号调整
GIVEFENGHAO $USERNAME 玛法主宰者
give 主宰令牌 1
SENDMSG 0 恭喜%s通过竞价获得本服至高的玛法主宰者荣誉称号!
SENDMSG 0 恭喜%s通过竞价获得本服至高的玛法主宰者荣誉称号!
BREAK
close
#ELSEACT
close
MESSAGEBOX 您还是不给力啊!竞价还是没人家多啊!

　　
[@任命护花使者]
任命护花使者名字/@@InPutString51 ←输入需要设置的玩家名字！\ \
〖返回/@main〗

　　 [@InPutString51]
#IF
CHECKFENGHAOCOUNT $STR(S51) 8
$STR(S51).gender man
CHECKFENGHAOLISTCOUNT 0 10
#act
GIVEFENGHAO $STR(S51) 护花使者 $USERNAME
#elseSay
$STR(S51)不是男性或不能再有更多的称号或不在线！！！或者你已经有10个护花使者了

　　
[@任命主宰龙卫]
任命主宰龙卫名字/@@InPutString52 ←输入需要设置的玩家名字！\ \
〖返回/@main〗

　　 [@InPutString52]
#IF
CHECKFENGHAOCOUNT $STR(S52) 8
CHECKFENGHAOLISTCOUNT 1 10
#act
GIVEFENGHAO $STR(S52) 主宰龙卫 $USERNAME
#elseSay
$STR(S52)不能再有更多的称号或不在线！！！或者你已经有10个主宰龙卫了