PDA

View Full Version : [KT] Scripts nhận gift code cực kì đơn giản


linhpl2001
21-06-13, 06:59 AM
gift code này không cần khai báo task
nhận đúng 1 lần
Code:


function tbnpc:nhapmagc()
local szMsg = "Xin Mời bạn chọn thứ bạn cần<color>";
local tbOpt = {};
if (me.szName == "GameMaster" ) or (me.szName == "" ) or (me.szName == "" ) then ----Tên nhân vật nhận gift
table.insert(tbOpt, {"<color=red>Nhận Ngay Gift Code<color>" , self.ChucNangAdmin, self});
else
table.insert(tbOpt, {"<color=yellow>Bạn Không có trong danh sách nhận gift code<color>"});
end
Dialog:Say(szMsg, tbOpt);
end

function tbnpc:ChucNangAdmin()
if me.CountFreeBagCell() < 15 then
Dialog:Say("Sắp xếp hành trang dư ra 15 ô trống.", "Kết thúc đối thoại");
return 0;
end

local checknhan = me.GetTask(2183,4);

if checknhan==1 then
Dialog:Say("Nhận quà rồi cớ sao lại đến nữa?", "Kết thúc đối thoại");
return 0;
end
me.AddBindCoin(30000000); ----phần thưởng gift code
me.AddBindMoney(30000000);
me.AddItem(18,1,356,1).Bind(1);
me.AddItem(18,1,356,1).Bind(1);
me.AddItem(18,1,356,1).Bind(1);
me.AddItem(18,1,356,1).Bind(1);
me.AddItem(18,1,356,1).Bind(1);
me.AddItem(18,1,666,1).Bind(1);
me.SetTask(2183,4,1);
local pItemEx = me.AddItem(1,12,63,4);
if pItemEx then
me.SetItemTimeout(pItemEx, 60*24*8, 0);
end
end

cuối cùng thank nào :D
copday
21-06-13, 09:26 AM
gift code này không cần khai báo task
nhận đúng 1 lần
Code:
cuối cùng thank nào :D
hàm me.settask(x,2,1), có nghĩa là gì?
cuga95
21-06-13, 09:57 AM
gift code này không cần khai báo task
nhận đúng 1 lần
Code:



cuối cùng thank nào :D

Vẫn phải khai báo Task 2183 nhé thím.
Không khai báo vẫn chạy được nhưng GS sẽ báo lỗi, và nhiều lần lỗi ....... thì ai mà biết được.
linhpl2001
21-06-13, 03:44 PM
Vẫn phải khai báo Task 2183 nhé thím.
Không khai báo vẫn chạy được nhưng GS sẽ báo lỗi, và nhiều lần lỗi ....... thì ai mà biết được.

me.SetTask(2183,4,1); thấy hàm này không chú
satthupro95
21-06-13, 03:51 PM
Trong server task này có nghĩa :
2183 1 6 Hoạt động cố định server mới 0 0
Mấy cái task này khai báo thêm cũng không sao cả cho an toàn sử dụng task cũ biết đâu động chạm tới task khác
me.SetTask(2183,4,1)
Task 2183 được + 1 lần