[@main]
#IF
#ACT
OPENMERCHANTBIGDLG 1 60 1 4 0 -85 1 312 4
#SAY
<PlayImg:1:70:10:100:55:10>\
<ITEMBOX:1:-1:4:129:40:76:76:19::253#请先放入需要改造的“项链”>\
<ImgEx:1:63:64:65:118:310|251#提升条件：
^13#------------------------
^250#[幸运+1] 所需： 200点卷
^250#[幸运+2] 所需： 400点卷
^250#[幸运+3] 所需： 800点卷
^250#[幸运+4] 所需：1500点卷
^250#[幸运+5] 所需：3000点卷/@幸运升级>\
\ \ \ \ \ \ \ \ \ \ \
\ \ \ \ \ \ \ \ \ \ \ \
<清除属性/@幸运清除> <(幸运返回+4,清除元素)/SCOLOR=249> <幸运转移/@项链幸运转移>\
[@幸运升级]
#IF
Not Equal <$BoxItem[1].STDMODE> 19
#Act
MessageBox [系统]：\ \ 请放入你要提升的项链！~
Break
#IF
Equal <$BoxItem[1].STDMODE> 19
#Elseact
Break
#IF
#Act
SetUpgradeItem 1
#IF
CheckItemAddValue -1 1 < 5
#Elseact
MessageBox [系统]：\ \ 你的项链已经幸运+5了！~
Break
#IF
CheckItemAddValue -1 1 = 0
#Act
Mov N$项链幸运点券 200
Mov N$项链幸运几率 99
#IF
CheckItemAddValue -1 1 = 1
#Act
Mov N$项链幸运点券 400
Mov N$项链幸运几率 70
#IF
CheckItemAddValue -1 1 = 2
#Act
Mov N$项链幸运点券 800
Mov N$项链幸运几率 50
#IF
CheckItemAddValue -1 1 = 3
#Act
Mov N$项链幸运点券 1500
Mov N$项链幸运几率 35
#IF
CheckItemAddValue -1 1 = 4
#Act
Mov N$项链幸运点券 3000
Mov N$项链幸运几率 20
#IF
CheckGameGird < <$Str(N$项链幸运点券)>
#Act
MessageBox [系统]：\ \ 点券不足！~
Break
#Elseact
GameGird - <$Str(N$项链幸运点券)>
Movr N$项链升级几率 0 100
#IF
Small N$项链升级几率 <$Str(N$项链幸运几率)>
#Act
CHANGEITEMADDVALUE -1 1 + 1
UpDateBoxItem 1
SendMsg 5 ぐ游戏提示：你的项链『<$BoxItem[1].Name>』提升幸运成功了『幸运增加1点』！
#Elseact
MessageBox [系统]：\ \ 升级失败！~
Break
#IF
CheckItemAddValue -1 1 = 5
#Act
Movr N$项链暴击 1 11
SetNewItemValue -1 0 = <$Str(N$项链暴击)>
ChanGeitemaddvaLue -1 9 = <$Str(N$项链暴击)>
UpDateBoxItem 1
;------------------------------------------------------------------------------------------------
[@项链幸运转移]
#IF
#ACT
OPENMERCHANTBIGDLG 1 61 1 4 0 -85 1 262 3
#say
\ \ \
<转移说明：满足幸运+5的项链才 能转移幸运/SCOLOR=87>\
<转移费用：白手转移/SCOLOR=87>\
<ITEMBOX:2:1:26:38:08:50:50:20,19:254#请放入有幸运的项链><ITEMBOX:3:1:27:145:08:50:50:20,19:251#请放入无幸运的项链>\
<Img:62:1:88:-25>\
<PlayImg:1:150:10:100:31:-31:1>
<PlayImg:1:150:10:100:124:-31:1>\
<ImgEx:1:66:67:68:100:20/@幸运转移>\
;------------------------------------------------------------------------------------------------
[@幸运转移]
#OR
Equal <$Boxitem[2].Name>
Equal <$Boxitem[3].Name>
#Act
MessageBox [系统]：\ \ 请放入你要转移的幸运项链！~
Break
#IF
#Act
Setupgradeitem 3
;#IF
;CheckItemAddValue -1 1 < 4
;#ACT
;MessageBox [系统]：\ \ 只能转移幸运+5的项链！
;break
#IF
Checkitemaddvalue -1 1 > 0
#Act
MessageBox [系统]：\ \ 请先清除被转移项链上的幸运属性！~
Break
#IF
#Act
Setupgradeitem 2
Getitemaddvalue -1 1 N$转移加工属性
Getitemaddvalue -1 9 N$转移加工元素
Changeitemaddvalue -1 1 = 0
Changeitemaddvalue -1 9 = 0
Setnewitemvalue -1 0 = 0
Setupgradeitem 3
Changeitemaddvalue -1 1 = <$Str(N$转移加工属性)>
Changeitemaddvalue -1 9 = <$Str(N$转移加工元素)>
SetNewItemValue -1 0 = <$str(N$转移加工元素)>
UpDateBoxItem 2
UpDateBoxItem 3
MessageBox [系统]：\ \ 项链幸运属性转移成功！~
Break
[@幸运清除]
#if
NOT CHECKBOXITEMCOUNT 1 1
#ACT
MESSAGEBOX 请放入需要清除的项链！
BREAK
#if
#ACT
SetUpgradeItem 1
#IF
CheckItemAddValue -1 1 < 5
#ACT
MESSAGEBOX 只能清除幸运+5的项链！
break
#IF
CheckItemAddValue -1 1 = 5
#ACT
CHANGEITEMADDVALUE -1 1 = 4
SetNewItemValue -1 0 = 0
UpDateBoxItem 1
BREAK
[@ItemIntoBox1]
#IF
NOT EQUAL <$BOXITEM[1].STDMODE> 19
#ACT
MESSAGEBOX 当前只能放入项链.
BREAK