装备鉴定攻魔道随机增加失败后装备无变化处理

admin · 发表于 2018-4-19 09:29:29

[@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
}

复制代码

[传奇脚本] 装备鉴定攻魔道随机增加失败后装备无变化处理

浏览过的版块

最佳新人

活跃会员

热心会员

推广达人

宣传达人

灌水之王

突出贡献

优秀版主