传奇架设技术：装备/武器/衣服镶嵌系统的改进，此NPC只可镶嵌凡品宝石

镶嵌系统改良装备/武器/衣服此NPC只可以镶嵌凡品宝石

()

%100

[@main]

#IF

#ACT

OPENMERCHANTBIGDLG 22 207 3 4 0 -80 1 380 60

#SAY

\ \ \ \ \ \ \

< ≮镶 嵌 系 统≯/SCOLOR=249>

\ \

< 请先把想要改良的装备穿在身上/SCOLOR=253>\

< 然后在下方选择对应的装备位置进行操作/SCOLOR=253>\

< 注意：此NPC只可以镶嵌凡品宝石/SCOLOR=253>

\ \

　　　　　　　　　　<武器打孔镶嵌/@武器>\ \

　　　　　　　　　　<衣服打孔镶嵌/@衣服>\

[@武器]

#IF

#ACT

OPENMERCHANTBIGDLG 22 251 3 4 0 -80 1 490 105

#SAY

　\　\　\　\　\　\　\　\

　　　　　　<武器打开一孔/@a1> 　 <镶嵌一孔宝石/@a11> 　 　 <摘除一孔宝石/@a12> \　\

　　　　　　<武器打开二孔/@a2> 　 <镶嵌二孔宝石/@a21> 　 　 <摘除二孔宝石/@a22> \　\

　　　　　　<武器打开三孔/@a3> 　 <镶嵌三孔宝石/@a31> 　 　 <摘除三孔宝石/@a32> \　\

　　　　　　<武器打开四孔/@a4> 　 <镶嵌四孔宝石/@a41> 　　 <摘除四孔宝石/@a42> \　\

　　　　　　<武器打开五孔/@a5> 　 <镶嵌五孔宝石/@a51> 　　 <摘除五孔宝石/@a52> \

[@a12]

#if

CHECKSOCKETABLEITEM 1 0 N1 S1

#act

SOCKETABLEITEM * * * * 1 0 * * 0 *

give <$STR(S1)> 1

[@a22]

#if

CHECKSOCKETABLEITEM 1 1 N1 S1

#act

SOCKETABLEITEM * * * * 1 1 * * 0 *

give <$STR(S1)> 1

[@a32]

#if

CHECKSOCKETABLEITEM 1 2 N1 S1

#act

SOCKETABLEITEM * * * * 1 2 * * 0 *

give <$STR(S1)> 1

[@a42]

#if

CHECKSOCKETABLEITEM 1 3 N1 S1

#act

SOCKETABLEITEM * * * * 1 3 * * 0 *

give <$STR(S1)> 1

[@a52]

#if

CHECKSOCKETABLEITEM 1 4 N1 S1

#act

SOCKETABLEITEM * * * * 1 4 * * 0 *

give <$STR(S1)> 1

[@a1]

#IF

NOT CHECKUSEITEM 1

#ACT

MESSAGEBOX 你没有带上武器无法打孔。

break

#IF

CHECKDRILLHOLE 1 0

#ACT

MESSAGEBOX 你的武器已经打了一号孔。

break

#if

NOT CHECKDRILLHOLE 1 0

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 1 孔 孔 0 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造一号个孔槽。. 1 3

[@a2]

#IF

NOT CHECKUSEITEM 1

#ACT

MESSAGEBOX 你没有带上武器无法打孔。

break

#IF

CHECKDRILLHOLE 1 1

#ACT

MESSAGEBOX 你的武器已经打了第二孔。

break

#if

NOT CHECKDRILLHOLE 1 1

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 1 孔 孔 1 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第二个孔槽。. 1 3

[@a3]

#IF

NOT CHECKUSEITEM 1

#ACT

MESSAGEBOX 你没有带上武器无法打孔。

break

#IF

CHECKDRILLHOLE 1 2

#ACT

MESSAGEBOX 你的武器已经打了第三孔。

break

#if

NOT CHECKDRILLHOLE 1 2

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 1 孔 孔 2 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第三个孔槽。. 1 3

[@a4]

#IF

NOT CHECKUSEITEM 1

#ACT

MESSAGEBOX 你没有带上武器无法打孔。

break

#IF

CHECKDRILLHOLE 1 3

#ACT

MESSAGEBOX 你的武器已经打了第四孔。

break

#if

NOT CHECKDRILLHOLE 1 3

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 1 孔 孔 3 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第四个孔槽。. 1 3

[@a5]

#IF

NOT CHECKUSEITEM 1

#ACT

MESSAGEBOX 你没有带上武器无法打孔。

break

#IF

CHECKDRILLHOLE 1 4

#ACT

MESSAGEBOX 你的武器已经打了第五孔。

break

#if

NOT CHECKDRILLHOLE 1 4

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 1 孔 孔 4 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜“[<$USERNAME>]”将“<$STR(S66)>”打造第五个孔槽。. 1 3

[@a11]

#if

CHECKSOCKETABLEITEM 1 0 760 攻击宝石[凡品]

#act

MESSAGEBOX 你的武器已经镶嵌过一孔宝石

#elseact

goto @a11a

[@a11a]

#if

checkitem 攻击宝石[凡品] 1

CHECKDRILLHOLE 1 0

#ACT

take 攻击宝石[凡品] 1

SOCKETABLEITEM * * * * 1 0 * * 760 *

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“攻击宝石[凡品]”镶嵌进入“[<$STR(S66)>]”一号孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打一孔\　　　　　　②.你包裹里没有攻击宝石[凡品]石头

break

[@a21]

#if

CHECKSOCKETABLEITEM 1 1 760 攻击宝石[凡品]

#act

MESSAGEBOX 你的武器已经镶嵌过二孔宝石

#elseact

goto @a21a

[@a21a]

#if

checkitem 攻击宝石[凡品] 1

CHECKDRILLHOLE 1 1

#ACT

take 攻击宝石[凡品] 1

SOCKETABLEITEM * * * * 1 1 * * 760 *

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“攻击宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第二孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打二孔\　　　　　　②.你包裹里没有攻击宝石[凡品]石头

break

[@a31]

#if

CHECKSOCKETABLEITEM 1 2 760 攻击宝石[凡品]

#act

MESSAGEBOX 你的武器已经镶嵌过三孔宝石

#elseact

goto @a31a

[@a31a]

#if

checkitem 攻击宝石[凡品] 1

CHECKDRILLHOLE 1 2

#ACT

take 攻击宝石[凡品] 1

SOCKETABLEITEM * * * * 1 2 * * 760 *

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“攻击宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第三孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打三孔\　　　　　　②.你包裹里没有攻击宝石[凡品]石头

break

[@a41]

#if

CHECKSOCKETABLEITEM 1 3 760 攻击宝石[凡品]

#act

MESSAGEBOX 你的武器已经镶嵌过四孔宝石

#elseact

goto @a41a

[@a41a]

#if

checkitem 攻击宝石[凡品] 1

CHECKDRILLHOLE 1 3

#ACT

take 攻击宝石[凡品] 1

SOCKETABLEITEM * * * * 1 3 * * 760 *

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“攻击宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第四孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打四孔\　　　　　　②.你包裹里没有攻击宝石[凡品]石

break

[@a51]

#if

CHECKSOCKETABLEITEM 1 4 760 攻击宝石[凡品]

#act

MESSAGEBOX 你的武器已经镶嵌过五孔宝石

#elseact

goto @a51a

[@a51a]

#if

checkitem 攻击宝石[凡品] 1

CHECKDRILLHOLE 1 4

#ACT

take 攻击宝石[凡品] 1

SOCKETABLEITEM * * * * 1 4 * * 760 *

GetUserItemName 1 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“攻击宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第五孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打五孔\　　　　　　②.你包裹里没有攻击宝石[凡品] 石头

break

[@衣服]

#IF

#ACT

OPENMERCHANTBIGDLG 22 251 3 4 0 -80 1 490 105

#SAY

　\　\　\　\　\　\　\　\

　　　　　　<衣服打开一孔/@b1> 　 <镶嵌一孔宝石/@b11> 　 　 <摘除一孔宝石/@b12> \　\

　　　　　　<衣服打开二孔/@b2> 　 <镶嵌二孔宝石/@b21> 　 　 <摘除二孔宝石/@b22> \　\

　　　　　　<衣服打开三孔/@b3> 　 <镶嵌三孔宝石/@b31> 　 　 <摘除三孔宝石/@b32> \　\

　　　　　　<衣服打开四孔/@b4> 　 <镶嵌四孔宝石/@b41> 　　 <摘除四孔宝石/@b42> \　\

　　　　　　<衣服打开五孔/@b5> 　 <镶嵌五孔宝石/@b51> 　　 <摘除五孔宝石/@b52> \

[@b12]

#if

CHECKSOCKETABLEITEM 0 0 N1 S1

#act

SOCKETABLEITEM * * * * 0 0 * * 0 *

give <$STR(S1)> 1

[@b22]

#if

CHECKSOCKETABLEITEM 0 1 N1 S1

#act

SOCKETABLEITEM * * * * 0 1 * * 0 *

give <$STR(S1)> 1

[@b32]

#if

CHECKSOCKETABLEITEM 0 2 N1 S1

#act

SOCKETABLEITEM * * * * 0 2 * * 0 *

give <$STR(S1)> 1

[@b42]

#if

CHECKSOCKETABLEITEM 0 3 N1 S1

#act

SOCKETABLEITEM * * * * 0 3 * * 0 *

give <$STR(S1)> 1

[@b52]

#if

CHECKSOCKETABLEITEM 0 4 N1 S1

#act

SOCKETABLEITEM * * * * 0 4 * * 0 *

give <$STR(S1)> 1

[@b1]

#IF

NOT CHECKUSEITEM 0

#ACT

MESSAGEBOX 你没有穿上衣服无法打孔。

break

#IF

CHECKDRILLHOLE 0 0

#ACT

MESSAGEBOX 你的衣服已经打了一号孔。

break

#if

NOT CHECKDRILLHOLE 0 0

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 0 孔 孔 0 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造一号个孔槽。. 1 3

[@b2]

#IF

NOT CHECKUSEITEM 0

#ACT

MESSAGEBOX 你没有穿上衣服无法打孔。

break

#IF

CHECKDRILLHOLE 0 1

#ACT

MESSAGEBOX 你的衣服已经打了第二孔。

break

#if

NOT CHECKDRILLHOLE 0 1

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 0 孔 孔 1 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第二个孔槽。. 1 3

[@b3]

#IF

NOT CHECKUSEITEM 0

#ACT

MESSAGEBOX 你没有穿上衣服无法打孔。

break

#IF

CHECKDRILLHOLE 0 2

#ACT

MESSAGEBOX 你的衣服已经打了第三孔。

break

#if

NOT CHECKDRILLHOLE 0 2

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 0 孔 孔 2 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第三个孔槽。. 1 3

[@b4]

#IF

NOT CHECKUSEITEM 0

#ACT

MESSAGEBOX 你没有穿上衣服无法打孔。

break

#IF

CHECKDRILLHOLE 0 3

#ACT

MESSAGEBOX 你的衣服已经打了第四孔。

break

#if

NOT CHECKDRILLHOLE 0 3

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 0 孔 孔 3 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜“<$USERNAME>”将“<$STR(S66)>”打造第四个孔槽。. 1 3

[@b5]

#IF

NOT CHECKUSEITEM 0

#ACT

MESSAGEBOX 你没有穿上衣服无法打孔。

break

#IF

CHECKDRILLHOLE 0 4

#ACT

MESSAGEBOX 你的衣服已经打了第五孔。

break

#if

NOT CHECKDRILLHOLE 0 4

#act

SetUpgradeItem 3

DRILLHOLE 孔 孔 0 孔 孔 4 孔 1 孔 孔

UpDateBoxItem 3

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜“[<$USERNAME>]”将“<$STR(S66)>”打造第五个孔槽。. 1 3

[@b11]

#if

CHECKSOCKETABLEITEM 0 0 756 防御宝石[凡品]

#act

MESSAGEBOX 你的衣服已经镶嵌过一孔宝石

#elseact

goto @b11a

[@b11a]

#if

checkitem 防御宝石[凡品] 1

CHECKDRILLHOLE 0 0

#ACT

take 防御宝石[凡品] 1

SOCKETABLEITEM * * * * 0 0 * * 756 *

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“防御宝石[凡品]”镶嵌进入“[<$STR(S66)>]”一号孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打一孔\　　　　　　②.你包裹里没有防御宝石[凡品]石头

break

[@b21]

#if

CHECKSOCKETABLEITEM 0 1 756 防御宝石[凡品]

#act

MESSAGEBOX 你的衣服已经镶嵌过二孔宝石

#elseact

goto @b21a

[@b21a]

#if

checkitem 防御宝石[凡品] 1

CHECKDRILLHOLE 0 1

#ACT

take 防御宝石[凡品] 1

SOCKETABLEITEM * * * * 0 1 * * 756 *

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“防御宝石[凡品]石头”镶嵌进入“[<$STR(S66)>]”第二孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打二孔\　　　　　　②.你包裹里没有防御宝石[凡品]石头

break

[@b31]

#if

CHECKSOCKETABLEITEM 0 2 756 防御宝石[凡品]

#act

MESSAGEBOX 你的衣服已经镶嵌过三孔宝石

#elseact

goto @b31a

[@b31a]

#if

checkitem 防御宝石[凡品] 1

CHECKDRILLHOLE 0 2

#ACT

take 防御宝石[凡品] 1

SOCKETABLEITEM * * * * 0 2 * * 756 *

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“防御宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第三孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打三孔\　　　　　　②.你包裹里没有防御宝石[凡品]石头

break

[@b41]

#if

CHECKSOCKETABLEITEM 0 3 756 防御宝石[凡品]

#act

MESSAGEBOX 你的衣服已经镶嵌过四孔宝石

#elseact

goto @b41a

[@b41a]

#if

checkitem 防御宝石[凡品] 1

CHECKDRILLHOLE 0 3

#ACT

take 防御宝石[凡品] 1

SOCKETABLEITEM * * * * 0 3 * * 756 *

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“防御宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第四孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打四孔\　　　　　　②.你包裹里没有防御宝石[凡品]石头

break

[@b51]

#if

CHECKSOCKETABLEITEM 0 4 756 防御宝石[凡品]

#act

MESSAGEBOX 你的衣服已经镶嵌过五孔宝石

#elseact

goto @b51a

[@b51a]

#if

checkitem 防御宝石[凡品] 1

CHECKDRILLHOLE 0 4

#ACT

take 防御宝石[凡品] 1

SOCKETABLEITEM * * * * 0 4 * * 756 *

GetUserItemName 0 66

SendCenterMsg 218 160 恭喜玩家[<$USERNAME>]将“防御宝石[凡品]”镶嵌进入“[<$STR(S66)>]”第五孔。. 1 3

UpDateBoxItem 5

#ELSEACT

MESSAGEBOX 　　　　　　[提示]:镶嵌失败!\　　　　　　①.你的装备还未打五孔\　　　　　　②.你包裹里没有防御宝石[凡品]石头

break