View Full Version : [KT] Add chức năng admin vào túi
baolam16
17-08-12, 03:10 PM
Mình muồn add chức năng admin vào túi chỉ có admin sử dụng.Thành viên khác thì không..Ai giúp với.thanks;;).chức năng admin của túi nguyenphophuc
tham khảo cái này nè bạn:
{"<color=red>Chức Năng Admin<color>",self.lsAdmin,self};
function tbGift:lsAdmin()
local szMsg = "<color=blue>Túi Tân Thủ LSB v5 : <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>>";
local tbOpt = {};
if (me.szName == "DanhKiem" ) or (me.szName == "GameZoneVN" ) or (me.szName == "LuongSonBac" ) or (me.szName == "ThuyBatLuongSon" ) then
table.insert(tbOpt, {"<color=red>Chức năng Admin<color>" , self.ChucNangAdmin, self});
table.insert(tbOpt, {"<color=pink>Chức năng Nâng Cao<color>" , self.NangCao, self});
else
table.insert(tbOpt, {"Bạn Không Phải Admin"});
table.insert(tbOpt, {"<color=pink>Chức năng Nâng Cao<color>" , self.NangCao, self});
end
Dialog:Say(szMsg, tbOpt);
end
baolam16
17-08-12, 03:31 PM
Nó hoạt động sao mod.Mình muốn chức năng của 1 mình admin thui còn các chức năng khác của men..:D
hàm trên check tên nhân vật Admin, nếu đúng thì được dùng chức năng đặc biệt, còn không thì dùng chức năng bình thường
baolam16
17-08-12, 03:52 PM
Như zậy copy vào túi là được ak mod.Với mình hỏi mở thêm chức năng gmcard nữa.Mình add toàn bị lỗi;;)
Trong túi LSB v5 by nguyenhophuc87 có đoạn code đó, bạn cóp vào là dc
Chức năng gmcard? không hiểu ý bạn, thẻ gmcard hay chức năng gm (phím tắt)
baolam16
17-08-12, 04:32 PM
Trong túi LSB v5 by nguyenhophuc87 có đoạn code đó, bạn cóp vào là dc
Chức năng gmcard? không hiểu ý bạn, thẻ gmcard hay chức năng gm (phím tắt)
thẻ gmcard với chức năng lun đó mod..Mà sao mình copy nó ko nhận chung với túi cũ..Với làm sao để cho nhận đồ 1 lần thui zậy mod..Kiểu này mod dạy 1 khóa add túi tan thủ với add KTC đi:D:D:D:D:D.Mình add KTC hoài mà nó ko nhận j hết>:P>:P>:P.Thanks mod lun.
thẻ gmcard với chức năng lun đó mod..Mà sao mình copy nó ko nhận chung với túi cũ..Với làm sao để cho nhận đồ 1 lần thui zậy mod..Kiểu này mod dạy 1 khóa add túi tan thủ với add KTC đi:D:D:D:D:D.Mình add KTC hoài mà nó ko nhận j hết>:P>:P>:P.Thanks mod lun.
- thẻ gmcard add từ túi tân thủ
- nhận đồ 1 lần có vài bạn đã hướng dẫn, bạn tìm lại
- về KTC: mở warelist xóa hết ngày-tháng-năm và cột cuối (Consumed) nên bỏ trống không điền gì
baolam16
18-08-12, 01:10 AM
- thẻ gmcard add từ túi tân thủ
- nhận đồ 1 lần có vài bạn đã hướng dẫn, bạn tìm lại
- về KTC: mở warelist xóa hết ngày-tháng-năm và cột cuối (Consumed) nên bỏ trống không điền gì
Thế mình chỉnh giá ở đâu zậy mod:-s.Với cho minh xin cái link nhận đồ 1 lần xem=P~
chỉnh giá + thông tin các cột: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
túi tân thủ nhận 1 lần: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
baolam16
18-08-12, 01:30 AM
chỉnh giá + thông tin các cột: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
túi tân thủ nhận 1 lần: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
Mình muốn chỉnh làm sao để nhận đó.vd nhận 1set do 12 thi ko dc nhận nữa:-s.Chứ cái đó đọc cũng ko hiểu:-s
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
18-08-12, 10:18 AM
chỉnh giá + thông tin các cột: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
túi tân thủ nhận 1 lần: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
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>:D<.Làm sao khai báo Task đây mod:-s
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>:D<.Làm sao khai báo Task đây mod:-s
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
18-08-12, 03:17 PM
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 vipbk8-x
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
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
18-08-12, 03:31 PM
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
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
18-08-12, 04:21 PM
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=P~.Minh add toàn lỗi
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
Powered by vBulletin® Version 4.2.0 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.