[@main]
\ \
\ \
只要您的装备鉴定出了/FCOLOR=250金色品质/FCOLOR=243，那195黄金皓月么恭喜你，可以到我这里进化./FCOLOR=250\
我可以帮您进化成/FCOLOR=250红色品质装备，/FCOLOR=250红色品质可是全服装备属性最好./FCOLOR=250\
但是我要收取铜钱500吊作为报酬，您愿意吗？/FCOLOR=250\
\ \
我要进化装备{FCOLOR=245}/@装备进化\
\ \
离开/@exit \



[@装备进化]
#ACT
OPEN公益传奇吧UPGRADEDLG 装备进化

[@UpgradeDlgItem]
#if
equal $DLGITEM.STDMODE 19
#ACT
RECLAIMITEM
SendMsg 6 该物品无法进化
break
#if
equal $DLGITEM.STDMODE 20
#ACT
RECLAIMITEM
SendMsg 6 该物品无法进化
break
#if
equal $DLGITEM.STDMODE 21
#ACT
RECLAIMITEM
SendMsg 6 该物品无法进化
break
#if
CheckItemNameColor -1 243
#act
goto @装备进化进程
#ELSEACT
RECLAIMITEM
SendMsg 6 只有金色的装备才能进化成红色品质

[@装备进化进程]
#IF
CHECKGAMEDIAMOND 500
#ACT
RECLAIMITEM
SendMsg 6 每次进化需要500铜钱,失败装备不会消失,红色是最强品质
break
#if
random 20
#act
goto @装备进化进程1
#ELSEACT
GAMEDIAMOND - 500
SendMsg 6 进化装备失败,铜钱减少500
SendMsg 0 【$USERNAME】进化装备【$DLGITEM.NAME】失败了,属性不变.
RECLAIMITEM

[@装备进化进程1]
#if
equal $DLGITEM.STDMODE 5
#ACT
mov n$属性值 8
mov n$额外属性值 0
movr N$属性位置 0 3
goto @装备进化结果
break
#if
equal $DLGITEM.STDMODE 6
#ACT
mov n$属性值 8
mov n$额外属性值 0
movr N$属性位置 0 3
goto @装备进化结果
#ELSEACT
mov n$属性值 8
mov n$额外属性值 10
movr N$属性位置 2 5
goto @装备进化结果
break


[@装备进化结果]
#act
GAM金戈铁马好玩吗EDIAMOND - 500
movr N$元素属性位置 0 9
SetNewItemValue -1 N$元素属性位置 + 5
CHANGEITEMADDVALUE -1 N$属性位置 + n$属性值
CHANGEITEMADDVALUE -1 0 + n$额外属性值
CHANGEITEMADDVALUE -1 1 + n$额外属性值
ChangeItemNameColor -1 249
SendMsg 0 【$USERNAME】将装备【$DLGITEM.NAME】进化成了【红色最强品质】,属性获得提升.
RECLAIMITEM
break