Hỏi Về Fix event Giao Thông MariaOzaqua

[visaothe123]

Hiện Sever Có Event Giao Thông MariaOzawua, Lúc Giao Thông Thì Nó Delay 5 giay, gióng như mỡ rương thuốc vậy, lúc giao thông thành công thì sẽ nhận được PhầnThưỡng và MariOzawa Sẽ Biến Mắt.
Nhưng nó lỗi 1 cái là, 1 NPC MariaOzawua mà có thể Giao thông được nhiều lần Trong 1 Lúc.

Ví Dụ: Khi Giao Thông NPC Maria0zawua Sẽ Delay 5 giay Sau Khi Giao Thông Xong Sẽ Nhận Đươc Phần Thưỡng, Mà Trong Lúc Giao Thông Có 4 Nhân Vật, Nhân Vật Thứ Nhất Giao Thông Trước và Đang Trong Tình Trạng Delay 5 giay, và 3 Nhân Vật Sau Cũng Đang Giao Thông Cùng 1 NPC Của Nhân Vật Thứ Nhất, Và Sau Đó Nhân Vật 1 Đã Giao Thông Thành Công Và Nhận Được Phần Thưỡng và NPC Cũng Biến Mắt Luôn, Nhưng 3 Nhân Vật Giao Thông Sau Đang Trong Tình Trang Delay, Sau Khi Hết Delay Mà Cũng Nhận Được Phần Thưỡng Trong Khi Đó NPC Đã Biến Mắt Trước Đó Rồi.


Vậy Các Bác Cho Em Hỏi, Còn Thiếu Cái Hàm Nào Để Khi NPC biến Mắt rồi mà Nhân Vật Giao thông sau k nhận đc phần thưỡng nữa vậy.

[skriptank]

Á đù...KT có event nhạy cảm thế này sao

[__Jie__]

trong hàm nhận thưởng thêm 1 đoạn check kiểm tra có ID NPC đó ở gần đó không
Nếu không có break đi . Giải quyết xong vấn đề. Nhớ chèn trước đoạn xóa NPC nhé.
Vì theo mình nghỉ code theo dạng.
Nhận Thưởng trước xóa NPC sau.
Nên chèn check ID NPC trước nhận thưởng là được

[visaothe123]

uhm tks bác đã bày, nhưng code sau khi giao thông NPC thành công, mình để code như thế này, nhờ bác coi giúp và thêm task code như thế nào để mắt npc rồi, mà k nhận thưỡng đc, bác xem giúp

local tbItemId1    = {18,1,8009,1,0,0}; 
local nCount1 = me.GetItemCountInBags(18,1,8009,1)
    local i = 0;
    local nAdd = 0;
    local nRand = 0;
    local nIndex = 0;
    nRand = MathRandom(1, 100);
    local tbRate = {65, 16, 14, 5}; -- Rate Item
    local tbAward = {1 ,2, 3, 4}; -- Rate 4 con số
    for i = 1, 4 do
        nAdd = nAdd + tbRate[i];
        if nAdd >= nRand then
            nIndex = i;
            break;
        end
    end
if (tbAward[nIndex]==1) then 
me.AddStackItem(18,10,11,2,{bForceBind=0,},100) -- Mảnh Ấn
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên
end
if (tbAward[nIndex]==2) then 
me.AddStackItem(18,10,11,2,{bForceBind=0,},100) -- Mảnh Ấn
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là
end
if (tbAward[nIndex]==3) then -- Xác xuất ra số 1 là 15/100 (15%)
me.AddStackItem(18,10,11,2,{bForceBind=0,},150) -- Mảnh Ấn
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là
end
if (tbAward[nIndex]==4) then -- Xác xuất ra số 1 là 5/100 (5%)
me.AddStackItem(18,10,11,2,{bForceBind=0,},200) -- Mảnh Ấn
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là
end
-------
local pNpc = KNpc.GetById(nNpcId);
pNpc.Delete();
if (not pNpc) then
return;
end
pNpc.Delete();
return 0 

[__Jie__]

Tối pm yahoo giúp cho h đang trong cty không viết được

[visaothe123]

tks bac.
upppppppppppppppppppppppppppppp

[__Jie__]

Của bạn đây

	local nCheck = 0;
	local nTempId = 20123;-- ID của NPC Maria Ozawa
	local tbAroundNpc    = KNpc.GetAroundNpcList(me, 10);-- khoảng cách từ nhân vật đến NPC
		for _, pNpc in ipairs(tbAroundNpc) do
			if (pNpc.nTemplateId == nTempId) then
				nCheck = 1;
				break;
			end
		end	
		if nCheck ~= 1 then
			me.Msg("Xung quanh không có npc Maria Ozawa");
			return 0;
		end
local tbItemId1    = {18,1,8009,1,0,0};  
local nCount1 = me.GetItemCountInBags(18,1,8009,1) 
    local i = 0; 
    local nAdd = 0; 
    local nRand = 0; 
    local nIndex = 0; 
    nRand = MathRandom(1, 100); 
    local tbRate = {65, 16, 14, 5}; -- Rate Item 
    local tbAward = {1 ,2, 3, 4}; -- Rate 4 con số 
    for i = 1, 4 do 
        nAdd = nAdd + tbRate[i]; 
        if nAdd >= nRand then 
            nIndex = i; 
            break; 
        end 
    end 
if (tbAward[nIndex]==1) then  
me.AddStackItem(18,10,11,2,{bForceBind=0,},100) -- Mảnh Ấn 
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên 
end 
if (tbAward[nIndex]==2) then  
me.AddStackItem(18,10,11,2,{bForceBind=0,},100) -- Mảnh Ấn 
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là 
end 
if (tbAward[nIndex]==3) then -- Xác xuất ra số 1 là 15/100 (15%) 
me.AddStackItem(18,10,11,2,{bForceBind=0,},150) -- Mảnh Ấn 
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là 
end 
if (tbAward[nIndex]==4) then -- Xác xuất ra số 1 là 5/100 (5%) 
me.AddStackItem(18,10,11,2,{bForceBind=0,},200) -- Mảnh Ấn 
Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là 
end 
------- 
local pNpc = KNpc.GetById(nNpcId); 
pNpc.Delete(); 
if (not pNpc) then 
return; 
end 
pNpc.Delete(); 
return 0

Phần màu đỏ là update thêm