Vấn Đề Về SaveData TSBD3.0 Kết hợp hút hít

[lamthuyhien18]

e đang dùng sv của jxvietnam kết hợp hút hít , tình năng cũ lãnh địa đã bỏ . nay e add lại tính năng lãnh địa đã hoàn tất nhưng có 1 số lỗi chưa thể fix được như sau
ví dụ : Bach Dao phe công Hac Dao phe thủ , sau khi phe công Bach Dao đã đánh dc các Trụ và đã chiến thắng nhưng hệ thông ko lưu kết quả thắng thua vào dulieu/quyensohuu.lua
lỗi : nếu có thắng hay thua cũng như không , vì hệ thống ko save kết quả vào dulieu/quyensohuu.lua e mong các anh ai biết cách fix này hd cho e với

----- file : truthanhvang.lua -----

Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\source\\timerserver.lua")
Include("\\dulieu\\quyensohuu.lua")


function OnDeath()
    if thu[1] == 4 then
idsh = 2
        if quyensohuu[1][idsh] == "Hac Dao" then
ldwin = "Bach Dao"
ldlose = "Hac Dao"
idmoneywin = 22
idmoneylose = 23
        elseif quyensohuu[1][idsh] == "Bach Dao" then
ldwin = "Hac Dao"        
ldlose = "Bach Dao"
idmoneywin = 23
idmoneylose = 22    
        end
    elseif thu[1] == 5 then
idsh = 3
        if quyensohuu[1][idsh] == "Luong Dao" then
ldwin = "Hac Dao"
ldlose = "Luong Dao"    
idmoneywin = 23
idmoneylose = 24
        elseif quyensohuu[1][idsh] == "Hac Dao" then
ldwin = "Luong Dao"    
ldlose = "Hac Dao"
idmoneywin = 24
idmoneylose = 23
        end
    elseif thu[1] == 6 then
idsh = 1
        if quyensohuu[1][idsh] == "Bach Dao" then
ldwin = "Luong Dao"
ldlose = "Bach Dao"    
idmoneywin = 24
idmoneylose = 22
        elseif quyensohuu[1][idsh] == "Luong Dao" then
ldwin = "Bach Dao"    
ldlose = "Luong Dao"
idmoneywin = 22
idmoneylose = 24
        end
    end
SetGlbMissionV(30,4)
SetTask(41,GetTask(41)+500)
SetGlbMissionV(idmoneywin,GetGlbMissionV(idmoneywin)+GetGlbMissionV(idmoneylose))
SetGlbMissionV(idmoneylose,0)
danhsach = TaoBang(quyensohuu,"quyensohuu","")
quyensohuu[1][idsh] = ldwin
SaveData("dulieu/quyensohuu.lua",danhsach)
Msg2Player("Chuc Mung: Ban da pha tan Ngoa Long Hon Tran nhan duoc 500 diem cong hien")
Msg2SubWorld("Lanh Dia: "..GetName().." ben chinh phat da pha tan Ngoa Long Hon Tran")
Msg2SubWorld("Phe Chinh Phat "..ldwin.." Da Chien Thang Va Gianh Toan Bo Ngan Quy ! Tuoc Toan Quyen Ra Vao Lanh Dia Cua "..ldlose.." !")
local str1 = "Lanh Dia Cua "..ldlose.." Nay Thuoc Ve "..ldwin.." !"
        AddLocalNews(str1, 1);
for i=1,200 do
    PlayerIndex = i
w,x,y = GetWorldPos()
        if w == 60 then
z = random(1,10)
for i=1,z do AddEventItem(13) end
Msg2Player("Ban Nhan Duoc "..z.." Hong Bao Lanh Dia")
phe = GetTask(58)
    if phe == 1 then
LeaveTeam()
NewWorld(62, 201*8, 200*16);
SetCreateTeam(0);
SetFightState(0)
    elseif phe == 2 then
LeaveTeam()
NewWorld(61, 201*8, 200*16);
SetCreateTeam(0);
SetFightState(0)
    end
SetTask(58,0)
        end
end
end

----- file : quyensohuu.lua ----- gốc ở TSBD 3.0

quyensohuu={

    [1]={

        [1] = "Bach Dao",

        [2] = "Hac Dao",

        [3] = "Luong Dao"

    }

}

[KingMax]

danhsach = TaoBang(quyensohuu,"quyensohuu","")
quyensohuu[1][idsh] = ldwin
SaveData("dulieu/quyensohuu.lua",danhsach)

quyensohuu[1][idsh] = ldwin
danhsach = TaoBang(quyensohuu,"quyensohuu","")
SaveData("dulieu/quyensohuu.lua",danhsach)

[f-fantasy]

Lúc trước mình cũng gặp ở vụ lãnh địa mặc dù đã nâng từ 5 lên 6 nhưng khi check nó vẫn bảo là đang ở 5 lại phải làm lần nữa mới lên 6 tức là mỗi lần nâng 1 cấp làm 2 lần nên để khắc phục vụ ko lưu data này ấy mình thay cái này

SaveData("dulieu/quyensohuu.lua",danhsach)

bằng

for i =1,2 do SaveData("dulieu/quyensohuu.lua",danhsach) end

bạn làm thử xem nó sẽ lưu data bình thường

[lamthuyhien18]

tk 2 anh e đã làm được rùi ạ đã lưu thắng thua vào quyensohuu.lua . nhưng sau trận đánh nếu ai thắng phải ress lại GS mới có tác dụng sao nó ko có tác dụng như đổi mã rương ap dụng trực tiếp mà ko phải ress GS các anh nhỉ