GOM宝石镶嵌脚本左侧放入镶嵌宝石 右侧放入要镶嵌的装备

芝麻论坛

	[@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

我的小思想

	我也顶起出售广告位

cgx009

	路过 帮顶 嘿嘿