装备成长鉴定脚本,20%的成功率[失败后装备无变化

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

 <装备成长要求:/SCOLOR=250><装备必须是/SCOLOR=254> <紫色/SCOLOR=253> <才可以来升级./SCOLOR=254> \

 <装备成长费用:/SCOLOR=250><每次成长需要/SCOLOR=254> <[100火龙币+鉴定石*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
CHECKGameDiamond < 100 #ACT MESSAGEBOX 每次成长需要100火龙币! RECLAIMITEM BREAK #IF CHECKITEM 鉴定石 1 #ACT goto @开始吧 #ELSEACT MESSAGEBOX 没有鉴定石,无法鉴定! RECLAIMITEM BREAK [@开始吧] #IF RANDOM 20 #ACT take 鉴定石 1 GameDiamond - 100 MOVR N$属性点数 5 11 ;ChangeItemNameColor -1 22 CHANGEITEMNAME -1 <$DLGITEM.NAME>[终极]
#ELSEACT
take 鉴定石 1
GameDiamond – 100
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. 如果你也有好服务端或者教程,可以到审核区发布,分享有金币奖励和额外收入!
4. 本站提供的版本、模板、素材等等其他资源,都不包含技术服务请大家谅解!
5. 如有链接无法下载、失效或广告,请联系管理员处理!
6. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需!
7. 如遇到加密压缩包,默认解压密码为"gmbbz.com",如遇到无法解压的请联系管理员!
GM版本站 » 装备成长鉴定脚本,20%的成功率[失败后装备无变化

发表评论