装备强化加星及极品属性转移脚本实例(附补丁)

升级9级1]
#IF
equal N13 0
#ACT
mov N13 1
take 钢铁之魂 100
SetUpgradeItem 1
CHANGEITEMADDVALUE -1 <$STR(S$类型1)> = 1600
CHANGEITEMADDVALUE -1 <$STR(S$类型2)> = 1600
CHANGEITEMADDVALUE -1 <$STR(S$类型3)> = 1600
CHANGECUSTOMITEMTEXT -1 [强化+8]属性奖励：
CHANGECUSTOMITEMTEXTCOLOR -1 69
;-----文字颜色
CHANGECUSTOMITEMABIL -1 1 0 253
CHANGECUSTOMITEMABIL -1 2 0 253
CHANGECUSTOMITEMABIL -1 3 0 253
CHANGECUSTOMITEMABIL -1 4 0 253
CHANGECUSTOMITEMABIL -1 5 0 253
CHANGECUSTOMITEMABIL -1 6 0 253
;-----属性绑定
CHANGECUSTOMITEMABIL -1 1 1 1
CHANGECUSTOMITEMABIL -1 2 1 2
CHANGECUSTOMITEMABIL -1 3 1 3
CHANGECUSTOMITEMABIL -1 4 1 4
CHANGECUSTOMITEMABIL -1 5 1 5
CHANGECUSTOMITEMABIL -1 6 1 6

;-----属性位置
CHANGECUSTOMITEMABIL -1 1 2 1
CHANGECUSTOMITEMABIL -1 2 2 2
CHANGECUSTOMITEMABIL -1 3 2 3
CHANGECUSTOMITEMABIL -1 4 2 4
CHANGECUSTOMITEMABIL -1 5 2 5
CHANGECUSTOMITEMABIL -1 6 2 6

CHANGECUSTOMITEMABIL -1 1 3 1
CHANGECUSTOMITEMABIL -1 2 3 1
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 3 1
CHANGECUSTOMITEMABIL -1 5 3 1
CHANGECUSTOMITEMABIL -1 6 3 1

CHANGECUSTOMITEMVALUE -1 1 = 4
CHANGECUSTOMITEMVALUE -1 2 = 4
CHANGECUSTOMITEMVALUE -1 3 = 2
CHANGECUSTOMITEMVALUE -1 4 = 2
CHANGECUSTOMITEMVALUE -1 5 = 2
CHANGECUSTOMITEMVALUE -1 6 = 4
SetNewItemValue -1 0 = 3
SetNewItemValue -1 2 = 3
SetNewItemValue -1 3 = 3
CHANGEITEMUPGRADECOUNT -1 - 1
MESSAGEBOX 强化提示：\　\追求强大的属性是要付出代价的，你这次运气不好，将你的星级降为8级。
UpDateBoxItem 1
ReturnBoxItem 1
goto @main
break

#IF
RANDOM 2
#ACT
mov N13 0
goto @升级9级a
#elseact
take 钢铁之魂 100
SetUpgradeItem 1
CHANGEITEMADDVALUE -1 <$STR(S$类型1)> = 1600
CHANGEITEMADDVALUE -1 <$STR(S$类型2)> = 1600
CHANGEITEMADDVALUE -1 <$STR(S$类型3)> = 1600
CHANGECUSTOMITEMTEXT -1 [强化+8]属性奖励：
CHANGECUSTOMITEMTEXTCOLOR -1 69
;-----文字颜色
CHANGECUSTOMITEMABIL -1 1 0 253
CHANGECUSTOMITEMABIL -1 2 0 253
CHANGECUSTOMITEMABIL -1 3 0 253
CHANGECUSTOMITEMABIL -1 4 0 253
CHANGECUSTOMITEMABIL -1 5 0 253
CHANGECUSTOMITEMABIL -1 6 0 253
;-----属性绑定
CHANGECUSTOMITEMABIL -1 1 1 1
CHANGECUSTOMITEMABIL -1 2 1 2
CHANGECUSTOMITEMABIL -1 3 1 3
CHANGECUSTOMITEMABIL -1 4 1 4
CHANGECUSTOMITEMABIL -1 5 1 5
CHANGECUSTOMITEMABIL -1 6 1 6

;-----属性位置
CHANGECUSTOMITEMABIL -1 1 2 1
CHANGECUSTOMITEMABIL -1 2 2 2
CHANGECUSTOMITEMABIL -1 3 2 3
CHANGECUSTOMITEMABIL -1 4 2 4
CHANGECUSTOMITEMABIL -1 5 2 5
CHANGECUSTOMITEMABIL -1 6 2 6

CHANGECUSTOMITEMABIL -1 1 3 1
CHANGECUSTOMITEMABIL -1 2 3 1
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 3 1
CHANGECUSTOMITEMABIL -1 5 3 1
CHANGECUSTOMITEMABIL -1 6 3 1

CHANGECUSTOMITEMVALUE -1 1 = 4
CHANGECUSTOMITEMVALUE -1 2 = 4
CHANGECUSTOMITEMVALUE -1 3 = 2
CHANGECUSTOMITEMVALUE -1 4 = 2
CHANGECUSTOMITEMVALUE -1 5 = 2
CHANGECUSTOMITEMVALUE -1 6 = 4
SetNewItemValue -1 0 = 3
SetNewItemValue -1 2 = 3
SetNewItemValue -1 3 = 3
CHANGEITEMUPGRADECOUNT -1 - 1
MESSAGEBOX 强化提示：\　\追求强大的属性是要付出代价的，你这次运气不好，将你的星级降为8级。
UpDateBoxItem 1
ReturnBoxItem 1
goto @main

[@升级9级a]
#if
CHECKITEM 钢铁之魂 100
#act
take 钢铁之魂 100
SetUpgradeItem 1
CHANGEITEMADDVALUE -1 <$STR(S$类型1)> = 2500
CHANGEITEMADDVALUE -1 <$STR(S$类型2)> = 2500
CHANGEITEMADDVALUE -1 <$STR(S$类型3)> = 2500
CHANGECUSTOMITEMTEXT -1 [强化+10]属性奖励：
CHANGECUSTOMITEMTEXTCOLOR -1 69
;-----文字颜色
CHANGECUSTOMITEMABIL -1 1 0 253
CHANGECUSTOMITEMABIL -1 2 0 253
CHANGECUSTOMITEMABIL -1 3 0 253
CHANGECUSTOMITEMABIL -1 4 0 253
CHANGECUSTOMITEMABIL -1 5 0 253
CHANGECUSTOMITEMABIL -1 6 0 253
;-----属性绑定
CHANGECUSTOMITEMABIL -1 1 1 1
CHANGECUSTOMITEMABIL -1 2 1 2
CHANGECUSTOMITEMABIL -1 3 1 3
CHANGECUSTOMITEMABIL -1 4 1 4
CHANGECUSTOMITEMABIL -1 5 1 5
CHANGECUSTOMITEMABIL -1 6 1 6

;-----属性位置
CHANGECUSTOMITEMABIL -1 1 2 1
CHANGECUSTOMITEMABIL -1 2 2 2
CHANGECUSTOMITEMABIL -1 3 2 3
CHANGECUSTOMITEMABIL -1 4 2 4
CHANGECUSTOMITEMABIL -1 5 2 5
CHANGECUSTOMITEMABIL -1 6 2 6

CHANGECUSTOMITEMABIL -1 1 3 1
CHANGECUSTOMITEMABIL -1 2 3 1
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 3 1
CHANGECUSTOMITEMABIL -1 5 3 1
CHANGECUSTOMITEMABIL -1 6 3 1

CHANGECUSTOMITEMVALUE -1 1 = 7
CHANGECUSTOMITEMVALUE -1 2 = 7
CHANGECUSTOMITEMVALUE -1 3 = 4
CHANGECUSTOMITEMVALUE -1 4 = 4
CHANGECUSTOMITEMVALUE -1 5 = 4
CHANGECUSTOMITEMVALUE -1 6 = 7
SetNewItemValue -1 0 = 6
SetNewItemValue -1 2 = 6
SetNewItemValue -1 3 = 6
SetNewItemValue -1 4 = 2
CHANGEITEMUPGRADECOUNT -1 + 1
SENDMOVEMSG 0 253 255 50 1 玩家[<$USERNAME>]成功将【<$BOXITEM[1].NAME>】强化到10星，这是要屠杀的节奏吗？
UpDateBoxItem 1
ReturnBoxItem 1
goto @main
#ELSEACT
MESSAGEBOX 操作失败：\　\你的材料不足，无法强化！

[@升级10级]
#IF
CHECKITEM 钢铁之魂 100
#ACT
#ELSEACT
MESSAGEBOX 操作失败：\　\你的材料不足，无法强化！
break

#IF
CheckContainsText |5| |<$BOXITEM[1].STDMODE>|
#ACT