Jump to content
DryUz

Quest de SuraFantasma

Recommended Posts

Esta quest es del metin2 atenas creo!

quest ascaria begin
    state start begin
  when login begin
   if pc.get_map_index() == 191 then
    pc.set_warp_location(191, 80845, 900)   
   elseif pc.get_map_index() >= 1910000 and pc.get_map_index() < 1920000 then
    pc.set_warp_location(191, 80845, 900)   
   end
  end  
 
  when 8024.kill with pc.get_map_index()==191 begin
   local jump1 = math.random(1, 20)
   if jump1 <= 10 then
    chat("¿Has encontrado un desconocido anillo?.")
    chat("Llévelo a sura Fantasma.")
    game.drop_item(40001, 1)
   else
    chat("Il metin e' vuoto!!!")
   end
  end 
  when 30121.click with pc.get_map_index() != 191 begin
   say_title("Sura Fantasma")
   say("")
   say("In passato ero guerriero dell esercito imperiale.")
   say("Molti anni fa venne scoperto un luogo protetto dal")
   say("terribile Drago Rosso. Oggi sono il solo a sapere")
   say("dove si trovi la valle di Ascaria. In realta")
   say("mi e' proibito dare informazioni su questo luogo")
   say("ma posso comunque portarti li...")
   say("Nella valle di Ascaria.")
   say("")
   say_reward("Vuoi essere teletrasportato?")   
   local s = select("Andiamo!", "Annulla")
   if s == 2 then
    return
   end
   pc.warp(8084500, 90000)
  end 
  when 30121.click with pc.get_map_index() == 191 begin 
   if pc.count_item(40001)>=1 then
    say_title("Sura Fantasma:")
    say("")
    say("Hai trovato un anello?!")
    say("Fammi vedere!")
    say("")
    say("")
    pc.removeitem("40001", 1)
    wait()
    say_title("Sura Fantasma:")
    say("")
    say("Okay, e' quello che cercavo..")
    say("Si va Bene.. Addio!!")
    say("")
    say("")
    wait()	   
    d.new_jump_all(191, 80100, 100)
    d.setf("ascaria", 1)
   else
    say_title("Sura Fantasma:")
    say("")
    say("Molte leggende narrano di un anello antico")
    say("Tale anello e' stato nascosto all interno delle")
    say("Roccie Metin. Se mi porterai tale acessorio")
    say("io potro farti accedere alla prossima area")
    say("in modo che tu possa approfondire le ricerche")
    say("in questa area!!")
    say("")
    say("")
   end
  end
 
  when login with pc.in_dungeon() and d.getf("ascaria") == 1 begin
  
   -- Removed key -----------------------------------------------------------------------------
    local boxto7= pc.count_item(50084) 
    pc.remove_item(50084,boxto7)
   --------------------------------------------------------------------------------------------
  
   local vid = d.spawn_mob(11510, 268, 311)
   d.regen_file("data/dungeon/ascaria2_regen.txt")
   d.set_unique("real", vid)
   d.setf("ascaria", 1)
   d.notice("Distruggi il segnale di fuoco Leggendario.");
  
  end
 
  when 11510.kill with pc.in_dungeon() begin
   if d.is_unique_dead("real") then
    d.setf("ascaria", 2)
    d.jump_all(80500, 780)
   end
  end
 
  when 20094.chat."Mio fratello" with pc.in_dungeon() and d.getf("ascaria") == 2 begin
   say_title("Hong-Hae: ")
   say("")  
   say(" Se potessi vedere mio fratello...")
   say("Questo posto... mi demotiva ")
   say("")
   say("E' tutto il giorno che corro qua intorno,")
   say("non ho nessuna idea di dove possa andare")
   say("Sto solo cercando mio fratello..")  
   say("")
   say("Se solo lo trovassi... non sarei più sola!")
   say("") 
   say("")
   say("")
   wait()
   d.setf("ascaria", 3)
   timer("ascaria_warps", 1)
   d.jump_all(80275, 780)
   d.spawn_mob(20095, 368, 894)
  end 
 
  when ascaria_warps.timer begin
   d.regen_file("data/dungeon/ascaria_warps.txt")
  end
 
  when 20095.click with pc.in_dungeon() and d.getf("ascaria") == 3 begin
   say_title("Seon-Hae: ")
   say("")
   say("Sei tu il fratello di Hong-Hae:")
   say("")
   say("Come lo hai capito?")
   say("Si... sono io il fratello...")
   say("sarebbe molto gentile se tu le raccontassi")
   say("dove sono... qualora non dovessi rivederla mai piu.")
   say("")
   say("")
   say("")
   wait()  
   d.setf("ascaria", 4)
   timer("ascaria_jump1", 1)
  end
 
  when ascaria_jump1.timer begin
   d.regen_file("data/dungeon/ascaria3_regen.txt")
   local vid = d.spawn_mob(1191, 803, 290)
   d.set_unique("real", vid)
   d.jump_all(80562, 415)
   d.notice("Cercate la strega di ghiaccio e uccidetela")
   d.notice("affinche la gente non debba piu nascondersi ")
  end
 
  when 1191.kill with pc.in_dungeon() and d.getf("ascaria") == 4 begin
   if d.is_unique_dead("real") then
    d.spawn_mob(20351 , 740 , 207)
    d.setf("ascaria", 5)
   end
  end
 
  when 20351.click with pc.in_dungeon() and d.getf("ascaria") == 5 begin
   say_title("Guardiano:")
   say("")
   say("Io sono il guardiano di questo luogo.")
   say("Sono stato qui svariate volte e...")
   say(" conosco la zona meglio di te, se permetti")
   say("")
   say("Posso teletrasportarti ai sigilli.")
   say("Io nn mi fido ad andare la...")
   say("E' un luogo troppo sinistro..")
   say("")
   say("")
   say("")
   wait()
   d.setf("ascaria", 6)
   timer("ascaria_jump2", 2)  
  end 
 
  when ascaria_jump2.timer begin
   d.jump_all(81371, 250)
    d.regen_file("data/dungeon/ascaria4_regen.txt")
    d.spawn_mob(20081, 1241, 250)
    d.spawn_mob(20081, 1246, 242)
    d.spawn_mob(20081, 1255, 243)
    d.spawn_mob(20081, 1259, 250)
    d.spawn_mob(20081, 1254, 258)
    d.spawn_mob(20081, 1246, 258)
    d.setf("Pietre_Count", 6)
    timer("ascariapietre1", 300)
    d.notice("Per attivare il portale per il drago rosso, dovete")
    d.notice("aprire i vecchi sigilli.Avete solo 20 minuti,")
    d.notice("per aprirli tutti e  sei!!")  
  end
 
  when ascariapietre1.timer begin
   d.notice("Tempo residuo: 15 Minuti!!")
   timer("devildownstone2", 300)
  end
  when ascariapietre2.timer begin
   d.notice("Tempo residuo: 10 Minuti!!")
   timer("ascariapietre3", 300)
  end
  when ascariapietre3.timer begin
   d.notice("Tempo residuo: 5 Minuti!!")
   timer("ascariapietre4", 300)
  end
 
  when ascariapietre4.timer begin
   d.notice("Tempo scaduto")
   d.notice("Ora verrete trasportati fuori")
   d.exit_all()
  end
 
  when 2514.kill with pc.in_dungeon() and d.getf("ascaria") == 6 begin
   local KILL_COUNT_FOR_DROP_DEVIL_KEY = 15
   local n =d.getf("count") + 1
   d.setf("count", n)   
   if n == KILL_COUNT_FOR_DROP_DEVIL_KEY then
    game.drop_item(50084, 1)
    d.setf("count", 0)
   end
  end
  when 30101.take with item.vnum == 50084 and d.getf("ascaria") == 6 begin
   npc.purge()
   item.remove()
   d.setf("Pietre_Count", d.getf("Pietre_Count") - 1)
   if d.getf("Pietre_Count") <= 0 then
    d.setf("ascaria", 7)	
    timer("ascariapietre1", 800000)
    timer("ascariapietre2", 800000)
    timer("ascariapietre3", 800000)
    timer("ascariapietre4", 800000)   
    d.notice ("Avete aperto tutti i sigilli. ")
    d.notice ("Il portale per il Drago Rosso e' stato aperto... ")
    timer("devildown_nexttimer", 3)
   else   
    d.notice ("Rimangono ancora "..d.getf("Pietre_Count").." sigilli da aprire!!")
   end
  end
 
  when devildown_nexttimer.timer begin
   d.jump_all(81300, 715)
   -- Firstspawn !!!
   d.regen_file("data/dungeon/ascaria_boss1.txt")
   ------------------
   timer("devildown_bosstimer1", 60)
  end
 
  when devildown_bosstimer1.timer begin
   -- 2. Spawn !!!
   d.regen_file("data/dungeon/ascaria_boss2.txt")
   ------------------
   timer("devildown_bosstimer2", 60)
  end

  when devildown_bosstimer2.timer begin
   -- 3. Spawn !!!
   d.regen_file("data/dungeon/ascaria_boss3.txt")
   ------------------
   timer("devildown_bosstimer3", 60)
  end
 
  when devildown_bosstimer3.timer begin
   -- 4. Spawn !!!
   d.regen_file("data/dungeon/ascaria_boss4.txt")
   ------------------
   timer("devildown_bosstimer4", 60)
  end
 
  when devildown_bosstimer4.timer begin
   -- 5. Spawn !!!
   d.regen_file("data/dungeon/ascaria_boss5.txt")
   ------------------
   timer("devildown_bosstimer5", 60)
  end
 
  when devildown_bosstimer5.timer begin
   -- 6. Spawn !!!
   d.regen_file("data/dungeon/ascaria_boss6.txt")
   ------------------
   timer("devildown_bosstimer_last", 60)
  end
 
  when devildown_bosstimer_last.timer begin
   -- Drago spawn !!!
   d.regen_file("data/dungeon/ascaria_boss7.txt")
   local vid = d.spawn_mob(2291, 1302, 708)
   d.set_unique("real", vid)
   ------------------
  end
 
  when 2291.kill with pc.in_dungeon() begin
   if d.is_unique_dead("real") then
    d.setf("devillevel", 0)
    d.notice("Hai ucciso il drago Rosso, il guardiano della valle di ascaria.");
    d.notice("In 20 secondi verrete teletrasportati all entrata..");
    timer("devildown_escapetimer", 20)   
   end
  end
 
  when devildown_escapetimer.timer begin
   d.exit_all()
  end 
end
end

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...