完美支持GOM引擎传奇装备进化脚本
[@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
SendMsg6该物品无法进化
break
#if
equal<$DLGITEM.STDMODE>20
#ACT
RECLAIMITEM
SendMsg6该物品无法进化
break
#if
equal<$DLGITEM.STDMODE>21
#ACT
RECLAIMITEM
SendMsg6该物品无法进化
break
#if
CheckItemNameColor-1243
#act
goto@装备进化进程
#ELSEACT
RECLAIMITEM
SendMsg6只有金色的装备才能进化成红色品质
[@装备进化进程]
#IF
CHECKGAMEDIAMOND<500
#ACT
RECLAIMITEM
SendMsg6每次进化需要500铜钱失败装备不会消失红色是最强品质
break
#if
random20
#act
goto@装备进化进程1
#ELSEACT
GAMEDIAMOND-500
SendMsg6进化装备失败铜钱减少500
SendMsg0【<$USERNAME>】进化装备【<$DLGITEM.NAME>】失败了属性不变.
RECLAIMITEM
[@装备进化进程1]
#if
equal<$DLGITEM.STDMODE>5
#ACT
movn$属性值8
movn$额外属性值0
movrN$属性位置03
goto@装备进化结果
break
#if
equal<$DLGITEM.STDMODE>6
#ACT
movn$属性值8
movn$额外属性值0
movrN$属性位置03
goto@装备进化结果
#ELSEACT
movn$属性值8
movn$额外属性值10
movrN$属性位置25
goto@装备进化结果
break
[@装备进化结果]
#act
GAMEDIAMOND-500
movrN$元素属性位置09
SetNewItemValue-1N$元素属性位置+5
CHANGEITEMADDVALUE-1N$属性位置+n$属性值
CHANGEITEMADDVALUE-10+n$额外属性值
CHANGEITEMADDVALUE-11+n$额外属性值
ChangeItemNameColor-1249
SendMsg0【<$USERNAME>】将装备【<$DLGITEM.NAME>】进化成了【红色最强品质】属性获得提升.
RECLAIMITEM
break
[@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
SendMsg6该物品无法进化
break
#if
equal<$DLGITEM.STDMODE>20
#ACT
RECLAIMITEM
SendMsg6该物品无法进化
break
#if
equal<$DLGITEM.STDMODE>21
#ACT
RECLAIMITEM
SendMsg6该物品无法进化
break
#if
CheckItemNameColor-1243
#act
goto@装备进化进程
#ELSEACT
RECLAIMITEM
SendMsg6只有金色的装备才能进化成红色品质
[@装备进化进程]
#IF
CHECKGAMEDIAMOND<500
#ACT
RECLAIMITEM
SendMsg6每次进化需要500铜钱失败装备不会消失红色是最强品质
break
#if
random20
#act
goto@装备进化进程1
#ELSEACT
GAMEDIAMOND-500
SendMsg6进化装备失败铜钱减少500
SendMsg0【<$USERNAME>】进化装备【<$DLGITEM.NAME>】失败了属性不变.
RECLAIMITEM
[@装备进化进程1]
#if
equal<$DLGITEM.STDMODE>5
#ACT
movn$属性值8
movn$额外属性值0
movrN$属性位置03
goto@装备进化结果
break
#if
equal<$DLGITEM.STDMODE>6
#ACT
movn$属性值8
movn$额外属性值0
movrN$属性位置03
goto@装备进化结果
#ELSEACT
movn$属性值8
movn$额外属性值10
movrN$属性位置25
goto@装备进化结果
break
[@装备进化结果]
#act
GAMEDIAMOND-500
movrN$元素属性位置09
SetNewItemValue-1N$元素属性位置+5
CHANGEITEMADDVALUE-1N$属性位置+n$属性值
CHANGEITEMADDVALUE-10+n$额外属性值
CHANGEITEMADDVALUE-11+n$额外属性值
ChangeItemNameColor-1249
SendMsg0【<$USERNAME>】将装备【<$DLGITEM.NAME>】进化成了【红色最强品质】属性获得提升.
RECLAIMITEM
break

