[传奇脚本功能]专属之力洗炼剑甲随机随机属性脚本(Gom引擎)

[传奇脚本功能]专属之力洗炼剑甲随机随机属性脚本(Gom引擎)

[@main]
　\
　\
<剑甲洗炼第一次免费，后面每次收取2专属之力/FCOLOR=116>\
<武器随机增加1-5点暴击几率，攻击伤害，忽视防御元素。随机1-10点攻击速度/FCOLOR=116>\
<衣服随机增加1-10点物理伤害减少，魔法伤害减少元素/FCOLOR=116>\
<ITEMBOX:0:19:1768:180:130:0:0:5,10,11:放入剑甲装备>\　\　\　\　\　\
　　　　　　　　　　　  　<开始洗练/@xl>


[@xl]
#IF
equal <$BOXITEM[0].STDMODE> 5
#ACT
GOTO @武器洗练
#IF
equal <$BOXITEM[0].STDMODE> 10
#ACT
GOTO @衣服洗练

[@武器洗练]
#IF
#ACT
CHANGEITEMADDVALUE boxitem0 0 = 0
CHANGEITEMADDVALUE boxitem0 1 = 0
CHANGEITEMADDVALUE boxitem0 2 = 0
MOVR N$随机附加1 30 100
MOVR N$随机附加2 20 60
MOVR N$随机附加3 20 60
MUL N$随机附加1 <$BOXITEM[0].HDC>
MUL N$随机附加2 <$BOXITEM[0].HMC>
MUL N$随机附加3 <$BOXITEM[0].HSC>
DIV N$随机附加1 100
DIV N$随机附加2 100
DIV N$随机附加3 100

#IF
EQUAL <$BOXITEM[0].UPGRADECOUNT> 0
#ACT
MOVR S$暴击 0 5
MOVR S$速度 0 10
ChangeItemUpgradeCount boxitem0 = 9
SetNewItemValue boxitem0 0 = <$STR(S$暴击)>
SetNewItemValue boxitem0 1 = <$STR(S$暴击)>
SetNewItemValue boxitem0 4 = <$STR(S$暴击)>
CHANGEITEMADDVALUE boxitem0 6 = <$STR(S$速度)>
CHANGEITEMADDVALUE boxitem0 0 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 1 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 2 = <$STR(N$随机附加3)>
ReturnBoxItem 0
SENDMSG 6 装备洗练成功，快看看新属性吧！！！
BREAK

#IF
LARGE <$BOXITEM[0].UPGRADECOUNT> 0
LARGE U1 0
#ACT
MOVR S$暴击 0 5
MOVR S$速度 0 10
DEC U1 1
ChangeItemUpgradeCount boxitem0 = 9
SetNewItemValue boxitem0 0 = <$STR(S$暴击)>
SetNewItemValue boxitem0 1 = <$STR(S$暴击)>
SetNewItemValue boxitem0 4 = <$STR(S$暴击)>
CHANGEITEMADDVALUE boxitem0 6 = <$STR(S$速度)>
CHANGEITEMADDVALUE boxitem0 0 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 1 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 2 = <$STR(N$随机附加3)>
ReturnBoxItem 0
SENDMSG 6 装备洗练成功，快看看新属性吧！！！
#ELSEACT
SENDMSG 6 重复洗练需要一个专属之力！！！
BREAK


[@衣服洗练]
#IF
#ACT
CHANGEITEMADDVALUE boxitem0 0 = 0
CHANGEITEMADDVALUE boxitem0 1 = 0
CHANGEITEMADDVALUE boxitem0 2 = 0
CHANGEITEMADDVALUE boxitem0 3 = 0
CHANGEITEMADDVALUE boxitem0 4 = 0
MOVR N$随机附加1 30 100
MOVR N$随机附加2 5 30
MUL N$随机附加1 <$BOXITEM[0].HAC>
MUL N$随机附加2 <$BOXITEM[0].HDC>
DIV N$随机附加1 100
DIV N$随机附加2 100

#IF
EQUAL <$BOXITEM[0].UPGRADECOUNT> 0
#ACT
MOVR S$减免 2 10
ChangeItemUpgradeCount boxitem0 = 9
SetNewItemValue boxitem0 2 = <$STR(S$减免)>
SetNewItemValue boxitem0 3 = <$STR(S$减免)>
CHANGEITEMADDVALUE boxitem0 0 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 1 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 2 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 3 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 4 = <$STR(N$随机附加2)>
ReturnBoxItem 0
SENDMSG 6 装备洗练成功，快看看新属性吧！！！
BREAK

#IF
LARGE <$BOXITEM[0].UPGRADECOUNT> 0
LARGE U1 0
#ACT
MOVR S$减免 2 10
DEC U1 1
ChangeItemUpgradeCount boxitem0 = 9
SetNewItemValue boxitem0 2 = <$STR(S$减免)>
SetNewItemValue boxitem0 3 = <$STR(S$减免)>
CHANGEITEMADDVALUE boxitem0 0 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 1 = <$STR(N$随机附加1)>
CHANGEITEMADDVALUE boxitem0 2 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 3 = <$STR(N$随机附加2)>
CHANGEITEMADDVALUE boxitem0 4 = <$STR(N$随机附加2)>
ReturnBoxItem 0
SENDMSG 6 装备洗练成功，快看看新属性吧！！！
#ELSEACT
SENDMSG 6 重复洗练需要一个专属之力！！！
BREAK

版权声明

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

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

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

喜欢这里的东西，方便又好用！

楼主发贴辛苦了，谢谢楼主分享！感谢楼主提供这么好的论坛！

传奇论坛里面相对来说比较好的一个！

谢谢.脚本收到.很好用

谢谢楼主！

传奇论坛里面相对来说比较好的一个！

谢谢楼主！

谢谢.脚本收到.很好用

很专业的很全面的gm论坛