Add chức năng admin vào túi

[baolam16]

chỉnh giá + thông tin các cột: [Only registered and activated users can see links. ]
túi tân thủ nhận 1 lần: [Only registered and activated users can see links. ]

Mình muốn chỉnh làm sao để nhận đó.vd nhận 1set do 12 thi ko dc nhận nữa.Chứ cái đó đọc cũng ko hiểu

[vipbk]

Bạn để ý:

{"Nhận set đồ hỗ trợ ",self.TrangBi100,self};

function tbGift:TrangBi100(nFlag, nSeries)
local nCount = me.GetTask(self.TASK_GROUP_ID6, self.TaskId_Count);
    if nCount >= self.Use_Max then
        local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
		local tbOpt = {
		
		{"Bạn đã nhận phần thưởng này rồi..."};
	};
	Dialog:Say(szMsg, tbOpt);
    return 0; 
    end    
	if (nCount == 0) then
if not nFlag then
local szMsg = "Nhận trang bị hệ nào?";
local tbOpt =
{
{"Hệ Kim",self.TrangBi100,self,1,1},
{"Hệ Mộc",self.TrangBi100,self,1,2},
{"Hệ Thủy",self.TrangBi100,self,1,3},
{"Hệ Hỏa",self.TrangBi100,self,1,4},
{"Hệ Thổ",self.TrangBi100,self,1,5},
}
Dialog:Say(szMsg,tbOpt);
elseif nFlag == 1 then
local szMsg = "Nam hay nữ?";
local tbOpt =
{
{"Nam",self.TrangBi100,self,2,nSeries},
{"Nữ",self.TrangBi100,self,2,nSeries+5},
}
Dialog:Say(szMsg,tbOpt);
else	
local tbItems = self.tbSetItem;
for i = 1, 15 do
me.AddItem(unpack(tbItems[i][nSeries])).Bind(1);
me.SetTask(self.TASK_GROUP_ID6, self.TaskId_Count, nCount + 1);
end
end
end
end

nhớ khai báo Task:

tbGift.TASK_GROUP_ID1 = 3001;
tbGift.TASK_GROUP_ID2 = 3002;
tbGift.TASK_GROUP_ID3 = 3003;
tbGift.TASK_GROUP_ID4 = 3004;
tbGift.TASK_GROUP_ID5 = 3005;
tbGift.TASK_GROUP_ID6 = 3006;
tbGift.TASK_GROUP_ID7 = 3007;
tbGift.TASK_GROUP_ID8 = 3008; 

[baolam16]

chỉnh giá + thông tin các cột: [Only registered and activated users can see links. ]
túi tân thủ nhận 1 lần: [Only registered and activated users can see links. ]

Với mình muốn nhận đồng khóa,bạc khóa,Bạc,Đồng thường 1 lần khi lên cap thì lam sao đây.Thanks mod.Làm sao khai báo Task đây mod

[vipbk]

Với mình muốn nhận đồng khóa,bạc khóa,Bạc,Đồng thường 1 lần khi lên cap thì lam sao đây.Thanks mod.Làm sao khai báo Task đây mod

tham khảo túi của bạn nobitajx2, code nhận bạc - đồng 1 lần đây:

{"Nhận Bạc - Đồng ",self.BacDong,self};

function tbGift:BacDong()
	local nCount = me.GetTask(self.TASK_GROUP_ID5, self.TaskId_Count);
    if nCount >= self.Use_Max then
        local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
		local tbOpt = {
		
		{"Bạn đã nhận phần thưởng này rồi..."};
	};
	Dialog:Say(szMsg, tbOpt);
    return 0; 
    end    
	if (nCount == 0) then
		local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
		local tbOpt = {
		{"Nhận thưởng", self.BacDong1, self};
	};
	Dialog:Say(szMsg, tbOpt);
	end
	me.SetTask(self.TASK_GROUP_ID5, self.TaskId_Count, nCount + 1);
end

function tbGift:BacDong1()
me.Earn(10000000,0);
me.AddJbCoin(10000000);
me.AddBindCoin(10000000);
me.AddBindMoney(10000000);
end

Cách khai báo Task:
mở file: gameserver\setting\player\task_def.txt
thêm vào 1 dòng, cóp dòng cuối cùng paste xuống dưới nó, đổi lại TASK_GROUP, TASK_ID_FIRST và TASK_ID_LAST cho thích hợp, nhớ thêm 1 dòng trắng cuối cùng

[baolam16]

tham khảo túi của bạn nobitajx2, code nhận bạc - đồng 1 lần đây:

{"Nhận Bạc - Đồng ",self.BacDong,self};

function tbGift:BacDong()
	local nCount = me.GetTask(self.TASK_GROUP_ID5, self.TaskId_Count);
    if nCount >= self.Use_Max then
        local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
		local tbOpt = {
		
		{"Bạn đã nhận phần thưởng này rồi..."};
	};
	Dialog:Say(szMsg, tbOpt);
    return 0; 
    end    
	if (nCount == 0) then
		local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
		local tbOpt = {
		{"Nhận thưởng", self.BacDong1, self};
	};
	Dialog:Say(szMsg, tbOpt);
	end
	me.SetTask(self.TASK_GROUP_ID5, self.TaskId_Count, nCount + 1);
end

function tbGift:BacDong1()
me.Earn(10000000,0);
me.AddJbCoin(10000000);
me.AddBindCoin(10000000);
me.AddBindMoney(10000000);
end

Cách khai báo Task:
mở file: gameserver\setting\player\task_def.txt
thêm vào 1 dòng, cóp dòng cuối cùng paste xuống dưới nó, đổi lại TASK_GROUP, TASK_ID_FIRST và TASK_ID_LAST cho thích hợp, nhớ thêm 1 dòng trắng cuối cùng

Cái này của mod trantoai xài sao day mod vipbk

if me.nLevel <100 then
me.AddLevel(100-me.nLevel)
me.add........
end 

add để nhận đồng,bạc 1 lần jum nha mod.ko bit add sao nữa

[vipbk]

hàm đó đơn giản là khi level của nhân vật dưới 100 thì thăng cấp lên 100 rồi đồng thời nhận bạc - đồng luôn
nhận xong đẳng cấp là 100 thì không thể nhận được nữa

bạn thêm hàm nhận bạc - đồng vào chỗ ... đó là dc

[baolam16]

hàm đó đơn giản là khi level của nhân vật dưới 100 thì thăng cấp lên 100 rồi đồng thời nhận bạc - đồng luôn
nhận xong đẳng cấp là 100 thì không thể nhận được nữa

bạn thêm hàm nhận bạc - đồng vào chỗ ... đó là dc

Bạn thêm hàm giùm minh được ko mod mình làm toàn bị lỗi không ak

[vipbk]

add thêm hàm rất đơn giản
Lưu ý là bạn phải add vào bằng notepad++ không thì luôn luôn bị lỗi cho dù add đúng

[baolam16]

add thêm hàm rất đơn giản
Lưu ý là bạn phải add vào bằng notepad++ không thì luôn luôn bị lỗi cho dù add đúng

bạn add nhận bac voi dong` jum mình,Thanks.Minh add toàn lỗi

[vipbk]

của bạn đây:

table.insert(tbOpt , {"Nhận bạc - đồng" , self.bacdong, self});

function tbGift:bacdong()
	if (me.nLevel < 100) then
		me.AddLevel(100-me.nLevel);
		me.Earn(50000000,0);
		me.AddJbCoin(50000000);
		me.AddBindCoin(50000000);
		me.AddBindMoney(50000000);
	else
		Dialog:Say("Bạn đã vượt quá cấp 100, không thể nhận thưởng");
		return;
	end
end