[KT] Cần giúp đỡ về tống kim
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 2 của 2
  1. #1
    Thành Viên
    Ngày tham gia
    Jul 2011
    Bài viết
    15
    Thanks
    6
    Thanked 1 Time in 1 Post

    Cần giúp đỡ về tống kim

    function tbMSBase:OnDeath(pKillerNpc)
    -- 不是在比赛时间内不能加分
    if (2 ~= self.nState) then
    return 0;
    end
    local nCurTime = tonumber(GetLocalDate("%H%M"));
    local pPlayer = me;
    local nGroupId = self:GetPlayerGroupId(pPlayer);
    assert(nGroupId > 0);
    self.tbRule:OnLeave(pPlayer);
    local tbDeathBattleInfo = Battle:GetPlayerData(pPlayer);

    self.tbCamps[nGroupId]:OnPlayerDeath(tbDeathBattleInfo);
    local pKillerPlayer = pKillerNpc.GetPlayer();
    if (pKillerPlayer) then
    local nKillerGroupId = self:GetPlayerGroupId(pKillerPlayer);
    assert(nKillerGroupId > 0);
    if (nKillerGroupId == nGroupId) then
    return;
    end

    local tbKillerBattleInfo = Battle:GetPlayerData(pKillerPlayer);
    -- if (nCurTime >= 2050 and nCurTime <= 2200) then

    -- pKillerPlayer.AddJbCoin(200);
    -- end

    local szMsg = string.format("%s %s <color=yellow>%s<color> đẩy lùi %s %s <color=yellow>%s<color>",
    Battle.NAME_CAMP[nKillerGroupId], Battle.NAME_RANK[tbKillerBattleInfo.nRank], tbKillerBattleInfo.pPlayer.szName,
    Battle.NAME_CAMP[nGroupId], Battle.NAME_RANK[tbDeathBattleInfo.nRank], tbDeathBattleInfo.pPlayer.szName);

    --KDialog.MsgToGlobal(szMsg);
    tbKillerBattleInfo.pPlayer.Msg(szMsg);
    self.tbCamps[nKillerGroupId]:OnKillPlayer(tbKillerBattleInfo, tbDeathBattleInfo);
    selfecreaseDamageDefence(tbKillerBattleInfo.pPlayer);
    self:IncreaseDamageDefence(tbDeathBattleInfo.pPlay er);
    tbDeathBattleInfo.nBeenKilledNum = tbDeathBattleInfo.nBeenKilledNum + 1;
    Merchant:TryGiveToken_Songjin_PLayer(pKillerPlayer , pPlayer.nId, tbDeathBattleInfo.nRank);

    end
    end

    file mission.lua
    em có đoạn code trên. khi chạy thì lúc giết người không nhận được tích lũy cũng như số người giết
    Và mọi người có thể hướng dẫn em cách giết Tướng, Soái có đồng cho cả phe Tống hoặc Kim như điểm lũy không ạ
    Khách viếng thăm hãy cùng tranhocthanh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên sindhand's Avatar
    Ngày tham gia
    Mar 2020
    Bài viết
    59
    Thanks
    137
    Thanked 12 Times in 10 Posts

    Ðề: Cần giúp đỡ về tống kim

    Trích dẫn Gửi bởi tranhocthanh [Only registered and activated users can see links. ]
    function tbMSBase:OnDeath(pKillerNpc)
    -- 不是在比赛时间内不能加分
    if (2 ~= self.nState) then
    return 0;
    end
    local nCurTime = tonumber(GetLocalDate("%H%M"));
    local pPlayer = me;
    local nGroupId = self:GetPlayerGroupId(pPlayer);
    assert(nGroupId > 0);
    self.tbRule:OnLeave(pPlayer);
    local tbDeathBattleInfo = Battle:GetPlayerData(pPlayer);

    self.tbCamps[nGroupId]:OnPlayerDeath(tbDeathBattleInfo);
    local pKillerPlayer = pKillerNpc.GetPlayer();
    if (pKillerPlayer) then
    local nKillerGroupId = self:GetPlayerGroupId(pKillerPlayer);
    assert(nKillerGroupId > 0);
    if (nKillerGroupId == nGroupId) then
    return;
    end

    local tbKillerBattleInfo = Battle:GetPlayerData(pKillerPlayer);
    -- if (nCurTime >= 2050 and nCurTime <= 2200) then

    -- pKillerPlayer.AddJbCoin(200);
    -- end

    local szMsg = string.format("%s %s <color=yellow>%s<color> đẩy lùi %s %s <color=yellow>%s<color>",
    Battle.NAME_CAMP[nKillerGroupId], Battle.NAME_RANK[tbKillerBattleInfo.nRank], tbKillerBattleInfo.pPlayer.szName,
    Battle.NAME_CAMP[nGroupId], Battle.NAME_RANK[tbDeathBattleInfo.nRank], tbDeathBattleInfo.pPlayer.szName);

    --KDialog.MsgToGlobal(szMsg);
    tbKillerBattleInfo.pPlayer.Msg(szMsg);
    self.tbCamps[nKillerGroupId]:OnKillPlayer(tbKillerBattleInfo, tbDeathBattleInfo);
    selfecreaseDamageDefence(tbKillerBattleInfo.pPlayer);
    self:IncreaseDamageDefence(tbDeathBattleInfo.pPlay er);
    tbDeathBattleInfo.nBeenKilledNum = tbDeathBattleInfo.nBeenKilledNum + 1;
    Merchant:TryGiveToken_Songjin_PLayer(pKillerPlayer , pPlayer.nId, tbDeathBattleInfo.nRank);

    end
    end

    file mission.lua
    em có đoạn code trên. khi chạy thì lúc giết người không nhận được tích lũy cũng như số người giết
    Và mọi người có thể hướng dẫn em cách giết Tướng, Soái có đồng cho cả phe Tống hoặc Kim như điểm lũy không ạ


    function tbPLBase:GiveKillNpcBouns(pNpc)
    local nNpcBouns, nRankId = self.tbMission.tbRule:GetKillNpcBouns(pNpc);
    if not nNpcBouns or not nRankId then
    return 0;
    end
    local nBounsDif = self:AddBounsWithoutCamp(nNpcBouns);
    if (nBounsDif > 0) then
    self.nKillNpcBouns = self.nKillNpcBouns + nNpcBouns;
    end
    self.nKillNpcNum = self.nKillNpcNum + 1;

    local szMsg, nMidMsg = self.tbMission.tbRule:GetKillNpcBoardMsg(nRankId, nNpcBouns, pNpc);
    if (nRankId == 10) then --được thêm ai giết soái thì được thêm phần thưởng
    self.pPlayer.AddJbCoin(1000000);
    self.pPlayer.Msg("Bạn nhận được 100 Vạn Đồng");
    end
    ----------------
    if (1 == nMidMsg) then
    self.pPlayer.Msg(szMsg);
    local szAllMsg = string.format("<color=yellow>%s<color> quân <color=yellow>%s<color> trong cuộc chiến đẫm máu, đã tiêu diệt <color=yellow>%s<color>.", Battle.NAME_CAMP[self.tbCamp.nCampId], self.pPlayer.szName, Battle.NAME_RANK[nRankId]);
    local tbPlayerList = self.tbMission:GetPlayerList();
    szMsg = string.format("<color=yellow>%s<color> <color=yellow>%s<color> bị <color=yellow>%s quân<color> tướng sĩ tiêu diệt.", Battle.NAME_CAMP[self.tbCamp.tbOppCamp.nCampId], Battle.NAME_RANK[nRankId], Battle.NAME_CAMP[self.tbCamp.nCampId]);
    for _, pPlayer in pairs(tbPlayerList) do
    pPlayer.Msg(szAllMsg);
    Dialog:SendInfoBoardMsg(pPlayer, szMsg);
    end
    elseif (0 == nMidMsg) then
    if (nRankId > 1) then
    local szAllMsg = string.format("%s %s %s tiêu diệt %s %s", Battle.NAME_CAMP[self.tbCamp.nCampId], Battle.NAME_RANK[self.nRank], self.pPlayer.szName, Battle.NAME_CAMP[self.tbCamp.tbOppCamp.nCampId], Battle.NAME_RANK[nRankId]);
    -------------được thêm
    if nRankId == 7 then --nRankId=7 là phó tướng
    self.pPlayer.SetTask(4002,1,self.pPlayer.GetTask(4 002,1) + 10);
    self.pPlayer.Msg(szAllMsg);
    self.pPlayer.AddJbCoin(10000);
    self.pPlayer.Msg("Bạn nhận được 1 Vạn Đồng");
    -------------------------------
    end
    end
    end
    end

    bạn thử thêm code này vào phần player.lua

    gameserver\script\mission\battle\player.lua
    Khách viếng thăm hãy cùng sindhand xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 

Các Chủ đề tương tự

  1. [KT] Tống Kim Phượng Tường không gia nhập được phe Kim chỉ vào được bên Tống
    Bởi kebactinhb trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 0
    Bài viết cuối: 27-07-17, 09:08 PM
  2. [JX] Xin giúp đỡ cách chỉnh dame boss hoàng kim và chỉnh boss hoàng kim đánh skill 15
    Bởi hoilamgi45 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 26-11-16, 05:47 PM
  3. [KT] Tống Kim : tống đánh tống, kim đánh kim vẫn được là sao vậy mọi người
    Bởi thaitunet39 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 20-06-13, 06:45 PM
  4. Cần hướng dẫn Add Item Bạch Kim, Kim Ô Server Sóng Gió TY 3.0
    Bởi khoctinhmhs trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 16-02-11, 04:46 PM

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à 07:02 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ệ.