64GM论坛 › 传奇技术脚本 › 装备重铸脚本-装备品级都是随机重铸！等于重新鉴定装备

焦娅芹 发表于 2023-8-7 12:56:34

装备重铸脚本-装备品级都是随机重铸！等于重新鉴定装备

[@main]
#ACT
OPENMERCHANTBIGDLG 2 17 0 0 1 1 1 398 3
#SAY

\                         <装备重铸/SCOLOR=154> \   

\ <说明:/SCOLOR=249><装备鉴定[重铸],可以重铸处你喜欢的属性！/SCOLOR=145> \
\ <说明:/SCOLOR=249><装备品级都是随机重铸！等于重新鉴定装备！/SCOLOR=145> \\

\            <ITEMBOX:1:20:60:60:10:76:76:*:254#请放入重新鉴定装备>\ \ \ \\\ \

\　                         <开始鉴定/@鉴定> 　      \      

\ <提示:/SCOLOR=249><每重铸一次需要：3个装备重铸石/SCOLOR=154> \\ \\


[@鉴定]
#IF
checkItem 装备重铸石 3
#ACT
GOTO @准备鉴定
#elseact
MESSAGEBOX 错误提示：请检查背包里[装备重铸石]是否足够！
break


[@准备鉴定]
#IF
Equal <$BOXITEM.STDMODE> 5
#ACT
SetUpgradeItem 1
take 装备重铸石 3
GOTO @武器鉴定
break

#OR
Equal <$BOXITEM.STDMODE> 10
Equal <$BOXITEM.STDMODE> 11
#ACT
SetUpgradeItem 1
take 装备重铸石 3
GOTO @衣服鉴定
break

#IF
Equal <$BOXITEM.STDMODE> 19
#ACT
SetUpgradeItem 1
take 装备重铸石 3
GOTO @项链鉴定
break

#OR
Equal <$BOXITEM.STDMODE> 24
Equal <$BOXITEM.STDMODE> 26
Equal <$BOXITEM.STDMODE> 22
Equal <$BOXITEM.STDMODE> 23
Equal <$BOXITEM.STDMODE> 62
Equal <$BOXITEM.STDMODE> 64
Equal <$BOXITEM.STDMODE> 15
#ACT
SetUpgradeItem 1
take 装备重铸石 3
GOTO @首饰鉴定
break
#elseact
ReturnBoxItem 1
MESSAGEBOX 错误提示：当前物品不能鉴定\　\1、该物品服务器禁止鉴定。
break

[@首饰鉴定]
#ACT
movr D1 1 15

#IF
small D1 6
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 255
CHANGECUSTOMITEMTEXT -1 装备鉴定：凡品
SetNewItemValue -1 1 = 1
SetNewItemValue -1 4 = 1
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 5
small D1 11
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 218
CHANGECUSTOMITEMTEXT -1 装备鉴定：上品
SetNewItemValue -1 1 = 3
SetNewItemValue -1 4 = 3
UpDateBoxItem 1
ReturnBoxItem 1
break


#IF
large D1 9
small D1 14
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 253
CHANGECUSTOMITEMTEXT -1 装备鉴定：极品
SetNewItemValue -1 1 = 5
SetNewItemValue -1 4 = 5
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 13
small D1 16
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 1 = 8
SetNewItemValue -1 4 = 8
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break



[@项链鉴定]
#ACT
movr D1 1 15

#IF
small D1 6
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 255
CHANGECUSTOMITEMTEXT -1 装备鉴定：凡品
SetNewItemValue -1 1 = 1
SetNewItemValue -1 7 = 1
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 5
small D1 11
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 218
CHANGECUSTOMITEMTEXT -1 装备鉴定：上品
SetNewItemValue -1 1 = 3
SetNewItemValue -1 7 = 3
UpDateBoxItem 1
ReturnBoxItem 1
break


#IF
large D1 9
small D1 14
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 253
CHANGECUSTOMITEMTEXT -1 装备鉴定：极品
SetNewItemValue -1 1 = 5
SetNewItemValue -1 7 = 5
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 13
small D1 16
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 1 = 8
SetNewItemValue -1 7 = 8
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break





[@衣服鉴定]
#ACT
movr D1 1 15

#IF
small D1 6
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 255
CHANGECUSTOMITEMTEXT -1 装备鉴定：凡品
SetNewItemValue -1 2 = 3
SetNewItemValue -1 3 = 3
SetNewItemValue -1 7 = 3
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 5
small D1 10
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 218
CHANGECUSTOMITEMTEXT -1 装备鉴定：上品
SetNewItemValue -1 2 = 5
SetNewItemValue -1 3 = 5
SetNewItemValue -1 7 = 5
UpDateBoxItem 1
ReturnBoxItem 1
break


#IF
large D1 9
small D1 13
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 253
CHANGECUSTOMITEMTEXT -1 装备鉴定：极品
SetNewItemValue -1 2 = 7
SetNewItemValue -1 3 = 7
SetNewItemValue -1 7 = 7
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 12
small D1 15
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 2 = 8
SetNewItemValue -1 3 = 10
SetNewItemValue -1 7 = 10
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break

#IF
EQUAL D1 15
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 2 = 10
SetNewItemValue -1 3 = 10
SetNewItemValue -1 7 = 10
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break


[@武器鉴定]
#ACT
movr D1 1 15


#IF
small D1 6
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 255
CHANGECUSTOMITEMTEXT -1 装备鉴定：凡品
SetNewItemValue -1 0 = 3
SetNewItemValue -1 1 = 3
SetNewItemValue -1 4 = 3
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 5
small D1 10
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 218
CHANGECUSTOMITEMTEXT -1 装备鉴定：上品
SetNewItemValue -1 0 = 5
SetNewItemValue -1 1 = 5
SetNewItemValue -1 4 = 5
UpDateBoxItem 1
ReturnBoxItem 1
break


#IF
large D1 9
small D1 13
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 253
CHANGECUSTOMITEMTEXT -1 装备鉴定：极品
SetNewItemValue -1 0 = 7
SetNewItemValue -1 1 = 7
SetNewItemValue -1 4 = 7
UpDateBoxItem 1
ReturnBoxItem 1
break

#IF
large D1 12
small D1 15
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 0 = 8
SetNewItemValue -1 1 = 10
SetNewItemValue -1 4 = 10
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break

#IF
EQUAL D1 15
#ACT
CHANGECUSTOMITEMTEXTCOLOR -1 70
CHANGECUSTOMITEMTEXT -1 装备鉴定：完美
SetNewItemValue -1 0 = 10
SetNewItemValue -1 1 = 10
SetNewItemValue -1 4 = 10
UpDateBoxItem 1
ReturnBoxItem 1
GuildNoticeMsg 250 253 玩家『%s』重新鉴定出一件极品金色品质装备！大幅提升！可喜可贺！
break

道盾合击 发表于 2023-11-20 18:16:58

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

青龙传说 发表于 2023-11-20 21:08:46

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

雄霸屠龙 发表于 2023-11-21 01:26:19

下次在来看脚本

硬汉归来 发表于 2023-11-21 07:06:35

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

７６合击 发表于 2023-11-21 12:04:21

很专业的很全面的gm论坛

帝尊大陆 发表于 2023-11-21 15:36:29

谢谢.脚本收到.很好用

万劫连击 发表于 2023-11-21 16:36:44

比较全的传奇脚本分享网站，站长辛苦了。

牛家村专属 发表于 2023-11-21 19:23:38

谢谢.脚本收到.很好用

红牛迷失 发表于 2023-11-21 23:03:38

谢谢楼主！

查看完整版本: 装备重铸脚本-装备品级都是随机重铸！等于重新鉴定装备