[@main]
\ \
<左侧放入镶嵌宝石 右侧放入要镶嵌的装备/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<每个装备可以镶嵌3颗宝石 每颗增加1点基础属性/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<镶嵌宝石可以在度神山庄和商铺获得/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \ \ \
<> <开始镶嵌/@开始镶嵌>\\
<ITEMBOX:0:11:47:82:-38:36:36:*:放入镶嵌石>\
<ITEMBOX:1:11:47:221:-54:36:36:*:放入需要镶嵌的装备>\
[@开始摘除]
#SAY
左侧放入攻击宝石 右侧放入要镶嵌的装备\ \
每个装备可以镶嵌3颗宝石 每颗增加0.15倍攻击\ \
使用摘除符可以摘除大部分宝石 镶嵌到别的装备去\ \
<> <开始摘除/@摘除1>\
<ITEMBOX:2:11:47:82:-18:36:36:*:放入拆除符>\
<ITEMBOX:3:11:47:221:-34:36:36:*:放入需要摘取宝石的装备>\
[@ItemIntoBox2]
#IF
NOT CheckContainsText <$BOXITEM[2].NAME_G> 拆除符
#ACT
ReturnBoxItem 2
MESSAGEBOX 你放入的不是拆除符，请重新放入。
break
[@ItemIntoBox3]
#ACT
SetUpgradeItem 3
#IF
CHECKSOCKETABLEITEMCOUNT -1 < 1
#ACT
ReturnBoxItem 3
MESSAGEBOX 此装备没有镶嵌过宝石，请换一件装备。
#IF
CHECKSOCKETABLEITEM -1 0 N$宝石1的IDX S$宝石1的名字
#IF
CHECKSOCKETABLEITEM -1 1 N$宝石2的IDX S$宝石2的名字
#IF
CHECKSOCKETABLEITEM -1 2 N$宝石3的IDX S$宝石3的名字
#IF
CHECKSOCKETABLEITEM -1 3 N$宝石4的IDX S$宝石4的名字
#IF
CHECKSOCKETABLEITEM -1 4 N$宝石5的IDX S$宝石5的名字
[@摘除1]
#ACT
SetUpgradeItem 3
#IF
EQUAL <$BOXITEM[2].NAME>
#ACT
MESSAGEBOX 没有放入拆除符，无法摘除镶嵌石。
break
#IF
EQUAL <$BOXITEM[3].NAME>
#ACT
MESSAGEBOX 错误，需要摘除宝石的装备为空，请放入装备后再来摘除。
break
#IF
CHECKSOCKETABLEITEMCOUNT -1 < 1
#ACT
ReturnBoxItem 3
MESSAGEBOX 此装备没有镶嵌过宝石，请换一件装备。
break
#IF
NOT CheckGold 100000
#ACT
MESSAGEBOX 金币不足10万，无法进行摘除操作。
break
#IF
CheckContainsText <$BOXITEM[2].NAME_G> 拆除符
CheckGold 100000
#ACT
SetUpgradeItem 3
SOCKETABLEITEM * * * * -1 0 * * 0 *
SOCKETABLEITEM * * * * -1 1 * * 0 *
SOCKETABLEITEM * * * * -1 2 * * 0 *
SOCKETABLEITEM * * * * -1 3 * * 0 *
SOCKETABLEITEM * * * * -1 4 * * 0 *
UpDateBoxItem 3
take 金币 100000
take 拆除符
give <$STR(S$宝石1的名字)> 1
give <$STR(S$宝石2的名字)> 1
give <$STR(S$宝石3的名字)> 1
MESSAGEBOX 宝石已成功取下,按F9查看包裹。
goto @ItemIntoBox3
break
[@ItemIntoBox0]
#IF
NOT CheckContainsText <$BOXITEM[0].NAME> 镶嵌宝石
#ACT
ReturnBoxItem 0
MESSAGEBOX 你放入的不是镶嵌宝石，请重新放入。
#IF
EQUAL <$BOXITEM[0].NAME> 镶嵌宝石
#ACT
MOV N$宝石变量 505
break
[@ItemIntoBox1]
#ACT
SetUpgradeItem 1
#IF
NOT CHECKDRILLHOLE -1 0
#ACT
ReturnBoxItem 1
MESSAGEBOX 此物没有打孔，宝石无法与其融合。
break
[@开始镶嵌]
#ACT
MOVR N$镶嵌几率 0 10
SetUpgradeItem 1
#IF
EQUAL <$BOXITEM[0].NAME>
#ACT
MESSAGEBOX 你没有放入镶嵌石.
break
#IF
EQUAL <$BOXITEM[1].NAME>
#ACT
MESSAGEBOX 你没有放入镶嵌的装备，镶嵌失败。
break
#IF
CHECKSOCKETABLEITEMCOUNT -1 > 2
#ACT
MESSAGEBOX 此装备可容纳宝石的孔槽已满。
break
#IF
NOT CheckGold 50000
#ACT
MESSAGEBOX 金币不足\每次镶嵌需要5万的金币。
break
#IF
NOT CHECKDRILLHOLE -1 1
CHECKSOCKETABLEITEMCOUNT -1 = 1
#ACT
ReturnBoxItem 1
MESSAGEBOX 此装备已经没有更多的孔槽去容纳宝石，镶嵌失败。
break
#IF
NOT CHECKDRILLHOLE -1 2
CHECKSOCKETABLEITEMCOUNT -1 = 2
#ACT
ReturnBoxItem 1
MESSAGEBOX 此装备已经没有更多的孔槽去容纳宝石，镶嵌失败。
break
#IF
NOT CHECKDRILLHOLE -1 3
CHECKSOCKETABLEITEMCOUNT -1 = 3
#ACT
ReturnBoxItem 1
MESSAGEBOX 此装备已经没有更多的孔槽去容纳宝石，镶嵌失败。
break
#IF
NOT CHECKDRILLHOLE -1 4
CHECKSOCKETABLEITEMCOUNT -1 = 4
#ACT
ReturnBoxItem 1
MESSAGEBOX 此装备已经没有更多的孔槽去容纳宝石，镶嵌失败。
break
#IF
CHECKDRILLHOLE -1 0
CHECKSOCKETABLEITEMCOUNT -1 = 0
#ACT
Take 金币 50000
goto @镶嵌进行1
break
#IF
CHECKDRILLHOLE -1 1
CHECKSOCKETABLEITEMCOUNT -1 = 1
#ACT
Take 金币 50000
goto @镶嵌进行2
break
#IF
CHECKDRILLHOLE -1 2
CHECKSOCKETABLEITEMCOUNT -1 = 2
#ACT
Take 金币 50000
goto @镶嵌进行3
break
[@镶嵌进行1]
#ACT
SetUpgradeItem 1
#IF
Small N$镶嵌几率 7
#ACT
take <$BOXITEM[0].NAME> 1
SOCKETABLEITEM * * * * -1 0 * * <$STR(N$宝石变量)> *
MESSAGEBOX 恭喜镶嵌成功！\镶嵌一号个宝石的几率为80%\“<$BOXITEM[0].NAME>”已融合到“<$BOXITEM[1].NAME>”\的一号个孔槽内。
UpDateBoxItem 1
break
#IF
Large N$镶嵌几率 7
#ACT
take <$BOXITEM[0].NAME> 1
MESSAGEBOX 镶嵌失败！宝石已碎裂\镶嵌一号个宝石的几率为80%\很遗憾，这20%的几率居然让你给碰到了。
break
[@镶嵌进行2]
#ACT
SetUpgradeItem 1
#IF
Small N$镶嵌几率 5
#ACT
take <$BOXITEM[0].NAME> 1
SOCKETABLEITEM * * * * -1 1 * * <$STR(N$宝石变量)> *
MESSAGEBOX 恭喜镶嵌成功！\镶嵌第二个宝石的几率为70%\“<$BOXITEM[0].NAME>”已融合到“<$BOXITEM[1].NAME>”\的第二个孔槽内。
UpDateBoxItem 1
break
#IF
Large N$镶嵌几率 4
#ACT
take <$BOXITEM[0].NAME> 1
MESSAGEBOX 镶嵌失败！宝石已碎裂\镶嵌第二个宝石的几率为70%\很遗憾，这30%的几率居然让你给碰到了。
break
[@镶嵌进行3]
#ACT
SetUpgradeItem 1
#IF
Small N$镶嵌几率 4
#ACT
take <$BOXITEM[0].NAME> 1
SOCKETABLEITEM * * * * -1 2 * * <$STR(N$宝石变量)> *
MESSAGEBOX 恭喜镶嵌成功！\镶嵌第三个宝石的几率为40%\“<$BOXITEM[0].NAME>”已融合到“<$BOXITEM[1].NAME>”\的第三个孔槽内。
UpDateBoxItem 1
break
#IF
Large N$镶嵌几率 3
#ACT
take <$BOXITEM[0].NAME> 1
MESSAGEBOX 镶嵌失败！宝石已碎裂\镶嵌第三个宝石的几率为40%\很遗憾，继续努力吧。
break
[@镶嵌进行4]
#ACT
SetUpgradeItem 1
#IF
Small N$镶嵌几率 2
#ACT
take <$BOXITEM[0].NAME> 1
SOCKETABLEITEM * * * * -1 3 * * <$STR(N$宝石变量)> *
MESSAGEBOX 恭喜镶嵌成功！\镶嵌第四个宝石的几率为15%\“<$BOXITEM[0].NAME>”已融合到“<$BOXITEM[1].NAME>”\的第四个孔槽内。
UpDateBoxItem 1
break
#IF
Large N$镶嵌几率 1
#ACT
take <$BOXITEM[0].NAME> 1
MESSAGEBOX 镶嵌失败！宝石已碎裂\镶嵌第四个宝石的几率为15%\很遗憾，继续努力吧。
break
[@镶嵌进行5]
#ACT
SetUpgradeItem 1
#IF
Small N$镶嵌几率 1
#ACT
take <$BOXITEM[0].NAME> 1
SOCKETABLEITEM * * * * -1 4 * * <$STR(N$宝石变量)> *
MESSAGEBOX 恭喜镶嵌成功！\镶嵌第五个宝石的几率为5%\“<$BOXITEM[0].NAME>”已融合到“<$BOXITEM[1].NAME>”\的第五个孔槽内。
UpDateBoxItem 1
break
#IF
Large N$镶嵌几率 0
#ACT
take <$BOXITEM[0].NAME> 1
MESSAGEBOX 镶嵌失败！宝石已碎裂\镶嵌第五个宝石的几率为5%\很遗憾，还有机会的，继续努力吧。
break