传奇世界中州轮回使者(6)

[@getboxitem201]
#IF
EQUAL $CHECKBOXITEM.STDMODE 12
#ACT
MOV S1 $CHECKBOXITEM.ItemExD
MOV D0 $ItemEx.$STR(S1).7
#ELSEACT
SENDMSG 5 你放入的物品不是盾牌类物品，不能升级！
break
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE D0 9
#ACT
SENDMSG 5 你的盾牌品级已经达到最高10级，不能再升级了！
break
#IF
CHECKGAMEGOLD < 1000000
#ACT
SENDMSG 5 你的元宝数量不足1000000个，每次升级需要1000000个元宝！
break
#IF
SMALL D0 2
#ACT
MOV D1 1
#IF
LARGE D0 1
#ACT
MOV D1 2
#IF
LARGE D0 2
#ACT
MOV D1 4
#IF
LARGE D0 3
#ACT
MOV D1 8
#IF
LARGE D0 4
#ACT
MOV D1 12
#IF
LARGE D0 5
#ACT
MOV D1 18
#IF
LARGE D0 6
#ACT
MOV D1 28
#IF
LARGE D0 7
#ACT
MOV D1 58
#IF
LARGE D0 8
#ACT
MOV D1 118
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
RANDOM $STR(D1)
#ACT
GAMEGOLD - 1000000
UpgradeUserItemEx $STR(S1) 0 + 1
UpgradeUserItemEx $STR(S1) 1 + 1
UpgradeUserItemEx $STR(S1) 2 + 1
UpgradeUserItemEx $STR(S1) 3 + 1
UpgradeUserItemEx $STR(S1) 4 + 1
UpgradeUserItemEx $STR(S1) 5 + 1
UpgradeUserItemEx $STR(S1) 6 + 1
UpgradeUserItemEx $STR(S1) 7 + 1
UpgradeUserItemEx $STR(S1) 11 + 10
SENDMSG 5 恭喜你升级成功，盾牌品级和威力提升了
MOV D2 $ItemEx.$STR(S1).7
GOTO @检测广播
break
#ELSEACT
GAMEGOLD - 1000000
SENDMSG 5 本次盾牌升级无效，您可以使用1000000个元宝再次尝试!
break

[@检测广播]
#IF
LARGE D2 2
#ACT
SENDMSG 0 (*)恭喜<<$USERNAME>>在装备物品大使处升级盾牌品级<<$STR(D2)>>级成功！
SENDMSG 10 (*)恭喜<$USERNAME>在装备物品大使处升级牌品级<$STR(D2)>级成功！
break