Xin script Giftcode nhập mã tại NPC hoạt động

[kiemthe_dev]

Pro nào có scripts Giftcode nhập mã code ở NPC để nhận đồ thì cho mình xin với nhé. Thanks!!!

[omasa]

Pro nào có scripts Giftcode nhập mã code ở NPC để nhận đồ thì cho mình xin với nhé. Thanks!!!

Mình ví dụ = file newplayergift.lua

Trong file đó có đoạn như dưới đây. Mình làm luôn 1 dạng cho bạn xem và tham khảo rồi làm tương tự với script khác (Mã nhận Girlcode là 123456 như bên dưới)



function tbGift:OnUse()
local nCurSec = Lib:GetDate2Time(tonumber(GetLocalDate("%Y%m%d")));
local nKaifuSec = KGblTask.SCGetDbTaskInt(DBTASD_SERVER_STARTTIME);
local nMinSec = math.min(nCurSec, nKaifuSec);
local nMaxSec = math.max(nCurSec, nKaifuSec);
local nItemId = it.dwId;
local nItemLevel = NewPlayerGift:GetCurrData(me);
local nIsHide = GM.tbGMRole:IsHide();
local szMsg = "<color=blue>Túi Tân Thủ <color>";
local tbOpt = {
{"<color=orange>Gift Code<color>",self.giftcode,self};
{"Ta Chỉ Xem Qua Thôi..."},
};
if nMaxSec <= Lib:GetDate2Time(self.WULINSHIJIA_ENDTIME) and nMinSec >= Lib:GetDate2Time(self. WULINSHIJIA_STARTTIME) then
end
Dialog:Say(szMsg, tbOpt);
end


function tbGift:giftcode()
Dialog:AskNumber("Nhập mã: ", 99999999999, self.admin12, self);
end


function tbGift:admin12(nCount)


local szMsg = "Ta có thể giúp gì cho ngươi";
local tbOpt = {};
if (nCount==123456) then
table.insert(tbOpt ,
{"<color=red>Nhận vật phẩm từ Gift Code<color>", self.nhanvp, self});
Dialog:Say(szMsg, tbOpt);
end
end

function tbGift:nhanvp()
me.AddItem(Cho item vào đây);
end




P/s: Code này mình chỉ làm theo hình thức tham khảo. Còn muốn nó chuẩn hơn theo ý bán thì bạn có thể thêm chức năng nhận 1 lần chẳng hạn hay gì gì đó v.v...

[tuanmanhub]

kiemthe_dev onl pm yh em nhé
30 charrrrrrrrrr