如何写出完美支持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
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

版权声明

1、本站所有内容均由互联网收集整理、网友上传，仅供大家参考、学习研究使用，不存在任何商业目的与商业用途。

2、论坛的所有内容都不保证其准确性，完整性，有效性，因本站内容因误导等因素而造成的损失本站不承担连带责任。

3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则：为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，若有用户需要商用本站资源，请务必联系版权方购买正版授权！

秀起来~