GOM引擎添加装备成长教程，传奇私服一条龙攻魔道随机增加教程

[@main]
　　　　　　　　　　　<装备成长/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> \


<Ps:友情提示对自己装备属性不满意可以去特殊服务NPC那里重生装备/SCOLOR=21>\


[@进阶]
#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