PHP Code:
quest teufelsrun begin
state start begin
when 30121.chat."Gezeitenrun" with pc.get_level() >= 100 begin
say_title("Surageist")
say("Hoho")
say("Fremder,willst du wirklich in diesen Dungeon eintretten?")
say("Dieser Dungeon is voller Kälte,Wärme und sehr sehr")
say("Sandig,ob du hier wieder lebend heraus kommst.")
say("Is eine gute frage.")
say("Willst du immernoch eintretten?")
say("Ich habe dir ja nu ein einblick in diesen")
say("Dungeon erzählt.")
say_reward("Soll ich dich zum Gezeitenrun teleportieren?")
local s = select("Ja", "Nein")
if s == 1 then
pc.warp(474747, 474747)
else
return
end
end
when 11505.kill with pc.get_map_index()==225 begin
local jump1 = number(1, 20)
if jump1<=10 then
chat("Das muss die Wegkarte sein..")
chat("Bringe ihn zum Kriegergeist.")
game.drop_item(27988, 1)
else
chat("An diesem Metin war keine Wegkarte..")
end
end
when 30122.chat."Wegkarte" begin
if pc.count_item(27988)>=1 then
say("Du hast eine Wegkarte gefunden?!")
say("Lass mal sehen!")
pc.removeitem("27988", 1)
wait()
say("Okay.wie ich es befürchtet hatte.")
say("Auf der Karte is nur ein Weg zum anderern Teil des Dungeons.")
say("Ich werde euch nun dahin bringen.")
wait()
d.new_jump_all(226, 484848, 484848)
d.setf("gezeitenlevel", 1)
else
say("Ich habe gehört, dass man an den Metinsteine,")
say("hier in der Umgebung eine Wegkarte finden kann,")
say("wenn man sie zerstört. Wenn du mir solch eine")
say("Wegkarte bringen könntest, könnte ich dich in dem weiteren Teil")
say("zum Dungeonende bringen.")
end
end
when login with pc.in_dungeon() and d.getf("gezeitenlevel") == 1 begin
--------------------------------------------------------------------------------------------
local vid = d.spawn_mob(11510, 300, 182)
d.regen_file("data/dungeon/gezeiten1.txt")
d.set_unique("real", vid)
d.setf("gezeitenlevel", 1)
d.notice("Was wird wohl nu kommen.");
end
when 11505.kill with pc.get_map_index()==226 begin
local jump1 = number(1, 20)
if jump1<=10 then
chat("Das muss die Wegkarte sein..")
chat("Bringe ihn zum Kriegergeist.")
game.drop_item(22222, 1)
else
chat("An diesem Metin war keine Wegkarte..")
end
end
when 30122.chat."Wegkarte 2" begin
if pc.count_item(22222)>=1 then
say("Ach ihr seids wieder.und wie ich sehe hast du")
say("wieder eine weitere Wegkarte gefunden.")
say("Lass mal sehen!")
pc.removeitem("22222", 1)
wait()
say("Okay.wie ich es befürchtet hatte.")
say("Auf der weiteren Karte is nur ein Weg zum anderern Teil des Dungeons.")
say("Ich werde euch nun dahin bringen.")
wait()
d.new_jump_all(226, 484848, 484848)
else
say("Ich habe gehört, dass man bei den Mobs,")
say("hier in der Umgebung eine weitere Wegkarte finden kann.")
say("Wenn du mir solch eine")
say("Wegkarte bringen könntest, könnte ich dich")
say("zum weiteren Dungeonende bringen.")
end
when 11505.kill with pc.get_map_index()==224 begin
local jump1 = number(1, 20)
if jump1<=10 then
chat("Das muss die Wegkarte sein..")
chat("Bringe ihn zum Kriegergeist.")
game.drop_item(22223, 1)
else
chat("An diesem Metin war keine Wegkarte..")
end
end
when 30122.chat."Wegkarte 3" begin
if pc.count_item(22223)>=1 then
say("Ach ihr seids wieder.und wie ich sehe hast du")
say("wieder eine weitere Wegkarte gefunden.")
say("Lass mal sehen!")
pc.removeitem("22223", 1)
wait()
say("Okay.wie ich es befürchtet hatte.")
say("Auf der weiteren Karte is nur ein Weg zum anderern Teil des Dungeons.")
say("Ich werde euch nun dahin bringen.")
wait()
d.new_jump_all(224, 464646, 464646)
else
say("Ich habe gehört, dass man bei den Mobs,")
say("hier in der Umgebung eine weitere Wegkarte finden kann.")
say("Wenn du mir solch eine")
say("Wegkarte bringen könntest, könnte ich dich")
say("zum weiteren Dungeonende bringen.")
timer("gezeiten_jump2", 2)
end
when gezeiten_jump2.timer begin
d.regen_file("data/dungeon/dd_regen4.txt")
d.spawn_mob(30101, 1241, 250)
d.spawn_mob(30101, 1246, 242)
d.spawn_mob(30101, 1255, 243)
d.spawn_mob(30101, 1259, 250)
d.spawn_mob(30101, 1254, 258)
d.spawn_mob(30101, 1246, 258)
d.setf("gezeitenstone_count", 6)
timer('gezeitenstone1', 300)
d.notice("Um das Portal zum Roten Drache zu aktivieren, müssen");
d.notice("die alten Siegel zerstört werden. Ihr habt nur 20 Minuten,");
d.notice("um alle 6 Siegel zu öffnen.");
end
when gezeitenstone1.timer begin
d.notice("Verbleibende Zeit: 15 Minuten")
timer('gezeitenstone2', 300)
end
when gezeitenstone2.timer begin
d.notice("Verbleibende Zeit: 10 Minuten")
timer('gezeitenstone3', 300)
end
when gezeitenstone3.timer begin
d.notice("Verbleibende Zeit: 5 Minuten")
timer('gezeitenstone4', 300)
end
when gezeitenstone4.timer begin
d.notice("Die Zeit ist abgelaufen")
d.notice("Ihr werdet nun nach draußen teleportiert")
d.exit_all()
end
when 2542.kill with pc.in_dungeon() and d.getf("gezeitenlevel") == 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 21579.take with item.vnum == 50084 and d.getf("gezeitenlevel") == 6 begin
npc.purge()
item.remove()
d.setf("gezeitenstone_count", d.getf("gezeitenstone_count") - 1)
if d.getf("gezeitenstone_count") <= 0 then
d.setf("devillevel", 7)
-- Setzt die Timer von der Vorletzen EBENE auf 800000 Sec.
-- Um das nachträgliche herausfliegen zu vermeiden.
timer('gezeitenstone1', 800000)
timer('gezeitenstone2', 800000)
timer('gezeitenstone3', 800000)
timer('gezeitenstone4', 800000)
--------------------------------------------------------
d.notice("Ihr habt alle alten Siegel geöffnet.")
d.notice("Das Portal zum Roten Drache hat sich geöffnet.")
timer("gezeiten_nexttimer", 3)
else
d.notice("Es verbleibt eine Anzahl von "..d.getf("gezeitenstone_count").." Siegeln")
end
end
when gezeiten_nexttimer.timer begin
d.jump_all(4374, 12740)
-- Firstspawn !!!
d.regen_file("data/dungeon/gezeiten_boss1.txt")
------------------
timer("gezeiten_bosstimer1", 60)
end
when gezeiten_bosstimer1.timer begin
-- 2. Spawn !!!
d.regen_file("data/dungeon/gezeiten_boss2.txt")
------------------
timer("gezeiten_bosstimer2", 60)
end
when gezeiten_bosstimer2.timer begin
-- 3. Spawn !!!
d.regen_file("data/dungeon/gezeiten_boss3.txt")
------------------
timer("gezeiten_bosstimer3", 60)
end
when gezeiten_bosstimer3.timer begin
-- 4. Spawn !!!
d.regen_file("data/dungeon/gezeiten_boss4.txt")
------------------
timer("gezeiten_bosstimer4", 60)
end
when gezeiten_bosstimer4.timer begin
-- 5. Spawn !!!
d.regen_file("data/dungeon/gezeiten_boss5.txt")
------------------
timer("gezeiten_bosstimer5", 60)
end
when gezeiten_bosstimer5.timer begin
-- 6. Spawn !!!
d.regen_file("data/dungeon/gezeiten_boss6.txt")
------------------
timer("gezeiten_bosstimer_last", 60)
end
when gezeiten_bosstimer_last.timer begin
-- Endspawn mit Drache !!!
d.regen_file("data/dungeon/gezeiten_boss7.txt")
local vid = d.spawn_mob(2525, 1302, 708)
d.set_unique("real", vid)
------------------
end
when 2525.kill with pc.in_dungeon() begin
if d.is_unique_dead("real") then
d.setf("devillevel", 0)
notice_all("".. pc.get_name() .." hat den Zombiekönig bezwungen!!!")
d.notice("Ihr habt den Zombiekönig, den Wächter des gezeitenruns besiegt.");
d.notice("Ihr werdet in 20 Sekunden zurück zum Anfang teleportiert..");
timer("gezeiten_escapetimer", 20)
end
end
when gezeiten_escapetimer.timer begin
d.exit_all()
end
end
end
