PHP Code:
quest drachenraum begin
state start begin
when 30121.chat."Tempel des Drachen" 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 game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179)==0 then
say_title(""..mob_name(30121).."")
say("")
say("Dir fehlt "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du eins besitzt.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30121).."")
say("")
pc.setqf("grotte_passworto", 078954687921)
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du ein die Kennzahl hast für den Zugang,")
say("gebe sie jetzt bitte ein.")
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("Die Kennzahl stimmt überein.")
say("Ich gewähre dir den zutritt!")
wait()
pc.warp(819200, 1049600)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30121).."")
say("")
say("Die Kennzahl ist leider falsch.")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179)>=1 then
say_title(""..mob_name(30121).."")
say("")
say("Du bist der erste der den Eintritt in den Tempel")
say("des Drachens verlangt. Ich werde dich passieren")
say("lassen, sofern du einen gewunden Schlüssel")
say("besitzt. Bevor du den Raum betreten darfst")
say("musst du eine geheime Zahl eingeben.")
say("Diese kannst du innerhalb von 5 Minuten an")
say("deine Mitstreiter weitergeben, so das auch")
say("sie den Raum betreten können. ")
say("")
say("Bedenke auch das die Macht der Schlüssel nur")
say("30 Minuten lang hält. In dieser Zeit müsst")
say("ihr den Drachen besiegt haben.")
local i = select("Ich bin Bereit", "Abbrechen")
if 1 == i then
say_title(""..mob_name(30121).."")
say("Dann Lege jetzt die kennzahl fest.")
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).."")
say("")
say("Die Kennzahl lautet:")
chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."")
say_reward(""..passwort.."")
say("Gib die Kennzahl deinen Mitstreitern weiter")
pc.remove_item("30179",1)
else
say_title(""..mob_name(30121).."")
say("")
say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.")
say("Bitte gebe nur Ziffern ein.")
end
end
end
end
when logout with pc.get_map_index() == 408 and get_time() > game.get_event_flag("Grotte_time") begin --Beta, ist nicht getestet!
notice_in_map("Weil ihr nicht den Stein runtergehauen habt, werdet ihr den Drachen nicht sehen...")
notice_in_map("ihr werdet in 15 Sekunden zurück zu Map1 gebracht.")
timer("skipia_boss_end", 15)
game.set_event_flag("Grotte_strafe",1)
end
when login with pc.get_map_index() == 408 begin
chat("Willkommen, zerstört schnell den Stein um zu dem Drachen zu gelangen.")
chat("Aber beeilt euch, sonst fliegt ihr raus")
local sekunden = game.get_event_flag("Grotte_time") - get_time()
notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden")
timer("skipia_boss_ende", sekunden)
end
when 8023.kill with pc.get_map_index() == 408 begin
pc.set_warp_location(73, 241700, 1274900)
timer("skipia_boss_goo", 2)
notice_in_map("Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht")
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_strafe",0)
game.set_event_flag("Grotte_zugang",0)
d.new_jump_all(408, 8256, 10637)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 66, 142)
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
timer("skipia_boss_check", 3)
d.setf("grotte_boss", 3)
d.notice("Beeindruckend, ihr habt ihn tatsächlich besiegt. Als Abschluss könnt ihr noch die Metins zerstören")
d.kill_all()
d.spawn_mob(9012, 66, 142)
d.setf("count", 0)
local t = number(1,2)
if t == 1 then
d.spawn_mob(8027, 111, 123)
d.spawn_mob(8027, 128, 166)
d.spawn_mob(8027, 148, 138)
end
if t == 2 then
d.spawn_mob(8027, 145, 119)
d.spawn_mob(8027, 132, 129)
d.spawn_mob(8027, 130, 160)
end
end
when 8027.kill with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin
local n =d.getf("count") + 1
d.setf("count", n)
if n == 3 then
d.notice("Ihr habt die Metins zerstört, ihr werdet in 30 Sekunden zurück zu Map1 gebracht.")
timer("skipia_boss_end", 30)
end
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
if game.get_event_flag("Grotte_strafe") == 0 then
timer("skipia_boss_end", 1800)
timer("skipia_spawn", 5)
d.setf("grotte_boss", 2)
d.notice("Willkommen im Tempel des Drachen, ihr habt maximal 30 Minuten Zeit Beran-Setaou zu besiegen, Viel Erfolg")
elseif game.get_event_flag("Grotte_strafe") == 1 then --kommt wenn sie stein nicht runterhauen und im Raum bleiben, fliegen sie raus.. :)
chat("Weil ihr nicht den Stein runtergehauen habt, werdet ihr den Drachen nicht sehen...")
chat("ihr werdet in 15 Sekunden zurück zu Map1 gebracht.")
timer("skipia_boss_end", 15)
game.set_event_flag("Grotte_strafe",1)
end
end
when skipia_spawn.timer begin
d.regen_file("data/dungeon/skia_boss.txt")
d.spawn_mob(2493, 120, 143)
end
when skipia_boss_end.timer begin
d.exit_all_to_start_position()
end
when skipia_boss_ende.timer begin
kill_all_in_map(408)
game.set_event_flag("Grotte_zugang",0)
game.set_event_flag("Grotte_strafe",1)
d.new_jump_all(408, 8256, 10637)
d.setf("grotte_boss", 1)
end
end
end
PHP Code:
quest qive_yang begin
state start begin
when 8212.use begin -- begin hat gefehlt
pc.removeitem("8212, 1")
say_tile("Yang-Stein")
say("")
say("Du möchtest also etwas mit deinem")
say("Yang anstellen?")
local s=select ("Yang erstellen","Yang Löschen","Abbrechen") -- es heißt immer local. NICHT locale
if s == 1 then
say_title("Ersteller:")
say("Du hättest gerne Yang aufgeladen?")
say("")
say_title(pc.get_name()..":")
say("Ja , Sehr Gerne !")
say("")
wait()
say_title("Ersteller:")
say("Kein Problem")
say("Ich kann dir Soviel Yang machen wie du willst")
say("")
say("")
say_title("Information")
say_reward("Achtung!!")
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
say("eingeben")
say("Gib die Anzahl an :")
local y=input()
if y == "" then
say("Es hat leider nicht geklappt!")
return
else
pc.change_money(y)
say_reward("Du hast dein Yang erfolgreich aufgeladen ! Viel Spaß damit.")
end
elseif s == 2 then
say_title("Löscher:")
say("Du hättest gerne weniger Yang?")
say("")
say_title(pc.get_name()..":")
say("Ja , ich finde einfach viel zu Viel .")
say("")
wait()
say_title("Löscher:")
say("Kein Problem")
say("Ich kann dir Soviel Yang loeschen, wie du willst.")
say("")
say("")
say_title("Information")
say_reward("Achtung!!")
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
say("eingeben")
say("Gib die Anzahl an :")
local y = input()
if y == "" then
say("Es hat leider nicht geklappt!")
return
else
pc.change_money(-y)
say_reward("Du hast dein Yang erfolgreich geloescht.Bis zum Naechsten mal!")
end
elseif s == 3 then
say("Dann nicht")
end
end
end
end