[GOM脚本] 传奇装备洗炼脚本

武器和衣服可进行洗炼，将要洗炼的装备放入框中，即可开始洗炼。

[@main]

#IF

#Act

OPENMERCHANTBIGDLG 81 70 1 4 0 -3 1 436 43

#say

\  <PLAYIMG:73:220:8:150:19:66>

\ \ \ \ \ \ \ \

\  <ITEMBOX:3:-1:161:210:15:52:47:5,10:250#放入已强化装备>\ \ \ \ \  

<>                                   <元宝：/SCOLOR=250><100000/SCOLOR=70> \

<>             <[元素洗炼说明]：/SCOLOR=146>                           <[元素洗炼说明]：/SCOLOR=146> \ \

<>         <将需要洗炼的装备放入框内，/SCOLOR=7>                    <可以洗炼元素的装备为“/SCOLOR=7>\

<>     <准备好足够的“/SCOLOR=7><元宝/SCOLOR=250><”即可开始为/SCOLOR=7>  <[开始洗炼]/@开始洗炼>  <武器，衣服”其他装备不/SCOLOR=7> \

<>     <装备洗练元素！/SCOLOR=7>                              <可洗炼.！/SCOLOR=7> <[元素洗炼范围]|

70#武器洗炼范围：^-^

250#暴击几率增加1%～25%^

250#增加攻击伤害1%～25%^

250#忽视目标防御1%～15%^-^

70#衣服洗炼范围：^-^

250#物理伤害减少1%～25%^

250#魔法伤害减少1%～25%^

250#人物体质增加1%～15%^-^

249#洗炼结果全部随机，洗炼好坏全部看脸./AUTOCOLOR=254,251,70,250,253,161,113>\

[@开始洗炼]

#IF

CHECKGAMEGOLD < 100000

#ACT

MESSAGEBOX 元宝不足“100000”枚，无法洗炼!

BREAK

#IF

EQUAL <$BOXITEM[3].STDMODE> 10

#ACT

GAMEGOLD - 100000

GOTO @洗炼衣服

BREAK

#IF

EQUAL <$BOXITEM[3].STDMODE> 5

#ACT

GAMEGOLD - 100000

GOTO @洗炼武器

BREAK

#IF

#ACT

GAMEGOLD - 100000

GOTO @洗炼首饰

BREAK

[@洗炼首饰]

#IF

#ACT

SetUpgradeItem 3

MOVR N$暴击洗炼范围 100

MOVR N$伤害洗炼范围 100

#IF

#ACT

MOVR N$暴击 2

#IF

SMALL N$暴击洗炼范围 10

#ACT

MOVR N$暴击 2 6

#IF

#ACT

MOVR N$伤害 2

#IF

SMALL N$伤害洗炼范围 10

#ACT

MOVR N$伤害 2 6

#IF

#ACT

SetNewItemValue -1 0 = <$STR(N$暴击)>

SetNewItemValue -1 1 = <$STR(N$伤害)>

UpDateBoxItem 3

GOTO @main

MESSAGEBOX 武器洗炼成功，暴击增加：<$STR(N$暴击)>%,伤害增加：<$STR(N$伤害)>%!

BREAK

[@洗炼衣服]

#IF

#ACT

SetUpgradeItem 3

MOVR N$物防洗炼范围 100

MOVR N$魔防洗炼范围 100

MOVR N$生命洗炼范围 100

#IF

#ACT

MOVR N$物防 6

#IF

SMALL N$物防洗炼范围 20

#ACT

MOVR N$物防 5 15

#IF

SMALL N$物防洗炼范围 3

#ACT

MOVR N$物防 10 21

#IF

#ACT

MOVR N$魔防 6

#IF

SMALL N$魔防洗炼范围 20

#ACT

MOVR N$魔防 5 15

#IF

SMALL N$魔防洗炼范围 3

#ACT

MOVR N$魔防 10 21

#IF

#ACT

MOVR N$生命 6

#IF

SMALL N$生命洗炼范围 20

#ACT

MOVR N$生命 5 11

#IF

SMALL N$生命洗炼范围 3

#ACT

MOVR N$生命 10 16

#IF

#ACT

SetNewItemValue -1 2 = <$STR(N$物防)>

SetNewItemValue -1 3 = <$STR(N$魔防)>

SetNewItemValue -1 7 = <$STR(N$生命)>

UpDateBoxItem 3

GOTO @main

MESSAGEBOX 衣服洗炼成功，物防增加：<$STR(N$物防)>%,魔防增加：<$STR(N$魔防)>%，体质增加：<$STR(N$生命)>%!

BREAK

[@洗炼武器]

#IF

#ACT

SetUpgradeItem 3

MOVR N$暴击洗炼范围 100

MOVR N$伤害洗炼范围 100

MOVR N$忽视洗炼范围 100

#IF

#ACT

MOVR N$暴击 6

#IF

SMALL N$暴击洗炼范围 20

#ACT

MOVR N$暴击 5 15

#IF

SMALL N$暴击洗炼范围 3

#ACT

MOVR N$暴击 10 21

#IF

#ACT

MOVR N$伤害 6

#IF

SMALL N$伤害洗炼范围 20

#ACT

MOVR N$伤害 5 15

#IF

SMALL N$伤害洗炼范围 3

#ACT

MOVR N$伤害 10 21

#IF

#ACT

MOVR N$忽视 6

#IF

SMALL N$忽视洗炼范围 20

#ACT

MOVR N$忽视 5 11

#IF

SMALL N$忽视洗炼范围 3

#ACT

MOVR N$忽视 10 16

#IF

#ACT

SetNewItemValue -1 0 = <$STR(N$暴击)>

SetNewItemValue -1 1 = <$STR(N$伤害)>

SetNewItemValue -1 4 = <$STR(N$忽视)>

UpDateBoxItem 3

GOTO @main

MESSAGEBOX 武器洗炼成功，暴击增加：<$STR(N$暴击)>%,伤害增加：<$STR(N$伤害)>%，忽视增加：<$STR(N$忽视)>%!

BREAK