[QUEST]Karanlık Millet Görevi 65 Lv. Sonrası ALMANCA Lee Chung

Quest Yarımdır Almanca olarak 65 Lv üstü .Wiki den bakabilirisniz herşey official
Tamamı yazılmıştır İleriki Zamanlarda Paylaşabilirim.
Quest Tr ye Gelen yeni Eklentıler Olması Gerekiyor Yoksa Bi işinize Yaramaz örneğin : MaXmi Official tr filesi gibi
İşinize Yaradıysa +++++++ rep beğeni Verrseniz Cok Sevinirim Gönlünüze Gögre olsun


&

---

quest leechungall begin
state start begin
when login or levelup with pc.level>65 begin
set_state(unknown_letter)
end
end

state unknown_letter begin
when letter begin
local target = find_npc_by_vnum(11000, 11002, 11004)
local empire = pc.get_empire()
if empire == 1 and target != 0 then target.vid("__TARGET__", v, "11000")
elseif empire == 2 and target != 0 then target.vid("__TARGET__", v, "11002")
elseif empire == 3 and target != 0 then target.vid("__TARGET__", v, "11004")
end

send_letter("Anonymer Brief")
end

when button or info begin
say_title("Anonymer Brief")
say("")
say("Der Wächter des Dorfplatzes sucht nach dir,")
say("er hat wohl eine Aufgabe für dich.")
say("")
say_reward("Sprich mit dem Wächter des Dorfplatzes")
say("")
end

when __TARGET__.target.click or 11000.chat."Anonymer Brief" or 11002.chat."Anonymer Brief" or 11004.chat."Anonymer Brief" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Hallo, ich habe schon nach dir gesucht!")
say("Ich brauche deine Hilfe, wir haben vor")
say("vor kurzem einen Spion in den Hwang Tempel")
say("eingeschleusst, sein Name ist Lee Chung,")
say("er hat Hinweise auf einen verborgenen Tempel")
say("und steht kurz davor ihn zu enthüllen")
say("aber er benötigt noch etwas Hilfe!")
say("")
say_reward("Geh zu ihm und tu was immer der Mann befiehlt!")
say("")
set_state(meet_leechung)
end
end

state meet_leechung begin
when letter begin
local target2 = find_npc_by_vnum(20369)
if target2 != 0 then target.vid("__TARGET__", v, "Lee Chung")
end
send_letter("Finde Lee Chung")
end

when button or info begin
say_title("Finde Lee Chung")
say("")
say("Suche Lee Chung auf und gehe ihm zur Hand")
say("Lee Chung befindet sich im Hwang-Tempel.")
say("")
say_reward("Finde Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Finde Lee Chung" begin
target.delete("target2")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Hallo Fremder was kann ich für dich tun?")
say("")
local answer = select ("Der Wächter des Dorplatzes schickt mich!", "Nichts, entschuldigen sie die Störung")
if answer == 2 then
return
end
if answer == 1 then
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du musst dann also die Hilfe sein die mir der")
say("Wächter des Dorfplatzes versprochen hat, das")
say("trifft sich gut den ich brauche deine Hilfe")
say("sofort.")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Einer meiner Soldaten wurde im letzten Einsatz")
say("von einem der Monster vergiftet, wir brauchen")
say("schnell das nötige Gegengift.")
say("Gehe in den Roten Wald und töte 200 Rote Dryaden")
say("um das Gegengift zu erhalten. Aber es bleibt")
say("nicht viel Zeit, ich denke er hat nicht mehr")
say("als 30 Minuten. Beeil dich!")
say("")
say_reward("Töte 200 Dryaden innerhalb 30 Minuten um das")
say_reward("Gegengift zu erhalten und den vergifteten Soldaten")
say_reward("zu retten!")
say("")
pc.setqf("dryaden_count",200)
pc.setqf("time", get_time()+ 1800)
set_state(dryaden_kill)
end
end
end

state dryaden_kill begin
when letter begin
send_letter("Rote Dryaden")
end

when button or info begin
say_title("Rote Dryaden")
say("")
say("Lee Chung gab dir den Auftrag 200 Rote Dryaden")
say("innerhalb 30 Minuten zu töten.")
say("")
say_reward(""..pc.getqf("dryaden_count").." Rote Dryaden verbleibend.")
say("")
say_reward("Noch "..pc.getqf("time")-get_time().." Sekunden verbleibend.")
say("")
end

when 2313.kill begin
local count = pc.getqf("dryaden_count")-1
pc.setqf("dryaden_count", count)
if count<1 then
pc.give_item2("31003")
set_state(kill_intime)
end
end

when 2313.kill begin
if get_time() > pc.getqf("time") then
if count<1 then
set_state(kill_outoftime)
end
end
end
end

state kill_intime begin
when letter begin
local target3 = find_npc_by_vnum(20369)
if target3 != 0 then target.vid("__TARGET__", v, "Lee Chung")
end
send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast es geschafft das Gegengift rechtzeitig")
say("zu bekommen, berichte Lee Chung davon.")
say("")
say_reward("Gehe zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" begin
if pc.count_item(31003)>0 then
target.delete("target3")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du bist schneller zurück als erwartet,")
say("und du hast das Gegengift bei dir!")
say("Nun lass uns keine Zeit verlieren, bring")
say("das Gegengift zum vergifteten Soldaten!")
say("")
say("Bringe das Gegengift dem Vergifteten Soldaten")
say("")
say_reward("Du erhälst:")
say_reward("2.900.000 EXP")
say_reward("200.000 Yang")
say_reward("1× Zerbrochenes Porzellan")
say_reward("10x Alpenrose")
say_reward("10x Maulbeeren")
pc.removeitem("31003")
pc.give_item2("30033")
pc.give_item2("50707", 10)
pc.give_item2("50708", 10)
pc.give_exp2("2900000")
pc.change_money("200000")
set_state(poison_deliver)
end
end
end

state poison_deliver begin
when letter begin
local target = find_npc_by_vnum(20370)
if target != 0 then target.vid("__TARGET__", v, "Vergifteter Soldat")
end
send_letter("Das Gegengift")
end

when button or info begin
say_title("Das Gegengift")
say("")
say("Du hast es geschafft das Gegengift in 30Min")
say("zu bekommen, nun bringe es dem vergifteten")
say("Soldaten und erstatte Lee Chung danach bericht.")
say("")
say_reward("Bringe das Gegengift zum vergifteten Soldaten")
say_reward("und erstatte danach Lee Chung bericht")
say("")
end

when __TARGET__.target.click or 20370.chat."Das Gegengift" with pc.count_item(31003)>0 begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Vielen Dank ohne dich hätte ich das nicht")
say("überlebt!")
say("")
pc.removeitem("31003",1)
set_state(back_to_chung)
end
end

state back_to_chung begin
when letter begin
local target5 = find_npc_by_vnum(20369)
if target5 != 0 then target.vid("__TARGET__", v, "Lee Chung")
end
send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast dem vergifteten Soldaten das Gegengift")
say("ausgeliefert und ihn gerettet, nun kehre")
say("zurück zu Lee Chung und erstatte ihm Bericht")
say("")
say_reward("Gehe zu Lee Chung und erstatte ihm Bericht.")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" begin
target.delete("target5")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Gut gemacht Abenteuer du hast diesem tapferen")
say("Soldaten das Leben gerettet!")
say("Ich werde dir noch mehr Aufgaben zukommen")
say("lassen.")
say("")
set_state(unknown_finish)
end
end

state kill_outoftime begin
when letter begin
local target6 = find_npc_by_vnum(20369)
if target6 != 0 then target.vid("__TARGET__", v, "Lee Chung")
end
send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast es nicht geschafft das Gegengift in")
say("der vorgegebenen Zeit zu bekommen, berichte")
say("Lee Chung davon.")
say("")
say_reward("Gehe zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" begin
if pc.count_item(31003)>0 then
target.delete("target6")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du kommst zu spät! Der vergiftete Soldat ist leider")
say("verstorben. Dennoch du hast dein bestes gegeben,")
say("also werde ich dir noch mehr Aufgaben zukommen")
say("lassen.")
say("")
say_reward("Du konntest den vergifteten Soldaten nicht retten.")
say_reward("Du erhälst:")
say_reward("2.000.000 EXP")
say_reward("100.000 Yang")
say_reward("10x Alpenrose")
say_reward("10x Maulbeeren")
pc.removeitem("31003",1)
pc.give_item2("50707", 10)
pc.give_item2("50708", 10)
pc.give_exp2("2000000")
pc.change_money("100000")
set_state(unknown_finish)
end
end
end

state unknown_finish begin
when login or levelup with pc.level>71 begin
set_state(the_discovery)
end
when login or levelup with pc.level<72 begin
send_letter("Die Entdeckung")
end
when button or info begin
say_title("Die Entdeckung")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 72 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 72 erreichen!")
say("")
set_state(unknown_finish)
end
end

state the_discovery begin
when letter begin
local target6 = find_npc_by_vnum(20369)
if target6 != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Die Entdeckung")
end

when button or info begin
say_title("Die Entdeckung")
say("")
say("Lee Chung hat eine neue Aufgabe für dich,")
say("gehe zu ihm und erledige sie.")
say("")
say_reward("Gehe zu Lee Chung in den Hwang-Tempel")
say("")
end

when __TARGET__.target.click or 20369.chat."Die Entdeckung" begin
target.delete("target6")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Da bist du ja endlich! Ich habe eine weitere")
say("Aufgabe für dich!")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Ich bin in den Esoterischen schriften auf einen")
say("antiken Stein gestoßen welcher sich im Roten Wald")
say("befinden soll.")
say("Ich möchte das du in den Roten Wald gehst den")
say("Stein findest und ihn untersuchst.")
say("")
say_reward("Gehe in den Roten Wald, finde den antiken Stein,")
say_reward("und untersuche ihn.")
set_state(find_stone)
end
end

state find_stone begin
when letter begin
send_letter("Der antike Stein")
end

when button or info begin
say_title("Der antike Stein")
say("")
say("Lee Chung gab dir den Auftrag im Roten Wald")
say("einen antiken Stein zu finden, und ihn")
say("anschließend untersuchen.")
say("")
say_reward("Finde den antiken Stein.")
say("")
end

when 20372.chat."Der antike Stein" begin
say("")
say("Das muss der Stein sein von dem Lee Chung")
say("sprach...")
say("")
pc.give_item2("30160")
set_state(back_to_chung2)
end
end

state back_to_chung2 begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "20369")
end

send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast den Stein gefunden und darin eine")
say("Notiz gefunden, bringe diese zu Lee Chung.")
say("")
say_reward("Kehre zurück zu Lee Chung und berichte ihm")
say_reward("deinem Fund.")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" with pc.count_item(30160)>0 begin
local r=number(1, 2)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du bist erneut schnell zurück hast du den")
say("Stein finden können?")
say("")
local stone = select ("Ja ich habe ihn gefunden", "Nein leider noch nicht")
if stone == 2 then
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Such weiter er muss exestieren!")
say("")
return
end
if r == 2 and stone == 1 then
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Ich bin beeindruckt, ich werde gleich daran")
say("arbeiten die Notiz zu entziffern.")
say("Und werde dir dann eine weitere Aufgabe")
say("zu kommen lassen.")
say("")
say_reward("Du erhälst:")
say_reward("3.100.000 EXP")
say_reward("1x Erfahrungsring")
say_reward("1x Unbekannte Medizin")
say_reward("1x Stück Gewebe")
say("")
pc.remove_item("30160", 1)
pc.give_exp2("3100000")
pc.give_item2("39002")
pc.give_item2("30009")
pc.give_item2("30039")
set_state("discovery_finish")
end
if r == 1 and stone == 1 then
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Ich bin beeindruckt, ich werde gleich daran")
say("arbeiten die Notiz zu entziffern.")
say("Und werde dir dann eine weitere Aufgabe")
say("zu kommen lassen.")
say("")
say_reward("Du erhälst:")
say_reward("3.100.000 EXP")
say_reward("1x Erfahrungsring")
say_reward("1x Unbekannte Medizin+")
say_reward("1x Stück Gewebe")
say("")
pc.remove_item("30160", 1)
pc.give_exp2("3100000")
pc.give_item2("39002")
pc.give_item2("30083")
pc.give_item2("30039")
set_state("discovery_finish")
end
end
end

state discovery_finish begin
when login or levelup with pc.level>71 begin
set_state(frozen_secret)
end
when login or levelup with pc.level<72 begin
send_letter("Eisiger Schatz")
end
when button or info begin
say_title("Eisiger Schatz")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 72 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 72 erreichen!")
say("")
set_state(discovery_finish)
end
end

state frozen_secret begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Eisiger Schatz")
end

when button or info begin
say_title("Eisiger Schatz")
say("")
say("Lee Chung sucht nach dir! Er hat die")
say("Notiz die du ihm geliefert hast, entziffern")
say("können, und hat nun eine weitere Aufgabe")
say("für dich. Geh zu ihm!")
say("")
say_reward("Gehe zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Eisiger Schatz" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Hallo Abenteuer, ich habe die Notiz die du")
say("mir geliefert hast entziffern können und")
say("habe nun neue Hinweise.")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("In der Notiz steht geschrieben das es früher")
say("schon einmal ein paar mutigen Kämpfern gelungen")
say("ist der Devils Catacomb widerstand leisten konnten.")
say("Die nötige Kraft bekamen sie von einer Himmels")
say("Träne, in der Notiz steht geschrieben wie man")
say("diese Tränen herstellen kann, aber ich brauche")
say("die nötigen Essenzen dazu.")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Als erstes brauche ich 50 Blaue Kristallessenzen")
say("welche du von einigen Monstern auf dem Berg Sohan")
say("bekommen könntest, jedoch sind diese Essenzen")
say("sehr empfindlich und können beim herstellen der")
say("Träne zerbrechen.")
say("")
say_reward("Gehe auf den Berg Sohan und sammle 50 Blaue")
say_reward("Kristallessenzen von gefallenen Monstern")
say("")
set_state(collect_blue)
pc.setqf("tentoduration",0)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
end
end

state collect_blue begin
when letter begin
send_letter("Blaue Kristallessenzen")
end

when button or info begin
say_title("Blaue Kristallessenzen")
say("")
say("Lee Chung braucht 50 Blaue Kristallessenzen")
say("für die herstellung einer Träne des Himmels")
say("Du bekommst Blaue Kristallessenzen von den")
say("Monstern Frostiger Eismann, Yeti und Eisgolem")
say("Welche sich im Berg-Sohan befinden")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 50 Essenzen abgegeben!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("tentoduration").." von 10 Essenzen abgegeben.")
say("")
end

when 1105.kill or 1106.kill or 1107.kill begin
local kill=number(1,20)
if kill == 1 then
pc.give_item2("31005")
end
end

when 20369.chat."Blaue Kristallessenz" with pc.count_item(31005)>0 begin
if get_time()>pc.getqf("duration") then
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast eine Blaue Kristallessenz gefunden,")
say("lass mich schnell versuchen sie für die")
say("herstellung zu nutzen...")
say("")
pc.remove_item("31005", 1)
wait()
local tencount = pc.getqf("tentoduration")+1
if tencount<11 then
local rand = number(0,99)
if rand<50 then
local count = pc.getqf("collect_count")+1
if count<50 then
pc.setqf("collect_count", count)
pc.setqf("tentoduration", tencount)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Diese Blaue Kristallessenz konnte ich für")
say("die Herstellung der Träne verwenden.")
say("Bring mir noch weitere Essenzen!")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 50 Essenzen abgegeben!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("tentoduration").." von 10 Essenzen abgegeben.")
say("")
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast mir alle 50 Blaue Kristallessenzen gebracht")
say("Die erste Essenz für die Träne hätten wir damit,")
say("Ich werde dich rufen wenn ich bereit bin für die")
say("nächste Zutat.")
say("")
say_reward("20.000.000 EXP")
say_reward("225.000 Yang")
say_reward("3x Elixier des Forschers")
say_reward("1x Diebeshandschuh")
say_reward("1x Medaille des Glücks")
say("")
pc.give_exp2("20000000")
pc.change_money("225000")
pc.give_item2("39023", 3)
pc.give_item2("70043")
pc.give_item2("72024")
pc.setqf("collect_count",0)
pc.setqf("tentoduration",0)
pc.setqf("duration",0)
set_state(secret_finish)
end
else
local tencount = pc.getqf("tentoduration")+1
pc.setqf("tentoduration", tencount)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Die Blaue Kristallessenz ist mir leider beim")
say("mischen zerbrochen, hole mir eine neue")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 50 Essenzen abgegeben!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("tentoduration").." von 10 Essenzen abgegeben.")
say("")
end
else
pc.setqf("duration", get_time()+ 86400)
pc.setqf("tentoduration",0)
pc.give_item2("31005")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast in den letzten 24 Stunden bereits")
say("10 Essenzen abgegeben")
say("")
end
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast in den letzten 24 Stunden bereits")
say("10 Essenzen abgegeben")
say("")
end
end
end

state secret_finish begin
when login or levelup with pc.level>77 begin
set_state(red_hell)
end
when login or levelup with pc.level<78 begin
send_letter("Roter Höllenquarz")
end
when button or info begin
say_title("Roter Höllenquarz")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 78 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 78 erreichen!")
set_state(secret_finish)
say("")
end
end

state red_hell begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Roter Höllenquarz")
end

when button or info begin
say_title("Roter Höllenquarz")
say("")
say("Lee Chung benötigt die nächste Zutat für")
say("die herstellung der Träne, gehe zu ihm")
say("und hilf ihm.")
say("")
say_reward("Gehe zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Roter Höllenquarz" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Gut das du da bist! Die erste Zutat haben")
say("wir bereits, jedoch benötigen wir nun")
say("eine weitere.")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("In der Notiz steht etwas von einem Quarz")
say("Ich denke damit ist das Rote Höllenquarz")
say("gemeint, dieses kann ich jedoch nur durch")
say("drei spezielle Zutaten herstellen")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Pro herstellung eines Roten Höllenquarzes")
say("benötige ich 1x Vulkanerde, 1x Flammenmähne")
say("und 1x Fundamentstein, all das bekommst du")
say("von bestimmten Monstern aus dem Feuerland.")
say("Die Herstellung eines Quarzes ist sehr schwierig")
say("und kann daher fehlschlagen, bringe also Vorrat")
say("mit!")
say("")
say_reward("Besorge die benötigten Items und stelle mit ihnen")
say_reward("20x Rotes Höllenquarz bei Lee Chung her")
say("")
set_state(collect_red)
pc.setqf("sevtoduration")
pc.setqf("duration",0)
pc.setqf("collect_count",0)
end
end

state collect_red begin
when letter begin
send_letter("Quarz herstellung")
end

when button or info begin
say_title("Quarz herstellung")
say("")
say("Lee Chung benötigt 20x Rotes Höllenquarz, welche")
say("du bei ihm herstellen kannst wenn du ihm die")
say("benötigten Items: Vulkanerde, Flammenmähne und")
say("Fundamentstein lieferst. Die herstellung eines")
say("Quarzes kann fehlschlagen. Pro Tag kann nur")
say("7 mal versucht werden Rotes Höllenquarz zu erstellen")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 20 Quarzen hergestellt!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("sevtoduration").." von 7 Quarzen versucht herzustellen.")
say("")
end

when 2203.kill or 2204.kill or 2205.kill begin
local kill=number(1,10)
if kill == 1 then
pc.give_item2("31007")
end
end

when 20369.chat."Quarz herstellung" with pc.count_item(31007)>0 and pc.count_item(30019)>0 and pc.count_item(90010)>0 begin
if get_time()>pc.getqf("duration") then
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du möchtest einen Roten Höllenquarz")
say("herzustellen, lass es mich versuchen...")
say("")
wait()
local sevcount = pc.getqf("sevtoduration")+1
if sevcount<8 then
local rand = number(0,99)
if rand<50 then
local count = pc.getqf("collect_count")+1
if count<50 then
pc.setqf("collect_count", count)
pc.setqf("sevtoduration", sevcount)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Die herstellung des Roten Höllenquarzes")
say("war erfolgreich, bringe mir noch mehr")
say("von den benötigten items!")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 20 Quarzen hergestellt!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("sevtoduration").." von 7 Quarzen versucht herzustellen.")
say("")
pc.remove_item("31007", 1)
pc.remove_item("30019", 1)
pc.remove_item("90010", 1)
pc.give_item2("31006")
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Die herstellung des Roten Höllenquarzes")
say("war erfolgreich, bringe mir noch mehr")
say("von den benötigten items!")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 20 Quarzen hergestellt!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("sevtoduration").." von 7 Quarzen versucht herzustellen.")
say("")
pc.remove_item("31007", 1)
pc.remove_item("30019", 1)
pc.remove_item("90010", 1)
pc.give_item2("31006")
pc.setqf("collect_count",0)
pc.setqf("sevtoduration",0)
pc.setqf("duration",0)
set_state(give_red)
end
else
local sevcount = pc.getqf("sevtoduration")+1
pc.setqf("sevtoduration", sevcount)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Es hat leider nicht funktioniert einen")
say("Roten Höllenquarz herzustellen versuche es")
say("nochmal.")
say("")
say_reward("Ihr habt bereits "..pc.getqf("collect_count").." von 20 Quarzen hergestellt!")
say("")
say_reward("Ihr habt heute schon "..pc.getqf("sevtoduration").." von 7 Quarzen versucht herzustellen.")
say("")
pc.remove_item("31007", 1)
pc.remove_item("30019", 1)
pc.remove_item("90010", 1)
end
else
pc.setqf("duration", get_time()+ 86400)
pc.setqf("sevtoduration",0)
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast es in den letzten 24 Stunden bereits")
say("7x probiert Rote Höllenquarze herzustellen.")
say("")
end
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast es in den letzten 24 Stunden bereits")
say("7x probiert Rote Höllenquarze herzustellen.")
say("")
end
end
end

state give_red begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Quarze hergestellt")
end

when button or info begin
say_title("Quarze hergestellt")
say("")
say("Du hast alle 20 Roten Höllenquarze hergestellt")
say("bringe diese nun Lee Chung.")
say("")
say("Bringe die 20 Roten Höllenquarze zu Lee Chung.")
say("")
end

when 20369.chat."Quarze hergestellt" begin
if pc.count_item(31006)>19 then
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Wir haben die 20 Roten Höllenquarze hergesellt")
say("Es ist nun fast geschafft, uns fehlt nun nurnoch")
say("eine letzte Zutat!")
say("")
say_reward("Du erhälst:")
say_reward("36.000.000 EXP")
say_reward("1x Elixier der Sonne(G)")
say_reward("1x Segenskugel")
say_reward("1x Fleißmedaille")
say("")
pc.remove_item("31006", 20)
pc.give_exp2("36000000")
pc.give_item2("39039", 1)
pc.give_item2("70024", 1)
pc.give_item2("70004", 1)
set_state(red_finish)
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du musst die 20 Roten Höllenquarze bei dir")
say("im Inventar tragen um sie mir auszuhändigen!")
say("")
return
end
end
end

state red_finish begin
when login or levelup with pc.level>77 begin
set_state(last_element)
end
when login or levelup with pc.level<78 begin
send_letter("Letztes Element")
end
when button or info begin
say_title("Letztes Element")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 78 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 78 erreichen!")
say("")
set_state(red_finish)
end
end

state last_element begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Letztes Element")
end

when button or info begin
say_title("Letztes Element")
say("")
say("Lee Chung benötigt noch die letzte Zutat,")
say("gehe zu ihm und frage wie du helfen kannst.")
say("")
say_reward("Gehe zu Lee Chung!")
say("")
end

when __TARGET__.target.click or 20369.chat."Letztes Element" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Es gibt gute Neuigkeiten! Ich habe herrausgefunden,")
say("welche Zutat wir zu guter letzt noch brauchen.")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Auf der Notiz steht etwas von Baumharzen,")
say("ich denke das du diese von Monstern")
say("im Roten Wald bekommen könntest.")
say("Ich brauche 100 Baumharze für die herstellung")
say("der Träne!")
say("")
say_reward("Töte solang Monster im Roten Wald bis du")
say_reward("100x Geweihtes Baumharz hast.")
say("")
set_state(collect_wood)
end
end

state collect_wood begin
when letter begin
send_letter("Geweihtes Baumharz")
end

when button or info begin
say_title("Geweihtes Baumharz")
say("")
say("Lee Chung benötigt noch 100x Geweihtes Baumharz")
say("für die herstellung der Träne des Himmels.")
say("Du bekommst Geweihte Baumharze von den Monstern:")
say("Roter böser Baum und rote Geisterweide.")
say("")
say_reward("Sammle 100x Geweihtes Baumharz und bringe diese")
say_reward("zu Lee Chung")
say("")
end

when 2314.kill or 2315.kill with pc.count_item(31004)<100 begin
local kill=number(1,15)
if kill == 1 then
pc.give_item2("31004")
end
end

when 20369.chat."Geweihtes Baumharz" begin
if pc.count_item(31004)>99 then
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast es geschafft, du hast alle Zutaten")
say("zusammengetragen, jetzt bringe diese zu")
say("Baek-Go damit er die Träne des Himmels")
say("herstellen kann.")
say("")
say_reward("Du erhälst:")
say_reward("48.000.000 EXP")
say_reward("230.000 Yang")
say_reward("Elixier des Mondes(G)")
say_reward("Magisches Kupfererz")
say_reward("Buch des Anführers")
say("")
pc.give_exp2("48000000")
pc.change_money("230000")
pc.give_item2("39042")
pc.give_item2("39005")
pc.give_item2("70003")
set_state(go_to_baek)
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast noch keine 100x Geweihte Baumharze")
say("Komm erst wieder wenn du alle hast!")
say("")
return
end
end
end

state go_to_baek begin
when letter begin
local target = find_npc_by_vnum(20018)
if target != 0 then target.vid("__TARGET__", v, "Baek-Go")
end

send_letter("Gehe zu Baek-Go")
end

when button or info begin
say_title("Gehe zu Baek-Go")
say("")
say("Du hast alle Zutaten für die herstellung")
say("zusammengetragen, gehe zu Baek-Go und")
say("übergib ihm die letzte Zutat damit er")
say("die Träne des Himmels herstellen kann")
say("")
say_reward("Gehe zu Baek-Go.")
say("")
end

when __TARGET__.target.click or 20018.chat."Gehe zu Baek-Go" with pc.count_item(31004)>99 begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Hallo Fremder was kann ich für dich tun?")
say("")
local answer = select ("Lee Chung schickt mich", "Nichts, entschuldigen sie die Störung")
if answer == 2 then
return
else
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du bist also das Abenteuer, das es geschafft")
say("alle Zutaten für die legendäre Träne des Himmels")
say("zusammenzutragen.")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Ich werde die Träne herstellen und sie zu")
say("Lee Chung bringen.")
say("")
say_reward("Du erhälst:")
say_reward("2x Schrumpfkopf(blau)")
say("")
pc.remove_item("31004", 100)
pc.give_item2("30319", 2)
set_state(element_finish)
end
end
end

state element_finish begin
when login or levelup with pc.level>83 begin
set_state(the_fight_starts)
end
when login or levelup with pc.level<84 begin
send_letter("Der Kampf beginnt")
end
when button or info begin
say_title("Der Kampf beginnt")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 84 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 84 erreichen!")
say("")
set_state(element_finish)
end
end

state the_fight_starts begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Der Kampf beginnt")
end

when button or info begin
say_title("Der Kampf beginnt")
say("")
say("Lee Chung sucht wieder nach dir,")
say("es scheint sehr dringend zu sein.")
say("")
say_reward("Gehe zu Lee Chung")
end

when __TARGET__.target.click or 20369.chat."Der Kampf beginnt" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Da bist du ja endlich, Baek-Go hat die")
say("Träne des Himmels erfolgreich hergestellt")
say("Nun beginnt der letzte Teil des Plans...")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Der Legende nach verleiht die Träne dem Kämpfer")
say("ab der 5. Etage der Devils Catacomb legendäre")
say("Kräfte. Ich gebe dir die Träne des Himmels")
say("und du gehst mit ihr in die Devils Catacomb")
say("und tötest dort Tartaros er ist ein großer")
say("gehilfe des Dunklen Lords.")
say("")
say_reward("Töte Tartaros, er befindet sich in der 5. Etage")
say_reward("der Devils Catacomb, die Träne des Himmels wird")
say_reward("dir helfen...")
say("")
pc.give_item2("31008")
set_state(kill_tartaros)
end
end

state kill_tartaros begin
when letter begin
send_letter("Töte Tartaros")
end

when button or info begin
say_title("Töte Tartaros")
say("")
say("Gehe in die Devils Catacomb und töte Tartaros")
say("er befindet sich in der 5. Etage, er ist")
say("mächtig, doch die Träne des Himmels wird")
say("dir die nötigen Kräfte verleihen.")
say("")
say_reward("Töte Tartaros, er befindet sich in der 5. Etage")
say_reward("der Devils Catacomb, die Träne des Himmels wird")
say_reward("dir helfen...")
end

when 2591.kill with pc.get_map_index() == 90 begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast Tartaros getötet, kehre zurück")
say("zu Lee Chung und berichte ihm von deinem")
say("Erfolg.")
say("")
say_reward("Kehre zurück zu Lee Chung")
say("")
set_state(tartaros_killed)
end
end

state tartaros_killed begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast Tartaros getötet, kehre zurück")
say("zu Lee Chung und berichte ihm von deinem")
say("Erfolg.")
say("")
say_reward("Kehre zurück zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Ich wusste du würdest schaffen, die Träne des")
say("Himmels verleiht wahrhaftig ernorme Kräfte...")
say("Aber das war erst der Anfang...")
say("")
say_reward("Du erhälst:")
say_reward("63.000.000 EXP")
say_reward("250.000 Yang")
say_reward("1x Handschuh weiser Kaiser")
say_reward("1x Magisches Eisenerz")
say_reward("1x Symbol d. weisen Kaisers")
say_reward("1x Träne des Himmels")
say("")
pc.give_exp2("63000000")
pc.change_money("250000")
pc.give_item2("70051")
pc.give_item2("71026")
pc.give_item2("70050")
set_state(fight_starts_finish)
end
end

state fight_starts_finish begin
when login or levelup with pc.level>83 begin
set_state(prince_charon)
end
when login or levelup with pc.level<84 begin
send_letter("Prinz Charon")
end
when button or info begin
say_title("Prinz Charon")
say("")
say("Um die nächste Quest Lee Chungs zu starten")
say("musst du mindestens Lv 84 erreicht haben.")
say("")
say_reward("Deine Erfahrung reicht im Moment nicht aus")
say_reward("Du musst mindestens Lv 84 erreichen!")
say("")
set_state(fight_starts_finish)
end
end

state prince_charon begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Prinz Charon")
end

when button or info begin
say_title("Prinz Charon")
say("")
say("Du hast Tartaros getötet, jedoch hat")
say("Lee Chung eine weitere Aufgabe.")
say("")
say_reward("Gehe zu Lee Chung")
end

when __TARGET__.target.click or 20369.chat."Prinz Charon" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Es geht weiter... wir müssen schnell handeln")
say("Du hast Tartaros getötet und dadurch die Devils")
say("Catacomb in aufruhr versetzt...")
say("")
wait()
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Der nächste Teil des Plans ist die rechte Hand")
say("des Dunklen Lords zu töten, sein Name ist Charon")
say("er haust in der 6. Ebene der Devils Catacomb.")
say("Bedenke das die Träne des Himmels dir Kraft")
say("verleihen wird, hoffentlich soviel wie du")
say("brauchst...")
say("")
say_reward("Töte Charon, er befindet sich in der 6. Etage")
say_reward("der Devils Catacomb.")
say("")
set_state(kill_charon)
end
end

state kill_charon begin
when letter begin
send_letter("Töte Charon")
end

when button or info begin
say_title("Töte Charon")
say("")
say("Gehe in die Devils Catacomb und töte Charon")
say("er befindet sich in der 6. Etage, aber sei")
say("gewarnt, Charon ist äußerst mächtig, es wird")
say("äußerst schwer ihn zu töten.")
say("")
say_reward("Töte Charon, er befindet sich in der 6. Etage")
say_reward("der Devils Catacomb.")
end

when 2597.kill with pc.get_map_index() == 90 begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast Charon getötet, kehre zurück")
say("zu Lee Chung und berichte ihm von deinem")
say("Erfolg.")
say("")
say_reward("Kehre zurück zu Lee Chung")
say("")
set_state(charon_killed)
end
end

state charon_killed begin
when letter begin
local target = find_npc_by_vnum(20369)
if target != 0 then target.vid("__TARGET__", v, "Lee Chung")
end

send_letter("Rückkehr zu Lee Chung")
end

when button or info begin
say_title("Rückkehr zu Lee Chung")
say("")
say("Du hast Charon getötet, kehre zurück")
say("zu Lee Chung und berichte ihm von deinem")
say("Erfolg.")
say("")
say_reward("Kehre zurück zu Lee Chung")
say("")
end

when __TARGET__.target.click or 20369.chat."Rückkehr zu Lee Chung" begin
target.delete("target")
say_title(mob_name(npc.get_race()) ..":")
say("")
say("Du hast es wahrhaftig geschafft Charon zu")
say("töten, dank dir steht der Dunkle Lord")
say("nun ganz alleine da, das ist unsere Chance.")
say("")
say_reward("Du erhälst:")
say_reward("84.000.000 EXP")
say_reward("250.000 Yang")
say_reward("2x Stein des Schmieds")
say_reward("20x Tapferkeitsumhang")
say_reward("1x Frucht des Lebens")
say("")
pc.give_exp2("84000000")
pc.change_money("250000")
pc.give_item2("71025", 2)
pc.give_item2("70038", 20)
pc.give_item2("71107")
set_state(prince_finish)
end
end

state prince_finish begin
end
end

Link Eklendi !

Teşekkürler

kardeşim bide istiyen olursa demişsin türkçesini istemiyen olurmu ya seviniriz geliştirmeyede açık