lyvanbethao
08-12-12, 10:20 PM
mình đem về chạy file này
local tbNpc = Npc:GetClass("tetdoanngo");
function tbNpc:OnDialog()
local szOptMsg = [[
<color=green>Nhắc nhở：<color>
1、Gói Bánh ít cần <color=yellow>5 vạn lượng,Thịt,Gạo Nếp,Lá Bánh<color>；
2、Phóng sinh cá cần <color=yellow>10 Vạn Lượng<color>；
3、<color=yellow>Cá Bá Vương<color> có thể mua ở <color=yellow>Kì Trân Các<color>。
]]
local nState = me.GetTask(3006, 2);
local szButtonColor = (nState < 20 and "") or "<color=gray>";
local tbOpt =
{
{"Gói Bánh ít thịt Đoan Ngọ", self.Banhitdoanngo, self},
{szButtonColor.."Phóng sinh Cá Trắm,Cá Chép,Cá Chích đổi phần thưởng", self.Phongsinh1, self},
{"Phóng sinh Cá Trắm,Cá Chép,Cá Chích,<color=red>Cá Bá Vương <color>đổi phần thưởng", self.Phongsinh2, self},
{"Kết thúc đối thoại"},
}
if me.GetTask(3001,4) == 1 then -----------------------------------------Chỗ này
table.insert(tbOpt, 4, {"<color=yellow>GM test vật phẩm<color>", self.GMTest, self});
end
Dialog:Say("Ta có thể giúp nhà ngươi gói bánh hoặc phóng sinh cá.Ngươi cần ta giúp gì nào" .. szOptMsg, tbOpt);
end
function tbNpc:GMTest()
local szOptMsg = [[
<color=green>Nhắc nhở：<color>
1、Gói Bánh ít cần <color=yellow>5 vạn lượng,Thịt,Gạo Nếp,Lá Bánh<color>；
2、Phóng sinh cá cần <color=yellow>10 Vạn Lượng<color>；
3、<color=yellow>Cá Bá Vương<color> có thể mua ở <color=yellow>Kì Trân Các<color>。
]]
local tbOpt =
{
{"Nhận nguyên liệu gói bánh ", self.Banhitdoanngonl, self},
{"Nhận Bánh ít ", self.Banhitdoanngonl2, self},
{"Nhận nguyên liệu Phóng sinh", self.Phongsinh1nl, self},
{"Nhận nguyên liệu Phóng sinh Cá Bá Vương", self.Phongsinh2nl, self},
{"Túi Trung Hồn Đoan Ngọ", self.Tuitrunghon, self},
{"Túi Trung Hồn Đoan Ngọ (Cao Cấp)", self.Tuitrunghon1, self},
{"Túi Nguyên liệu Trung Hồn Đoan Ngọ", self.Tuitrunghon2, self},
{"Kết thúc đối thoại"},
}
Dialog:Say("Ta có thể giúp nhà ngươi gói bánh hoặc phóng sinh cá.Ngươi cần ta giúp gì nào" .. szOptMsg, tbOpt);
end
function tbNpc:Banhitdoanngonl()
me.AddStackItem(18,1,1292,1,nil,100);
me.AddStackItem(18,1,1293,1,nil,100);
me.AddStackItem(18,1,1294,1,nil,100);
end
function tbNpc:Banhitdoanngonl2()
me.AddStackItem(18,1,1295,1,nil,100);
end
function tbNpc:Tuitrunghon()
me.AddStackItem(18,1,1299,1,nil,100);
end
function tbNpc:Tuitrunghon1()
me.AddStackItem(18,1,1299,2,nil,100);
end
function tbNpc:Tuitrunghon2()
me.AddStackItem(18,1,1299,3,nil,100);
end
function tbNpc:Phongsinh1nl()
me.AddStackItem(18,1,1296,1,nil,100);
me.AddStackItem(18,1,1296,2,nil,100);
me.AddStackItem(18,1,1296,3,nil,100);
end
function tbNpc:Phongsinh2nl()
me.AddStackItem(18,1,1296,1,nil,100);
me.AddStackItem(18,1,1296,2,nil,100);
me.AddStackItem(18,1,1296,3,nil,100);
me.AddStackItem(18,1,1296,4,nil,100);
end
function tbNpc:Banhitdoanngo()
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId2 = {18,1,1292,1,0,0};
local tbItemId3 = {18,1,1293,1,0,0};
local tbItemId4 = {18,1,1294,1,0,0};
local nCount2 = me.GetItemCountInBags(18,1,1292,1);
local nCount3 = me.GetItemCountInBags(18,1,1293,1);
local nCount4 = me.GetItemCountInBags(18,1,1294,1);
if (nMyMoney < 50000) then
Dialog:Say("Không đủ 5 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1295,1);
me.CostMoney(50000,0);
end
end
function tbNpc:Phongsinh1()
tbNpc.TaskGourp = 3006;
tbNpc.TaskId_Day = 1;
tbNpc.TaskId_Count = 2;
tbNpc.Use_Max = 20;
local nDate = tonumber(GetLocalDate("%Y%m%d"));
local nCurTime = GetTime();
local nWeekDay = tonumber(os.date("%w", nCurTime));
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("Bạn đã phóng sinh %d lần.Bồ tát ghi nhớ lòng thành tâm của bạn.", tbNpc.Use_Max));
return 0;
end
if me.CountFreeBagCell() < 1 then
me.Msg("Hành Trang không đủ chỗ trống.Hãy sắp xếp còn trống 1 ô rồi quay lại gặp ta！");
return 0;
end
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId2 = {18,1,1296,1,0,0};
local tbItemId3 = {18,1,1296,2,0,0};
local tbItemId4 = {18,1,1296,3,0,0};
local nCount2 = me.GetItemCountInBags(18,1,1296,1);
local nCount3 = me.GetItemCountInBags(18,1,1296,2);
local nCount4 = me.GetItemCountInBags(18,1,1296,3);
if (nMyMoney < 100000) then
Dialog:Say("Không đủ 10 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1299,1).Bind(1);
me.CostMoney(100000,0);
me.SetTask(self.TaskGourp, self.TaskId_Count, nCount + 1);
me.Msg(string.format("Bạn đã phóng sinh <color=yellow>%s <color> lần.Bạn còn có thể phóng sinh <color=yellow>%s <color> lần nữa.",nCount + 1,tbNpc.Use_Max - nCount - 1));
end
return 1;
end
function tbNpc:Phongsinh2()
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId1 = {18,1,1296,1,0,0};
local tbItemId2 = {18,1,1296,2,0,0};
local tbItemId3 = {18,1,1296,3,0,0};
local tbItemId4 = {18,1,1296,4,0,0};
local nCount1 = me.GetItemCountInBags(18,1,1296,1);
local nCount2 = me.GetItemCountInBags(18,1,1296,2);
local nCount3 = me.GetItemCountInBags(18,1,1296,3);
local nCount4 = me.GetItemCountInBags(18,1,1296,4);
if (nMyMoney < 100000) then
Dialog:Say("Không đủ 10 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount1 < 1 or nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId1, 1);
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1299,2).Bind(1);
me.CostMoney(100000,0);
end
end
chổ phần (-----------------------------------------Chỗ này) trên mình ko để ý test bình thường thì ko có dòng GM test vật phẩm đó khi mở online thì bổng dưng có dòng đó các bạn cho mình hỏi điều kiện gì để có dòng đó vậy ?
và cho mình hỏi gs a3pic share trên đây có bị mem bug đồng được không sau vào thấy acc hack có 8 ức đồng vãi linh hồn
giúp nhé các bác
local tbNpc = Npc:GetClass("tetdoanngo");
function tbNpc:OnDialog()
local szOptMsg = [[
<color=green>Nhắc nhở：<color>
1、Gói Bánh ít cần <color=yellow>5 vạn lượng,Thịt,Gạo Nếp,Lá Bánh<color>；
2、Phóng sinh cá cần <color=yellow>10 Vạn Lượng<color>；
3、<color=yellow>Cá Bá Vương<color> có thể mua ở <color=yellow>Kì Trân Các<color>。
]]
local nState = me.GetTask(3006, 2);
local szButtonColor = (nState < 20 and "") or "<color=gray>";
local tbOpt =
{
{"Gói Bánh ít thịt Đoan Ngọ", self.Banhitdoanngo, self},
{szButtonColor.."Phóng sinh Cá Trắm,Cá Chép,Cá Chích đổi phần thưởng", self.Phongsinh1, self},
{"Phóng sinh Cá Trắm,Cá Chép,Cá Chích,<color=red>Cá Bá Vương <color>đổi phần thưởng", self.Phongsinh2, self},
{"Kết thúc đối thoại"},
}
if me.GetTask(3001,4) == 1 then -----------------------------------------Chỗ này
table.insert(tbOpt, 4, {"<color=yellow>GM test vật phẩm<color>", self.GMTest, self});
end
Dialog:Say("Ta có thể giúp nhà ngươi gói bánh hoặc phóng sinh cá.Ngươi cần ta giúp gì nào" .. szOptMsg, tbOpt);
end
function tbNpc:GMTest()
local szOptMsg = [[
<color=green>Nhắc nhở：<color>
1、Gói Bánh ít cần <color=yellow>5 vạn lượng,Thịt,Gạo Nếp,Lá Bánh<color>；
2、Phóng sinh cá cần <color=yellow>10 Vạn Lượng<color>；
3、<color=yellow>Cá Bá Vương<color> có thể mua ở <color=yellow>Kì Trân Các<color>。
]]
local tbOpt =
{
{"Nhận nguyên liệu gói bánh ", self.Banhitdoanngonl, self},
{"Nhận Bánh ít ", self.Banhitdoanngonl2, self},
{"Nhận nguyên liệu Phóng sinh", self.Phongsinh1nl, self},
{"Nhận nguyên liệu Phóng sinh Cá Bá Vương", self.Phongsinh2nl, self},
{"Túi Trung Hồn Đoan Ngọ", self.Tuitrunghon, self},
{"Túi Trung Hồn Đoan Ngọ (Cao Cấp)", self.Tuitrunghon1, self},
{"Túi Nguyên liệu Trung Hồn Đoan Ngọ", self.Tuitrunghon2, self},
{"Kết thúc đối thoại"},
}
Dialog:Say("Ta có thể giúp nhà ngươi gói bánh hoặc phóng sinh cá.Ngươi cần ta giúp gì nào" .. szOptMsg, tbOpt);
end
function tbNpc:Banhitdoanngonl()
me.AddStackItem(18,1,1292,1,nil,100);
me.AddStackItem(18,1,1293,1,nil,100);
me.AddStackItem(18,1,1294,1,nil,100);
end
function tbNpc:Banhitdoanngonl2()
me.AddStackItem(18,1,1295,1,nil,100);
end
function tbNpc:Tuitrunghon()
me.AddStackItem(18,1,1299,1,nil,100);
end
function tbNpc:Tuitrunghon1()
me.AddStackItem(18,1,1299,2,nil,100);
end
function tbNpc:Tuitrunghon2()
me.AddStackItem(18,1,1299,3,nil,100);
end
function tbNpc:Phongsinh1nl()
me.AddStackItem(18,1,1296,1,nil,100);
me.AddStackItem(18,1,1296,2,nil,100);
me.AddStackItem(18,1,1296,3,nil,100);
end
function tbNpc:Phongsinh2nl()
me.AddStackItem(18,1,1296,1,nil,100);
me.AddStackItem(18,1,1296,2,nil,100);
me.AddStackItem(18,1,1296,3,nil,100);
me.AddStackItem(18,1,1296,4,nil,100);
end
function tbNpc:Banhitdoanngo()
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId2 = {18,1,1292,1,0,0};
local tbItemId3 = {18,1,1293,1,0,0};
local tbItemId4 = {18,1,1294,1,0,0};
local nCount2 = me.GetItemCountInBags(18,1,1292,1);
local nCount3 = me.GetItemCountInBags(18,1,1293,1);
local nCount4 = me.GetItemCountInBags(18,1,1294,1);
if (nMyMoney < 50000) then
Dialog:Say("Không đủ 5 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1295,1);
me.CostMoney(50000,0);
end
end
function tbNpc:Phongsinh1()
tbNpc.TaskGourp = 3006;
tbNpc.TaskId_Day = 1;
tbNpc.TaskId_Count = 2;
tbNpc.Use_Max = 20;
local nDate = tonumber(GetLocalDate("%Y%m%d"));
local nCurTime = GetTime();
local nWeekDay = tonumber(os.date("%w", nCurTime));
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("Bạn đã phóng sinh %d lần.Bồ tát ghi nhớ lòng thành tâm của bạn.", tbNpc.Use_Max));
return 0;
end
if me.CountFreeBagCell() < 1 then
me.Msg("Hành Trang không đủ chỗ trống.Hãy sắp xếp còn trống 1 ô rồi quay lại gặp ta！");
return 0;
end
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId2 = {18,1,1296,1,0,0};
local tbItemId3 = {18,1,1296,2,0,0};
local tbItemId4 = {18,1,1296,3,0,0};
local nCount2 = me.GetItemCountInBags(18,1,1296,1);
local nCount3 = me.GetItemCountInBags(18,1,1296,2);
local nCount4 = me.GetItemCountInBags(18,1,1296,3);
if (nMyMoney < 100000) then
Dialog:Say("Không đủ 10 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1299,1).Bind(1);
me.CostMoney(100000,0);
me.SetTask(self.TaskGourp, self.TaskId_Count, nCount + 1);
me.Msg(string.format("Bạn đã phóng sinh <color=yellow>%s <color> lần.Bạn còn có thể phóng sinh <color=yellow>%s <color> lần nữa.",nCount + 1,tbNpc.Use_Max - nCount - 1));
end
return 1;
end
function tbNpc:Phongsinh2()
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId1 = {18,1,1296,1,0,0};
local tbItemId2 = {18,1,1296,2,0,0};
local tbItemId3 = {18,1,1296,3,0,0};
local tbItemId4 = {18,1,1296,4,0,0};
local nCount1 = me.GetItemCountInBags(18,1,1296,1);
local nCount2 = me.GetItemCountInBags(18,1,1296,2);
local nCount3 = me.GetItemCountInBags(18,1,1296,3);
local nCount4 = me.GetItemCountInBags(18,1,1296,4);
if (nMyMoney < 100000) then
Dialog:Say("Không đủ 10 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if nCount1 < 1 or nCount2 < 1 or nCount3 < 1 or nCount4 < 1 then
Dialog:Say("Bạn chưa chuẩn bị đủ nguyên liệu.");
return 0;
else
Task:DelItem(me, tbItemId1, 1);
Task:DelItem(me, tbItemId2, 1);
Task:DelItem(me, tbItemId3, 1);
Task:DelItem(me, tbItemId4, 1);
me.AddItem(18,1,1299,2).Bind(1);
me.CostMoney(100000,0);
end
end
chổ phần (-----------------------------------------Chỗ này) trên mình ko để ý test bình thường thì ko có dòng GM test vật phẩm đó khi mở online thì bổng dưng có dòng đó các bạn cho mình hỏi điều kiện gì để có dòng đó vậy ?
và cho mình hỏi gs a3pic share trên đây có bị mem bug đồng được không sau vào thấy acc hack có 8 ức đồng vãi linh hồn
giúp nhé các bác