shppero
19-02-12, 12:16 PM
-- 秦陵白银、黄金物品增加声望物品
-- By Peres 2009/06/13
-- 何不食肉糜
local tbItem = Item:GetClass("qinling_arm_item");
tbItem.tbData =
{
[369] = {100, 2}, -- 玉符,每次 100 点,最高加到 2 级
[377] = {100, 3}, -- 和氏璧,每次 100 点,最高加到 3 级
}
tbItem.TaskGourp = 2551;
tbItem.TaskId_Day = 100;
tbItem.TaskId_Count = 101;
tbItem.Use_Max = 200;
function tbItem:OnUse()
local nDate = tonumber(GetLocalDate("%y%m%d"));
if me.GetTask(self.TaskGourp, self.TaskId_Day) < nDate then
me.SetTask(self.TaskGourp, self.TaskId_Day, nDate);
me.SetTask(self.TaskGourp, self.TaskId_Count, 0);
end
local nCount = me.GetTask(self.TaskGourp, self.TaskId_Count)
if nCount >= self.Use_Max then
Dialog:Say(string.format("Tối đa 1 ngày bạn có thể sử dụng %d cái", tbItem.Use_Max));
return 0;
end
local nReputeLevel = me.GetReputeLevel(9, 2);
if nReputeLevel >= self.tbData[it.nParticular][2] then
me.Msg("Sử dụng<color=yellow>"..it.szName.."<color>có thể tăng danh vọng <color=green> Tần lăng-Quan phủ <color> cao nhất đến <color=yellow>"..self.tbData[it.nParticular][2].."<color> cấp!");
return;
end
local nFlag = Player:AddRepute(me, 9, 2, self.tbData[it.nParticular][1]);
if (nFlag == 0) then
return;
elseif (nFlag == 1) then
me.Msg("Danh vọng <color=green>Tần lăng-Quan phủ<color> của bạn đã đạt đến cấp cao nhất!");
return;
end
return 1;
end
em muốn sử dụng tần lang hòa thị bích có giới hạng trong 1 ngày, nhưng sao em làm vạy mà ăn vẫn ko có giới hạng. giúp em với !!!
-- By Peres 2009/06/13
-- 何不食肉糜
local tbItem = Item:GetClass("qinling_arm_item");
tbItem.tbData =
{
[369] = {100, 2}, -- 玉符,每次 100 点,最高加到 2 级
[377] = {100, 3}, -- 和氏璧,每次 100 点,最高加到 3 级
}
tbItem.TaskGourp = 2551;
tbItem.TaskId_Day = 100;
tbItem.TaskId_Count = 101;
tbItem.Use_Max = 200;
function tbItem:OnUse()
local nDate = tonumber(GetLocalDate("%y%m%d"));
if me.GetTask(self.TaskGourp, self.TaskId_Day) < nDate then
me.SetTask(self.TaskGourp, self.TaskId_Day, nDate);
me.SetTask(self.TaskGourp, self.TaskId_Count, 0);
end
local nCount = me.GetTask(self.TaskGourp, self.TaskId_Count)
if nCount >= self.Use_Max then
Dialog:Say(string.format("Tối đa 1 ngày bạn có thể sử dụng %d cái", tbItem.Use_Max));
return 0;
end
local nReputeLevel = me.GetReputeLevel(9, 2);
if nReputeLevel >= self.tbData[it.nParticular][2] then
me.Msg("Sử dụng<color=yellow>"..it.szName.."<color>có thể tăng danh vọng <color=green> Tần lăng-Quan phủ <color> cao nhất đến <color=yellow>"..self.tbData[it.nParticular][2].."<color> cấp!");
return;
end
local nFlag = Player:AddRepute(me, 9, 2, self.tbData[it.nParticular][1]);
if (nFlag == 0) then
return;
elseif (nFlag == 1) then
me.Msg("Danh vọng <color=green>Tần lăng-Quan phủ<color> của bạn đã đạt đến cấp cao nhất!");
return;
end
return 1;
end
em muốn sử dụng tần lang hòa thị bích có giới hạng trong 1 ngày, nhưng sao em làm vạy mà ăn vẫn ko có giới hạng. giúp em với !!!