[@main]
<只要您的装备鉴定出了/FCOLOR=250><金色品质/FCOLOR=243><，那么恭喜你，可以到我这里进化./FCOLOR=250> <我可以帮您进化成/FCOLOR=250><红色品质装备><，/FCOLOR=250><红色品质><可是全服装备属性最好./FCOLOR=250> <但是我要收取铜钱500吊作为报酬，您愿意吗？/FCOLOR=250> <我要进化装备{FCOLOR=245}/@装备进化> <离开/@exit> [@装备进化] #ACT OPENUPGRADEDLG 装备进化 [@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 GAMEDIAMOND – 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
