[@main]
#if
#Act
OPENMERCHANTBIGDLG 113 200 1 4 -30 -100 1 435 20
MOV N$加星成功率 20
MOV S$显示成功率 20
#say
<ITEMBOX:1:113:203:242:178:50:50:5,10,15,16,19,22,23,25,26,28,30,48,53,62,64,65,66:150#请投放需要加星的装备>
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<ImgEx:113:202:201:202:229:5/@开始加星>\ \ \ \ \ \
<> <强化说明/SCOLOR=210>: <所有装备都可以进行强化加星,每次收取1000魔域币!/SCOLOR=254>\
<> <强化说明/SCOLOR=210>: {最高可强化到15星,成功率为<$STR(S$显示成功率)>%,失败装备保留,只扣除魔域币!/SCOLOR=254}\ \
<> <强化属性/SCOLOR=103>: <每强化1次全属性提升1%,强化15星全属性提升15%!/SCOLOR=253>\
[@ItemIntoBox1]
#IF
EQUAL <$BOXITEM[1].UPGRADECOUNT> 150
#ACT
ReturnBoxItem 1
MESSAGEBOX \提示:您放入的装备已经满星了!
BREAK
[@开始加星]
#IF
CheckBoxItemCount 1 1
#ELSEACT
MESSAGEBOX \提示:请先投放装备再进行加星!
BREAK
#IF
CHECKGAMEGIRD < 1000
#ACT
MESSAGEBOX \提示:魔域币不够!
BREAK
#IF
CHECKGAMEGIRD ? 1000
CheckBoxItemCount 1 1
#ACT
GAMEGIRD - 1000
#ELSEACT
BREAK
#IF
RANDOM <$STR(N$加星成功率)>
#ACT
SetUpgradeItem 1
MOV N$加星属性百分比 <$BOXITEM[1].UPGRADECOUNT>
INC N$加星属性百分比 10
DIV N$加星属性百分比 10
ChangeItemUpgradeCount -1 + 10
CHANGECUSTOMITEMTEXT -1 强化[<$STR(N$加星属性百分比)>星]:
CHANGECUSTOMITEMTEXTCOLOR -1 254
CHANGECUSTOMITEMABIL -1 1 0 250
CHANGECUSTOMITEMABIL -1 1 1 1
CHANGECUSTOMITEMABIL -1 1 2 0
CHANGECUSTOMITEMABIL -1 1 3 1
CHANGECUSTOMITEMABIL -1 2 0 250
CHANGECUSTOMITEMABIL -1 2 1 2
CHANGECUSTOMITEMABIL -1 2 2 1
CHANGECUSTOMITEMABIL -1 2 3 1
CHANGECUSTOMITEMABIL -1 3 0 250
CHANGECUSTOMITEMABIL -1 3 1 3
CHANGECUSTOMITEMABIL -1 3 2 2
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 0 250
CHANGECUSTOMITEMABIL -1 4 1 4
CHANGECUSTOMITEMABIL -1 4 2 3
CHANGECUSTOMITEMABIL -1 4 3 1
CHANGECUSTOMITEMABIL -1 5 0 250
CHANGECUSTOMITEMABIL -1 5 1 5
CHANGECUSTOMITEMABIL -1 5 2 4
CHANGECUSTOMITEMABIL -1 5 3 1
CHANGECUSTOMITEMABIL -1 6 0 250
CHANGECUSTOMITEMABIL -1 6 1 6
CHANGECUSTOMITEMABIL -1 6 2 5
CHANGECUSTOMITEMABIL -1 6 3 1
CHANGECUSTOMITEMABIL -1 7 0 250
CHANGECUSTOMITEMABIL -1 7 1 7
CHANGECUSTOMITEMABIL -1 7 2 6
CHANGECUSTOMITEMABIL -1 7 3 1
CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 5 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 6 = <$STR(N$加星属性百分比)>
CHANGECUSTOMITEMVALUE -1 7 = <$STR(N$加星属性百分比)>
UpDateBoxItem 1
#ELSEACT
MESSAGEBOX \提示:加星失败!
BREAK
#IF
EQUAL N$加星属性百分比 15
#ACT
ReturnBoxItem 1
#IF
#ACT
MESSAGEBOX \提示:加星成功!
BREAK
|
[复制链接]
|Archiver|手机版|关于我们|会员加入|网站介绍|( 湘ICP备2021013222号-1 )
湘公网安备43052202000129号|网站地图
