通过读取鉴定属性编号,再次设置鉴定属性。效果就有了。
Actor:takeBagItemEx(CLMZ, JDFY, 1)
local JL = s.share.getRandom(1,101)
if JL <= jd_pz_tbl[0].jl then
local BT = {}
local BH = {}
local FH = {}
local DC = {}
local SD = {}
local SX = {}
local JD = item:getIdentify(0)
local XJ = math.floor(JD / 10) % 10
local XX = 0
local DJ = 0
local TS = ""
local SXBH = {}
for k=1,4,1 do
SD[k] = Actor:getVal_N_Ex("锁定"..k)
if SD[k] < 1 then
local DC = s.share.getRandom(1,(#jd_dc_tbl+1))
local SJBH = s.share.getRandom(1,(#jd_pz_tbl+1))
SXBH[k] = jd_sx_tbl[jd_pz_tbl[SJBH].bh].bh + jd_sx_tbl[jd_pz_tbl[SJBH].bh][DC]
if DC == 5 then
DJ = jd_dc_tbl[DC].xj
TS = TS.."\\ "..jd_sx_tbl[jd_pz_tbl[SJBH].bh].s.."+"..jd_sx_tbl[jd_pz_tbl[SJBH].bh][DC]
end
item:setIdentify(k,SXBH[k],0)
end
SX[k] = item:getIdentify(k+1)
BT[k],BH[k],FH[k],DC[k] = TZJD_DQJDSX(Actor, SX[k])
XX = XX + jd_dc_tbl[DC[k]].xj
end
if DC[4] == 5 and BT[1] == BT[2] and BT[1] == BT[3] and BT[1] == BT[4] then
XX = XX + 1
end
local SX1 = item:getIdentify(2)
local SX2 = item:getIdentify(3)
local SX3 = item:getIdentify(4)
local SX4 = item:getIdentify(5)
item:setIdentifyStar(XX)
item:setIdentify(1,SX1,0)
item:setIdentify(2,SX2,0)
item:setIdentify(3,SX3,0)
item:setIdentify(4,SX4,0)
Actor:refItemInfo(item, 3)
if TS ~= "" then
Actor:messageBox("恭喜你鉴定出极品属性:"..TS)
end
Actor:setVal_S_Ex("鉴定结果", "成功;fc=250;ch=250;cd=250")
else
Actor:setVal_S_Ex("鉴定结果", "失败;fc=249;ch=249;cd=249")
end |