[@main]
#say
\ \
鉴定装备，随机获得属性，使用<【四魂之玉碎片】可鉴定一次/FCOLOR=252>\
可以使<【四魂之玉】/FCOLOR=249>重新鉴定，不限次数\
备注：时装不可鉴定，其他非装备物品鉴定无效\ \
<普通鉴定/@四魂之玉碎片鉴定> <高级鉴定/@四魂之玉鉴定>
[@四魂之玉碎片鉴定]
<> <请放入要鉴定的装备然后确定进行装备鉴定/FCOLOR=249>\
<> <注:鉴定装备随机获得攻魔道1-3点、防御御1-3，血蓝10-30点/FCOLOR=249> \ \
<ITEMBOX|x=200.0|y=80.0|width=70|height=70|boxindex=2|stdmode=*|tips=<只能放入指定装备/FCOLOR=249>|tipsx=4|tipsy=100|img=public/1900000664.png>
<Button|x=380.0|y=100.0|color=251|mimg=custom/bx/115_2.png|size=18|pimg=custom/bx/115_1.png|nimg=custom/bx/115_2.png|text=开始鉴定|link=@碎片鉴定>
[@获取背包物品]
<BAGITEMS|positions=0|condition=*|select=<$STR(S0)>|count=12|row=2|x=0|y=0|selecttype=1|link=@关联物品唯一ID>
[@四魂之玉鉴定]
<> <请放入要鉴定的装备然后确定进行装备鉴定/FCOLOR=249>\
<> <注:鉴定装备随机获得攻魔道1-3点、防御御1-3，血蓝10-30点/FCOLOR=249> \ \
<ITEMBOX|x=200.0|y=80.0|width=70|height=70|boxindex=1|stdmode=*|tips=<只能放入指定装备/FCOLOR=249>|tipsx=4|tipsy=100|img=public/1900000664.png>
<Button|x=380.0|y=100.0|color=251|mimg=custom/bx/115_2.png|size=18|pimg=custom/bx/115_1.png|nimg=custom/bx/115_2.png|text=开始鉴定|link=@开始鉴定>
[@碎片鉴定]
#if
#act
SetUpgradeItem 2
#if
not checkitem 四魂之玉碎片 1
#act
messagebox 你包裹中没有四魂之玉碎片,无法鉴定
break
#if
checkitemflag -1 2
#act
messagebox 此装备只能鉴定一次
break
#if
#act
MOVR N$攻魔道属性数值 1 4
goto @设置攻魔道随机
goto @设置生命魔法随机
#if
#act
MOVR N$防御属性数值 1 4
mov N$防御属性ID 10
mov N$防御显示ID 35
#if
checkitem 四魂之玉碎片 1
CHECKTEXTLIST ..\QuestDiary\游戏功能\可鉴定装备清单.txt <$BOXITEM[2].NAME>
#act
SetItemFlag -1 2 1
take 四魂之玉碎片 1
CHANGECUSTOMITEMTEXT -1 [四魂鉴定] 1
CHANGECUSTOMITEMTEXTCOLOR -1 254 1
CHANGECUSTOMITEMABIL -1 1 0 250 1
CHANGECUSTOMITEMABIL -1 1 1 <$STR(N$攻魔道属性ID)> 1
CHANGECUSTOMITEMABIL -1 1 2 <$STR(N$攻魔道显示ID)> 1
CHANGECUSTOMITEMABIL -1 1 3 1 0
CHANGECUSTOMITEMABIL -1 1 4 1 1
CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$攻魔道属性数值)> 1
CHANGECUSTOMITEMABIL -1 2 0 253 1
CHANGECUSTOMITEMABIL -1 2 1 <$STR(N$防御属性ID)> 1
CHANGECUSTOMITEMABIL -1 2 2 <$STR(N$防御显示ID)> 1
CHANGECUSTOMITEMABIL -1 2 3 1 0
CHANGECUSTOMITEMABIL -1 2 4 2 1
CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$防御属性数值)> 1
CHANGECUSTOMITEMABIL -1 3 0 69 1
CHANGECUSTOMITEMABIL -1 3 1 <$STR(N$生命魔法值属性ID)> 1
CHANGECUSTOMITEMABIL -1 3 2 <$STR(N$生命魔法值显示ID)> 1
CHANGECUSTOMITEMABIL -1 3 3 1 0
CHANGECUSTOMITEMABIL -1 3 4 3 1
CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$生命魔法值属性数值)> 1
UpDateBoxItem 2
ReturnBoxItem 2
break
#elseact
messagebox 你包裹中没有四魂之玉碎片或者装备不允许鉴定
break
[@开始鉴定]
#if
not checkitem 四魂之玉 1
#act
messagebox 你包裹中没有四魂之玉,无法鉴定
break
#if
#act
SetUpgradeItem 1
MOVR N$攻魔道属性数值 1 4
goto @设置攻魔道随机
goto @设置生命魔法随机
#if
#act
MOVR N$防御属性数值 1 4
mov N$防御属性ID 10
mov N$防御显示ID 35
#if
checkitem 四魂之玉 1
CHECKTEXTLIST ..\QuestDiary\游戏功能\可鉴定装备清单.txt <$BOXITEM[1].NAME>
#act
take 四魂之玉 1
CHANGECUSTOMITEMTEXT -1 [四魂鉴定] 1
CHANGECUSTOMITEMTEXTCOLOR -1 254 1
CHANGECUSTOMITEMABIL -1 1 0 250 1
CHANGECUSTOMITEMABIL -1 1 1 <$STR(N$攻魔道属性ID)> 1
CHANGECUSTOMITEMABIL -1 1 2 <$STR(N$攻魔道显示ID)> 1
CHANGECUSTOMITEMABIL -1 1 3 1 0
CHANGECUSTOMITEMABIL -1 1 4 1 1
CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$攻魔道属性数值)> 1
CHANGECUSTOMITEMABIL -1 2 0 253 1
CHANGECUSTOMITEMABIL -1 2 1 <$STR(N$防御属性ID)> 1
CHANGECUSTOMITEMABIL -1 2 2 <$STR(N$防御显示ID)> 1
CHANGECUSTOMITEMABIL -1 2 3 1 0
CHANGECUSTOMITEMABIL -1 2 4 2 1
CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$防御属性数值)> 1
CHANGECUSTOMITEMABIL -1 3 0 69 1
CHANGECUSTOMITEMABIL -1 3 1 <$STR(N$生命魔法值属性ID)> 1
CHANGECUSTOMITEMABIL -1 3 2 <$STR(N$生命魔法值显示ID)> 1
CHANGECUSTOMITEMABIL -1 3 3 1 0
CHANGECUSTOMITEMABIL -1 3 4 3 1
CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$生命魔法值属性数值)> 1
UpDateBoxItem 1
ReturnBoxItem 1
break
#elseact
messagebox 你包裹中没有四魂之玉或者装备不允许鉴定
break
[@设置攻魔道随机]
#if
random 3
#act
mov N$攻魔道属性ID 4
mov N$攻魔道显示ID 32
break
#if
random 3
#act
mov N$攻魔道属性ID 6
mov N$攻魔道显示ID 33
break
#if
#act
mov N$攻魔道属性ID 8
mov N$攻魔道显示ID 34
break
[@设置生命魔法随机]
#if
random 2
#act
MOVR N$生命魔法值属性数值 10 30
mov N$生命魔法值属性ID 1
mov N$生命魔法值显示ID 36
break
#if
#act
MOVR N$生命魔法值属性数值 10 30
mov N$生命魔法值属性ID 2
mov N$生命魔法值显示ID 37
break
[@itemintobox1]
#if
not checkitem 四魂之玉 1
#act
messagebox 你包裹中没有鉴定材料四魂之玉,无法放入
returnboxitem 1
break
#if
not CHECKTEXTLIST ..\QuestDiary\游戏功能\可鉴定装备清单.txt <$BOXITEM[1].NAME>
#act
messagebox 当前装备不允许鉴定!
returnboxitem 1
break
[@itemintobox2]
#if
not checkitem 四魂之玉碎片 1
#act
messagebox 你包裹中没有鉴定材料四魂之玉碎片,无法放入
returnboxitem 2
break
#if
not CHECKTEXTLIST ..\QuestDiary\游戏功能\可鉴定装备清单.txt <$BOXITEM[2].NAME>
#act
messagebox 当前装备不允许鉴定!
returnboxitem 2
break
