Cod: Selectaţi tot

quest mingi begin
    state start begin
        when login begin
            if game.get_event_flag("mondlicht_event") == 1 then
                notice("[Eveniment]Mingi de Fotbal: 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() <= 100 then                    if game.get_event_flag("mondlicht_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(50096)								
                        else
                        end
                    else
                    end
                elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 100  then
                    if game.get_event_flag("mondlicht_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(50096)									
                        else
                        end
                    else
                    end
                elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 100  then                    if game.get_event_flag("mondlicht_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(50096)								
                        else
                        end
                    else
                    end
                elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 100  then                    if game.get_event_flag("mondlicht_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(50096)								
                        else
                        end
                    else
                    end
                elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 100  then                    if game.get_event_flag("mondlicht_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(50096)								
                        else
                        end
                    else
                    end
                elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 100  then                    if game.get_event_flag("mondlicht_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(50096)								
                        else
                        end
                    else
                    end
                end
            end
        end
        when 9004.chat."<GM> Eveniment Mingi de Fotbal" with pc.is_gm() begin
            if game.get_event_flag("mondlicht_event") == 1 then
                say_title("Administrare Eveniment:")
                say("")
                say("[Eveniment]Mingi de Fotbal: Activ")
                say("")
                say_reward("Event Beenden?")
                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("mondlicht_event", 0)
                    char_log(0, "Mondlicht_event_end from" ..pc.get_name())
                    notice_all("[Eveniment]Mingi de Fotbal: Terminat")
                elseif s==2 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("~ Pe curând !")
                end
            else
                say_title("Administrare Eveniment:")
                say("")
                say("Mingi de Fotbal : ~ Închis ")
                say("")
                say_reward("Start Eveniment?")
                local s=select("Da", "Nu")
                if s==1 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("[Eveniment]Mingi de Fotbal: A inceput")
                    game.set_event_flag("mondlicht_event", 1)
                    char_log(0, "Mondlicht_event_start from" ..pc.get_name())
                    notice_all("[Eveniment]Mingi de Fotbal: A inceput!")
                elseif s==2 then
                    say_title("Administrare Eveniment:")
                    say("")
                    say("~ Pe curând !")
                end
            end
        end 
when 9004.chat."<GM> Dropul Mingi" with pc.is_gm() begin
            if pc.get_name() == "[GF]R@UL" or pc.get_name() == "[GF]Kostoman" or pc.get_name() == "[SGA]St3fanutzz" 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, "Mondlicht_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

Cod: Selectaţi tot

quest fotball_d begin
        state start begin
      when kill with game.get_event_flag("optiunefb") == 4 begin
               local fotball=number(1, 500)
               if fotball==1 and game.get_event_flag("fotball") == 1 then 

                  pc.give_item2(50096,1)

               end
            end
      when kill with game.get_event_flag("optiunefb") == 3 begin
               local fotball=number(1, 250)
               if fotball==1 and game.get_event_flag("fotball") == 1 then 

                  pc.give_item2(50096,1)

               end
            end
            when kill with game.get_event_flag("optiunefb") == 2 begin
               local fotball=number(1, 150)
               if fotball==1 and game.get_event_flag("fotball") == 1 then 

                  pc.give_item2(50096,1)

               end
            end
            when kill with game.get_event_flag("optiunefb") == 1 begin
               local fotball=number(1, 50)
               if fotball==1 and game.get_event_flag("fotball") == 1 then 

                  pc.give_item2(50096,1)

               end
            end
               when 33004.chat."Event de fotbal" with pc.is_gm() begin
               say_title("Eventul de fotball  -"..pc.getname().."-")
               local eventul = select("Porneste eventul fotball", "Opreste eventul fotball", "Panoul de control", "Anuleaza.")
			   if eventul == 1 and game.get_event_flag("fotball") == 1 then
               say_title("Eventul de fotball :")
               say("Event-ul este deja pornit.")
               wait()

               return
               else
               if eventul == 1 then
               say_title("Eventul de fotball :")
               say("Event-ul a fost pornit si automat a fost pus pe mod")
               say("'Normal',daca vrei sa modifici modul fa o tura prin")
               say("Panoul de control.Bafta!")
               notice_all("Dragi jucatori!")
               notice_all("Eventu-ul de fotball este activ!!")
               game.set_event_flag("optiunefb", 3)
               game.set_event_flag("fotball", 1)
               wait()
             return
             end
            end
            if eventul == 2 and game.get_event_flag("fotball") == 0 then
               say_title("Eventul de fotball :")
               say("Event-ul este deja oprit.")
               wait()
               return
               else
               if eventul == 2 then
               say_title("Eventul de fotball :")
               say("Event-ul a fost oprit.")
               notice_all("Dragi jucatori!")
               notice_all("Event-ul de fotball a fost inchis!")
               game.set_event_flag("fotball", 0)
               wait()
             return
             end
            end
            if eventul == 3 then
            say_title("Panou de control'Eventul de fotball '")
                local optiunefb = select("optiunefba rata de 1/50 'USOR'","optiunefba rata de 1/150 'Binisor'","optiunefba rata de 1/250 'Normal'","optiunefba rata de 1/500 'Greu'","Inchide")
               if optiunefb == 1 then
               game.set_event_flag("optiunefb", 1)
               syschat("Succes!")
               return
               end
               if optiunefb == 2 then
               game.set_event_flag("optiunefb", 2)
               syschat("Succes!")
               return
               end
               if optiunefb == 5 then
               return
               end
               if optiunefb == 3 then
               syschat("Succes!")
               game.set_event_flag("optiunefb", 3)
               return
               end
               if optiunefb == 4 then
               game.set_event_flag("optiunefb", 4)
               syschat("Succes!")
               return
               end
             return
            end
            if eventul == 4 then
               return
            end
            end
            
      end
end

Cod: Selectaţi tot

quest footbal begin 
    state start begin 
        when 50096.use begin  
			syschat("Ai nevoie de 30 de Fotball")
			syschat("Cand ajungi la 30 de mingi acestea se vor transforma automat")
			syschat("in Balon de aur!")
		end 
    end 
end 

Cod: Selectaţi tot

quest haur begin
    state start begin
		when kill or login or logout or levelup begin
			if pc.count_item(50096) >= 30 then
				pc.remove_item(50096, 30)
				pc.give_item2(50265)
				end
			end
		end
	end