1 Map1/Rot
21 Map1/Gelb
41 Map1/Blau
3 Map2/Rot
23 Map2/Gelb
43 Map2/Blau
4 Gildenland/Gildenland_Rot
6 Gildenland/Gildenland2_Rot
24 Gildenland/Gildenland_Gelb
26 Gildenland/Gildenland2_Gelb
44 Gildenland/Gildenland_Blau
46 Gildenland/Gildenland2_Blau
5 Standart_Maps/Affendungeon_Leicht
25 Standart_Maps/Affendungeon_Normal
45 Standart_Maps/Affendungeon_Expert
61 Standart_Maps/Eisland
62 Standart_Maps/Flammenland
63 Standart_Maps/Wueste
64 Standart_Maps/Orktal
65 Standart_Maps/Hwang_Tempel
67 Standart_Maps/Lungsam
68 Standart_Maps/Roter_Wald
69 Standart_Maps/Schlangenfeld
70 Standart_Maps/Land_der_Riesen
72 Standart_Maps/Grotte_1
73 Standart_Maps/Grotte_2
104 Standart_Maps/Spinnendungeon_1
71 Standart_Maps/Spinnendungeon_2
217 Standart_Maps/Spinnendungeon_3
301 Standart_Maps/Kap_des_Drachenfeuers
302 Standart_Maps/Gautamakliff
303 Standart_Maps/Nephritenbucht
304 Standart_Maps/Donnerberge
81 metin2_map_wedding_01
103 Event/Gildenkrieg_1
105 Event/Gildenkrieg_2
110 Event/Gildenkrieg_3
111 Event/Gildenkrieg_4
112 Event/PvP_Arena
113 Event/OX_Event
114 Reichsschlacht/Schlacht
118 Reichsschlacht/Flammenberg_1
119 Reichsschlacht/Flammenberg_2
120 Reichsschlacht/Flammenberg_3
121 Reichsschlacht/Schnee
122 Reichsschlacht/Schneepfad_1
123 Reichsschlacht/Schneepfad_2
124 Reichsschlacht/Schneepfad_3
125 Reichsschlacht/Wueste
126 Reichsschlacht/Wuestenberg_1
127 Reichsschlacht/Wuestenberg_2
128 Reichsschlacht/Wuestenberg_3
351 Dungeons/Rotdrachenfestung
66 Dungeons/Daemonenturm
216 Dungeons/Teufelskatakomben
208 Dungeons/Tempel_des_Drachen
207 metin2_map_devilscatacomb

quest doungeon_camera_cristal begin
state start begin

when 30121.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 in 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 in 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(30121).."")
say("")
return
end
end
if game.get_event_flag("grota_acces") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30121).."")

say ( "Detin in mine, ultima suflare a zeului dragon." )
say ( "Aceastã suflare magicã te pot ajuta sã mergi in" )
say ( "Camera de cristal." )
say ( "" )
say ( "Ai nevoie de cele trei chei rãsucite." )
say ( "" )
local i = select("Da, Vreau", "Nu, Multumesc")

if 1 == i then


say("Ai nevoie de un cod pentru tine si grupul tãu.")
say("Codul pe care il vei introduce, va trebui sã ")
say("continã 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(30121).."")
pc.setqf("furnizeaza",1)
say("Parola aleasa este: "..parola.."")

pc.remove_item("30179",3)
else
say_title(""..mob_name(30121).."")

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 in camera de cristal ! Începem prima sarcinã a voastrã.")
notice_in_map("[Camera de cristal]: Spargeti toate metinele, si aflati 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]:Ati spart metinul corespunzãtor.")
notice_in_map("[Camera de cristal]:Îl veti intâlni pe Beran-Setaou. Ce veti 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]: Ati 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 si 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 sperantã liderul "..pc.get_name().."")
notice_all("Urmat de rãzboinici lui de incredere, au reusit sã invingã 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]: Aveti la dispozitie 60 de minute sã ii capturati 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