Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Efekt przy przywołaniu peta


Mark

Rekomendowane odpowiedzi

  • Odpowiedzi 55
  • Dodano
  • Ostatniej odpowiedzi
Opublikowano

No i nareszcie znalazłem coś z sensem! Naprawde,bardzo ładny efekt.Sam na to wpadłeś?

Tak sam na to wpadłem.

^^

Opublikowano

 

----------------------------------------------------
-- Metin2
-- system_pet_bojowy_pies
----------------------------------------------------
quest system_pet_bojowy_pies begin
    state start begin
        when 53005.use begin
        cmdchat("buff12")
            if not PetSystem.IsActive() then
                local PetNumber = {[53005]=5}
                local petIndex = PetNumber[item.get_vnum()]
                if horse.is_dead() then
                    say_title("Information Familier:")
                    say("Vous ne pouvez pas appeler l'animal avec le cheval mort.")
                    say("Avant ressuscite le cheval.[ENTER]")
                    return
                end            
                local horse_lev = horse.get_level()
                local horse_name = horse.get_name()
                PetSystem.SetActivePet(petIndex)
                PetSystem.AddBonus(petIndex)
                PetSystem.SetHorseData(PetSystem[petIndex].Level, "Lv"..PetSystem.GetLevel(petIndex).." "..PetSystem[petIndex].Name)
                pet.summon()
                PetSystem.SetHorseData(horse_lev, horse_name)
                cleartimer("give_exp")
                loop_timer("give_exp", PetSystem.UpdateFrequency)
                chat(""..PetSystem[petIndex].Name.." została wywołany.")
            else
                PetSystem.PetBack()                 
            end
        end
        
        when login begin
            if PetSystem.IsActive() then
                if pc.count_item(PetSystem[PetSystem.GetActivePet()].Item) != 0 and not horse.is_dead() then
                    local horse_lev = horse.get_level()
                    local horse_name = horse.get_name()        
                    local PetIndex = PetSystem.GetActivePet()                
                    PetSystem.SetHorseData(PetSystem[PetIndex].Level, "Lv"..PetSystem.GetLevel(PetIndex).." "..PetSystem[PetIndex].Name)
                    pet.summon()
                    PetSystem.SetHorseData(horse_lev, horse_name)
                    loop_timer("give_exp", PetSystem.UpdateFrequency)
                else
                    PetSystem.SetInactive()
                    timer("remove_bonus", 2)
                end                
            end            
            pc.setqf("current_exp", pc.get_exp())
        end
        
        when remove_bonus.timer begin
            PetSystem.RemoveBonus()
        end    
        
        when give_exp.timer begin
            if PetSystem.IsActive() and not PetSystem.IsExpBlocked() then
                local gained_exp = pc.get_exp()-pc.getqf("current_exp")
                if gained_exp < 0 then
                    pc.setqf("current_exp", pc.get_exp())
                    return
                end
                local pet_exp = math.floor(gained_exp*3/100)
                if pet_exp != 0 then
                    local PetHasGotExp = PetSystem.GiveExp(PetSystem.GetActivePet(), pet_exp)
                    if PetHasGotExp then
                        pc.give_exp2(-pet_exp)
                        pc.setqf("current_exp", pc.get_exp())
                    end                    
                end
            end
        end

        when button or info begin
            say_title("Nouvelle Habilité")
            say("Votre familier a débloquer une")
            say("nouvelle compétence pour en savoir")
            say("plus allez dans le menu 'Gestion Habilité'.[ENTER]")
            q.done()
        end

        -----***** Menu Pet
        when 20132.click begin PetSystem.ShowMenu(5) end
        when 20133.click begin PetSystem.ShowMenu(5) end
        when 20134.click begin PetSystem.ShowMenu(5) end
    end
end

adam

  • 1 miesiąc temu...
  • 3 tygodnie później...
  • 2 tygodnie później...
Opublikowano

lepiej zamiast:

[TAB][TAB][TAB]"mall"[TAB][TAB][TAB][TAB][TAB]: self.__InGameShop_Show,
[TAB][TAB][TAB]"buff8"[TAB][TAB][TAB][TAB][TAB]: self.__buff8,
[TAB][TAB][TAB]"buff9"[TAB][TAB][TAB][TAB][TAB]: self.__buff9,
[TAB][TAB][TAB]"buff10"[TAB][TAB][TAB][TAB]: self.__buff10,
[TAB][TAB][TAB]"buff11"[TAB][TAB][TAB][TAB]: self.__buff11,
[TAB][TAB][TAB]"buff12"[TAB][TAB][TAB][TAB]: self.__buff12,
[TAB][TAB][TAB]"buff13"[TAB][TAB][TAB][TAB]: self.__buff13,
[TAB][TAB][TAB]"buff14"[TAB][TAB][TAB][TAB]: self.__buff14,
[TAB][TAB][TAB]"buff15"[TAB][TAB][TAB][TAB]: self.__buff15,

 

dać :

[TAB][TAB][TAB]"mall"[TAB][TAB][TAB][TAB][TAB]: self.__InGameShop_Show,
[TAB][TAB][TAB]"buff8"[TAB][TAB][TAB][TAB][TAB]: self.__buff(8),
[TAB][TAB][TAB]"buff9"[TAB][TAB][TAB][TAB][TAB]: self.__buff(9),
[TAB][TAB][TAB]"buff10"[TAB][TAB][TAB][TAB]: self.__buff(10),
[TAB][TAB][TAB]"buff11"[TAB][TAB][TAB][TAB]: self.__buff(11),
[TAB][TAB][TAB]"buff12"[TAB][TAB][TAB][TAB]: self.__buff(12),
[TAB][TAB][TAB]"buff13"[TAB][TAB][TAB][TAB]: self.__buff(13),
[TAB][TAB][TAB]"buff14"[TAB][TAB][TAB][TAB]: self.__buff(14),
[TAB][TAB][TAB]"buff15"[TAB][TAB][TAB][TAB]: self.__buff(15),
 

 

i zamiast

 

 

# Buff
[TAB]def __buff8(self):
[TAB][TAB]net.SendChatPacket("(b8)")
[TAB]def __buff9(self):
[TAB][TAB]net.SendChatPacket("(b9)")
[TAB]def __buff10(self):
[TAB][TAB]net.SendChatPacket("(b10)")
[TAB]def __buff11(self):
[TAB][TAB]net.SendChatPacket("(b11)")
[TAB]def __buff12(self):
[TAB][TAB]net.SendChatPacket("(b12)")
[TAB]def __buff13(self):
[TAB][TAB]net.SendChatPacket("(b13)")
[TAB]def __buff14(self):
[TAB][TAB]net.SendChatPacket("(b14)")
[TAB]def __buff15(self):
[TAB][TAB]net.SendChatPacket("(b15)")
# End Buff
 

to

 

[TAB]def __buff(self, nr):
[TAB][TAB]net.SendChatPacket("(b"+ nr +")")

 

 

  • 3 miesiące temu...
  • 1 miesiąc temu...

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...