[QUEST] Event cufere hexagon

Avatar utilizator
RazVan
Administrator
Administrator
Mesaje: 695
Membru din: Mie Oct 19, 2022 5:25 pm
Localitate: München
Status: Activ
Multumiri acordate: 12
Multumiri primite: 18
Contact:

[QUEST] Event cufere hexagon

Mesaj de RazVan »

Cod: Selectaţi tot

----------------------------------------------------
--Quest BY BAF
----------------------------------------------------
quest event_cufere_hexagon begin
    state start begin
        when login begin
            if game.get_event_flag("cufere_event") == 1 then
                notice("Evenimentul : Cufãr Hexagon ~ Activ !")
            end
        end
        when kill begin
            local m_ind = pc.get_map_index()
            if npc.is_pc() then
            else
                if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 70 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 90 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 250 then
                    if game.get_event_flag("cufere_event") == 1 then
                        local chance = number(1, 100)
                        local chance_max = game.get_event_flag("mond_drop_chance")
                        if chance <= chance_max then
                            pc.give_item2(50037)
                            --game.drop_item(50037)
                        else
                        end
                    else
                    end
                end
            end
        end
        when 20095.chat."<GM> Eveniment Cufere Hexagon" with pc.is_gm() begin
            if game.get_event_flag("cufere_event") == 1 then
                say_title("Administrare Eveniment:")
                say("")
                say("Cufãr Hexagon : ~ Activ ")
                say("")
                say_reward("Opreste eveniment?")
                local s=select("Da", "Nu")
                if s==1 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("Evenimentul a luat sfârsit .")
                    say("~ Pe data viitoare !")
                    game.set_event_flag("cufere_event", 0)
                    char_log(0, "cufere_event_end from" ..pc.get_name())
                    notice_all("Evenimentul : Cufãr Hexagon ~ Terminat.")
                elseif s==2 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("~ Pe curând !")
                end
            else
                say_title("Administrare Eveniment:")
                say("")
                say("Cufãr Hexagon : ~ Închis ")
                say("")
                say_reward("Start Eveniment?")
                local s=select("Da", "Nu")
                if s==1 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("Evenimentul ~ A Început ! .")
                    say("~ Succes la strâns mai multe cufere !")
                    game.set_event_flag("cufere_event", 1)
                    char_log(0, "Cufere_event_start from" ..pc.get_name())
                    notice_all("Evenimentul : Cufãr Hexagon ~ A Început !")
                elseif s==2 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("~ Pe curând !")
                end
            end
        end
        when 20095.chat."<GM> Dropul Cuferelor Hexagon" with pc.is_gm() begin
            if pc.get_name() == "BaF" or pc.get_name() == "...."or pc.get_name() == "....."then
                say_title("Administrare Eveniment:")
                say("")
                say("Cat de mult sã fie dropul acestora ?")
                say("")
                say_reward("Între 1-100")
                say("")
                local new_chance = tonumber(input())
                if new_chance < 0 or new_chance > 100 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("Introducere incorectã ~")
                else
                    char_log(0, "Cufere_event_chance from" ..pc.get_name().. " to " ..new_chance.. "%")
                    game.set_event_flag("mond_drop_chance", new_chance)
                    say_title("Administrare Eveniment:")
                    say("")
                    say("Dropul actual " ..new_chance.. " setat.")
                    say("~ Pe curând !")
                end
            else
                say_title("Administrare Eveniment:")
                say("")
                say("Nu ai dreptul pentru a executa evenimentul .")
            end
        end
    end
end 
Tutorial instalare quest:
Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest/.lua
Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
Îl puneţi acolo (să fie .quest sau .lua).
Vă logaţi în FreeBSD / putty şi scrieţi în felul următor: cd /usr/home/game/share/locale/germany/quest (depinde ce server aveţi) apoi ./qc nume_quest.quest/.lua
Intraţi pe server şi scrieţi /reload q
Testaţi quest-ul.
Imagine
Scrie răspuns