[@main]
#SAY <Img:507:8:0:-14/@main> <Img:508:8:0:-14/@转移> <ITEMBOX:1:-1:-1:222:65:36:36:*:放入丹火> <ITEMBOX:2:-1:-1:221:159:36:36:*:放入需要拆卸熔炼石的装备> #ACT OPENMERCHANTBIGDLG 8 505 1 4 0 0 1 495 10 break [@ItemIntoBox1] #IF NOT CheckContainsText <$BOXITEM[1].NAME_G> 丹火 #ACT ReturnBoxItem 1 MESSAGEBOX 你放入的不是丹火，请重新放入。 break [@ItemIntoBox2] #ACT SetUpgradeItem 2 #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 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的名字 #IF #SAY <Img:<$STR(N$宝石1的IDX)>:73:87:142|^装备:<$BOXITEM[2].NAME>^孔槽①:<$STR(S$宝石1的名字)>^ ^251#拆卸熔炼石所需金币10万^251#左键点击此熔炼石可进行拆卸操作/@拆卸1> <Img:<$STR(N$宝石2的IDX)>:73:124:142|^装备:<$BOXITEM[2].NAME>^孔槽②:<$STR(S$宝石2的名字)>^ ^251#拆卸熔炼石所需金币10万^251#左键点击此熔炼石可进行拆卸操作/@拆卸2> <Img:<$STR(N$宝石3的IDX)>:73:159:142|^装备:<$BOXITEM[2].NAME>^孔槽③:<$STR(S$宝石3的名字)>^ ^251#拆卸熔炼石所需金币10万^251#左键点击此熔炼石可进行拆卸操作/@拆卸3> <Img:<$STR(N$宝石4的IDX)>:73:193:142|^装备:<$BOXITEM[2].NAME>^孔槽④:<$STR(S$宝石4的名字)>^ ^251#拆卸熔炼石所需金币10万^251#左键点击此熔炼石可进行拆卸操作/@拆卸4> <Img:<$STR(N$宝石5的IDX)>:73:229:142|^装备:<$BOXITEM[2].NAME>^孔槽⑤:<$STR(S$宝石5的名字)>^ ^251#拆卸熔炼石所需金币10万^251#左键点击此熔炼石可进行拆卸操作/@拆卸5> <ITEMBOX:1:-1:-1:222:65:36:36:*:放入丹火> <ITEMBOX:2:-1:-1:221:159:36:36:*:放入需要拆卸熔炼石的装备> <Img:507:8:0:-62/@main> <Img:508:8:0:-62/@转移> #ACT OPENMERCHANTBIGDLG 8 505 1 4 0 0 1 495 10 break [@拆卸1] #ACT SetUpgradeItem 2 #IF EQUAL <$BOXITEM[1].NAME> #ACT MESSAGEBOX 没有放入丹火，无法拆卸熔炼石。 break #IF EQUAL <$BOXITEM[2].NAME> #ACT MESSAGEBOX 错误，需要拆卸熔炼石的装备为空，请放入装备后再来拆卸。 break #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 MESSAGEBOX 此装备没有熔炼过宝石，请换一件装备。 break #IF NOT CheckGold 100000 #ACT MESSAGEBOX 金币不足10万，无法进行拆卸操作。 break #IF Equal N$宝石1的IDX 0 #ACT MESSAGEBOX 此位置没有宝石。 break #IF CheckContainsText <$BOXITEM[1].NAME_G> 丹火 CheckGold 100000 #ACT SetUpgradeItem 2 SOCKETABLEITEM * * * * -1 0 * * 0 * UpDateBoxItem 2 take 金币 100000 take 丹火 give <$STR(S$宝石1的名字)> 1 MESSAGEBOX 宝石已成功取下,按F9查看包裹。 goto @ItemIntoBox2 break [@拆卸2] #ACT SetUpgradeItem 2 #IF EQUAL <$BOXITEM[1].NAME> #ACT MESSAGEBOX 没有放入丹火，无法拆卸熔炼石。 break #IF EQUAL <$BOXITEM[2].NAME> #ACT MESSAGEBOX 错误，需要拆卸熔炼石的装备为空，请放入装备后再来拆卸。 break #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 MESSAGEBOX 此装备没有熔炼过宝石，请换一件装备。 break #IF NOT CheckGold 100000 #ACT MESSAGEBOX 金币不足10万，无法进行拆卸操作。 break #IF Equal N$宝石2的IDX 0 #ACT MESSAGEBOX 此位置没有宝石。 break #IF CheckContainsText <$BOXITEM[1].NAME_G> 丹火 CheckGold 100000 #ACT SetUpgradeItem 2 SOCKETABLEITEM * * * * -1 1 * * 0 * UpDateBoxItem 2 take 金币 100000 take 丹火 give <$STR(S$宝石2的名字)> 1 MESSAGEBOX 宝石已成功取下,按F9查看包裹。 goto @ItemIntoBox2 break [@拆卸3] #ACT SetUpgradeItem 2 #IF EQUAL <$BOXITEM[1].NAME> #ACT MESSAGEBOX 没有放入丹火，无法拆卸熔炼石。 break #IF EQUAL <$BOXITEM[2].NAME> #ACT MESSAGEBOX 错误，需要拆卸熔炼石的装备为空，请放入装备后再来拆卸。 break #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 MESSAGEBOX 此装备没有熔炼过宝石，请换一件装备。 break #IF NOT CheckGold 100000 #ACT MESSAGEBOX 金币不足10万，无法进行拆卸操作。 break #IF Equal N$宝石3的IDX 0 #ACT MESSAGEBOX 此位置没有宝石。 break #IF CheckContainsText <$BOXITEM[1].NAME_G> 丹火 CheckGold 100000 #ACT SetUpgradeItem 2 SOCKETABLEITEM * * * * -1 2 * * 0 * UpDateBoxItem 2 take 金币 100000 take 丹火 give <$STR(S$宝石3的名字)> 1 MESSAGEBOX 宝石已成功取下,按F9查看包裹。 goto @ItemIntoBox2 break [@拆卸4] #ACT SetUpgradeItem 2 #IF EQUAL <$BOXITEM[1].NAME> #ACT MESSAGEBOX 没有放入丹火，无法拆卸熔炼石。 break #IF EQUAL <$BOXITEM[2].NAME> #ACT MESSAGEBOX 错误，需要拆卸熔炼石的装备为空，请放入装备后再来拆卸。 break #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 MESSAGEBOX 此装备没有熔炼过宝石，请换一件装备。 break #IF NOT CheckGold 100000 #ACT MESSAGEBOX 金币不足10万，无法进行拆卸操作。 break #IF Equal N$宝石4的IDX 0 #ACT MESSAGEBOX 此位置没有宝石。 break #IF CheckContainsText <$BOXITEM[1].NAME_G> 丹火 CheckGold 100000 #ACT SetUpgradeItem 2 SOCKETABLEITEM * * * * -1 3 * * 0 * UpDateBoxItem 2 take 金币 100000 take 丹火 give <$STR(S$宝石4的名字)> 1 MESSAGEBOX 宝石已成功取下,按F9查看包裹。 goto @ItemIntoBox2 break [@拆卸5] #ACT SetUpgradeItem 2 #IF EQUAL <$BOXITEM[1].NAME> #ACT MESSAGEBOX 没有放入丹火，无法拆卸熔炼石。 break #IF EQUAL <$BOXITEM[2].NAME> #ACT MESSAGEBOX 错误，需要拆卸熔炼石的装备为空，请放入装备后再来拆卸。 break #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 2 MESSAGEBOX 此装备没有熔炼过宝石，请换一件装备。 break #IF NOT CheckGold 100000 #ACT MESSAGEBOX 金币不足10万，无法进行拆卸操作。 break #IF Equal N$宝石5的IDX 0 #ACT MESSAGEBOX 此位置没有宝石。 break #IF CheckContainsText <$BOXITEM[1].NAME_G> 丹火 CheckGold 100000 #ACT SetUpgradeItem 2 SOCKETABLEITEM * * * * -1 4 * * 0 * UpDateBoxItem 2 take 金币 100000 take 丹火 give <$STR(S$宝石5的名字)> 1 MESSAGEBOX 宝石已成功取下,按F9查看包裹。 goto @ItemIntoBox2 break [@转移] #SAY <Img:507:8:0:-14/@main> <Img:508:8:0:-14/@转移> <ITEMBOX:3:-1:-1:218:65:36:36:*:放入需要转移熔炼石的装备> <ITEMBOX:4:-1:-1:218:191:36:36:*:放入熔炼石转入的装备> <Img:510:8:195:100/@判断转移> #ACT OPENMERCHANTBIGDLG 8 509 1 4 0 0 1 495 10 break [@ItemIntoBox3] #ACT SetUpgradeItem 3 #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 3 MESSAGEBOX 此装备没有熔炼石，请放入其他装备。 break [@ItemIntoBox4] #ACT SetUpgradeItem 4 #IF CHECKSOCKETABLEITEMCOUNT -1 > 0 #ACT ReturnBoxItem 4 MESSAGEBOX 此装备已有熔炼石，不能转入。 break #IF NOT CHECKDRILLHOLE -1 4 #ACT ReturnBoxItem 4 MESSAGEBOX 必须开满5个孔槽，才可进行转移操作。 break [@判断转移] #IF EQUAL <$BOXITEM[3].NAME> #ACT MESSAGEBOX 放入拥有熔炼石的装备才能进行转移操作。 break #IF EQUAL <$BOXITEM[4].NAME> #ACT MESSAGEBOX 宝石转移必须要放进转入的装备才行。 break #IF CheckGameGold < 4999 #ACT MESSAGEBOX 你的仙玉小于5000，不能进行宝石转移操作。 break #IF #ACT SetUpgradeItem 3 #IF CHECKSOCKETABLEITEMCOUNT -1 < 1 #ACT ReturnBoxItem 3 MESSAGEBOX 此装备没有熔炼石，请放入其他装备。 break #IF #ACT SetUpgradeItem 4 #IF CHECKSOCKETABLEITEMCOUNT -1 > 0 #ACT ReturnBoxItem 4 MESSAGEBOX 此装备已有熔炼石，不能转入。 break #IF CheckGameGold > 4999 #ACT MOVR N$转移成功几率 0 4 GameGold – 5000 goto @开始转移1 break [@开始转移1] #ACT SetUpgradeItem 3 #IF CHECKSOCKETABLEITEM -1 0 N$宝石1的IDX S$宝石1的名字 Equal N$转移成功几率 3 #ACT SetUpgradeItem 4 SOCKETABLEITEM * * * * -1 0 * * <$STR(N$宝石1的IDX)> * UpDateBoxItem 4 SetUpgradeItem 3 SOCKETABLEITEM * * * * -1 0 * * 0 * UpDateBoxItem 3 MESSAGEBOX 宝石转移成功。 #IF CHECKSOCKETABLEITEM -1 0 N$宝石1的IDX S$宝石1的名字 NOT Equal N$转移成功几率 3 #ACT MESSAGEBOX 宝石转移失败。 #IF CHECKSOCKETABLEITEM -1 1 N$宝石2的IDX S$宝石2的名字 Equal N$转移成功几率 3 #ACT SetUpgradeItem 4 SOCKETABLEITEM * * * * -1 1 * * <$STR(N$宝石2的IDX)> * UpDateBoxItem 4 SetUpgradeItem 3 SOCKETABLEITEM * * * * -1 1 * * 0 * UpDateBoxItem 3 MESSAGEBOX 宝石转移成功。 #IF CHECKSOCKETABLEITEM -1 1 N$宝石2的IDX S$宝石2的名字 NOT Equal N$转移成功几率 3 #ACT MESSAGEBOX 宝石转移失败。 #IF CHECKSOCKETABLEITEM -1 2 N$宝石3的IDX S$宝石3的名字 Equal N$转移成功几率 3 #ACT SetUpgradeItem 4 SOCKETABLEITEM * * * * -1 2 * * <$STR(N$宝石3的IDX)> * UpDateBoxItem 4 SetUpgradeItem 3 SOCKETABLEITEM * * * * -1 2 * * 0 * UpDateBoxItem 3 MESSAGEBOX 宝石转移成功。 #IF CHECKSOCKETABLEITEM -1 2 N$宝石3的IDX S$宝石3的名字 NOT Equal N$转移成功几率 3 #ACT MESSAGEBOX 宝石转移失败。 #IF CHECKSOCKETABLEITEM -1 3 N$宝石4的IDX S$宝石4的名字 Equal N$转移成功几率 3 #ACT SetUpgradeItem 4 SOCKETABLEITEM * * * * -1 3 * * <$STR(N$宝石4的IDX)> * UpDateBoxItem 4 SetUpgradeItem 3 SOCKETABLEITEM * * * * -1 3 * * 0 * UpDateBoxItem 3 MESSAGEBOX 宝石转移成功。 #IF CHECKSOCKETABLEITEM -1 3 N$宝石4的IDX S$宝石4的名字 NOT Equal N$转移成功几率 3 #ACT MESSAGEBOX 宝石转移失败。 #IF CHECKSOCKETABLEITEM -1 4 N$宝石5的IDX S$宝石5的名字 Equal N$转移成功几率 3 #ACT SetUpgradeItem 4 SOCKETABLEITEM * * * * -1 4 * * <$STR(N$宝石5的IDX)> * UpDateBoxItem 4 SetUpgradeItem 3 SOCKETABLEITEM * * * * -1 4 * * 0 * UpDateBoxItem 3 MESSAGEBOX 宝石转移成功。 #IF CHECKSOCKETABLEITEM -1 4 N$宝石5的IDX S$宝石5的名字 NOT Equal N$转移成功几率 3 #ACT MESSAGEBOX 宝石转移失败。
