传奇GM基地装备鉴定攻魔道随机增加失败后装备无变化

[@jianding]
{
　 　 　 　 　 　 　   <《装备成长》/AUTOCOLOR=93>\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=248>\

　<装备成长要求:/SCOLOR=250><装备必须有/SCOLOR=254> <[终极]/SCOLOR=253> <字样才可以来升级./SCOLOR=254>  \

　<装备成长费用:/SCOLOR=250><每次成长需要/SCOLOR=254> <[1万元宝]/SCOLOR=251>   \

　<装备成长几率:/SCOLOR=250><20%的成功率/SCOLOR=254> <[失败后装备无变化]/SCOLOR=251>  \

　<装备成长属性:/SCOLOR=250><攻魔道随机增加/SCOLOR=254> <[5-10点属性]/SCOLOR=251>  \  \

　　<√_立即进阶/@进阶>　　　　　　<看看而已/@EXIT>\

[@进阶]
#ACT
  OPENUPGRADEDLG 装备成长

[@UpgradeDlgItem]
#IF
  NOT CheckItemNameColor -1 253
#ACT
  MESSAGEBOX 只有紫色的装备，才能进行装备成长！
  RECLAIMITEM
  BREAK

#IF
  CHECKGAMEGOLD < 10000
#ACT
  MESSAGEBOX 每次成长需要10000元宝！
  RECLAIMITEM
  BREAK



#IF
;  RANDOM 20
#ACT
  GAMEGOLD - 10000
  MOVR N$属性点数 5 11
  ChangeItemNameColor -1 22
  CHANGEITEMNAME -1 <$DLGITEM.NAME>[终极]
#ELSEACT
  GAMEGOLD - 10000
  MESSAGEBOX 很遗憾，本次进阶失败！
  RECLAIMITEM
  BREAK

#OR
  EQUAL <$DLGITEM.STDMODE> 5
  EQUAL <$DLGITEM.STDMODE> 6
#ACT
  CHANGEITEMADDVALUE -1 0 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 1 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
;  SetNewItemValue -1 0 = 5
;  SetNewItemValue -1 1 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK
#OR
  EQUAL <$DLGITEM.STDMODE> 10
  EQUAL <$DLGITEM.STDMODE> 11
#ACT
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 3 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 4 + <$STR(N$属性点数)>
;  SetNewItemValue -1 2 = 5
;  SetNewItemValue -1 3 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK
#OR
  EQUAL <$DLGITEM.STDMODE> 19
  EQUAL <$DLGITEM.STDMODE> 20
  EQUAL <$DLGITEM.STDMODE> 21
#ACT
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 3 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 4 + <$STR(N$属性点数)>
;  SetNewItemValue -1 6 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK
#IF
  EQUAL <$DLGITEM.STDMODE> 15
#ACT
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 3 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 4 + <$STR(N$属性点数)>
;  SetNewItemValue -1 7 = 5
;  SetNewItemValue -1 8 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK
#OR
  EQUAL <$DLGITEM.STDMODE> 24
  EQUAL <$DLGITEM.STDMODE> 26
#ACT
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 3 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 4 + <$STR(N$属性点数)>
;  SetNewItemValue -1 4 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK
#OR
  EQUAL <$DLGITEM.STDMODE> 22
  EQUAL <$DLGITEM.STDMODE> 23
#ACT
  CHANGEITEMADDVALUE -1 2 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 3 + <$STR(N$属性点数)>
  CHANGEITEMADDVALUE -1 4 + <$STR(N$属性点数)>
;  SetNewItemValue -1 1 = 5
  MESSAGEBOX 恭喜，进阶成功！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  SENDMSG 0 恭喜，[<%s>]进阶[<$DLGITEM.NAME>]成功，攻、魔、道分别增加<$STR(N$属性点数)>点！
  RECLAIMITEM
  BREAK

}

版权声明

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

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

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

这个帖子不回对不起自己！

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

这个帖子不回对不起自己！

这个帖子不回对不起自己！

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

谢谢.脚本收到.很好用

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

很专业的很全面的gm论坛

感谢站长分享传奇脚本，让我学习到很多知识。