[HKGH] Lỗi đánh quái không chết - Trang 2
Hello & Welcome to our community. Is this your first visit? Đăng Ký
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Trang 2 của 2 Đầu tiênĐầu tiên 1 2
Kết quả 11 đến 14 của 14
  1. 18-07-14, 12:53 PM #11
    pikhjn
    pikhjn vẫn chưa có mặt trong diễn đàn
    Quản trị viên vếu bự ! pikhjn's Avatar
    Ngày tham gia
    Jan 2011
    Đang ở
    A Town With Love !
    Bài viết
    1,316
    Thanks
    216
    Thanked 399 Times in 193 Posts

    Ðề: Lỗi đánh quái không chết

    Xóa nội dung của file NpcMisson.lua kia đi copy hết đoạn này rồi Save lại
    -> Trong floder Script có các file lua khác thì xóa hết luôn đi chỉ chừa lại 2 File OpenItmeTrigGer.lua với NpcMisson.lua là đủ rồi !!

    PHP Code:
    --[Thăng Chức 1]
    function     MissIon18(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
             SendMissionMsg    (UserWorldId,QuestId, 11, RwJdId)
        elseif     CzId==2 then
                if Player.Player_Level < 10 then 
                    return 
                end
            SetPlayerTransfer    (UserWorldId,0,1)
                SetQigong(UserWorldId,5)
                        UpHpMpSp(UserWorldId)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+500000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 2 Chính Phái]
    function     MissIon11(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 35 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,1,2)
                SetQigong(UserWorldId,6)
                UpGongFu(UserWorldId)
                UpYzbItme(UserWorldId)
                Player.Player_Money=Player.Player_Money+1000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 2 Tà Phái]
    function     MissIon12(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,2,2)
                SetQigong(UserWorldId,6)
                UpGongFu(UserWorldId)
                UpYzbItme(UserWorldId)
                Player.Player_Money=Player.Player_Money+1000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end

    --[Thăng Chức Lần 3 Chính Phái]
    function     MissIon45(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 60  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 60  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,3)
                SetQigong(UserWorldId,7)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+2000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 3 Tà Phái]
    function     MissIon46(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 60 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 60 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,3)
                SetQigong(UserWorldId,7)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+2000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 4 Chính Phái]
    function     MissIon73(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 80  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,4)
                SetQigong(UserWorldId,8)
                SetQigong(UserWorldId,9)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+3000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 4 Tà Phái]
    function     MissIon74(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,4)
                SetQigong(UserWorldId,8)
                SetQigong(UserWorldId,9)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+3000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 5]
    function     MissIon178(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 100  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 100 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,5)
                SetQigong(UserWorldId,10)
                AddSkill(UserWorldId,0,25)
                AddSkill(UserWorldId,0,26)
                AddSkill(UserWorldId,0,27)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+4000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Thiên 1]
    function     MissIon300(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<115 or Player.Player_WuXun < 15000 then 
                SendSysMsg    (UserWorldId,"Diem Vo Huan chua dat 15000!", 20, "He thong")   
                    SendMissionMsg(UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level<115 or Player.Player_WuXun < 15000 then 
                SendSysMsg    (UserWorldId,"Diem Vo Huan chua dat 15000!", 20, "He thong") 
                    SendMissionMsg(UserWorldId,QuestId, 12, RwJdId)
                return 
                end

            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook6    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,6)

                Player.Player_Money=Player.Player_Money+5000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Thiên 2]
    function     MissIon301(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<120 then
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then 
                if Player.Player_Level<120  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook7    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,7)

                Player.Player_Money=Player.Player_Money+6000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end

    --[Thăng Thiên 3]
    function     MissIon254(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<130  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level<130  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong!", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook8    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,8)

                Player.Player_Money=Player.Player_Money+7000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end 
    Khách viếng thăm hãy cùng pikhjn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
  2. 18-07-14, 09:21 PM #12
    tsunami9x
    tsunami9x vẫn chưa có mặt trong diễn đàn
    Thành Viên
    Ngày tham gia
    Nov 2008
    Bài viết
    23
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Ðề: Lỗi đánh quái không chết

    Trích dẫn Gửi bởi pikhjn [Only registered and activated users can see links. ]
    Xóa nội dung của file NpcMisson.lua kia đi copy hết đoạn này rồi Save lại
    -> Trong floder Script có các file lua khác thì xóa hết luôn đi chỉ chừa lại 2 File OpenItmeTrigGer.lua với NpcMisson.lua là đủ rồi !!

    PHP Code:
    --[Thăng Chức 1]
    function     MissIon18(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
             SendMissionMsg    (UserWorldId,QuestId, 11, RwJdId)
        elseif     CzId==2 then
                if Player.Player_Level < 10 then 
                    return 
                end
            SetPlayerTransfer    (UserWorldId,0,1)
                SetQigong(UserWorldId,5)
                        UpHpMpSp(UserWorldId)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+500000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 2 Chính Phái]
    function     MissIon11(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 35 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,1,2)
                SetQigong(UserWorldId,6)
                UpGongFu(UserWorldId)
                UpYzbItme(UserWorldId)
                Player.Player_Money=Player.Player_Money+1000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 2 Tà Phái]
    function     MissIon12(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 35  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,2,2)
                SetQigong(UserWorldId,6)
                UpGongFu(UserWorldId)
                UpYzbItme(UserWorldId)
                Player.Player_Money=Player.Player_Money+1000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end

    --[Thăng Chức Lần 3 Chính Phái]
    function     MissIon45(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 60  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 60  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,3)
                SetQigong(UserWorldId,7)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+2000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 3 Tà Phái]
    function     MissIon46(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 60 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 60 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,3)
                SetQigong(UserWorldId,7)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+2000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 4 Chính Phái]
    function     MissIon73(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 80  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,4)
                SetQigong(UserWorldId,8)
                SetQigong(UserWorldId,9)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+3000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 4 Tà Phái]
    function     MissIon74(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 80 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,4)
                SetQigong(UserWorldId,8)
                SetQigong(UserWorldId,9)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+3000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Chức Lần 5]
    function     MissIon178(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level < 100  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level < 100 then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            SetPlayerTransfer    (UserWorldId,Player.Player_Zx,5)
                SetQigong(UserWorldId,10)
                AddSkill(UserWorldId,0,25)
                AddSkill(UserWorldId,0,26)
                AddSkill(UserWorldId,0,27)
                UpGongFu(UserWorldId)
                Player.Player_Money=Player.Player_Money+4000000
            UpMoney    (UserWorldId)
                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Thiên 1]
    function     MissIon300(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<115 or Player.Player_WuXun < 15000 then 
                SendSysMsg    (UserWorldId,"Diem Vo Huan chua dat 15000!", 20, "He thong")   
                    SendMissionMsg(UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level<115 or Player.Player_WuXun < 15000 then 
                SendSysMsg    (UserWorldId,"Diem Vo Huan chua dat 15000!", 20, "He thong") 
                    SendMissionMsg(UserWorldId,QuestId, 12, RwJdId)
                return 
                end

            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook6    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,6)

                Player.Player_Money=Player.Player_Money+5000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end
    --[Thăng Thiên 2]
    function     MissIon301(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<120 then
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then 
                if Player.Player_Level<120  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook7    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,7)

                Player.Player_Money=Player.Player_Money+6000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end

    --[Thăng Thiên 3]
    function     MissIon254(UserWorldId,QuestId, CzId, RwJdId)
            local Player = GetPlayer(UserWorldId)
        if     CzId==1 then
                if Player.Player_Level<130  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
            else
                     SendMissionMsg(UserWorldId,QuestId, 11, RwJdId)
                end
            elseif CzId==2 then
                if Player.Player_Level<130  then 
                SendMissionMsg    (UserWorldId,QuestId, 12, RwJdId)
                return 
                end
            local weiz    =GetPackage(UserWorldId)
            if     weiz==-1 then 
                SendSysMsg    (UserWorldId,"Khong du o trong!", 9, "He thong")
                    SendMissionMsg(UserWorldId,QuestId, 31, RwJdId)
                return 
                end
            AddSkillBook8    (UserWorldId,weiz);

                SetPlayerTransfer(UserWorldId,Player.Player_Zx,8)

                Player.Player_Money=Player.Player_Money+7000000

            UpGongFu    (UserWorldId)
                UpMoney(UserWorldId)
                UpExp(UserWorldId)
                UpYzbItme(UserWorldId)

                AddQuest(UserWorldId,QuestId,1)
                SendMissionMsg(UserWorldId,QuestId, 21, 1)
        elseif     CzId==3 then
             SendMissionMsg    (UserWorldId,QuestId, 31, RwJdId)
        elseif     CzId==5 then
             SendMissionMsg    (UserWorldId,QuestId, 51, RwJdId)
            end    
    end 
    hjx, giờ thì còn ko nhận đc nv luôn :'( click mãi ko nhận nổi :'(

    Mà bạn cho có DB 7.0 mà vị trí NPC chuẩn không? DB hiện tại NPC đứng hết 1 chỗ nhìn chán muốn chêt
    Khách viếng thăm hãy cùng tsunami9x xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
  3. 19-07-14, 02:00 PM #13
    pikhjn
    pikhjn vẫn chưa có mặt trong diễn đàn
    Quản trị viên vếu bự ! pikhjn's Avatar
    Ngày tham gia
    Jan 2011
    Đang ở
    A Town With Love !
    Bài viết
    1,316
    Thanks
    216
    Thanked 399 Times in 193 Posts

    Ðề: Lỗi đánh quái không chết

    Trích dẫn Gửi bởi tsunami9x [Only registered and activated users can see links. ]
    hjx, giờ thì còn ko nhận đc nv luôn :'( click mãi ko nhận nổi :'(

    Mà bạn cho có DB 7.0 mà vị trí NPC chuẩn không? DB hiện tại NPC đứng hết 1 chỗ nhìn chán muốn chêt
    Cái đấy là chỉ nhiệm vụ thăng chức thôi , muốn các nhiệm vụ khác thì phải tự viết !
    Khách viếng thăm hãy cùng pikhjn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
  4. 23-07-14, 11:18 PM #14
    quocphi1206
    quocphi1206 vẫn chưa có mặt trong diễn đàn
    Thành Viên
    Ngày tham gia
    May 2012
    Bài viết
    16
    Thanks
    3
    Thanked 1 Time in 1 Post

    Ðề: Lỗi đánh quái không chết

    Tình hình mình chới sv này cũng bị 1 số lỗi : [Only registered and activated users can see links. ]
    -quái đánh mãi không chết
    -đăng nhập 1 lần out tk ra đăng nhập lại không đc mà phải tắt hẳn login và game sever
    -Mình chơi client 9.0 quái bị lỗi tọa độ không khớp
    - NPC thỉnh thoảng click vào không hiện ra bảng menu lại out sever vào từ đầu
    Pi có khắc phục đc lỗi nào ko chỉ mình với
    Khách viếng thăm hãy cùng quocphi1206 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
 

 
Trang 2 của 2 Đầu tiênĐầu tiên 1 2
« xin code item và ngọc | Sv nào mờ online được »

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
  •  

Nội quy - Quy định

Múi giờ GMT +7. Bây giờ là 05:39 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ệ.