[KT] Xin hỏi về cách thêm một món đồ nhất định khi giết quái ?
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Trang 1 của 2 1 2 CuốiCuối
Kết quả 1 đến 10 của 16
  1. #1
    Thành Viên
    Ngày tham gia
    Jun 2011
    Bài viết
    313
    Thanks
    96
    Thanked 144 Times in 57 Posts

    Xin hỏi về cách thêm một món đồ nhất định khi giết quái ?

    function BaiHuTang:OnDeath_Boss(pNpc)
    local pKillerPlayer = pNpc.GetPlayer();
    if (pKillerPlayer) then
    self:AddRepute(pKillerPlayer, 10);
    --self:AwardWeiWang(pKillerPlayer, 2, 10);
    self:AwardXinDe(pKillerPlayer, 100000);

    local nMapId = pKillerPlayer.nMapId
    local nBaiHuLevel = BaiHuTang:GetLevelByMapId(nMapId);
    local nFreeCount, tbFunExecute = SpecialEvent.ExtendAwardoCheck("BaiHuTangBoss", pKillerPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    SpecialEvent.ExtendAwardoExecute(tbFunExecute);

    local nTeamId = pKillerPlayer.nTeamId;
    if (0 == nTeamId) then
    return;
    end
    local tbPlayerId, nMemberCount = KTeam.GetTeamMemberList(nTeamId);
    for i, nPlayerId in pairs(tbPlayerId) do
    local pPlayer = KPlayer.GetPlayerObjById(nPlayerId);
    if (pPlayer and pPlayer.nId ~= pKillerPlayer.nId and pPlayer.nMapId == him.nMapId) then
    --self:AwardWeiWang(pPlayer, 2);
    self:AwardXinDe(pPlayer, 100000);
    self:AddRepute(pPlayer, 10);
    local nFreeCount, tbFunExecute = SpecialEvent.ExtendAwardoCheck("BaiHuTangBoss", pPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    SpecialEvent.ExtendAwardoExecute(tbFunExecute);
    end
    end
    end
    end
    Đây là file BHD

    Mình có thử thêm vào đoạn code trong script phần OnDeath như VipBK nói nhưng khi đánh chết 3 quái của 3 ải BHD thì mình chẳng thấy xuất hiện vật phẩm nào xuất hiện trong người .

    Bác nào pro chỉ em là thêm đoạn code rơi đồ nhất định với số lượng nhất định khi đánh chết quái ở dòng nào đc k ạ

    Em cảm ơn nhiều
    Khách viếng thăm hãy cùng huylouis1996 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên Tâm Huyết Sesshomaru's Avatar
    Ngày tham gia
    Apr 2009
    Bài viết
    1,666
    Thanks
    22
    Thanked 739 Times in 177 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    rơi vật phẩm boss chỉnh trong setting

    setting\npc\droprate\baihutang

    Bạn chỉnh trong script nó ko rớt là đúng rồi.ko rớt bất kì vật phẩm nào luôn ý chứ
    Khách viếng thăm hãy cùng Sesshomaru xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #3
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,008 Times in 1,889 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    ví dụ mình làm ok:

    boss Lý Thanh - tần lăng 3

    file script của nó: script\boss\qinshihuang\npc\boss_qinshihuang.lua

    Code:
    local tbJingying = Npc:GetClass("boss_qinjingying");
    function tbJingying:OnDeath(pNpcKiller)
    	
    	Boss.tbUniqueBossCallOut[him.nTemplateId] = nil;
    	
    	local pPlayer = pNpcKiller.GetPlayer();
    	if not pPlayer then
    		return 0;
    	end
    	
    	pPlayer.AddItem(18,1,114,9);
    	pPlayer.AddItem(18,1,114,9);
    ...
    ở trên mình muốn sau khi kill boss nhận được 2 viên Huyền Tinh cấp 9 khóa

    DEMO:

    [Only registered and activated users can see links. ]

    Như hình trên ta thấy ngoài vật phẩm nhận được (random) còn có 2 HT 9 (chắc chắn 100%)
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. The Following 2 Users Say Thank You to vipbk For This Useful Post:

    huylouis1996 (08-10-12), satthupro95 (11-10-12)

  5. #4
    Thành Viên
    Ngày tham gia
    Jun 2011
    Bài viết
    313
    Thanks
    96
    Thanked 144 Times in 57 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    vậy bạn sửa giúp mình cái code trên để nó rớt vật phẩm ngoài vật phẩm random ra đc k VipBK
    Khách viếng thăm hãy cùng huylouis1996 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. #5
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,008 Times in 1,889 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    mở file: gameserver\script\pvp\baihutang_gs.lua

    Code:
    function BaiHuTang:OnDeath_Boss(pNpc)
    	local pKillerPlayer = pNpc.GetPlayer();
    	if (pKillerPlayer) then
    		self:AddRepute(pKillerPlayer, 10);
    		--self:AwardWeiWang(pKillerPlayer, 2, 10);
    		self:AwardXinDe(pKillerPlayer, 100000);
    	   	
    	   	local nMapId = pKillerPlayer.nMapId
    	   	local nBaiHuLevel = BaiHuTang:GetLevelByMapId(nMapId);
    	   	local nFreeCount, tbFunExecute = SpecialEvent.ExtendAward:DoCheck("BaiHuTangBoss", pKillerPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    		SpecialEvent.ExtendAward:DoExecute(tbFunExecute);
    		
    		local nTeamId	= pKillerPlayer.nTeamId;
    		if (0 == nTeamId) then
    			return;
    		end
    		local tbPlayerId, nMemberCount	= KTeam.GetTeamMemberList(nTeamId);
    		for i, nPlayerId in pairs(tbPlayerId) do
    			local pPlayer	= KPlayer.GetPlayerObjById(nPlayerId);
    			if (pPlayer and  pPlayer.nId ~= pKillerPlayer.nId and pPlayer.nMapId == him.nMapId) then
    				--self:AwardWeiWang(pPlayer, 2);
    				self:AwardXinDe(pPlayer, 100000);
    				self:AddRepute(pPlayer, 10);
    	   			local nFreeCount, tbFunExecute = SpecialEvent.ExtendAward:DoCheck("BaiHuTangBoss", pPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    				SpecialEvent.ExtendAward:DoExecute(tbFunExecute);
    				
    				pPlayer.AddItem(...);
    
    				
    			end
    		end
    	end
    end
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  7. Các thành viên gởi lời cảm ơn đến vipbk vì bài viết này !

    huylouis1996 (12-10-12)

  8. #6
    Thành Viên Tâm Huyết kakakura's Avatar
    Ngày tham gia
    Oct 2010
    Bài viết
    668
    Thanks
    130
    Thanked 67 Times in 63 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    Trích dẫn Gửi bởi vipbk [Only registered and activated users can see links. ]
    mở file: gameserver\script\pvp\baihutang_gs.lua

    Code:
    function BaiHuTang:OnDeath_Boss(pNpc)
    	local pKillerPlayer = pNpc.GetPlayer();
    	if (pKillerPlayer) then
    		self:AddRepute(pKillerPlayer, 10);
    		--self:AwardWeiWang(pKillerPlayer, 2, 10);
    		self:AwardXinDe(pKillerPlayer, 100000);
    	   	
    	   	local nMapId = pKillerPlayer.nMapId
    	   	local nBaiHuLevel = BaiHuTang:GetLevelByMapId(nMapId);
    	   	local nFreeCount, tbFunExecute = SpecialEvent.ExtendAward:DoCheck("BaiHuTangBoss", pKillerPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    		SpecialEvent.ExtendAward:DoExecute(tbFunExecute);
    		
    		local nTeamId	= pKillerPlayer.nTeamId;
    		if (0 == nTeamId) then
    			return;
    		end
    		local tbPlayerId, nMemberCount	= KTeam.GetTeamMemberList(nTeamId);
    		for i, nPlayerId in pairs(tbPlayerId) do
    			local pPlayer	= KPlayer.GetPlayerObjById(nPlayerId);
    			if (pPlayer and  pPlayer.nId ~= pKillerPlayer.nId and pPlayer.nMapId == him.nMapId) then
    				--self:AwardWeiWang(pPlayer, 2);
    				self:AwardXinDe(pPlayer, 100000);
    				self:AddRepute(pPlayer, 10);
    	   			local nFreeCount, tbFunExecute = SpecialEvent.ExtendAward:DoCheck("BaiHuTangBoss", pPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    				SpecialEvent.ExtendAward:DoExecute(tbFunExecute);
    				
    				pPlayer.AddItem(...);
    
    				
    			end
    		end
    	end
    end
    Sao mình làm như vậy nó báo lỗi, đánh xong không nhận được gì, àh cho mình hỏi muốn chỉnh nhận cố định khi làm hoàn thành TDC thì chỉnh chổ nào vậy ?
    Tương lai tươi sáng thường dựa trên quá khứ đã quên lãng, bạn không thể sống thanh thản nếu bạn không vứt bỏ mọi nỗi buồn đã qua.

  9. #7
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,008 Times in 1,889 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    Trích dẫn Gửi bởi kakakura [Only registered and activated users can see links. ]
    Sao mình làm như vậy nó báo lỗi, đánh xong không nhận được gì, àh cho mình hỏi muốn chỉnh nhận cố định khi làm hoàn thành TDC thì chỉnh chổ nào vậy ?
    - mình vẫn nhận bình thường, bạn xem lại cách làm nhé

    - TDC: tìm file lua của nó rồi làm tương tự
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  10. #8
    Thành Viên Tâm Huyết kakakura's Avatar
    Ngày tham gia
    Oct 2010
    Bài viết
    668
    Thanks
    130
    Thanked 67 Times in 63 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    TDC tìm không thấy nhĩ, mò cả buổi chả thấy đâu,

    Còn BHD chắc đúng không vậy mình làm như thế này :

    function BaiHuTang:OnDeath_Boss(pNpc)
    local pKillerPlayer = pNpc.GetPlayer();
    if (pKillerPlayer) then
    .....
    ....
    local nFreeCount, tbFunExecute = SpecialEvent.ExtendAwardoCheck("BaiHuTangBoss", pPlayer, nBaiHuLevel, BaiHuTang:GetFloor(nMapId));
    SpecialEvent.ExtendAwardoExecute(tbFunExecute);
    pPlayer.AddItem(18,1,114,12); -- them day
    pPlayer.AddItem(18,1,114,12); -- them day
    end
    end
    end
    end
    Tương lai tươi sáng thường dựa trên quá khứ đã quên lãng, bạn không thể sống thanh thản nếu bạn không vứt bỏ mọi nỗi buồn đã qua.

  11. #9
    Thành Viên
    Ngày tham gia
    Nov 2012
    Bài viết
    17
    Thanks
    13
    Thanked 4 Times in 3 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    Vip ơi hướng dẫn mình cụ thể cách thêm item (vài item khác nhau theo từng lần đánh) nhận được khi đánh chết HKL, Lam KL, Hắc KL với nhé. Thanks nhiều
    Khách viếng thăm hãy cùng kiemphap xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  12. #10
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,008 Times in 1,889 Posts

    Ðề: Xin hỏi về cách thêm một món đồ nhất định khi giết quái ???

    Trích dẫn Gửi bởi kiemphap [Only registered and activated users can see links. ]
    Vip ơi hướng dẫn mình cụ thể cách thêm item (vài item khác nhau theo từng lần đánh) nhận được khi đánh chết HKL, Lam KL, Hắc KL với nhé. Thanks nhiều
    mở file lua của nó rồi làm hoàn toàn tương tự như trên
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 
Trang 1 của 2 1 2 CuốiCuối

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 04:48 AM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.