传奇新服装备鉴定脚本：完美重铸凡品到玩美品质

在传奇新服务器中，装备鉴定是一项重要的任务，可以提高装备的品质和属性。以下是一个装备鉴定的脚本，包括重铸凡品、上品、极品和玩美品质：

鉴定脚本概述：

功能：通过消耗装备重铸石重铸装备，每次重铸可以提高装备的品质。

格式：使用特定的命令和条件判断来执行重铸操作。

说明：每次重铸需要消耗3个装备重铸石，重铸成功后，装备的品质会相应提高。

重铸脚本示例：

[@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[1].STDMODE> 5

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @武器鉴定

break

#OR

Equal <$BOXITEM[1].STDMODE> 10

Equal <$BOXITEM[1].STDMODE> 11

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @衣服鉴定

break

#IF

Equal <$BOXITEM[1].STDMODE> 19

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @项链鉴定

break

#OR

Equal <$BOXITEM[1].STDMODE> 24

Equal <$BOXITEM[1].STDMODE> 26

Equal <$BOXITEM[1].STDMODE> 22

Equal <$BOXITEM[1].STDMODE> 23

Equal <$BOXITEM[1].STDMODE> 62

Equal <$BOXITEM[1].STDMODE> 64

Equal <$BOXITEM[1].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

注意事项：

每次重铸都需要检查玩家是否满足重铸条件，包括装备重铸石的数量。

重铸成功后，会移除相应数量的装备重铸石，并更新装备的品质和属性。

重铸时，需要判断装备的类型，并执行相应的重铸操作。

完整脚本：

[@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[1].STDMODE> 5

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @武器鉴定

break

#OR

Equal <$BOXITEM[1].STDMODE> 10

Equal <$BOXITEM[1].STDMODE> 11

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @衣服鉴定

break

#IF

Equal <$BOXITEM[1].STDMODE> 19

#ACT

SetUpgradeItem 1

take 装备重铸石 3

GOTO @项链鉴定

break

#OR

Equal <$BOXITEM[1].STDMODE> 24

Equal <$BOXITEM[1].STDMODE> 26

Equal <$BOXITEM[1].STDMODE> 22

Equal <$BOXITEM[1].STDMODE> 23

Equal <$BOXITEM[1].STDMODE> 62

Equal <$BOXITEM[1].STDMODE> 64

Equal <$BOXITEM[1].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