;;---------------aragom
[@UseZhuangBeiShengJi]
{
#if
#say
您好，您可以使用您的装备升级精华石升级您的装备,精华石只能由提炼而来.\
<〖使用装备升级精华石（1）〗 [6点 积分]/@UseZhuangbeiShengJiShi(精华石（1）,1,6)>\
<〖使用装备升级精华石（2）〗 [14点积分]/@UseZhuangbeiShengJiShi(精华石（2）,2,14)>\
<〖使用装备升级精华石（3）〗 [24点积分]/@UseZhuangbeiShengJiShi(精华石（3）,3,24)>\
<〖使用装备升级精华石（4）〗 [40点积分]/@UseZhuangbeiShengJiShi(精华石（4）,4,40)>\
<〖使用装备升级精华石（5）〗 [60点积分]/@UseZhuangbeiShengJiShi(精华石（5）,5,60)>\
<〖使用装备升级精华石（6）〗 [90点积分]/@UseZhuangbeiShengJiShi(精华石（6）,6,90)>\\
<〖离  开〗/@exit>\

[@UseZhuangbeiShengJiShi()]
#act
MOV A0 ""
MOV D0 0
MOV D1 0
MOV A0 %ARG(1)
MOV D0 %ARG(2)
MOV D1 %ARG(3)
mov 精华石等级 %D0
mov 精华石积分 %D1
mov 精华石名称 %A0

#IF
checkitem 新人战甲（男） 1
or checkitem 新人战甲（女） 1
#SAY
新人战甲不能升级精华石。\
<离开/@exit>\
#ACT
break

#IF
checkitem %A0 1
checkcmd checkuserjf %D1
#say
请选出你要升级的装备.\
<〖衣  服〗/@StartZhuangbeiShengJiShi(0)> \
<〖头  盔〗/@StartZhuangbeiShengJiShi(4)> \
<〖项  链〗/@StartZhuangbeiShengJiShi(3)> \
<〖左手镯〗/@StartZhuangbeiShengJiShi(5)> <〖右手镯〗/@StartZhuangbeiShengJiShi(6)> \
<〖左戒指〗/@StartZhuangbeiShengJiShi(7)> <〖右戒指〗/@StartZhuangbeiShengJiShi(8)> \\
<〖离  开〗/@exit>\
#elsesay
您没有装备升级精华石或者您的积分不足，不能升级装备!\\
<〖离  开〗/@exit>\

[@StartZhuangbeiShengJiShi()]
#act
MOV D2 0
MOV D2 %ARG(1)
mov 精华石装备位置 %D2

#IF
checkcmd CHECKITEMINFO %D2


#if
ELARGE FLD_DESC10 1
#SAY
对不起，装备升级精华石必须用在没有升级过的装备上!\
<离开/@exit>\
#act
break

#IF
EQUAL FLD_UPLVLTYPE AC                   ;允许升级类型
#say
您的这件物品只能升级防御,您确认要升级吗?\
<升级防御/@ContinueZhuangbeiShengJiShi(0,AC,2)>\                             ;带着升级类型参数跳转
<离开/@exit>
#act
break

#IF
EQUAL FLD_UPLVLTYPE MAC
#say
您的这件物品只能升级魔法防御,您确认要升级吗?\
<升级魔法防御/@ContinueZhuangbeiShengJiShi(1,MAC,2)>\                             ;带着升级类型参数跳转
<离开/@exit>\
#act
break

#IF
EQUAL FLD_UPLVLTYPE DC
#say
您的这件物品只能升级破坏,您确认要升级吗?\
<升级破坏/@ContinueZhuangbeiShengJiShi(2,DC,1)>\                             ;带着升级类型参数跳转
<离开/@exit>\
#act
break

#IF
EQUAL FLD_UPLVLTYPE MC
#say
您的这件物品只能升级自然系或者灵魂系魔法\
具体加的属性根据您的首饰的本来的属性判断!\
您确认要升级吗?\
<升级全系列魔法/@ContinueZhuangbeiShengJiShi(3,MC,1)>\                             ;带着升级类型参数跳转
<离开/@exit>\
#act
break

#if
#say
对不起，您选择的物品暂时还没有开放升级功能!\
<离开/@exit>

[@ContinueZhuangbeiShengJiShi()]
#ACT
mov D3 %ARG(1)   ;;升级的位置
mov A1 %ARG(2)
mov D4 %ARG(3)   ;;每次升级加的点数
mov A0 %精华石名称
mov D0 %精华石等级
mov D1 %精华石积分
mov D2 %精华石装备位置
mov P1 %D4
MOV P2 %D0
MUL P1 P2
MOV D5 %P9

#if
checkitem %A0 1
EQUAL FLD_UPLVLTYPE %A1
checkcmd checkuserjf %D1
EQUAL FLD_DESC10 0
#act
take %A0 1
actcmd SETUSERJF - %D1 精华石
actcmd EDITITEM 10 + %D0
actcmd EDITITEM %D3 + %D5
#say
祝贺您,您这次装备升级成功了!取下装备就可以看到您的成果了!\
<离开/@exit>\
#ELSEACT
#ELSESAY
对不起，您没有装备升级精华石或者您的装备不允许升级指定属性!\
再或者您的积分不够多!\
<离开/@exit>

}
;;-------------aragom
