当前位置: 主页 > 传奇信息资讯 > 传奇开服 > GOM宝石镶嵌脚本左侧放入镶嵌宝石 右侧放入要镶嵌的装备

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

发布时间:2016-01-04 04:56内容来源:sf999点击:

<左侧放入镶嵌宝石 右侧放入要镶嵌装备/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%\很遗憾,还无时机的,持续致力吧。

顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
  • 挑错
  • 打印