传奇广告查询第一站 同步gm1.com

[@main]
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
#SAY

\
<放入所需/FCOLOR=250> <放入所需/FCOLOR=250> \
<镶嵌装备/FCOLOR=250> <镶嵌材料/FCOLOR=250> <蓝宝石:镶嵌后减少伤害/FCOLOR=252>\
<↓↓↓↓/FCOLOR=249> <↓↓↓↓/FCOLOR=249> <红宝石:镶嵌后增加目标暴率/FCOLOR=249>\
<绿宝石:镶嵌后增加攻魔道倍数/FCOLOR=250>\

<开始/@开始镶嵌>\
\\
<每件装备可同时镶嵌1种宝石/FCOLOR=254>\
\ \ \

[@ItemIntoBox0]
#if
#act
SetUpgradeItem 0
DRILLHOLE * * -1 * * 0 * 1 * *
DRILLHOLE * * -1 * * 1 * 1 * *
DRILLHOLE * * -1 * * 2 * 1 * *
UpDateBoxItem 0

[@ItemIntoBox1]
#if
EQUAL <$BOXITEM[1].NAME> 红宝石
#act
MOV <$STR(N$宝石序号)> 478

#if
EQUAL <$BOXITEM[1].NAME> 蓝宝石
#act
MOV <$STR(N$宝石序号)> 479

#if
EQUAL <$BOXITEM[1].NAME> 绿宝石
#act
MOV <$STR(N$宝石序号)> 480

#if
EQUAL <$BOXITEM[1].NAME> 紫宝石
#act
MOV <$STR(N$宝石序号)> 481
break

[@开始镶嵌]
#if
Equal <$BOXITEM[1].NAME>
#act
MESSAGEBOX 当前没有放入镶嵌的宝石！无法提升
#elseact
GOTO @检测OK0

[@检测OK0]
#IF
Equal <$BOXITEM[0].NAME>
#ACT
MESSAGEBOX 当前没有放入镶嵌的装备！无法提升
break
#elseact
SetUpgradeItem 0
DRILLHOLE * * -1 * * 0 * 1 * *
DRILLHOLE * * -1 * * 1 * 1 * *
DRILLHOLE * * -1 * * 2 * 1 * *
UpDateBoxItem 0
GOTO @镶嵌第一个

[@镶嵌第一个]
#ACT
SetUpgradeItem 0
#IF
NOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第一个A
#elseact
GOTO @镶嵌第二个

[@镶嵌第一个A]
#IF
NOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 0 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第一个控镶嵌成功
BREAK

[@镶嵌第二个]
#if
equal <$BOXITEM[0].GNAME1> <$BOXITEM[1].NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石，不能再次镶嵌
break
#IF
NOT CHECKSOCKETABLEITEM -1 1 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第二个A
#elseact
GOTO @镶嵌第三个

[@镶嵌第二个A]
#IF
NOT CHECKSOCKETABLEITEM -1 1 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 1 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第二个控镶嵌成功
BREAK

[@镶嵌第三个]
#if
equal <$BOXITEM[0].GNAME1> <$BOXITEM[1].NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石，不能再次镶嵌
break
#if
equal <$BOXITEM[0].GNAME2> <$BOXITEM[1].NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石，不能再次镶嵌
break
#IF
NOT CHECKSOCKETABLEITEM -1 2 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第三个A
#elseact
GOTO @镶嵌第四个

[@镶嵌第三个A]
#IF
NOT CHECKSOCKETABLEITEM -1 2 <$STR(N$镶嵌序号)> <$STR(N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 2 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第三个控镶嵌成功
BREAK

[@检测提示]
#if
CHECKSOCKETABLEITEMCOUNT -1 = 3
#ACT
SENDMSG 6 当前装备已打上3个宝石，无法再次提升
UpDateBoxItem 0
BREAK