L Valentin scrie:

Cod: Selectaţi tot

quest camera_de_cristal begin
	state start begin
        
        when 20095.chat."Către Camera de Cristal" with pc.get_map_index() == 73 begin		
			if get_time() > game.get_event_flag("grota_timp") then
				game.set_event_flag("grota_acces",0)
        end
		
        if game.get_event_flag("grota_acces") == 0 and pc.count_item(30179) < 3 then
		
				say_reward ( "Pentru a intra în templul lui Beran, ai nevoie de" )
				say ( "" )
				say_item_vnum(30179)
				say_reward ( "Această cheie răsucită cad la Căpitanul Setaou." )
				say_reward ( "Ai nevoie de trei Chei Răsucite pentru a intra." )
				say ( "" )
		
        return
        end
		
        if game.get_event_flag("grota_acces") == 1 then
		
        pc.setqf("grota_parola", 078954687921)
        if pc.getqf("furnizeaza") == 1 then
        pc.setqf("furnizeaza",0)
		
				say ( "Ai cele trei Chei Răsucite." )
				say ( "Te voi teleporta imediat în camera de cristal." )
				say ( "" )
				
        pc.setqf ( "permis", 1 )
        wait()
        pc.warp(843200, 1066900)
        return
        end
		
        say ( "Introdu codul ales de liderul grupului." )
		say ( "" )		
		
			local parola = tonumber(input(""))
		
        --pc.setqf("grota_parolao", parola) 
        if game.get_event_flag("grota_parola") == parola then

        say ( "Ai introdus codul corect." )
		
        if pc.count_item(30179) < 3 then
		
        say ( "Nu te pot teleporta deoarece nu ai" )
        say ( ""..item_name(30179).."" )
		say ( "" )	
		
        say_item_vnum(30179)
		
        say ( "Ai nevoie de cele trei Chei Răsucite." )
		say ( "" )		
        return
        end
        say("Te voi teleporta imediat.")
		say ( "" )		
        pc.setqf("permis",1)
        wait()
        if pc.can_warp() then   
		pc.remove_item("30179",3) end
        pc.warp(843200, 1066900)
        elseif passi != pc.getqf("grota_parolao") then
        say_title(""..mob_name(20095).."")
        say("")
        return
			end
			end
        if game.get_event_flag("grota_acces") == 0 and pc.count_item(30179) >= 3 then
        say_title(""..mob_name(20095).."")
		
				say ( "Deţin în mine, ultima suflare a zeului dragon." )
				say ( "Această suflare magică te pot ajuta să mergi în" )
				say ( "Camera de cristal." )
				say ( "" )
				say ( "Ai nevoie de cele trei chei răsucite." )
				say ( "" )
				local i = select("Da, Vreau", "Nu, Mulţumesc")
		
        if 1 == i then
		

        say("Ai nevoie de un cod pentru tine şi grupul tău.")
		say("Codul pe care îl vei introduce, va trebui să ")
		say("conţină maxim 2 cifre.")
		say("")		
		
        local parola = tonumber(input(""))
        if parola and parola <= 999999999 and pc.count_item(30179)>=1 then
        game.set_event_flag("grota_acces",1)
        game.set_event_flag("grota_parola",parola)
        local times = get_time() + 300
        game.set_event_flag("grota_timp", times)
        say_title(""..mob_name(20095).."")
        pc.setqf("furnizeaza",1)
        say("Parola aleasa este: "..parola.."")

        pc.remove_item("30179",3)
        else 
        say_title(""..mob_name(20095).."")
		
				say("Nu ai scris codul corect.")
        end
        end
        end
        end
		
    when login with pc.get_map_index() == 207 and not pc.is_gm() begin
        if pc.count_item("80041") >= 1 then chat("") return end
        if pc.get_level() < 75 or pc.getqf("permis") == 0 and pc.get_map_index() == 207 then
        chat("Nu puteti intra. "..pc.get_level().." "..pc.getqf("permis").." "..pc.get_map_index().." ")
            warp_to_village()
        end
		
				notice_in_map("[Camera de cristal]: Bun venit în camera de cristal ! Începem prima sarcină a voastră.")
				notice_in_map("[Camera de cristal]: Spargeţi toate metinele, si aflaţi care este metinul corespunzător.")
				
        pc.set_warp_location(73 , 1825, 12207)
        end
    when 8020.kill with pc.get_map_index() == 207 begin
        timer("cameracristal_sef_start", 10)
		
			notice_in_map("[Camera de cristal]:Aţi spart metinul corespunzător.")
			notice_in_map("[Camera de cristal]:Îl veţi întâlni pe Beran-Setaou. Ce veţi face ?")
	 
	 d.kill_all()
        end
    when cameracristal_sef_start.timer begin
        game.set_event_flag("grota_acces",0)
        d.new_jump_all(207, 8427, 10669)
        d.setf("grota_sef", 1)
        d.spawn_mob(9012, 247, 173)
        end
    when 8031.kill or 8024.kill with pc.in_dungeon() and d.getf("grota_sef") == 2 begin
    local n =d.getf("count") + 1
    d.setf("count", n) 
	
			notice_in_map("[Camera de cristal]: Aţi spart până acum "..n.." metine.")
	
    if n > 2 then
    local t = number(1,4)
	
			notice_in_map("[Camera de cristal]: Beran-Setaou este foarte furios.")
			notice_in_map("[Camera de cristal]: Cheama şi mai multe metine.")
	
    if 1 == t then
	
    d.regen_file("data/dungeon/skia_boss3.txt")
    elseif 2 == t then
    d.regen_file("data/dungeon/skia_boss3.txt")
    elseif 3 == t then
    d.regen_file("data/dungeon/skia_boss3.txt")
    else
    d.regen_file("data/dungeon/skia_boss3.txt")
	
    end
    end
    end
	
    when 2493.kill with pc.in_dungeon() and d.getf("grota_sef") == 2 begin
        d.setf("grota_sef", 3)
		
				notice_all("Cu o ultimă suflare de speranţă liderul "..pc.get_name().."")
				notice_all("Urmat de războinici lui de încredere, au reuşit să învingă Dragonul Albastru.")				
				
        timer("cameracristal_sef_sfarsit", 60)
		d.spawn_mob(9012, 64, 142)
        d.kill_all()
        d.clear_regen()
        end

    when login with pc.in_dungeon() and d.getf("grota_sef") == 2 begin
    pc.set_warp_location(73 , 1825, 12207)
    end
    when login with pc.in_dungeon() and d.getf("grota_sef") == 1 begin
        timer("cameracristal_sef_sfarsit", 3600)    
        d.set_regen_file("data/dungeon/skia_boss.txt")
        local t = number(1,4)
        if 1 == t then
		
            d.regen_file("data/dungeon/skia_boss3.txt")
            elseif 2 == t then
            d.regen_file("data/dungeon/skia_boss3.txt")
            elseif 3 == t then
            d.regen_file("data/dungeon/skia_boss3.txt")
            else
            d.regen_file("data/dungeon/skia_boss3.txt")
        end
        local o = number(1,4)
        if 1 == o then
            d.regen_file("data/dungeon/skia_boss3.txt")
            elseif 2 == o then
            d.regen_file("data/dungeon/skia_boss3.txt")
            elseif 3 == o then
            d.regen_file("data/dungeon/skia_boss3.txt")
            else
            d.regen_file("data/dungeon/skia_boss3.txt")
			
            end  
			
        d.setf("grota_sef", 2)
		
				d.notice("[Camera de cristal]: Aveţi la dispozitie 60 de minute să îi capturaţi sufletul lui Beran.")
				
        d.setf("count", 0)
        pc.set_warp_location(73 , 1825, 12207)
        end

    when login with pc.in_dungeon() and d.getf("grota_sef") == 3 begin -- begin
    --pc.warp(181700, 1220600)
    end
    when cameracristal_sef_sfarsit.timer begin
        d.exit_all()
        end
    when cameracristal_sef_sfarsit.timer begin
        kill_all_in_map(207)
        game.set_event_flag("grota_acces",0)
        d.setf("grota_sef", 1)
        d.exit_all()
    end
    when login with pc.get_map_index() != 207 or not pc.in_dungeon() begin
    pc.setqf("permis",0)
    end
    end
end  

L Valentin scrie:Modifici tu sa nu iti ceara nimic

[OwN]Catalin scrie:Iti fac eu dar vr pe inel sau pe un npc?