[VANZARE - LUA] Eveniment OX Automat

05 Mai 2017, 14:46

Va salut!

[VANZARE] - Automatic OX Event

~ Structura ~

~ 3 Categori de Premii ~

- Premiu de Participare
- Premiu intre runde
- Premiu de Final

~ Informatii ~

Premiu de inceput : 

-Premiul de participare se acorda dupa inchiderea automata a portilor OX. 
-Acorda unul dintre cele 5 pachete de premii random playerilor.
-Pachetele pot fi diminuate/marite sau editate in orice fel posibil.

Premiul intre runde :

-Premiul intre runde se acorda odata la 3 intrebari playerilor ramasi.
-Premiile se pot mari/diminua sau modifica.

~ Atentie : Premiul intre runde vine sub forma de Pachet cu premii acesta continand unul sau mai multe premii, el poate fi editat dupa bunul plac ~

Premiul de Final

Premiul de final se acorda ultimului jucator ramas.
Premiul se poate modifica in asa fel incat sa fie dat ultimilor jucatori ramasi dupa bunul plac.

Evenimentul se inchide in 20 de secunde automat dupa ce premiul de final a fost acordat si/sau nu a mai ramas nici un jucator.

~ Servicii ~

- Ofer suport pentru quest si il modific dupa bunul plac al cumparatorului.
- Cumparatorii beneficiaza de fiecare update adus systemului gratuit.

Previzualizare System :

UPDATE 1.0.1

- Acum puteti sa deschide-ti Evenimentul OX intr-o perioada de timp.

Spre exemplu daca tu la tine pe server ai programat OX-ul la ora 20:00 iar tu nu poti fi la aceea ora acasa, poti seta ca oxul sa se deschida intr-un anumit interval de timp.

- Am rescris putin metoda prin care anunta premiile de participare.

Previzualizare Update 1.0.1:

UPDATE 1.0.2

- Am adaugat posibilitatea de a adauga timpul in care evenimentul sa fie deschis.

- Am corectat cateva mici greselei.

- Am adaugat notificari ale evenimentului. [In cat timp se deschide / In cat timp se inchid portile]

Urmeaza un videoclip cu systemul pe un server online cu peste 200 de jucatori!

Previzualizare Update 1.0.2:

LIVE SERVER PREVIEW (Metin2Origins)

C-Stroia · 05 Mai 2017, 14:56

am dat de un sf care avea chestia asta...

05 Mai 2017, 15:03

Nu imi pot imagina cum ai facut asta baiatul meu cand questu este facut de mine

)

C-Stroia · 05 Mai 2017, 15:26

Cod: Selectaţi tot

--[[
    -- Automatic OX-Event System
    -- Quest Writer By : HaveBeen&#8482;
]]--
quest oxevents begin
    state start begin
    
    function open()
        if(oxevent.open() == 0) then
            return 0
        elseif(oxevent.open() == 1) then
            return 1
        else
            return 2
        end
    end
    
    function quiz()
        if(oxevent.quiz(1,30) == 0) then
            return 0
        elseif(oxevent.quiz(1,30) == 1) then
            return 1 
        else
            return 2
        end
    end
    
    function check()
        local gmlist = {"HaveBeen"} -- Introdu numele GameMaster-ilor
        for i = 1,table.getn(gmlist),1 do
            if(gmlist[i] == pc.name) then
                return true
            else
                return false
            end
        end
    end
    
    
    when 20011.chat."GM: Ox Event" with pc.is_gm() and oxevents.check() == true and game.get_event_flag("automatic_oxevent_status") == 0 begin
        say_title(mob_name(npc.get_race())..":") 
        say("") 
        --- 
        say("Vrei sa deschizi eventul Gara OX? ") 
        say("") 
        local s = select(locale.yes,locale.no) 
        
        if(s == 2) then 
            return 
        end 
            say_title(mob_name(npc.get_race())..":") 
            say("") 
            --- 
            say_reward("Nota : Timpu-l actual al evenimentului OX (H) : "..os.date("%H")) 
            say("") 
            say("Cat de mult vrei sa deschizi eventul?") 
            
            local times = tonumber(input())
            
            if(times == "" or tonumber(times) == nil) then 
                return 
            end 
            game.set_event_flag("automatic_oxevent_opentime",times)             
    
            say_title(mob_name(npc.get_race())..":") 
            say("") 
            
            --- 
            say("Multumim! Sistemul a fost activat ! ") 
            say("Deschide peste "..times.." ore! ") 
            game.set_event_flag("automatic_oxevent_status",1) 
            server_timer('check',5) 
        end 
    
    when check.server_timer begin
        if(os.date("%H") == game.get_event_flag("automatic_oxevent_opentime")) then
            if(oxevents.open() == 0) then
                print("Competitia este deja activata! ")
            elseif(oxevents.open() == 1) then
                notice_all("<Notice> Eventul OX este activat! ")
                notice_all("<Notice> Arata-ti cunostiintele... ")
                server_timer('countdownone',300)
            else
                print("A aparut o eroare... ")
            end
        else
            server_timer('checktwo',5)
        end
    end
    
    when checktwo.server_timer begin
        if(os.date("%H") == game.get_event_flag("automatic_oxevent_opentime")) then
            if(oxevents.open() == 0) then
                print("Competitia este deja activata! ")
            elseif(oxevents.open() == 1) then
                notice_all("<Notice> Eventul OX este activat! ")
                notice_all("<Notice> Arata-ti cunostiintele... ")
                server_timer('countdownone',300)
            else
                print("An Error has occurred.. ")
            end
        else
            server_timer('check',5)
        end
    end    
    
    when countdownone.server_timer begin
        notice_all("<Notice> Se inchid portile OX-ului : 5 minute ramase.. ")
        server_timer("countdowntwo",60)
    end
    
    when countdowntwo.server_timer begin
        notice_all("<Notice> Se inchid portile OX-ului : 4 minute ramase.. ")
        server_timer("countdownthree",60)
    end
    
    when countdownthree.server_timer begin
        notice_all("<Notice> Se inchid portile OX-ului : 3 minute ramase.. ")
        server_timer("countdownfour",60)
    end
    
    when countdownfour.server_timer begin
        notice_all("<Notice> Se inchid portile OX-ului : 2 minute ramase.. ")
        server_timer("countdownfive",60)
    end
    
    when countdownfive.server_timer begin
        notice_all("<Notice< CSe inchid portile OX-ului : 1 minute ramase.. ")
        server_timer("countdown",60)
    end
    
    when countdown.server_timer begin
        notice_all("<Ox-Event> Toate portile OX sunt inchise. ") 
        notice_all("<Ox-Event> Nu mai poti intra ca un concurent. ") 
        notice_all("<Ox-Event> Acum poti intra doar ca si un spectator. ") 
        game.set_event_flag("automatic_oxevent_status",2)
        server_timer('playercheck',10)
        game.set_event_flag("automatic_oxevent_opentime",0)
    end
    
    when playercheck.server_timer begin
        if(pc.get_map_index() == 113) then
            if(oxevent.get_attender() == 0) then
                notice_all("<Ox-Event> Nu este nici un castigator al competitiei OX. ") 
                notice_all("<Ox-Event> Eventul OX se inchide automat. ") 
                game.set_event_flag("automatic_oxevent_status",0)
                game.set_event_flag("automatic_oxevent_opentime",0)
                warp_all_to_village()
            else
                server_timer('oxeventstart',10)
            end
        end
    end
    
    when oxeventstart.server_timer begin
        if(pc.get_map_index() == 113) then
            if(oxevents.quiz() == 0) then
                print("Eventul OX a fost oprit! ")
            elseif(oxevents.quiz() == 1) then
                notice_in_map("S-a adresat o intrebare.") 
                server_timer("goon",30)
            else
                print("O intrebare s-a adresat deja. ") 
            end
        else
            return
        end
    end
    
    when goon.server_timer begin
        -- Check
        if(oxevent.get_attender() == 0) then
            notice_in_map("Nu este nici unul in eventul OX. ") 
            notice_in_map("Eventul OX s-a incheiat automat. ") 
            game.set_event_flag("automatic_oxevent_status",0)
            game.set_event_flag("automatic_oxevent_opentime",0)
            warp_all_to_village()
        elseif(oxevent.get_attender() == 1) then
            notice_in_map("Eventul OX s-a incheiat cu succes. ") 
            notice_in_map("Ultimului player i se acorda . ") 
            local itemlist = {11299,11499,11699,11899}
            game.drop_item(itemlist[number(1,table.getn(itemlist))],1)
            game.set_event_flag("automatic_oxevent_status",0)
            game.set_event_flag("automatic_oxevent_opentime",0)
            server_timer("over",20)
        else
            server_timer("goontwo",30)
        end
    end
    
    when over.server_timer begin
        warp_all_to_village()
    end
    
    when goontwo.server_timer begin
        -- Check
        if(oxevent.get_attender() == 0) then
            notice_in_map("Nu este nici unul in eventul OX. ") 
            notice_in_map("Eventul OX s-a incheiat automat. ") 
            game.set_event_flag("automatic_oxevent_status",0)
            game.set_event_flag("automatic_oxevent_opentime",0)
            warp_all_to_village()
        elseif(oxevent.get_attender() == 1) then
            notice_in_map("Eventul OX s-a incheiat cu succes. ") 
            notice_in_map("Ultimului player i se acorda. ") 
            local itemlist = {11299,11499,11699,11899}
            game.drop_item(itemlist[number(1,table.getn(itemlist))],1)
            game.set_event_flag("automatic_oxevent_status",0)
            game.set_event_flag("automatic_oxevent_opentime",0)
            server_timer("over",20)
        else
            server_timer("goon",30)
                end
    end
    
    when 20011.chat."Ox-Event" begin
        if(game.get_event_flag("automatic_oxevent_status") == 2) then 
            say("Toate portile sunt inchise. ") 
            say("Acum poti intra doar ca si un spectator. ") 
            local s = select(locale.yes,locale.no) 
            
            if(s == 2) then 
                return 
            end 
            
            pc.warp(896300, 28900) 
    
        elseif(game.get_event_flag("automatic_oxevent_status") == 1) then 
            say("Acum toate portile OX sunt deschise. ") 
            say("Vrei sa intri ca un concurent? ") 
        
            local s = select("Da, ca si un concurent.","Nu, ca si un spectator.") 
        
            if(s == 1) then 
                pc.warp(896500, 24600) 
            elseif(s == 3) then 
                pc.warp(896300, 28900) 
                end 
            end 
        end 
    end 
end

Dragoş Florin · 05 Mai 2017, 15:36

Nu e bine

, i'ai stricat afacerea.

Moț · 05 Mai 2017, 15:38

Cod: Selectaţi tot

quest auto_ox begin
    state start begin
		when 20086.chat."GM: Event Auto OX" with pc.is_gm() and pc.get_map_index() == 113 begin
			addimage(20, 12, "admin.tga")
			say("")
			say("")
			say("")
			say_title("Login")
			say_reward("Introduceti parola mai jos:")
			local password = input ( ) 
			if password == locale.parola then 
				say_title ( "Bun venit!" )
				starta = select("Porneste OX Automat","Scire un anunt","Premii OX","Inchide")
				if starta == 1 then
					say( "Salut "..pc.get_name()..", Bine ai venit in panoul OX!" )
					say ("")
					say("Eventul OX va porni peste cateva secunde!")
					say("")
					say(" De aici poti contola eventul OX.")
					say(" Poti alege cat timp sa fie portile deschise")
					say("si poti alege cate intrebari sa contina aceasta")
					say("runda de OX. ")
					say("")
					say(" Vrei sa mergi mai departe?")
					start_event = select("DA","NU")
					if start_event == 1 then
						pc.setqf("time_wait", 0)
						pc.setqf("questions", 0)
						pc.setqf("questions_write", 0)
						say_reward ("Alege timpul de asteptare:")
						local time_wait = select ( "5 Minute" , "4 Minute" , "3 Minute" , "2 Minute " , "1 Minut", "30 de secunde", "Renunt") 
						if time_wait == 1 then 
							pc.setqf("time_wait", 300)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 5 Minute
						elseif time_wait == 2 then
							pc.setqf("time_wait", 240)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 4 Minute
						elseif time_wait == 3 then
							pc.setqf("time_wait", 180)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 3 Minute
						elseif time_wait == 4 then 
							pc.setqf("time_wait", 120)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 2 Minute
						elseif time_wait == 5 then 
							pc.setqf("time_wait", 60)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 1 Minut
						elseif time_wait == 6 then 
							pc.setqf("time_wait", 30)
							say_reward ("Alege numarul de intrebari maxime:")
							local max_quiz = select ( "5" , "10" , "15" , "20" , "25", "Pana la final", "Renunt") 
							if max_quiz == 1 then 
								pc.setqf("questions", 5)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 2 then 
								pc.setqf("questions", 10)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end								
							elseif max_quiz == 3 then 
								pc.setqf("questions", 15)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 4 then 
								pc.setqf("questions", 20)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 5 then 
								pc.setqf("questions", 25)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							elseif max_quiz == 6 then 
								pc.setqf("questions", 0)
								say_title("Eventul OX")
								say("")
								say("Esti sigur ca vrei sa pornesti OX?")
								local last_ans = select ( "Da" , "Nu")
								if last_ans == 1 then
									local v = oxevent . open ( ) 
									if v == 1 then 
										notice_all ( "[!]OX: Concursul OX a inceput!" ) 
										notice_all ( "[!]OX: Grabeste-te la Uriel pentru a putea participa." ) 
										timer("start_ox", 5)			
									elseif v == 0 then
										chat("Competitia este deja activata! ")
									else
										chat("A aparut o eroare... ")
									end
								else
									return
								end
							else
								return
							end
							-- 30 de secunde
						else
							return
						end
					else
						return
					end	
				end
				if starta == 2 then
					say_title("Anunt intre regate:")
					say("Scrieti in casuta de mai jos anuntul dorit.")
					local mesaj = input()
					say("Scrieti in casuta de mai jos anuntul dorit.")
					local mesaja = input()
					say("Scrieti in casuta de mai jos anuntul dorit.")
					local mesajb = input()
					say("Scrieti in casuta de mai jos anuntul dorit.")
					local mesajc = input()
					if mesaj == "" then
						say_title("Anunt intre regate:")
						say("Nu ati introdus niciun mesaj.")
					else
						say_title("Anunt intre regate:")
						say("[!]OX: "..mesaj..""..mesaja..""..mesajb..""..mesajc.."")
						say("a fost postat in chatul principal.")
						notice_all("[!]OX: "..mesaj..""..mesaja..""..mesajb..""..mesajc.."")
					end
				end
				if starta == 3 then
					say ( "Distribuie premiul Concursului OX" ) 
					say ( "Scrie ID-ul obiectului care urmeaza sa fie distribuit." ) 
					say ( "" ) 
					local item_vnum = input ( ) 
					say ( "Scrie cantitate de obiecte care urmeaza sa" ) 
					say ( "fie distribuite." ) 
					local item_count = input ( ) 
					oxevent . give_item ( item_vnum , item_count ) 
					say ( "Cantitate " .. oxevent . get_attender ( ) .. "a fost primita de participanti" ) 
					say ( "" )
				end
			else
				addimage(20, 12, "admin.tga")
				say("")
				say("")
				say("")
				say_title("Login")
				say("")
				say_reward("Ati introdus o parola gresita!")
			end
		end				

		when start_ox.timer begin	-- ALEGE TIMPUL
			if pc.getqf("time_wait") == 300 then
				timer("time_wait_1",5)
			elseif pc.getqf("time_wait") == 240 then
				timer("time_wait_2",5)
			elseif pc.getqf("time_wait") == 180 then
				timer("time_wait_3",5)
			elseif pc.getqf("time_wait") == 120 then
				timer("time_wait_4",5)
			elseif pc.getqf("time_wait") == 60 then
				timer("time_wait_5",5)
			else
				timer("time_wait_6",5)
			end
		end
     
		when time_wait_1.timer begin -- 5 Minute
			notice_all("[!]OX: Se inchid portile OX-ului : 5 minute ramase.. ")
			timer("time_wait_2",60)
		end
		
		when time_wait_2.timer begin -- 4 Minute
			notice_all("[!]OX: Se inchid portile OX-ului : 4 minute ramase.. ")
			timer("time_wait_3",60)
		end
		
		when time_wait_3.timer begin -- 3 Minute
			notice_all("[!]OX: Se inchid portile OX-ului : 3 minute ramase.. ")
			timer("time_wait_4",60)
		end
    
		when time_wait_4.timer begin -- 2 Minute
			notice_all("[!]OX: Se inchid portile OX-ului : 2 minute ramase.. ")
			timer("time_wait_5",60)
		end
		
		when time_wait_5.timer begin -- 1 Minut
			notice_all("[!]OX: Se inchid portile OX-ului : Un minut ramas.. ")
			timer("time_wait_6",30)
		end
    
		when time_wait_6.timer begin -- 30 de secunde
			notice_all("[!]OX: Se inchid portile OX-ului : 30 de secunde ramase.. ")
			timer("time_wait_end",30)
		end
		
		when time_wait_end.timer begin -- Verifica daca sunt jucatori.
			notice_all("---------------------------------------------------------------------------------") 
			notice_all("[!]OX: Portile au fost inchise! ")
			if(oxevent.get_attender() == 0) then
				timer("ox_no_players",15)
			else
				timer("ox_start",15)
			end
		end

		when ox_start.timer begin 
			pc.setqf("questions_write", pc.getqf("questions_write") + 1)
			local v = oxevent . quiz ( 1 , 30 ) 
			if v == 0 then 
				chat( "Eroare" ) 
			elseif v == 1 then 
				timer("ox_evaluate",35)
			else 
				chat( "Eroare" ) 
			end 
		end
		
		when ox_evaluate.timer begin
			-- LISTA CU PREMII
			local participare = { 	27987,	27992, 	27993,	27994, 	30188,	30251,	30252,	30253,	25041,	70031,	85005,	80003,	30193,	18900,	70251,	70252,	70253,	70254,	30192,	30193,	30194,	30195,	30196,	30197,	30198,	30199,	30203,	70030,	70032,	70033,	}
			local part_count =  { 	50,		15, 		15, 		15, 		15, 		15, 		15,		15,		15,		5,		1,		1,		15,		1,		15,		15,		15,		15,		15,		15,		15,		15,		15,		15,		15,		15,		15,		5,		5,		5}
			local num_partic = number(1, 30)
			
			local castigator =  { 	85001,	85005, 	18049, 	14209, 	16219, 	17219, 	30188,	70024,	80004,	30251,	30252,	30253,	25041,	27992,	27993,	27994,	45143,	85004,	85008,	85009,	}
			local cast_count =  { 	1, 		1, 		1, 		1, 		1, 		1, 		100,		50,		1,		100,		100,		100,		20,		50,		50,		50,		1,		1,		1,		1,		}
			local num_cast = number(1, 20)
			-- END LISTA CU PREMII
		
			if oxevent.get_attender() == 1 then
				oxevent . give_item (castigator[num_cast], cast_count[num_cast])
				timer("ox_only_win",10)
			elseif oxevent.get_attender() > 1 then
				oxevent . give_item (participare[num_partic], part_count[num_partic])
				if pc.getqf("questions") == 0 then
					timer("ox_start",10)
				elseif pc.getqf("questions_write") < pc.getqf("questions") then
					timer("ox_start",10)
				else
					timer("ox_multiple_win",10)
				end
			else
				timer("ox_no_win",15)
			end
		end
		
		when ox_multiple_win.timer begin -- Mai multi castigatori
			notice_all("---------------------------------------------------------------------------------") 
			notice_all("[!]OX: Se pare ca avem mai multi castigatori! Acestia au primit premii pe masura.") 
			notice_all("[!]OX: Eventul ox va lua sfarsit. ") 
			timer("ox_end",30)
		end
		
		when ox_only_win.timer begin -- Un singur castigator
			notice_all("---------------------------------------------------------------------------------") 
			notice_all("[!]OX: A mai ramas un singur jucator in arena OX. Acesta a castigat!") 
			notice_all("[!]OX: Eventul ox va lua sfarsit. ") 
			timer("ox_end",30)
		end
		
		when ox_no_win.timer begin -- Nu exista castigatori
			notice_all("---------------------------------------------------------------------------------") 
			notice_all("[!]OX: Nu este nici un castigator al competitiei OX!") 
			notice_all("[!]OX: Eventul ox va lua sfarsit. ") 
			timer("ox_end",15)
		end
		
 		when ox_no_players.timer begin -- Nu sunt jucatori
			notice_all("---------------------------------------------------------------------------------") 
			notice_all("[!]OX: Se pare ca nu au intrat jucatori in arena OX!") 
			notice_all("[!]OX: Eventul ox va lua sfarsit. ") 
			timer("ox_end",15)
		end
    
		when ox_end.timer begin -- END EVENT OX
			oxevent . end_event ( )
		end
	end
end

Automat ,cu premii pe masura ,imaginile tga le puneti voi !
Upload :

Cod: Selectaţi tot

http://www.girlshare.ro/3489824584.4

Bafta cu vanzarea :*

05 Mai 2017, 18:08

Degeaba luati ceva gratis de pe net si asteptati sa va mearga perfect, vorbim de oameni care nu au o legatura cu LUA, questul pe care l-am creat nu are legatura cu cele de mai sus. Oricum bravo, quest de 1000 de linii pentru niste functii de nimic. Stroia de tine nu mai zic nimic, ai luat questul de pe net si l-ai pus aici, nu e problema zilele urmatoare aduc un update ca sa nu vad comentarii total amp...

21 Mai 2017, 13:27

Recomand.

21 Mai 2017, 14:35

Recomand.

24 Mai 2017, 19:42

Imi pare rau ca am intarziat dar acum updateul 1.0.2 este aici.

Urmeaza sa adaug zilele urmatoare un video cu systemul pe un server online cu peste 200 de playeri!

Va doresc o zi frumoasa!

[VANZARE - LUA] Eveniment OX Automat

[VANZARE - LUA] Eveniment Mingea de Aur Automat

[NEW QUEST]Eveniment OX Tradus + Mod Automat + Bug Rezolvat!

Eveniment OX

Eveniment LF

Cine este conectat