Mấy Pro Cho E Hỏi Về Hàm 1 Chút

[anhnhianh]

Giờ e ko biết cách làm sao mà có đầy đủ nguyên liệu để ghép đc 1 món đồ rồi nhưng giờ e muốn nó trừ thêm bạc trong rương như thế nào các pro có thể hướng dẫn e chút :)

[vd_tt]

me.CostMoney(10000000,0); 1k vạn 30 char Việt Nam có thủ đô là gì ? (viết tắt 2 ký tự đầu và viết thường )


function tbNpc:OnOpenGiftOk(nValue, tbItemObj)
local nFaction = me.nFaction;
local nRouteId = me.nRouteId;
local nSex = me.nSex;
local nMyMoney = me.nCashMoney; --GetCash();

if (nMyMoney < 10000000) then
Dialog:Say("Không đủ 1000 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
local tbItemList = {};

for _, pItem in pairs(tbItemObj) do
if (self:ChechItem(pItem, REQUIRE_ITEM[nValue], tbItemList) ~= 1) then
me.Msg("Có Vật Phẩm không đủ tiêu chuẩn.");
return 0;
end;
end

local bResult = false;
for i = 1, #REQUIRE_ITEM[nValue] do
if (REQUIRE_ITEM[nValue][i][2] ~= tbItemList[i]) then
bResult = true;
end;
end;

if (bResult) then
me.Msg("Số lượng vật phẩm yêu cầu không đủ.");
return 0;
end;

for _, pItem in pairs(tbItemObj) do
if me.DelItem(pItem[1]) ~= 1 then
return 0;
end
end

if (nValue == 1) then
me.CostMoney(10000000,0);
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
-- random
nRand = MathRandom(1, 10000);
-- fill 3 rate
local tbRate = {4000, 6000};
local tbAward =
{
[1] = {18,1,25135,1};
[2] = {18,1,25136,1};
}

for i = 1, 2 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = me.AddItem(unpack(tbAward[nIndex]));
if (nIndex == 2) then
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn ghép được <color=cyan>%s<color> ", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName
.. "<color>] Ghép thành công <color=cyan>"
.. pItem.szName .."<color>");
me.Msg("Ghép thành công nhận được <color=yellow>Bức Tranh Quý Tỵ<color>.");
elseif (nIndex == 1) then
me.Msg("Ghép thất bại nhận được <color=yellow>Bức Tranh Nhâm Thìn<color>.");

end
end;

if (nValue == 2) then
me.CostMoney(10000000,0);
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
-- random
nRand = MathRandom(1, 10000);
-- fill 3 rate
local tbRate = {4000, 6000};
local tbAward =
{
[1] = {18,1,25135,1};
[2] = {18,1,25136,1};
}

for i = 1, 2 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = me.AddItem(unpack(tbAward[nIndex]));
if (nIndex == 2) then
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn ghép được <color=cyan>%s<color> ", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName
.. "<color>] Ghép thành công <color=cyan>"
.. pItem.szName .."<color>");
me.Msg("Ghép thành công nhận được <color=yellow>Bức Tranh Quý Tỵ<color>.");
elseif (nIndex == 1) then
me.Msg("Ghép thất bại nhận được <color=yellow>Bức Tranh Nhâm Thìn<color>.");

end
end;
if (nValue == 3) then
me.CostMoney(10000000,0);
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
-- random
nRand = MathRandom(1, 10000);
-- fill 3 rate
local tbRate = {4000, 6000};
local tbAward =
{
[1] = {18,1,25135,1};
[2] = {18,1,25136,1};
}

for i = 1, 2 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = me.AddItem(unpack(tbAward[nIndex]));
if (nIndex == 2) then
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn ghép được <color=cyan>%s<color> ", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName
.. "<color>] Ghép thành công <color=cyan>"
.. pItem.szName .."<color>");
me.Msg("Ghép thành công nhận được <color=yellow>Bức Tranh Quý Tỵ<color>.");
elseif (nIndex == 1) then
me.Msg("Ghép thất bại nhận được <color=yellow>Bức Tranh Nhâm Thìn<color>.");

end
end;
if (nValue == 4) then
me.CostMoney(10000000,0);
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
-- random
nRand = MathRandom(1, 10000);
-- fill 3 rate
local tbRate = {4000, 6000};
local tbAward =
{
[1] = {18,1,25135,1};
[2] = {18,1,25136,1};
}

for i = 1, 2 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = me.AddItem(unpack(tbAward[nIndex]));
if (nIndex == 2) then
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn ghép được <color=cyan>%s<color> ", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName
.. "<color>] Ghép thành công <color=cyan>"
.. pItem.szName .."<color>");
me.Msg("Ghép thành công nhận được <color=yellow>Bức Tranh Quý Tỵ<color>.");
elseif (nIndex == 1) then
me.Msg("Ghép thất bại nhận được <color=yellow>Bức Tranh Nhâm Thìn<color>.");

end
end;
if (nValue == 5) then
me.CostMoney(10000000,0);
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
-- random
nRand = MathRandom(1, 10000);
-- fill 3 rate
local tbRate = {4000, 6000};
local tbAward =
{
[1] = {18,1,25135,1};
[2] = {18,1,25136,1};
}

for i = 1, 2 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = me.AddItem(unpack(tbAward[nIndex]));
if (nIndex == 2) then
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn ghép được <color=cyan>%s<color> ", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName
.. "<color>] Ghép thành công <color=cyan>"
.. pItem.szName .."<color>");
me.Msg("Ghép thành công nhận được <color=yellow>Bức Tranh Quý Tỵ<color>.");
elseif (nIndex == 1) then
me.Msg("Ghép thất bại nhận được <color=yellow>Bức Tranh Nhâm Thìn<color>.");

end
end;
end;

[__Jie__]

if (me.CostMoney(nBac, Player.emKPAY_REFINE) ~= 1) then
Dialog:Say("Ngươi không đủ bạc, không thể thao tác");
return 0;
end

Với nBac là số lượng bạc muốn kiểm tra có đủ và trừ .
Nên chèn trước hàm xóa item để kiểm tra và trừ lun :)

[anhnhianh]

Đã được. Tks pro nhá :)


Việt Nam có thủ đô là gì ? (viết tắt 2 ký tự đầu và viết thường )