Am problema cu camera de cristal !

RobertBernad · 18 Apr 2018, 22:42

Salut am si eu problema cu camera de cristal ...
Am questu de pe gm pot sa intru dar pe player nu .!
Va rog ajutati-ma ! asta imi este quest-ul:
quest Tempel_of_dragon begin
state start begin
when 30121.chat."Templul Dragonului" with pc.get_map_index() == 73 begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end

if pc.is_gm() then
say_title(""..mob_name(30121).."")
say("")
say("Salut, "..pc.get_name().."")
say("Ce faci sefule ? vrei sa intri ?")
say("Okay, n-ai nevoie de cheie sau parola.")
wait()
pc.warp(843200, 1066900)
return
end
if pc.count_item("80041") >= 1 then
say_title(""..mob_name(30121).."")
say("")
say("Tu n-ai nevoie de item, poti intra.")
wait()
return
end

if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30121).."")
say("")
say("Tu n-ai "..item_name(30179).."")
say_item_vnum(30179)
say("Ai nevoie de 3 obiecte.")
return
end

if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30121).."")
say("")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Tu ai trimis deja 3 chei.")
say("Te voi lasa sa intri.")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
return
end
say("Imi pare rau, Templul este deja rezervat.")
say("Exista deja o cheie de acces setata,")
say("daca o stii, scrie-o mai jos.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30121).."")
say("")
say("Codul este acelas.")
if pc.count_item(30179) < 3 then
say("Tu n-ai acces ...iti lipsesc cheile")
say("acestea "..item_name(30179).."")
say_item_vnum(30179)
say("Revin-o cand ai 3 chei.")
return
end
pc.remove_item("30179",3)
say("Puteti intra ....")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30121).."")
say("")
say("Parola introdusa nu este corecta.")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30121).."")
say("Detin în mine, ultima suflare a zului dragon.")
say("Aceasta suflare magica te pot ajuta sa mergi în")
say_reward("Camera de cristal.")
local i = select("Vreau sa intru.", "Nu vreau sa intru.")
if 1 == i then
say_title(""..mob_name(30121).."")
say("Seteaza cheia de acces.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("Grotte_time", times)
say_title(""..mob_name(30121).."")
pc.setqf("abgabe",1)
say("")
say("Cheia de acces este:")
chat("Cheia de acces pentru camera dragonului este: "..passwort.."")
say_reward(""..passwort.."")
say("Da-le colegilor tai cheia de la camera.")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30121).."")
say("")
say("Accest cod nu este corect, incearca din nou.")
say("Cheia trebuie sa fie alcatuita din cifre.")
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("Templul Dragonului: Tu esti gm, controlul va fi blocat.") return end
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 207 then
chat("Nu este permis sa intrati in aceasta harta prin efractie. "..pc.get_level().." "..pc.getqf("erlaubt").." "..pc.get_map_index().." ")
warp_to_village()
end
chat("Bine ai venit, pentru a dovedi ca esti destul de bun incat sa omori Dragonul,")
chat("Distruge piatra metin corecta.")
local sekunden = game.get_event_flag("Grotte_time") - get_time()
notice_in_map("Timp ramas: "..sekunden.." Sekunden")
timer("skipia_boss_ende", sekunden)
pc.set_warp_location(73 , 1825, 12207)
end
when 8023.kill with pc.get_map_index() == 207 begin
timer("skipia_boss_goo", 2)
notice_in_map("Ati distrus piatra metin corecta, veti urca la etajul urmator.")
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_zugang",0)
d.new_jump_all(207, 8436, 10669)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 239, 173)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
local n =d.getf("count") + 1
d.setf("count", n)
--notice_all("Metin killed "..n.."")
if n > 2 then
local t = number(1,4)
--notice_all("Spawn Metin")
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
end
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
d.setf("grotte_boss", 3)
notice_all("Grupul lui "..pc.get_name().." a reusit sa-l ucida pe Dragonul Albastru.")
d.notice("Impresionant, ati reusit sa invingeti Dragonul.") -- Als Abschluss könnt ihr noch die Metins zerstören")
d.notice("Aveti timp 60 de secunde sa strangeti tot.")
timer("skipia_boss_end", 60)
d.kill_all()
d.spawn_mob(9012, 239, 173)
d.clear_regen()
end

when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
timer("skipia_boss_end", 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_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
local o = number(1,4)
if 1 == o then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == o then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == o then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
d.setf("grotte_boss", 2)
d.notice("Bine ati venit in Templul Dragonului, aveti maxim o ora la dispozitie sa-l invingeti pe dragon.")
d.setf("count", 0)
pc.set_warp_location(73 , 1825, 12207)
end

when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin
--pc.warp(181700, 1220600)
end

when skipia_boss_end.timer begin
d.exit_all()
end
when skipia_boss_ende.timer begin
kill_all_in_map(207)
game.set_event_flag("Grotte_zugang",0)
d.setf("grotte_boss", 1)
d.exit_all()
end
when login with pc.get_map_index() != 207 or not pc.in_dungeon() begin
pc.setqf("erlaubt",0)
end
end
end

Bughy · 18 Apr 2018, 22:43

Schimba quest-ul cu acesta.

Cod: Selectaţi tot

----------------------------------------------------
--Camera_de_cristal_by_demonn
----------------------------------------------------
quest Camera_de_cristal_by_demon begin
state start begin
        
        when 30121.chat."Templul Dragonului." with pc.get_map_index() == 73 begin
        if get_time() > game.get_event_flag("Grotte_time") then
        game.set_event_flag("Grotte_zugang",0)
        end
        if pc.is_gm() or pc.count_item(80041) >= 1 then
        say_title(""..mob_name(30121).."")
        say("Bun venit "..pc.get_name().."")
        say("Nu ai nevoie nici de chei nici de parola")
        say("esti GM poti intra cand vrei.")
        wait()
        pc.warp(843200, 1066900) 
        return
        end
        if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
        say_title(""..mob_name(30121).."")
      say_reward("Pentru a intra în templul lui Beran,")
        say_reward("ai nevoie de "..item_name(30179).."")
        say_item_vnum(30179)
        say_reward("Aceasta cheie rasucita pica la Capitanul Setaou.")
      say_reward("Ai nevoie de trei Chei Rasucite pentru a intra.")
        return
        end
        if game.get_event_flag("Grotte_zugang") == 1 then
        say_title(""..mob_name(30121).."")
        pc.setqf("grotte_passworto", 078954687921)
        if pc.getqf("abgabe") == 1 then
        pc.setqf("abgabe",0)
        say("Ai cele trei Chei Rasucite.")
        say("Te voi teleporta imediat în camera de cristal.")
        pc.setqf("erlaubt",1)
        wait()
        pc.warp(843200, 1066900) 
        return
        end
        say("Introdu codul ales de liderul grupului.")
        local passwort = tonumber(input(""))
        --pc.setqf("grotte_passworto", passwort) 
        if game.get_event_flag("Grotte_passwort") == passwort then
        say_title(""..mob_name(30121).."")
        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_item_vnum(30179)
        say("Ai nevoie de cele trei Chei Rasucite.")
        return
        end
        say("Te voi teleporta imediat.")
        pc.setqf("erlaubt",1)
        wait()
        if pc.can_warp() then   
       pc.remove_item("30179",3) end
        pc.warp(843200, 1066900) 
        elseif passi != pc.getqf("grotte_passworto") then
        say_title(""..mob_name(30121).."")
        say("")
        return
        end
        end
        if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
        say_title(""..mob_name(30121).."")
        say("Detin în mine, ultima suflare a zeului dragon.")
      say("Aceasta suflare magica te pot ajuta sa mergi în")
      say_reward("Camera de cristal.")
      say("")
        say("Ai nevoie de cele trei chei rasucite.")
        local i = select("Da, Vreau", "Nu, Multumesc")
        if 1 == i then
        say_title(""..mob_name(30121).."")
        say("Ai nevoie de un cod pentru tine oi grupul tau.")
      say("Codul pe care îl vei introduce, va trebui sa ")
      say("con?ina maxim 2 cifre.")
        local passwort = tonumber(input(""))
        if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
        game.set_event_flag("Grotte_zugang",1)
        game.set_event_flag("Grotte_passwort",passwort)
        local times = get_time() + 300 --Wartezeit
        game.set_event_flag("Grotte_time", times)
        say_title(""..mob_name(30121).."")
        pc.setqf("abgabe",1)
        say("Parola aleasa este: "..passwort.."")
        notice_in_map("Parola camerei alese este "..passwort.." ")
        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() == 408 and not pc.is_gm() begin
        if pc.count_item("80041") >= 1 then chat("") return end
        if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 408 then
         chat("")
            warp_to_village()
        end
        notice_in_map("[Camera de cristal]:Bun venit în camera de cristal ! Începem prima sarcina a voastra.")
        notice_in_map("[Camera de cristal]:Spargeti toate metinele, si aflati care este metinul corespunzator.")
        pc.set_warp_location(73 , 1825, 12207)
        end
    when 8031.kill with pc.get_map_index() == 408 begin
        timer("skipia_boss_goo", 10)
        notice_in_map("[Camera de cristal]:Ati spart metinul corespunzator.")
    notice_in_map("[Camera de cristal]:Îl veti întâlni pe Beran-Setaou. Ce veti face ?")
    d.kill_all()
        end
    when skipia_boss_goo.timer begin
        game.set_event_flag("Grotte_zugang",0)
        d.new_jump_all(408, 8436, 10669) 
        d.setf("grotte_boss", 1)
        d.spawn_mob(9012, 239, 173) 
        end
    when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
    local n =d.getf("count") + 1
    d.setf("count", n) 
    notice_in_map("[Camera de cristal]:Ati spart pâna 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_boss1.txt")
    elseif 2 == t then
    d.regen_file("data/dungeon/skia_boss2.txt")
    elseif 3 == t then
    d.regen_file("data/dungeon/skia_boss3.txt")
    else
    d.regen_file("data/dungeon/skia_boss4.txt")
    end
    end
    end
    when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
        d.setf("grotte_boss", 3)
        notice_all("Cu o ultima suflare de speranta liderul "..pc.get_name().."")
        notice_all("Urmat de razboinici lui de încredere, au reusit sa învinga Dragonul Albastru.")
        timer("skipia_boss_end", 60)
      d.spawn_mob(9012, 64, 142)
        d.kill_all()
        d.clear_regen()
        end

    when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
    pc.set_warp_location(73 , 1825, 12207)
    end
    when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
        timer("skipia_boss_end", 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_boss1.txt")
            elseif 2 == t then
            d.regen_file("data/dungeon/skia_boss2.txt")
            elseif 3 == t then
            d.regen_file("data/dungeon/skia_boss3.txt")
            else
            d.regen_file("data/dungeon/skia_boss4.txt")
        end
        local o = number(1,4)
        if 1 == o then
            d.regen_file("data/dungeon/skia_boss5.txt")
            elseif 2 == o then
            d.regen_file("data/dungeon/skia_boss6.txt")
            elseif 3 == o then
            d.regen_file("data/dungeon/skia_boss7.txt")
            else
            d.regen_file("data/dungeon/skia_boss8.txt")
            end    
        d.setf("grotte_boss", 2)
        d.notice("[Camera de cristal]:Aveti la dispozitie 60 de minute sa îi 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("grotte_boss") == 3 begin -- begin
    --pc.warp(181700, 1220600)
    end
    when skipia_boss_end.timer begin
        d.exit_all()
        end
    when skipia_boss_ende.timer begin
        kill_all_in_map(408)
        game.set_event_flag("Grotte_zugang",0)
        d.setf("grotte_boss", 1)
        d.exit_all()
    end
    when login with pc.get_map_index() != 408 or not pc.in_dungeon() begin
    pc.setqf("erlaubt",0)
    end
    end
end

RobertBernad · 18 Apr 2018, 22:50

mi-a dat o eroare 90siceva ca nu am apucat sa vad si ma scos direct ...

Bughy · 18 Apr 2018, 22:51

RobertBernad scrie:mi-a dat o eroare 90siceva ca nu am apucat sa vad si ma scos direct ...

Ai instalat quest-ul in putty? ai dat un reload q pe sv? si ce eroare? ai avut erori la instalarea quest-ului? sysser ch1 si client terog

RobertBernad · 18 Apr 2018, 22:55

Bughy scrie:
RobertBernad scrie:mi-a dat o eroare 90siceva ca nu am apucat sa vad si ma scos direct ...
Ai instalat quest-ul in putty? ai dat un reload q pe sv? si ce eroare? ai avut erori la instalarea quest-ului? sysser ch1 si client terog

Nu este permis sa intri in aceasta harta prin efractie
90 0 207
asta zice
si dupa ma scoate
Sper ca ma poti ajuta !

Bughy · 18 Apr 2018, 22:56

RobertBernad scrie:
Bughy scrie:
RobertBernad scrie:mi-a dat o eroare 90siceva ca nu am apucat sa vad si ma scos direct ...
Ai instalat quest-ul in putty? ai dat un reload q pe sv? si ce eroare? ai avut erori la instalarea quest-ului? sysser ch1 si client terog
Nu este permis sa intri in aceasta harta prin efractie
90 0 207
asta zice
si dupa ma scoate
Sper ca ma poti ajuta !

Te scoate din joc sau din harta?

RobertBernad · 18 Apr 2018, 23:07

Bughy scrie:
RobertBernad scrie:
Bughy scrie:
Ai instalat quest-ul in putty? ai dat un reload q pe sv? si ce eroare? ai avut erori la instalarea quest-ului? sysser ch1 si client terog
Nu este permis sa intri in aceasta harta prin efractie
90 0 207
asta zice
si dupa ma scoate
Sper ca ma poti ajuta !
Te scoate din joc sau din harta?

Din joc imi log Out ...

Bughy · 18 Apr 2018, 23:13

RobertBernad scrie:
Bughy scrie:
RobertBernad scrie: Nu este permis sa intri in aceasta harta prin efractie
90 0 207
asta zice
si dupa ma scoate
Sper ca ma poti ajuta !
Te scoate din joc sau din harta?
Din joc imi log Out ...

Intra in winscp, sterge quest-ul de peste tot si din object dupa care instaleaza din nou quest-ul.

RobertBernad · 18 Apr 2018, 23:22

Bughy scrie:
RobertBernad scrie:
Bughy scrie:
Te scoate din joc sau din harta?
Din joc imi log Out ...
Intra in winscp, sterge quest-ul de peste tot si din object dupa care instaleaza din nou quest-ul.

Rezolvat merge ! Mersi mult

Bughy · 18 Apr 2018, 23:24

Topic marcat ca fiind rezolvat.

Am problema cu camera de cristal !

Problema camera de cristal

Problema camera de cristal

Problema Camera de cristal

Problema camera de cristal

Cine este conectat