LEG/Blue引擎脚本-英雄转生

[@main]
#IF
CHECKHEROONLINE
#act
MOV M0 1
MOV P0 <$RELEVEL>
MOV M1 <$RELEVEL>
INC M1 1
MOV P1 <$STR(M1)>
INC P0 1
MUL P0 5
INC M0 <$STR(P0)>
MUL M1 1500
MUL M1 <$STR(P1)>
MOV M2 1
MOV P2 <$H.RELEVEL>
MOV P3 <$H.RELEVEL>
MOV M3 <$H.RELEVEL>
INC P2 1
MUL P2 5
INC M2 <$STR(P2)>
INC P3 1
INC M3 1
MUL M3 <$STR(P3)>
MUL M3 1500
BREAK
#SAY
<每次转生加>：防御，魔御，攻击，魔法，道术下限2点，上限5点！\ \
<COLOR=clLime 英雄>：转生「<$H.RELEVEL>」次，需要等级「<$STR(M2)>」！元宝「<$STR(M3)>」颗！\ \
∝╬══→〖<马上给英雄进行转生/@英转>〗←英雄转生需要重新召唤\ \
#ELSEACT
MESSAGEBOX 转生英雄必须在线！\
BREAK
[@英转]
#IF
H.CHECKRENEWLEVEL < 5
#ACT
MOV M0 1
MOV P0 <$H.RELEVEL>
MOV M1 <$H.RELEVEL>
INC M1 1
MOV P1 <$STR(M1)>
INC P0 1
MUL P0 5
INC M0 <$STR(P0)>
MUL M1 1000
MUL M1 <$STR(P1)>
#ELSEACT
messagebox 错误提示：\英雄转生次数为「<$H.RELEVEL>」次！已经达到服务器最高转生限制！\不能再进行转生了！
CLOSE
break
#If
H.CheckLevelEx < <$STR(M0)>
#ACT
messagebox 错误提示：英雄转生次数为「<$H.RELEVEL>」次！\现在转生需要等级「<$STR(M0)>」级以上，当前等级不够，先努力去练级吧！\
CLOSE
break
#IF
CHECKGAMEGOLD ? <$STR(M1)>
#ACT
GAMEGOLD - <$STR(M1)>
H.ReNewLevel 1 0 0
SENDMSG 6 恭喜你的英雄转生成功，元宝减少「<$STR(M1)>」颗！当前元宝数量为：「<$GAMEGOLD>」颗.
MOV M0 <$H.RELEVEL>
MUL M0 1
MOV P0 <$STR(M0)>
DIV P0 1
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 249
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 249
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 249
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 0 500
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 0 500
SENDMSG 0 玩家【%s】的英雄进行了「<$H.RELEVEL>」次转生，【防御、魔御、攻击、魔法、道术，下限提升<$STR(P0)>点、上限提升<$STR(M0)>点】 251 0 500
GOTO @MAIN
break
#ELSEACT
MessageBox 错误提示：你身上的元宝不足！「<$H.RELEVEL>」次转生需要元宝「<$STR(M1)>」颗！\
CLOSE
break