quest pets_upp begin
state start begin
when 33002.chat."Sei gegrüßt" begin
say_title("Dunkler Töpfer")
say("Hallo "..pc.get_name()..". Ich bin der Dunkle Töpfer")
say("Bei mir kannst du dir Haustiere kaufen. Du hast be-")
say("stimmt beim ersten Login das Rentier erhalten")
say("Dieses Rentier ist noch ganz jung und schwach.")
say("Er kann dir also nicht sehr viel Kraft geben,")
say("die du aber im Kampf unbedingt benötigst. Deshalb habe")
say("ich ein Angebot für die Spieler von Black 7.")
say("Wenn du mir dein Rentier und noch ein paar Upp-")
say("items gibst, gebe ich dir den Feuerphönix.")
say("Du erhälts die Uppitems auf der Map 2.")
say("So das sollte als erstes genügen.Wenn du noch Hilfe für")
say("noch höhere Pets benötigst, sprich mich an ich bin da.")
local s = select("Danke ich werds versuchen", "Nochmal bitte ich verstehs nicht")
if s == 1 then
say_title("Dunkler Töpfer")
say("Okay ich freue mich schon auf die Zeit mit dir")
set_state(pets)
return
elseif s == 2 then
say_title("Dunkler Töpfer")
say("Okay klick mich nochmal an")
return
end
end
end
state pets brgin
when 33002.chat."Pet uppen" begin
say_title("Dunkler Töpfer")
say("Was möchtest du tun?")
local s2 = select ("Mein Pet uppen", "Nichts")
if s2 == 2 then
say_title("Dunkler Töpfer")
say("Okay dann nicht")
elseif s2 == 1
say_title("Dunkler Töpfer")
say("Welches Haustier besitzt du denn schon")
local ps = select ("Rentier", "Feuerphönix", "Eisphönix", "Baby Pets", "Keines")
if ps == 5 then
say_title("Dunkler Töpfer")
say("Wieso sagst du, du willst was uppen wenn du kein Pet hast")
return
elseif ps == 1 and pc.count_item("53002") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt das Rentier")
return
elseif ps == 1 and pc.count_item("53002") >= 1 then
say_title("Dunkler Töpfer")
say("Okay du hast das Rentier")
say("Jetzt benötigst du noch die Uppitems")
say_item_vnum("70016")
say_item_vnum("70017")
say("Hast du die bei dir?")
local hash = select ("Ja", "Nein")
if hash == 2 then
say_title("Dunkler Töpfer")
say("Du kannst die Items auf Map2 erfarmen, wenn du")
say("Metine killst")
return
elseif hash == 1 and pc.count_item("70017") >= 1 and pc.count_item("70016") >= 1 then
pc.remove_item("70017")
pc.remove_item("70016")
pc.remove_item("53002")
pc.give_item2("53001")
chat("Du hast den Feuerphönix erhalten")
return
elseif hash == 1 and pc.count_item("70017") == 0 or pc.count_item("70016") == 0 then
chat("Dir fehlen die benötigten Items")
chat("Du kannst sie auf Map2 erfarmen")
return
end
elseif ps == 2 and pc.count_item("53001") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt der Feuerphönix")
return
elseif ps == 2 and pc.count_item("53001") >= 1 then
say_title("Dunkler Töpfer")
say("Okay du hast den Feuerphönix")
say("Hast du aber auch die Uppitems?")
say_item_vnum("70023")
say_item_vnum("70019")
say("Hast du das Zeugs?")
local hash2 = select("Ja", "Nein")
if hash2 == 2 then
say_title("Dunkler Töpfer")
say("Okay dann farm sie mal. Du bekomst sie im Geisterwald")
say("Du solltest etwa eine Stunde benötigen")
return
elseif hash2 == 1 and pc.count_item("70023") == 0 or pc.count_item("70019") == 0 then
chat("Dir fehlen die Items")
chat("Du erhälst die Im Geisterwald")
return
elseif hash2 == 1 and pc.count_item("70023") >= 1 and pc.count_item("70019") >= 1 then
pc.remove_item("70019")
pc.remove_item("70023")
pc.remove_item("53001")
pc.give_item2("53003")
chat("Du hast den Eisphönix erhalten")
return
end
elseif ps == 3 and pc.count_item("53003") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt der Eisphönix O.o")
return
elseif ps == 3 and pc.count_item("53003") >= 1 then
say_title("Dunkler Töpfer")
say("Okay jetzt wird schwer")
say("Diese Items kriegst du nur aus den Metinen in der Grotte")
say_item_vnum("53103")
say_item_vnum("53104")
say("Hast du sie?")
local hash3 = select("Ja", "Nein")
if hash3 == 2 then
say_title("Dunkler Töpfer")
say("Okay dann geh ma farmen in der Grotte :D")
return
elseif hash3 == 1 and pc.count_item("53103") == 0 or pc.count_item("53104") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlen die benötigten Items")
return
elseif hash3 == 1 and pc.count_item("53103") >= 1 and pc.count_item("53104") >= 1 then
say_title("Dunkler Töpfer")
say("Hier gibt es ein kleines Special")
say("Du hast di Wahl zwischen 4 verscheidenen Pets")
say("Alle Pets haben die gleichen Bonis, also keine Angst")
say_reward("Welches Pet möchtest du?")
local petw = select ("Baby Tiger", "Baby Löwe", "Baby Keiler", "Baby Hund", "Jetzt noch keins")
if petw == 1 then
pc.remove_item("53103")
pc.remove_item("53104")
pc.remove_item("53003")
pc.give_item2("53009")
chat("Du hast einen Baby Tiger erhalten")
notice_all(""..pc.get_name().." hat sich für den Baby Tiger entschieden")
return
elseif petw == 2 then
pc.remove_item("53103")
pc.remove_item("53104")
pc.remove_item("53003")
pc.give_item2("53007")
chat("Du hast einen Baby Löwen erhalten")
notice_all(""..pc.get_name().." hat sich für den Baby Löwen entschieden")
return
elseif petw == 3 then
pc.remove_item("53103")
pc.remove_item("53104")
pc.remove_item("53003")
pc.give_item2("53008")
chat("Du hast ein Baby Keiler erhalten")
notice_all(""..pc.get_name().." hat sich für den Baby Keiler entschieden")
return
elseif petw == 4 then
pc.remove_item("53103")
pc.remove_item("53104")
pc.remove_item("53003")
pc.give_item2("53006")
chat("Du hast einen Baby Hund erhalten")
notice_all(""..pc.get_name().." hat sich für den Baby Hund entschieden")
return
elseif petw == 5 then
say_title("Dunkler Töpfer")
say("Okay sag mir wenn du so weit bist")
return
end
end
elseif ps = 4 then
say_title("Dunkler Töpfer")
say("Das ist die letzte Stufe. Du bist dabei, dir den Baby Azrael herzustellen")
say("Du brauchst das Item.")
say_item_vnum("50186")
say("Aber vorher muss ich wissen, welches der vier Baby Pets du hast")
local wahl3 = select("Baby Löwe", "Baby Keiler", "Baby Hund", "Baby Tiger", "Ich hab das Item nicht")
if wahl3 == 1 and pc.count_item("53007") == 0 then
say_title("Dunkler Töpfer")
say("Du hast keinen Baby Löwen, oder dir fehlt die Truhe")
return
elseif wahl3 == 1 and pc.count_item("53007") >= 1 and pc.count_item("50186") >= 1 then
pc.remove_item("53007")
pc.remove_item("50186")
pc.give_item2("53005")
chat("Du hast den Baby Azrael erhalten")
chat("Somit besitzt zu das beste Pet. Herzlichen Glückwunsch")
notice_all(""..pc.get_name().." hat den Baby Azrael erhalten")
notice_all("Es war ein harter weg, doch er hat es geschafft")
notice_all("Das Black 7 Team wünscht dir noch viel Spaß")
return
elseif wahl3 == 2 and pc.count_item("53008") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt der Keiler oder die Truhe")
return
elseif wahl3 == 2 and pc.count_item("53008") >= 1 and pc.count_item("50186") >= 1 then
pc.remove_item("53008")
pc.remove_item("50186")
pc.give_item2("53005")
chat("Du hast den Baby Azrael erhalten")
chat("Somit besitzt zu das beste Pet. Herzlichen Glückwunsch")
notice_all(""..pc.get_name().." hat den Baby Azrael erhalten")
notice_all("Es war ein harter weg, doch er hat es geschafft")
notice_all("Das Black 7 Team wünscht dir noch viel Spaß")
return
elseif wahl3 == 3 and pc.count_item("53006") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt der Keiler oder die Truhe")
return
elseif wahl3 == 3 and pc.count_item("53006") >= 1 and pc.count_item("50186") >= 1 then
pc.remove_item("53006")
pc.remove_item("50186")
pc.give_item2("53005")
chat("Du hast den Baby Azrael erhalten")
chat("Somit besitzt zu das beste Pet. Herzlichen Glückwunsch")
notice_all(""..pc.get_name().." hat den Baby Azrael erhalten")
notice_all("Es war ein harter weg, doch er hat es geschafft")
notice_all("Das Black 7 Team wünscht dir noch viel Spaß")
return
elseif wahl3 == 4 and pc.count_item("53009") == 0 then
say_title("Dunkler Töpfer")
say("Dir fehlt der Keiler oder die Truhe")
return
elseif wahl3 == 4 and pc.count_item("53009") >= 1 and pc.count_item("50186") >= 1 then
pc.remove_item("53009")
pc.remove_item("50186")
pc.give_item2("53005")
chat("Du hast den Baby Azrael erhalten")
chat("Somit besitzt zu das beste Pet. Herzlichen Glückwunsch")
notice_all(""..pc.get_name().." hat den Baby Azrael erhalten")
notice_all("Es war ein harter weg, doch er hat es geschafft")
notice_all("Das Black 7 Team wünscht dir noch viel Spaß")
return
elseif wahl3 == 5
say_title("Dunkler Töpfer")
say("Okay du weist ja wohl wo man die Truhe für den Azrael")
say("erhält oder?")
return
end
end
end
end
end
end
Und noch eine weitere:
Der Bonus wird beim absitzen nicht abgezogen. Warum nicht?
PHP Code:
quest wesi begin
state start begin
when 71124.use with pc.getqf("mount", 0) begin
pc.mount(20114, 200000)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 200000)
pc.setqf("mount", 1)
end
when 71124.use with pc.getqf("mount", 1) begin
pc.unmount()
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 200000)
pc.setqf("mount", 0)
end
end
end
quest wesi begin state start begin when 71124.use begin pc.mount(20114, 200000) pc.mount_bonus(apply.ATT_GRADE_BONUS, 100, 200000) end when 71124.use with pc.is_mount() begin pc.mount(0) end end end
quest lvl10 begin
state start begin
when login or levelup with pc.getlevel() >= 10 begin
set_state("anfang")
end
end
state anfang begin
when letter begin
send_letter("Zerstöre einen Metin der Schlacht")
end
when info or button begin
say_title("Zerstörung vom Metin der Schlacht")
say("Hallo junger Fremder")
say("")
say("wir haben ein großes Problem")
say("Würdest du für uns einen Metin der Schlacht zertören?")
end
local s = select("Ja","Nein keine Zeit")
if s == 2 then
say("Schade")
clear_letter()
set_state (aufgeben)
end
end
else
say("Hab vielen Dank")
say_reward("Töte 1 x Metin der Schlacht")
pc.setqf("state1", 0)
q.set_counter("Metin der Schlacht")
set_state(kill)
end
end
end
state kill begin
when letter begin
send_letter("Metin der Schlacht")
end
end
when info or button begin
say_title("Metin der Schlacht")
say("Staus:")
say_reward("Du hast schon "..pc.getqf("state1").." von 1 x Metin der Schlacht zerstört.")
end
when 8003.kill begin
local count1 = pc.getqf("state1") + 1
if count1 <= 1 then
pc.setqf("state1", count1)
q.set_counter("Metin der Schlacht", count1)
end
if count1 == 1 then
set_state(fertig)
end
end
state fertig begin
when letter begin
send_letter("Aufgabe abgeschlossen!")
end
when info or button begin
say_title("Aufgabe abgeschlossen!")
say("Du hast es geschaft")
say("Ich wusste das ich mich auf dich verlassen kann.")
say("Du bist wirklich Gut.")
wait()
say("Natürlich bekommst du deine Belohnung")
if pc.job == 0 then
say("Da du ein Krieger bist, bekommst du folgende Belohnung")
say_reward("Du bekommst einen Eisenplattenpanzer+9")
pc.give_item2(11219, 1)
say_reward("Glückwunsch, du hast einen Eisenplattenpanzer+9 erhalten")
end
elseif pc.job == 1 then
say("Da du ein Ninja bist, bekommst du folgende Belohnung")
say_reward("Du bekommst einen Elfenbeinanzug+9")
pc.give_item2(11419, 1)
say_reward("Glückwunsch, du hast einen Elfenbeinanzug+9 erhalten")
end
elseif pc.job == 2 then
say("Da du ein Sura bist,bekommst du folgende Belohnung")
say_reward("Du bekommst einen Magie-Plattenpanzer+9"))
pc.give_item2(11619, 1)
say_reward("Glückwunsch, du hast einen Magie-Plattenpanzer+9 erhalten")
end
elseif pc.job == 3 then
say("Da du ein/e Schamane bist, bekommst du folgende Belohnung")
say_reward("Du bekommst eine Türkiskleidung+9")
pc.give_item2(11819, 1)
say_reward("Glückwunsch du hast eine Türkiskleidung+9 erhalten")
end
end
end
state aufgeben begin
end
state ende begin
end
end
must start with 'quest'
level10.quest:1:Error occured on compile level10.quest
Kann mir da bitte endlich mal einer Helfen ich flipe bald aus xD
Wäre Nett wenn ihr denn Fehler mit reinschreibt ^^ damit ich aus meinen Fehlern lerne ...Danke
Moin Community,
brauche ein wenig hilfe bei meiner Quest
Das Problem bei meiner Quest ist, dass wenn ich den Lv 75 Metin Pung-Ma(Vnum des Metins ist 8024) töte
die quest den counter nicht erhöht.
Ansonsten geht der counter bei allen Metins.
Habe bereits auch alles im bereich des möglichen versucht xD
Bitte schreibt mir eine Nachricht zur berichtigung der quest.
Vielen Dank im vorraus
quest meister2 begin
state start begin
end
state run begin
when letter begin
local v = find_npc_by_vnum(20019)
if v != 0 then
target.vid("__TARGET__", v, "Yang-Shin")
end
send_letter ("Training mit Yang-Shin 2")
end
when button or info begin
say("Sprich noch einmal mit Yang-Shin.")
say("Er wird dir nun Helfen, deine zweite")
say("Stufe zu erreichen.")
end
when __TARGET__.target.click or 20019.chat."Meister, Yang-Shin" begin
target.delete("__TARGET__")
say_title("Yang-Shin:")
say("")
say("Guten Tag ".. pc.get_name() ..",")
say("Wie es aussieht, möchtest du wohl noch")
say("ein wenig mehr an Stärke gewinnen.")
wait()
say("Habe ich Recht?")
local s = select ("Ja, möchte Ich.", "Nein, noch nicht.")
if 1 == s then
target.delete("__TARGET__")
say_title("Yang-Shin")
say("")
say("Okay, dann werde ich dir von deinem")
say("nächsten Auftrag erzählen.")
say("Du sollst mir zeigen, dass du ein wahrer")
say("Kämpfer bist!")
say("")
wait()
say_title("Yang-Shin")
say("")
say("Zeige es, indem du ALLE Metinsteine")
say("zerstörst. Und zwar wirklich jeden.")
say("Ich werde dir wieder eine Liste schreiben.")
say("")
wait()
say_title("Metin-Liste:")
say("")
say_reward("Lv 5 Metin des Kummers")
say("Lv 10 Metin des Kampfs")
say_reward("Lv 15 Metin der Schlacht")
say("Lv 20 Metin der Gier")
say_reward("Lv 25 Metin der Schwärze")
say("Lv 30 Metin der Dunkelheit")
say_reward("Lv 35 Metin der Eifersucht")
say("Lv 40 Metin der Seele")
say_reward("Lv 45 Metin des Schattens")
say("Lv 50 Metin der Härte")
wait()
say_reward("Lv 55 Metin des Teufels")
say("Lv 60 Metin des Sturzes")
say_reward("Lv 65 Metin des Todes")
say("Lv 70 Metin des Mordes")
say_reward("Lv 75 Metin Pung-Ma")
say("Lv 80 Metin Ma-An")
say_reward("Lv 85 Metin Tu-Young")
say("Lv 90 Metin Jeon-Un")
wait()
say_title("Yang-Shin")
say("")
say("Das wären alle gewesen,")
say("die du Zerstören sollst.")
say("Nun geh und tu dies!")
pc.setqf("metin_collect_count",0)
pc.setqf("8001_metin_count",0)
pc.setqf("8002_metin_count",0)
pc.setqf("8003_metin_count",0)
pc.setqf("8004_metin_count",0)
pc.setqf("8005_metin_count",0)
pc.setqf("8006_metin_count",0)
pc.setqf("8007_metin_count",0)
pc.setqf("8008_metin_count",0)
pc.setqf("8009_metin_count",0)
pc.setqf("8010_metin_count",0)
pc.setqf("8011_metin_count",0)
pc.setqf("8012_metin_count",0)
pc.setqf("8013_metin_count",0)
pc.setqf("8014_metin_count",0)
pc.setqf("8024_metin_count",0)
pc.setqf("8025_metin_count",0)
pc.setqf("8026_metin_count",0)
pc.setqf("8027_metin_count",0)
set_state (metin_kill)
elseif 2 == s then
say_title("Yang-Shin")
say("")
say("Okay, dann sprich mich an,")
say("wenn du bereit bist.")
return
end
end
end
state metin_kill begin
when letter begin
send_letter ("Metinstein Info")
end
when button or info begin
say_title("Noch zu zerstören: Seite 1/3")
say("")
say_reward("Lv 5 Metin des Kummers ".." "..pc.getqf("8001_metin_count").."/1")
say("Lv 10 Metin des Kampfs ".." "..pc.getqf("8002_metin_count").."/1")
say_reward("Lv 15 Metin der Schlacht ".." "..pc.getqf("8003_metin_count").."/1")
say("Lv 20 Metin der Gier ".." "..pc.getqf("8004_metin_count").."/1")
say_reward("Lv 25 Metin der Schwärze ".." "..pc.getqf("8005_metin_count").."/1")
say("Lv 30 Metin der Dunkelheit ".." "..pc.getqf("8006_metin_count").."/1")
say_reward("Lv 35 Metin der Eifersucht ".." "..pc.getqf("8007_metin_count").."/1")
say("Lv 40 Metin der Seele ".." "..pc.getqf("8008_metin_count").."/1")
say_reward("Lv 45 Metin des Schattens ".." "..pc.getqf("8009_metin_count").."/1")
say("Lv 50 Metin der Härte ".." "..pc.getqf("8010_metin_count").."/1")
wait()
say_title("Noch zu zerstören Seite: 2/3")
say("")
say_reward("Lv 55 Metin des Teufels ".." "..pc.getqf("8011_metin_count").."/1")
say("Lv 60 Metin des Sturzes ".." "..pc.getqf("8012_metin_count").."/1")
say_reward("Lv 65 Metin des Todes ".." "..pc.getqf("8013_metin_count").."/1")
say("Lv 70 Metin des Mordes ".." "..pc.getqf("8014_metin_count").."/1")
say_reward("Lv 75 Metin Pung-Ma ".." "..pc.getqf("8024_metin_count").."/1")
say("Lv 80 Metin Ma-An ".." "..pc.getqf("8025_metin_count").."/1")
say_reward("Lv 85 Metin Tu-Young ".." "..pc.getqf("8026_metin_count").."/1")
say("Lv 90 Metin Jeon-Un ".." "..pc.getqf("8027_metin_count").."/1")
wait()
say_title("Noch zu zerstören Seite: 3/3")
say("")
say_reward("Du musst noch ".." "..pc.getqf("metin_collect_count").."/18 Metinsteine")
say_reward("zerstören")
end
when 8001.kill begin
if pc.getqf("8001_metin_count") == 1 then
return
end
if pc.getqf("8001_metin_count") == 0 then
local index =pc.getqf("8001_metin_count")+1
pc.setqf("8001_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8002.kill begin
if pc.getqf("8002_metin_count") == 1 then
return
end
if pc.getqf("8002_metin_count") == 0 then
local index =pc.getqf("8002_metin_count")+1
pc.setqf("8002_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8003.kill begin
if pc.getqf("8003_metin_count") == 1 then
return
end
if pc.getqf("8003_metin_count") == 0 then
local index =pc.getqf("8003_metin_count")+1
pc.setqf("8003_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8004.kill begin
if pc.getqf("8004_metin_count") == 1 then
return
end
if pc.getqf("8004_metin_count") == 0 then
local index =pc.getqf("8004_metin_count")+1
pc.setqf("8004_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8005.kill begin
if pc.getqf("8005_metin_count") == 1 then
return
end
if pc.getqf("8005_metin_count") == 0 then
local index =pc.getqf("8005_metin_count")+1
pc.setqf("8005_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8006.kill begin
if pc.getqf("8006_metin_count") == 1 then
return
end
if pc.getqf("8006_metin_count") == 0 then
local index =pc.getqf("8006_metin_count")+1
pc.setqf("8006_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8007.kill begin
if pc.getqf("8007_metin_count") == 1 then
return
end
if pc.getqf("8007_metin_count") == 0 then
local index =pc.getqf("8007_metin_count")+1
pc.setqf("8007_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8008.kill begin
if pc.getqf("8008_metin_count") == 1 then
return
end
if pc.getqf("8008_metin_count") == 0 then
local index =pc.getqf("8008_metin_count")+1
pc.setqf("8008_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8009.kill begin
if pc.getqf("8009_metin_count") == 1 then
return
end
if pc.getqf("8009_metin_count") == 0 then
local index =pc.getqf("8009_metin_count")+1
pc.setqf("8009_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8010.kill begin
if pc.getqf("8010_metin_count") == 1 then
return
end
if pc.getqf("8010_metin_count") == 0 then
local index =pc.getqf("8010_metin_count")+1
pc.setqf("8010_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8011.kill begin
if pc.getqf("8011_metin_count") == 1 then
return
end
if pc.getqf("8011_metin_count") == 0 then
local index =pc.getqf("8011_metin_count")+1
pc.setqf("8011_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8012.kill begin
if pc.getqf("8012_metin_count") == 1 then
return
end
if pc.getqf("8012_metin_count") == 0 then
local index =pc.getqf("8012_metin_count")+1
pc.setqf("8012_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8013.kill begin
if pc.getqf("8013_metin_count") == 1 then
return
end
if pc.getqf("8013_metin_count") == 0 then
local index =pc.getqf("8013_metin_count")+1
pc.setqf("8013_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8014.kill begin
if pc.getqf("8014_metin_count") == 1 then
return
end
if pc.getqf("8014_metin_count") == 0 then
local index =pc.getqf("8014_metin_count")+1
pc.setqf("8014_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8024.kill begin
if pc.getqf("8024_metin_count") == 1 then
return
end
if pc.getqf("8024_metin_count") == 0 then
local index =pc.getqf("8024_metin_count")+1
pc.setqf("8024_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count",index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8025.kill begin
if pc.getqf("8025_metin_count") == 1 then
return
end
if pc.getqf("8025_metin_count") == 0 then
local index =pc.getqf("8025_metin_count")+1
pc.setqf("8025_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8026.kill begin
if pc.getqf("8026_metin_count") == 1 then
return
end
if pc.getqf("8026_metin_count") == 0 then
local index =pc.getqf("8026_metin_count")+1
pc.setqf("8026_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8027.kill begin
if pc.getqf("8027_metin_count") == 1 then
return
end
if pc.getqf("8027_metin_count") == 0 then
local index =pc.getqf("8027_metin_count")+1
pc.setqf("8027_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 20019.chat."Meister, Yang-Shin" with pc.getqf("metin_collect_count") == 18 begin
say_title("Yang-Shin:")
say("")
say("Sehr Gut!")
say("Du hast alle Metins zerstört!")
say("Nun sollte auch ein bisschen mehr Frieden")
say("in unser Land einkehren.")
say("")
set_state(rew2)
end
end
state rew2 begin
when letter begin
local v = find_npc_by_vnum(20019)
if v != 0 then
target.vid("__TARGET__", v, "Yang-Shin")
end
send_letter("Sprich mit Yang-Shin")
end
when button or info begin
say("")
say("Sprich mit Yang-Shin,")
say("Er wird den zweiten Teil deiner Kraft")
say("zum vorschein bringen.")
say("")
end
when __TARGET__.target.click or 20019.chat."Meister, Yang-Shin" begin
target.delete("__TARGET__")
say_title("Yang-Shin:")
say("")
say("Hallo ".. pc.get_name() ..",")
say("Da du erfolgreich warst und schon einiges")
say("geleistet hast. Möchte ich dir Helfen,")
say("deine Kraft zu steigern.")
say("")
wait()
say_title("Yang-Shin:")
say("")
say_reward("Yang-Shin gibt dir den Trank der Stärke,")
say_reward("Um dir weitere Vorteile zu verschaffen.")
say("")
wait()
say_title("Yang-Shin")
say("")
say("Dieser Magische Trank Stärkt dich gegen jede Art von Monstern.")
say("Er wirkt 60Jahre lang.")
say("")
say_reward("Du erhälst 10% Stark gegen Monster")
say_reward("Und 3.000 Trefferpunkte (TP)")
affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 10, 60*60*24*365*60)
affect.add_collect(apply.MAX_HP, 3000, 60*60*24*365*60)
set_quest_state ("meister3", "run")
set_state (__complete)
end
end
state __complete begin
end
end
Hier habe ich Teil1 meiner quest auch schon drin
und dort funktioniert alles reibungslos
Moin Community,
brauche ein wenig hilfe bei meiner Quest
Das Problem bei meiner Quest ist, dass wenn ich den Lv 75 Metin Pung-Ma(Vnum des Metins ist 8024) töte
die quest den counter nicht erhöht.
Ansonsten geht der counter bei allen Metins.
Habe bereits auch alles im bereich des möglichen versucht xD
Bitte schreibt mir eine Nachricht zur berichtigung der quest.
Vielen Dank im vorraus
quest meister2 begin
state start begin
end
state run begin
when letter begin
local v = find_npc_by_vnum(20019)
if v != 0 then
target.vid("__TARGET__", v, "Yang-Shin")
end
send_letter ("Training mit Yang-Shin 2")
end
when button or info begin
say("Sprich noch einmal mit Yang-Shin.")
say("Er wird dir nun Helfen, deine zweite")
say("Stufe zu erreichen.")
end
when __TARGET__.target.click or 20019.chat."Meister, Yang-Shin" begin
target.delete("__TARGET__")
say_title("Yang-Shin:")
say("")
say("Guten Tag ".. pc.get_name() ..",")
say("Wie es aussieht, möchtest du wohl noch")
say("ein wenig mehr an Stärke gewinnen.")
wait()
say("Habe ich Recht?")
local s = select ("Ja, möchte Ich.", "Nein, noch nicht.")
if 1 == s then
target.delete("__TARGET__")
say_title("Yang-Shin")
say("")
say("Okay, dann werde ich dir von deinem")
say("nächsten Auftrag erzählen.")
say("Du sollst mir zeigen, dass du ein wahrer")
say("Kämpfer bist!")
say("")
wait()
say_title("Yang-Shin")
say("")
say("Zeige es, indem du ALLE Metinsteine")
say("zerstörst. Und zwar wirklich jeden.")
say("Ich werde dir wieder eine Liste schreiben.")
say("")
wait()
say_title("Metin-Liste:")
say("")
say_reward("Lv 5 Metin des Kummers")
say("Lv 10 Metin des Kampfs")
say_reward("Lv 15 Metin der Schlacht")
say("Lv 20 Metin der Gier")
say_reward("Lv 25 Metin der Schwärze")
say("Lv 30 Metin der Dunkelheit")
say_reward("Lv 35 Metin der Eifersucht")
say("Lv 40 Metin der Seele")
say_reward("Lv 45 Metin des Schattens")
say("Lv 50 Metin der Härte")
wait()
say_reward("Lv 55 Metin des Teufels")
say("Lv 60 Metin des Sturzes")
say_reward("Lv 65 Metin des Todes")
say("Lv 70 Metin des Mordes")
say_reward("Lv 75 Metin Pung-Ma")
say("Lv 80 Metin Ma-An")
say_reward("Lv 85 Metin Tu-Young")
say("Lv 90 Metin Jeon-Un")
wait()
say_title("Yang-Shin")
say("")
say("Das wären alle gewesen,")
say("die du Zerstören sollst.")
say("Nun geh und tu dies!")
pc.setqf("metin_collect_count",0)
pc.setqf("8001_metin_count",0)
pc.setqf("8002_metin_count",0)
pc.setqf("8003_metin_count",0)
pc.setqf("8004_metin_count",0)
pc.setqf("8005_metin_count",0)
pc.setqf("8006_metin_count",0)
pc.setqf("8007_metin_count",0)
pc.setqf("8008_metin_count",0)
pc.setqf("8009_metin_count",0)
pc.setqf("8010_metin_count",0)
pc.setqf("8011_metin_count",0)
pc.setqf("8012_metin_count",0)
pc.setqf("8013_metin_count",0)
pc.setqf("8014_metin_count",0)
pc.setqf("8024_metin_count",0)
pc.setqf("8025_metin_count",0)
pc.setqf("8026_metin_count",0)
pc.setqf("8027_metin_count",0)
set_state (metin_kill)
elseif 2 == s then
say_title("Yang-Shin")
say("")
say("Okay, dann sprich mich an,")
say("wenn du bereit bist.")
return
end
end
end
state metin_kill begin
when letter begin
send_letter ("Metinstein Info")
end
when button or info begin
say_title("Noch zu zerstören: Seite 1/3")
say("")
say_reward("Lv 5 Metin des Kummers ".." "..pc.getqf("8001_metin_count").."/1")
say("Lv 10 Metin des Kampfs ".." "..pc.getqf("8002_metin_count").."/1")
say_reward("Lv 15 Metin der Schlacht ".." "..pc.getqf("8003_metin_count").."/1")
say("Lv 20 Metin der Gier ".." "..pc.getqf("8004_metin_count").."/1")
say_reward("Lv 25 Metin der Schwärze ".." "..pc.getqf("8005_metin_count").."/1")
say("Lv 30 Metin der Dunkelheit ".." "..pc.getqf("8006_metin_count").."/1")
say_reward("Lv 35 Metin der Eifersucht ".." "..pc.getqf("8007_metin_count").."/1")
say("Lv 40 Metin der Seele ".." "..pc.getqf("8008_metin_count").."/1")
say_reward("Lv 45 Metin des Schattens ".." "..pc.getqf("8009_metin_count").."/1")
say("Lv 50 Metin der Härte ".." "..pc.getqf("8010_metin_count").."/1")
wait()
say_title("Noch zu zerstören Seite: 2/3")
say("")
say_reward("Lv 55 Metin des Teufels ".." "..pc.getqf("8011_metin_count").."/1")
say("Lv 60 Metin des Sturzes ".." "..pc.getqf("8012_metin_count").."/1")
say_reward("Lv 65 Metin des Todes ".." "..pc.getqf("8013_metin_count").."/1")
say("Lv 70 Metin des Mordes ".." "..pc.getqf("8014_metin_count").."/1")
say_reward("Lv 75 Metin Pung-Ma ".." "..pc.getqf("8024_metin_count").."/1")
say("Lv 80 Metin Ma-An ".." "..pc.getqf("8025_metin_count").."/1")
say_reward("Lv 85 Metin Tu-Young ".." "..pc.getqf("8026_metin_count").."/1")
say("Lv 90 Metin Jeon-Un ".." "..pc.getqf("8027_metin_count").."/1")
wait()
say_title("Noch zu zerstören Seite: 3/3")
say("")
say_reward("Du musst noch ".." "..pc.getqf("metin_collect_count").."/18 Metinsteine")
say_reward("zerstören")
end
when 8001.kill begin
if pc.getqf("8001_metin_count") == 1 then
return
end
if pc.getqf("8001_metin_count") == 0 then
local index =pc.getqf("8001_metin_count")+1
pc.setqf("8001_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8002.kill begin
if pc.getqf("8002_metin_count") == 1 then
return
end
if pc.getqf("8002_metin_count") == 0 then
local index =pc.getqf("8002_metin_count")+1
pc.setqf("8002_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8003.kill begin
if pc.getqf("8003_metin_count") == 1 then
return
end
if pc.getqf("8003_metin_count") == 0 then
local index =pc.getqf("8003_metin_count")+1
pc.setqf("8003_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8004.kill begin
if pc.getqf("8004_metin_count") == 1 then
return
end
if pc.getqf("8004_metin_count") == 0 then
local index =pc.getqf("8004_metin_count")+1
pc.setqf("8004_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8005.kill begin
if pc.getqf("8005_metin_count") == 1 then
return
end
if pc.getqf("8005_metin_count") == 0 then
local index =pc.getqf("8005_metin_count")+1
pc.setqf("8005_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8006.kill begin
if pc.getqf("8006_metin_count") == 1 then
return
end
if pc.getqf("8006_metin_count") == 0 then
local index =pc.getqf("8006_metin_count")+1
pc.setqf("8006_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8007.kill begin
if pc.getqf("8007_metin_count") == 1 then
return
end
if pc.getqf("8007_metin_count") == 0 then
local index =pc.getqf("8007_metin_count")+1
pc.setqf("8007_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8008.kill begin
if pc.getqf("8008_metin_count") == 1 then
return
end
if pc.getqf("8008_metin_count") == 0 then
local index =pc.getqf("8008_metin_count")+1
pc.setqf("8008_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8009.kill begin
if pc.getqf("8009_metin_count") == 1 then
return
end
if pc.getqf("8009_metin_count") == 0 then
local index =pc.getqf("8009_metin_count")+1
pc.setqf("8009_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8010.kill begin
if pc.getqf("8010_metin_count") == 1 then
return
end
if pc.getqf("8010_metin_count") == 0 then
local index =pc.getqf("8010_metin_count")+1
pc.setqf("8010_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8011.kill begin
if pc.getqf("8011_metin_count") == 1 then
return
end
if pc.getqf("8011_metin_count") == 0 then
local index =pc.getqf("8011_metin_count")+1
pc.setqf("8011_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8012.kill begin
if pc.getqf("8012_metin_count") == 1 then
return
end
if pc.getqf("8012_metin_count") == 0 then
local index =pc.getqf("8012_metin_count")+1
pc.setqf("8012_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8013.kill begin
if pc.getqf("8013_metin_count") == 1 then
return
end
if pc.getqf("8013_metin_count") == 0 then
local index =pc.getqf("8013_metin_count")+1
pc.setqf("8013_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8014.kill begin
if pc.getqf("8014_metin_count") == 1 then
return
end
if pc.getqf("8014_metin_count") == 0 then
local index =pc.getqf("8014_metin_count")+1
pc.setqf("8014_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8024.kill begin
if pc.getqf("8024_metin_count") == 1 then
return
end
if pc.getqf("8024_metin_count") == 0 then
local index =pc.getqf("8024_metin_count")+1
pc.setqf("8024_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count",index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8025.kill begin
if pc.getqf("8025_metin_count") == 1 then
return
end
if pc.getqf("8025_metin_count") == 0 then
local index =pc.getqf("8025_metin_count")+1
pc.setqf("8025_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8026.kill begin
if pc.getqf("8026_metin_count") == 1 then
return
end
if pc.getqf("8026_metin_count") == 0 then
local index =pc.getqf("8026_metin_count")+1
pc.setqf("8026_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 8027.kill begin
if pc.getqf("8027_metin_count") == 1 then
return
end
if pc.getqf("8027_metin_count") == 0 then
local index =pc.getqf("8027_metin_count")+1
pc.setqf("8027_metin_count",index)
local index =pc.getqf("metin_collect_count")+1
pc.setqf("metin_collect_count", index)
end
if pc.getqf("metin_collect_count") == 18 then
send_letter("Alle Metinsteine zerstört!")
end
end
when 20019.chat."Meister, Yang-Shin" with pc.getqf("metin_collect_count") == 18 begin
say_title("Yang-Shin:")
say("")
say("Sehr Gut!")
say("Du hast alle Metins zerstört!")
say("Nun sollte auch ein bisschen mehr Frieden")
say("in unser Land einkehren.")
say("")
set_state(rew2)
end
end
state rew2 begin
when letter begin
local v = find_npc_by_vnum(20019)
if v != 0 then
target.vid("__TARGET__", v, "Yang-Shin")
end
send_letter("Sprich mit Yang-Shin")
end
when button or info begin
say("")
say("Sprich mit Yang-Shin,")
say("Er wird den zweiten Teil deiner Kraft")
say("zum vorschein bringen.")
say("")
end
when __TARGET__.target.click or 20019.chat."Meister, Yang-Shin" begin
target.delete("__TARGET__")
say_title("Yang-Shin:")
say("")
say("Hallo ".. pc.get_name() ..",")
say("Da du erfolgreich warst und schon einiges")
say("geleistet hast. Möchte ich dir Helfen,")
say("deine Kraft zu steigern.")
say("")
wait()
say_title("Yang-Shin:")
say("")
say_reward("Yang-Shin gibt dir den Trank der Stärke,")
say_reward("Um dir weitere Vorteile zu verschaffen.")
say("")
wait()
say_title("Yang-Shin")
say("")
say("Dieser Magische Trank Stärkt dich gegen jede Art von Monstern.")
say("Er wirkt 60Jahre lang.")
say("")
say_reward("Du erhälst 10% Stark gegen Monster")
say_reward("Und 3.000 Trefferpunkte (TP)")
affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 10, 60*60*24*365*60)
affect.add_collect(apply.MAX_HP, 3000, 60*60*24*365*60)
set_quest_state ("meister3", "run")
set_state (__complete)
end
end
state __complete begin
end
end
Hier habe ich Teil1 meiner quest auch schon drin
und dort funktioniert alles reibungslos
Eventuell wird dieses "KILL" Event schon in einer anderen Quest abgefragt
und ist deshalb nicht doppelt verwendbar.
Eventuell wird dieses "KILL" Event schon in einer anderen Quest abgefragt
und ist deshalb nicht doppelt verwendbar.
Vielen Dank für die schnelle Antwort, aber dieses when 8024.kill begin
wird sonst nirgends abgefragt, es ist einzig und allein nur da ein kill event
auch ein relog hat nicht geholfen.
kannst du bitte hier
mal vorbei schauen, falls du es nicht schon getan hast und es dir angucken? wäre dir sehr dankar dafür =)
Hätte eine Frage ob jemand das machen könnte würde gern aus dieser Quest ein paar enfernen aber wenn ich sie entferne klappt die ganze quest nicht
am besten das Pferde/Verwandlung/Reitiere/Göttlich (und beim Einkaufen soll nur die gemi aufgehen) werden die sollten raus wäre hammer nett wenn jemand das könnte würde mich drüber freuen und der person auch ein thx geben wenn es funktioniert
PHP Code:
quest user begin
state start begin
when 70028.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, vielleicht beim nächsten mal")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Nix")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also deine Pferde-Daten wissen")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Nirgens")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich für 5 Minuten Verwandeln?")
say("5 Minuten kosten dich 5.000.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=5000000 then
say("Du wirst in einen Wildhund verwandelt")
pc.polymorph(101, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 2 then
if pc.money>=5000000 then
say("Du wirst in einen Wolf verwandelt")
pc.polymorph(102, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 3 then
if pc.money>=5000000 then
say("Du wirst in ein Ork verwandelt")
pc.polymorph(601, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 4 then
if pc.money>=5000000 then
say("Du wirst in eine Spinne verwandelt")
pc.polymorph(2001, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Okey ich verwandle dich für")
say("30 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Okey, ich verwandel dich zurück")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen bzw. einen Shop öffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Okey du bist nun ein Shop")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Gut, du bist wieder da")
pc.remove_polymorph()
end
if w == 3 then
say("Ok, dann halt nicht")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("******")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say("****")
say_reward("Die GameMaster´s [GM] :")
say("******")
say("*****")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher")
say("Das du mich irgendwann gebrauchen wirst")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für eins?")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du bekommst meinen Kailer ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Kailer für")
say("5 Minuten")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du bekommst meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Okey, tschüüüss!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger offnen")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht, Byyee")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
if dd == 3 then
say("Möchtest du echt den Shop von Vivien öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
say("Dann halt nicht, Byyee!")
return
end
if ef == 1 then
say("Der Shop von Vivien wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang mache ich dich auch")
say_title("zu einem Gott")
say_reward("Du benötigst 50.000.000 Yang")
say("Willst du Göttlich werden?")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Ok Dann nicht, villeicht später")
return
end
if ff == 1 then
say("Wenn du deinen Rang auf 20.000 haben willst")
say("Und 50.000.000 Yang besitzt dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=50000000 then
say("Schön, du hast dein rang bekommen")
say("Nun bist du so ein Gott wie ich")
say("Viel spaß noch!")
pc.changemoney(-50000000)
pc.change_alignment(200000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 50.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen..willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Dann halt nicht, jetzt fühle ich mich schlecht!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch, wie kann ich dir")
say_title("großer GM"..pc.get_name().." weiterhelfen?")
local s = select("Gm-Notiz","Garnicht")
if s == 2 then
say("Okey, dann nicht...")
say("Vielleicht beim nächsten mal!")
return
end
if s == 1 then
say("Gib eine Notiz ein, die an alle Reiche")
say("gesendet wird!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end
Hätte eine Frage ob jemand das machen könnte würde gern aus dieser Quest ein paar enfernen aber wenn ich sie entferne klappt die ganze quest nicht
am besten das Pferde/Verwandlung/Reitiere/Göttlich (und beim Einkaufen soll nur die gemi aufgehen) werden die sollten raus wäre hammer nett wenn jemand das könnte würde mich drüber freuen und der person auch ein thx geben wenn es funktioniert
PHP Code:
quest user begin
state start begin
when 70028.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, vielleicht beim nächsten mal")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Nix")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also deine Pferde-Daten wissen")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Nirgens")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich für 5 Minuten Verwandeln?")
say("5 Minuten kosten dich 5.000.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=5000000 then
say("Du wirst in einen Wildhund verwandelt")
pc.polymorph(101, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 2 then
if pc.money>=5000000 then
say("Du wirst in einen Wolf verwandelt")
pc.polymorph(102, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 3 then
if pc.money>=5000000 then
say("Du wirst in ein Ork verwandelt")
pc.polymorph(601, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 4 then
if pc.money>=5000000 then
say("Du wirst in eine Spinne verwandelt")
pc.polymorph(2001, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Okey ich verwandle dich für")
say("30 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Okey, ich verwandel dich zurück")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen bzw. einen Shop öffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Okey du bist nun ein Shop")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Gut, du bist wieder da")
pc.remove_polymorph()
end
if w == 3 then
say("Ok, dann halt nicht")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("******")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say("****")
say_reward("Die GameMaster´s [GM] :")
say("******")
say("*****")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher")
say("Das du mich irgendwann gebrauchen wirst")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für eins?")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du bekommst meinen Kailer ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Kailer für")
say("5 Minuten")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du bekommst meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Okey, tschüüüss!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger offnen")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht, Byyee")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
if dd == 3 then
say("Möchtest du echt den Shop von Vivien öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
say("Dann halt nicht, Byyee!")
return
end
if ef == 1 then
say("Der Shop von Vivien wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang mache ich dich auch")
say_title("zu einem Gott")
say_reward("Du benötigst 50.000.000 Yang")
say("Willst du Göttlich werden?")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Ok Dann nicht, villeicht später")
return
end
if ff == 1 then
say("Wenn du deinen Rang auf 20.000 haben willst")
say("Und 50.000.000 Yang besitzt dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=50000000 then
say("Schön, du hast dein rang bekommen")
say("Nun bist du so ein Gott wie ich")
say("Viel spaß noch!")
pc.changemoney(-50000000)
pc.change_alignment(200000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 50.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen..willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Dann halt nicht, jetzt fühle ich mich schlecht!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch, wie kann ich dir")
say_title("großer GM"..pc.get_name().." weiterhelfen?")
local s = select("Gm-Notiz","Garnicht")
if s == 2 then
say("Okey, dann nicht...")
say("Vielleicht beim nächsten mal!")
return
end
if s == 1 then
say("Gib eine Notiz ein, die an alle Reiche")
say("gesendet wird!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end
PHP Code:
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
mit diesem fehler sollte die quest eigentlich gar nicht laufen xD
PHP Code:
quest user begin
state start begin
when 70028.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, vielleicht beim nächsten mal")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Nix")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also deine Pferde-Daten wissen")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Nirgens")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich für 5 Minuten Verwandeln?")
say("5 Minuten kosten dich 5.000.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=5000000 then
say("Du wirst in einen Wildhund verwandelt")
pc.polymorph(101, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 2 then
if pc.money>=5000000 then
say("Du wirst in einen Wolf verwandelt")
pc.polymorph(102, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 3 then
if pc.money>=5000000 then
say("Du wirst in ein Ork verwandelt")
pc.polymorph(601, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 4 then
if pc.money>=5000000 then
say("Du wirst in eine Spinne verwandelt")
pc.polymorph(2001, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Okey ich verwandle dich für")
say("30 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Okey, ich verwandel dich zurück")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen bzw. einen Shop öffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Okey du bist nun ein Shop")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Gut, du bist wieder da")
pc.remove_polymorph()
end
if w == 3 then
say("Ok, dann halt nicht")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("******")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say("****")
say_reward("Die GameMaster´s [GM] :")
say("******")
say("*****")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Reittiere","Einkaufen","Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher")
say("Das du mich irgendwann gebrauchen wirst")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für eins?")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du bekommst meinen Kailer ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Kailer für")
say("5 Minuten")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du bekommst meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Okey, tschüüüss!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger offnen")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht, Byyee")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
if dd == 3 then
say("Möchtest du echt den Shop von Vivien öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
say("Dann halt nicht, Byyee!")
return
end
if ef == 1 then
say("Der Shop von Vivien wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang mache ich dich auch")
say_title("zu einem Gott")
say_reward("Du benötigst 50.000.000 Yang")
say("Willst du Göttlich werden?")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Ok Dann nicht, villeicht später")
return
end
if ff == 1 then
say("Wenn du deinen Rang auf 20.000 haben willst")
say("Und 50.000.000 Yang besitzt dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=50000000 then
say("Schön, du hast dein rang bekommen")
say("Nun bist du so ein Gott wie ich")
say("Viel spaß noch!")
pc.changemoney(-50000000)
pc.change_alignment(200000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 50.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen..willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Dann halt nicht, jetzt fühle ich mich schlecht!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch, wie kann ich dir")
say_title("großer GM"..pc.get_name().." weiterhelfen?")
local s = select("Gm-Notiz","Garnicht")
if s == 2 then
say("Okey, dann nicht...")
say("Vielleicht beim nächsten mal!")
return
end
if s == 1 then
say("Gib eine Notiz ein, die an alle Reiche")
say("gesendet wird!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end
tagchen
ich hab hier schon paar fehlerleins behoben und so aber es lädt nicht, gibt aber auch keine fehlermeldung .. vlt kannst du mir ja helfen ;o
PHP Code:
quest PvP_EQ begin state start begin when login or levelup with pc.level >= 120 begin send_letter("PvP EQ") end when info or button begin say_title("PvP EQ") say("Gehe zum Schmied, er will mit dir reden.") set_state(tlc1) end end
state tlc1 begin when letter begin send_letter("Gehe zum Schmied") end when info or button begin say_title("Gehe zum Schmied") say("Gehe zum Schmied!") say("Er benoetigt deine Hilfe") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."PvP Eq schmieden" begin say_title("PvP EQ schmieden") say("Seit Generationen beherbergt meine Familie das Geheimniss,") say("Wie man das beste PvP Eq schmiedet.") say("Nun ist es an mir diese Tradition fortzusetzen.") say("Ich brauche aber deine Hilfe, denn um das Eq schmieden zu koennen,") say("Brauche ich einige bestimmte Gegenstaende.") say("Wenn du sie mir besorgst, gebe ich dir den geschmiedeten Gegenstand.") set_state(tlc2) end end
state tlc2 begin when letter begin send_letter("Besorgungen fuer den Schmied 1") end when info or button begin say_title("Besorgungen fuer den Schmied 1") say("Als erstes musst du zu Nakajima") say("Du findest ihn ausserhalb der 2. Stadt") local v=find_npc_by_vnum(20364) if 0==v then else target.vid("__TARGET__", v,"20364") end end when __TARGET__.target.click or 20364.chat."Besorgungen fuer den Schmied" begin say_title("Besorgungen fuer den Schmied") say("Der Schmied schickt dich zu mir?") say("Ich erinnere mich an das Gespraech mit ihm") say("Ich versprach ihm meinen Zelkova Holzast zu geben,") say("wofuer er ihn braucht weiss ich nicht.") say("Aber ich nehme an ich soll ihn nun dir geben.") say("Hier hast du ihn, bringe ihn schnell zum Schmied!") say_reward("Zelkova Holzast erhalten") pc.give_item2("30165", 1) set_state(tlc3) end end
state tlc3 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast den Ast.") say("Gehe zurueck zum Schmied.") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end set_state(tlc4) end when __TARGET__.target.click or 20016.chat."Gegenstand besorgt" begin say_title("Gegenstand besorgt") say("Du hast den Ast von Nakajima?") say("Sehr gut, das ist der erste Gegenstand den ich benoetige.") say("Als Belohnung gebe ich dir etwas Yang und ein paar Exp!") say("Nun geh und hole den Zweiten!") pc.remove_item("30165", 1) pc.change_money(15000000) pc.give_exp2(1111111) set_state(tlc4) end end
state tlc4 begin when letter begin send_letter("Besorgungen fuer den Schmied 2") end when info or button begin say_title("Besorgungen fuer den Schmied 2") say("Als naehstes sollst du einen Orkzahn besorgen") say("Du bekommst ihn von schwarzen Orks") end when 636.kill begin local s =number(1, 4) if s <= 5 and pc.count_item(30006) < 1 then pc.give_item2(30006, 1) end set_state(tlc5) end end
state tlc5 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast den Orkzahn") say("Gehe zurueck zum schmied") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."Gegenstand besorgt" begin say_title("Gegenstand besorgt") say("Du hast den Orkzahn?") say("Sehr gut, hier ist deine Belohnung.") say("Nun geh und suche mir den naechsten.") pc.remove_item("30006", 1) pc.change_money(15000000) pc.give_exp2(1111111) set_state(tlc6) end end
state tlc6 begin when letter begin send_letter("Besorgungen fuer den Schmied 3") end when info or button begin say_title("Besorgungen fuer den Schmied 3") say("Als naechstes braucht der Schmied die Notiz vom") say("Wuestenfuchs. Um sie zu bekommen,") say("musst du ihn toeten.") end when 2101.kill begin pc.give_item2("30160", 1) set_state(tlc7) end end
state tlc7 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast die Notiz") say("Gehe zurueck zum Schmied") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."Gegenstand besorgt" begin say_title("Gegenstand besorgt") say("Da bist du ja wieder.") say("Hast du die Notiz? Sehr gut!") say("Hier ist deine Belohnung.") say("Jetzt geh und suche das naechste Item") pc.remove_item("30160", 1) pc.change_money(15000000) pc.give_exp2(1111111) set_state(tlc8) end end
state tlc8 begin when letter begin send_letter("Besorgungen fuer den Schmied 4") end when info or button begin say_title("Besorgungen fuer den Schmied 4") say("Als naechstes musst du zu Seon-Pyenong im Tal von Seungryong") say("um von ihm zu erfahren wie man das Metall") say("hart und trotzdem dehnbar macht ..") local v=find_npc_by_vnum(20091) if 0==v then else target.vid("__TARGET__", v, "20091") end end when __TARGET__.target.click or 20091.chat."Besorgungen fuer den Schmied" begin say_title("Besorgungen fuer den Schmied") say("Du kommst wegen des Schmiedes?") say("Ah ich weiss was du wissen willst!") say("Ich werde dir die Information geben,") say(" ... ") say(" ... ") say("Nun geh und sag es dem Schmied.") set_state(tlc9) end end
state tlc9 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast die Information") say("Gehe zum Schmied zurueck") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."Information besorgt" begin say_title("Information besorgt") say("Da bist du ja wieder.") say("Hast du die Information?") say("Sehr gut, hier ist deine Belohnung.") say("Zwei Dinge fehlen noch bis ich mit") say("dem Schmieden anfangen kann.") say("Geh und hole sie!") pc.change_money(15000000) pc.give_exp2(1111111) set_state(tlc10) end end
state tlc10 begin when letter begin send_letter("Besorgungen fuer den Schmied 5") end when info or button begin say_title("Besorgungen fuer den Schmied 5") say("Du sollst dem Schmied noch zwei Dinge besorgen.") say("Das erste ist ein Eiskillerwal-Horn.") say("Du bekommst es von den Eiskillerwalen im Eisland.") end when 1102.kill begin send_letter("Wo ist das Horn?") end when info or button begin say_title("Wo ist das Horn?") say("Jemand hat dem Eiskillerwal das Horn abgesaegt.") say("Gehe zum Jaeger Yang-Shin und frage ihn") say("Ob er etwas weiss.") local v=find_npc_by_vnum(20019) if 0==v then else target.vid("__TARGET__", v,"20019") end end when __TARGET__.target.click or 20019.chat."Eiskillerwal" begin say_title("Wo ist das Horn?") say("Ja, ich hab die Hoerner genommen.") say("Ich moechte sie verkaufen.") say("Moechtest du eins haben?") say("Bring mir eine schweres Auffenkraut") say("und du bekommst eins.") say_reward("Auf den Handel eingehen?") local s=select("Ja","Nein") if s == 2 then say("Dann bekommst du auch keins.") say("Auf Wiedersehen.") set_state(tlc10) else say("Dann komm wieder wenn du eins hast.") end
if pc.count_item(50059) <= 1 then local v=find_npc_by_vnum(20019) if 0==v then else target.vid("__TARGET__", v,"20019") end end end when __TARGET__.target.click or 20019.chat."Affenkraut" begin say_title("Affenkraut") say("Oh, du hast das Kraut?") say("Sehr gut, hier, nimm das Horn.") say("Hat mich gefreut mit dir") say("Geschaeffte zu machen.") pc.remove_item("50059", 1) pc.give_item2("30049", 1) set_state(tlc11) end end
state tlc11 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast das Eiskillerwal-Horn") say("Gehe zurueck zum Schmied.") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."Eiskillerwal-Horn besorgt" begin say_title("Eiskillerwal-Horn besorgt") say("Ahh, da bist du ja!") say("Hast du das Horn?") say("Gut, hier ist deine Belohnung.") say("Es fehlt nur noch eine Sache,") say("Ich bin schon ganz aufgeregt!") pc.remove_item("30049", 1) pc.change_money(15000000) pc.give_exp2(1111111) set_state(tlc12) end end
state tlc12 begin when letter begin send_letter("Besorgungen fuer den Schmied 6") end when info or button begin say_title("Besorgungen fuer den Schmied 6") say("Es fehlt nur noch ein Gegenstand.") say("Ein Glas voll Affenblut.") say("Sie haben es dem Sensenmann zur Aufbewahrung gegeben,") say("da es sehr wertvoll ist.") say("Toete den Sensenmann um das Affenblut zu erhalten.") say("Dafuer musst du den Daemonenturm hoch.") set_state(timiskacke) end end
state timiskacke begin when letter begin send_letter("Affenblut") end when info or button begin say_title("Affenblut") say("Besorge das Affenblut.") say("Einer der Sensenmaenner im Daemonenturm hat es.") say("Du kannst pro run natuerlich nur einen Sensenmann toeten.") say("Viel Glueck!") end when 1093.kill begin local s = number(1, 4) if s <= 5 and pc.count_item(30137) < 1 then pc.give_item2(30137, 1) end if pc.count_item(30137) >= 1 then set_state(tlc13) end end end
state tlc13 begin when letter begin send_letter("Kehre zum Schmied zurueck!") end when info or button begin say_title("Kehre zum Schmied zurueck") say("Du hast das Affenblut") say("Gehe zurueck zum Schmied.") local v=find_npc_by_vnum(20016) if 0==v then else target.vid("__TARGET__", v,"20016") end end when __TARGET__.target.click or 20016.chat."Affenblut besorgt" begin say_title("Affenblut besorgt") say("Da bist du ja endlich!") say("Her mit dem Affenblut,") say("ich kann es kaum erwarten!") say("so dann wollen wir mal") say(" ........... ") say(" ........... ") say("und fertig!") say("Hier fuer deine muehen. Vielen Dank!") pc.remove_item("30137", 1) pc.give_item2("11249, 1) pc.change_money(15000000000) pc.give_exp2(11111) set_state(__COMPLETE__) end end
tagchen
ich hab hier schon paar fehlerleins behoben und so aber es lädt nicht, gibt aber auch keine fehlermeldung .. vlt kannst du mir ja helfen ;o
PHP Code:
quest PvP_EQ begin
state start begin
when login or levelup with pc.level >= 120
begin
send_letter("PvP EQ")
end
when info or button
begin
say_title("PvP EQ")
say("Gehe zum Schmied, er will mit dir reden.")
set_state(tlc1)
end
end
state tlc1 begin
when letter
begin
send_letter("Gehe zum Schmied")
end
when info or button
begin
say_title("Gehe zum Schmied")
say("Gehe zum Schmied!")
say("Er benoetigt deine Hilfe")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."PvP Eq schmieden"
begin
say_title("PvP EQ schmieden")
say("Seit Generationen beherbergt meine Familie das Geheimniss,")
say("Wie man das beste PvP Eq schmiedet.")
say("Nun ist es an mir diese Tradition fortzusetzen.")
say("Ich brauche aber deine Hilfe, denn um das Eq schmieden zu koennen,")
say("Brauche ich einige bestimmte Gegenstaende.")
say("Wenn du sie mir besorgst, gebe ich dir den geschmiedeten Gegenstand.")
set_state(tlc2)
end
end
state tlc2 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 1")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 1")
say("Als erstes musst du zu Nakajima")
say("Du findest ihn ausserhalb der 2. Stadt")
local v=find_npc_by_vnum(20364)
if 0==v then
else
target.vid("__TARGET__", v,"20364")
end
end
when __TARGET__.target.click or 20364.chat."Besorgungen fuer den Schmied"
begin
say_title("Besorgungen fuer den Schmied")
say("Der Schmied schickt dich zu mir?")
say("Ich erinnere mich an das Gespraech mit ihm")
say("Ich versprach ihm meinen Zelkova Holzast zu geben,")
say("wofuer er ihn braucht weiss ich nicht.")
say("Aber ich nehme an ich soll ihn nun dir geben.")
say("Hier hast du ihn, bringe ihn schnell zum Schmied!")
say_reward("Zelkova Holzast erhalten")
pc.give_item2("30165", 1)
set_state(tlc3)
end
end
state tlc3 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast den Ast.")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
set_state(tlc4)
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Du hast den Ast von Nakajima?")
say("Sehr gut, das ist der erste Gegenstand den ich benoetige.")
say("Als Belohnung gebe ich dir etwas Yang und ein paar Exp!")
say("Nun geh und hole den Zweiten!")
pc.remove_item("30165", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc4)
end
end
state tlc4 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 2")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 2")
say("Als naehstes sollst du einen Orkzahn besorgen")
say("Du bekommst ihn von schwarzen Orks")
end
when 636.kill
begin
local s =number(1, 4)
if s <= 5 and pc.count_item(30006) < 1
then pc.give_item2(30006, 1)
end
set_state(tlc5)
end
end
state tlc5 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast den Orkzahn")
say("Gehe zurueck zum schmied")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Du hast den Orkzahn?")
say("Sehr gut, hier ist deine Belohnung.")
say("Nun geh und suche mir den naechsten.")
pc.remove_item("30006", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc6)
end
end
state tlc6 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 3")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 3")
say("Als naechstes braucht der Schmied die Notiz vom")
say("Wuestenfuchs. Um sie zu bekommen,")
say("musst du ihn toeten.")
end
when 2101.kill
begin
pc.give_item2("30160", 1)
set_state(tlc7)
end
end
state tlc7 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast die Notiz")
say("Gehe zurueck zum Schmied")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Da bist du ja wieder.")
say("Hast du die Notiz? Sehr gut!")
say("Hier ist deine Belohnung.")
say("Jetzt geh und suche das naechste Item")
pc.remove_item("30160", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc8)
end
end
state tlc8 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 4")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 4")
say("Als naechstes musst du zu Seon-Pyenong im Tal von Seungryong")
say("um von ihm zu erfahren wie man das Metall")
say("hart und trotzdem dehnbar macht ..")
local v=find_npc_by_vnum(20091)
if 0==v then
else
target.vid("__TARGET__", v, "20091")
end
end
when __TARGET__.target.click or 20091.chat."Besorgungen fuer den Schmied"
begin
say_title("Besorgungen fuer den Schmied")
say("Du kommst wegen des Schmiedes?")
say("Ah ich weiss was du wissen willst!")
say("Ich werde dir die Information geben,")
say(" ... ")
say(" ... ")
say("Nun geh und sag es dem Schmied.")
set_state(tlc9)
end
end
state tlc9 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast die Information")
say("Gehe zum Schmied zurueck")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Information besorgt"
begin
say_title("Information besorgt")
say("Da bist du ja wieder.")
say("Hast du die Information?")
say("Sehr gut, hier ist deine Belohnung.")
say("Zwei Dinge fehlen noch bis ich mit")
say("dem Schmieden anfangen kann.")
say("Geh und hole sie!")
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc10)
end
end
state tlc10 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 5")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 5")
say("Du sollst dem Schmied noch zwei Dinge besorgen.")
say("Das erste ist ein Eiskillerwal-Horn.")
say("Du bekommst es von den Eiskillerwalen im Eisland.")
end
when 1102.kill
begin
send_letter("Wo ist das Horn?")
end
when info or button
begin
say_title("Wo ist das Horn?")
say("Jemand hat dem Eiskillerwal das Horn abgesaegt.")
say("Gehe zum Jaeger Yang-Shin und frage ihn")
say("Ob er etwas weiss.")
local v=find_npc_by_vnum(20019)
if 0==v then
else
target.vid("__TARGET__", v,"20019")
end
end
when __TARGET__.target.click or 20019.chat."Eiskillerwal"
begin
say_title("Wo ist das Horn?")
say("Ja, ich hab die Hoerner genommen.")
say("Ich moechte sie verkaufen.")
say("Moechtest du eins haben?")
say("Bring mir eine schweres Auffenkraut")
say("und du bekommst eins.")
say_reward("Auf den Handel eingehen?")
local s=select("Ja","Nein")
if s == 2 then
say("Dann bekommst du auch keins.")
say("Auf Wiedersehen.")
set_state(tlc10)
else
say("Dann komm wieder wenn du eins hast.")
end
if pc.count_item(50059) <= 1
then
local v=find_npc_by_vnum(20019)
if 0==v then
else
target.vid("__TARGET__", v,"20019")
end
end
end
when __TARGET__.target.click or 20019.chat."Affenkraut"
begin
say_title("Affenkraut")
say("Oh, du hast das Kraut?")
say("Sehr gut, hier, nimm das Horn.")
say("Hat mich gefreut mit dir")
say("Geschaeffte zu machen.")
pc.remove_item("50059", 1)
pc.give_item2("30049", 1)
set_state(tlc11)
end
end
state tlc11 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast das Eiskillerwal-Horn")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Eiskillerwal-Horn besorgt"
begin
say_title("Eiskillerwal-Horn besorgt")
say("Ahh, da bist du ja!")
say("Hast du das Horn?")
say("Gut, hier ist deine Belohnung.")
say("Es fehlt nur noch eine Sache,")
say("Ich bin schon ganz aufgeregt!")
pc.remove_item("30049", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc12)
end
end
state tlc12 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 6")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 6")
say("Es fehlt nur noch ein Gegenstand.")
say("Ein Glas voll Affenblut.")
say("Sie haben es dem Sensenmann zur Aufbewahrung gegeben,")
say("da es sehr wertvoll ist.")
say("Toete den Sensenmann um das Affenblut zu erhalten.")
say("Dafuer musst du den Daemonenturm hoch.")
set_state(timiskacke)
end
end
state timiskacke begin
when letter
begin
send_letter("Affenblut")
end
when info or button
begin
say_title("Affenblut")
say("Besorge das Affenblut.")
say("Einer der Sensenmaenner im Daemonenturm hat es.")
say("Du kannst pro run natuerlich nur einen Sensenmann toeten.")
say("Viel Glueck!")
end
when 1093.kill
begin
local s = number(1, 4)
if s <= 5 and pc.count_item(30137) < 1 then
pc.give_item2(30137, 1)
end
if pc.count_item(30137) >= 1 then
set_state(tlc13)
end
end
end
state tlc13 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast das Affenblut")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Affenblut besorgt"
begin
say_title("Affenblut besorgt")
say("Da bist du ja endlich!")
say("Her mit dem Affenblut,")
say("ich kann es kaum erwarten!")
say("so dann wollen wir mal")
say(" ........... ")
say(" ........... ")
say("und fertig!")
say("Hier fuer deine muehen. Vielen Dank!")
pc.remove_item("30137", 1)
pc.give_item2("11249, 1)
pc.change_money(15000000000)
pc.give_exp2(11111)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
PHP Code:
quest PvP_EQ begin
state start begin
when login or levelup with pc.level >= 120
begin
send_letter("PvP EQ")
end
when info or button
begin
say_title("PvP EQ")
say("Gehe zum Schmied, er will mit dir reden.")
set_state(tlc1)
end
end
state tlc1 begin
when letter
begin
send_letter("Gehe zum Schmied")
end
when info or button
begin
say_title("Gehe zum Schmied")
say("Gehe zum Schmied!")
say("Er benoetigt deine Hilfe")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."PvP Eq schmieden"
begin
say_title("PvP EQ schmieden")
say("Seit Generationen beherbergt meine Familie das Geheimniss,")
say("Wie man das beste PvP Eq schmiedet.")
say("Nun ist es an mir diese Tradition fortzusetzen.")
say("Ich brauche aber deine Hilfe, denn um das Eq schmieden zu koennen,")
say("Brauche ich einige bestimmte Gegenstaende.")
say("Wenn du sie mir besorgst, gebe ich dir den geschmiedeten Gegenstand.")
set_state(tlc2)
end
end
state tlc2 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 1")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 1")
say("Als erstes musst du zu Nakajima")
say("Du findest ihn ausserhalb der 2. Stadt")
local v=find_npc_by_vnum(20364)
if 0==v then
else
target.vid("__TARGET__", v,"20364")
end
end
when __TARGET__.target.click or 20364.chat."Besorgungen fuer den Schmied"
begin
say_title("Besorgungen fuer den Schmied")
say("Der Schmied schickt dich zu mir?")
say("Ich erinnere mich an das Gespraech mit ihm")
say("Ich versprach ihm meinen Zelkova Holzast zu geben,")
say("wofuer er ihn braucht weiss ich nicht.")
say("Aber ich nehme an ich soll ihn nun dir geben.")
say("Hier hast du ihn, bringe ihn schnell zum Schmied!")
say_reward("Zelkova Holzast erhalten")
pc.give_item2("30165", 1)
set_state(tlc3)
end
end
state tlc3 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast den Ast.")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
set_state(tlc4)
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Du hast den Ast von Nakajima?")
say("Sehr gut, das ist der erste Gegenstand den ich benoetige.")
say("Als Belohnung gebe ich dir etwas Yang und ein paar Exp!")
say("Nun geh und hole den Zweiten!")
pc.remove_item("30165", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc4)
end
end
state tlc4 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 2")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 2")
say("Als naehstes sollst du einen Orkzahn besorgen")
say("Du bekommst ihn von schwarzen Orks")
end
when 636.kill
begin
local s =number(1, 4)
if s <= 5 and pc.count_item(30006) < 1
then pc.give_item2(30006, 1)
end
set_state(tlc5)
end
end
state tlc5 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast den Orkzahn")
say("Gehe zurueck zum schmied")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Du hast den Orkzahn?")
say("Sehr gut, hier ist deine Belohnung.")
say("Nun geh und suche mir den naechsten.")
pc.remove_item("30006", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc6)
end
end
state tlc6 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 3")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 3")
say("Als naechstes braucht der Schmied die Notiz vom")
say("Wuestenfuchs. Um sie zu bekommen,")
say("musst du ihn toeten.")
end
when 2101.kill
begin
pc.give_item2("30160", 1)
set_state(tlc7)
end
end
state tlc7 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast die Notiz")
say("Gehe zurueck zum Schmied")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Gegenstand besorgt"
begin
say_title("Gegenstand besorgt")
say("Da bist du ja wieder.")
say("Hast du die Notiz? Sehr gut!")
say("Hier ist deine Belohnung.")
say("Jetzt geh und suche das naechste Item")
pc.remove_item("30160", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc8)
end
end
state tlc8 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 4")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 4")
say("Als naechstes musst du zu Seon-Pyenong im Tal von Seungryong")
say("um von ihm zu erfahren wie man das Metall")
say("hart und trotzdem dehnbar macht ..")
local v=find_npc_by_vnum(20091)
if 0==v then
else
target.vid("__TARGET__", v, "20091")
end
end
when __TARGET__.target.click or 20091.chat."Besorgungen fuer den Schmied"
begin
say_title("Besorgungen fuer den Schmied")
say("Du kommst wegen des Schmiedes?")
say("Ah ich weiss was du wissen willst!")
say("Ich werde dir die Information geben,")
say(" ... ")
say(" ... ")
say("Nun geh und sag es dem Schmied.")
set_state(tlc9)
end
end
state tlc9 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast die Information")
say("Gehe zum Schmied zurueck")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Information besorgt"
begin
say_title("Information besorgt")
say("Da bist du ja wieder.")
say("Hast du die Information?")
say("Sehr gut, hier ist deine Belohnung.")
say("Zwei Dinge fehlen noch bis ich mit")
say("dem Schmieden anfangen kann.")
say("Geh und hole sie!")
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc10)
end
end
state tlc10 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 5")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 5")
say("Du sollst dem Schmied noch zwei Dinge besorgen.")
say("Das erste ist ein Eiskillerwal-Horn.")
say("Du bekommst es von den Eiskillerwalen im Eisland.")
end
when 1102.kill
begin
send_letter("Wo ist das Horn?")
end
when info or button
begin
say_title("Wo ist das Horn?")
say("Jemand hat dem Eiskillerwal das Horn abgesaegt.")
say("Gehe zum Jaeger Yang-Shin und frage ihn")
say("Ob er etwas weiss.")
local v=find_npc_by_vnum(20019)
if 0==v then
else
target.vid("__TARGET__", v,"20019")
end
end
when __TARGET__.target.click or 20019.chat."Eiskillerwal"
begin
say_title("Wo ist das Horn?")
say("Ja, ich hab die Hoerner genommen.")
say("Ich moechte sie verkaufen.")
say("Moechtest du eins haben?")
say("Bring mir eine schweres Auffenkraut")
say("und du bekommst eins.")
say_reward("Auf den Handel eingehen?")
local s=select("Ja","Nein")
if s == 2 then
say("Dann bekommst du auch keins.")
say("Auf Wiedersehen.")
set_state(tlc10)
else
say("Dann komm wieder wenn du eins hast.")
end
if pc.count_item(50059) <= 1
then
local v=find_npc_by_vnum(20019)
if 0==v then
else
target.vid("__TARGET__", v,"20019")
end
end
end
when __TARGET__.target.click or 20019.chat."Affenkraut"
begin
say_title("Affenkraut")
say("Oh, du hast das Kraut?")
say("Sehr gut, hier, nimm das Horn.")
say("Hat mich gefreut mit dir")
say("Geschaeffte zu machen.")
pc.remove_item("50059", 1)
pc.give_item2("30049", 1)
set_state(tlc11)
end
end
state tlc11 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast das Eiskillerwal-Horn")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Eiskillerwal-Horn besorgt"
begin
say_title("Eiskillerwal-Horn besorgt")
say("Ahh, da bist du ja!")
say("Hast du das Horn?")
say("Gut, hier ist deine Belohnung.")
say("Es fehlt nur noch eine Sache,")
say("Ich bin schon ganz aufgeregt!")
pc.remove_item("30049", 1)
pc.change_money(15000000)
pc.give_exp2(1111111)
set_state(tlc12)
end
end
state tlc12 begin
when letter
begin
send_letter("Besorgungen fuer den Schmied 6")
end
when info or button
begin
say_title("Besorgungen fuer den Schmied 6")
say("Es fehlt nur noch ein Gegenstand.")
say("Ein Glas voll Affenblut.")
say("Sie haben es dem Sensenmann zur Aufbewahrung gegeben,")
say("da es sehr wertvoll ist.")
say("Toete den Sensenmann um das Affenblut zu erhalten.")
say("Dafuer musst du den Daemonenturm hoch.")
set_state(timiskacke)
end
end
state timiskacke begin
when letter
begin
send_letter("Affenblut")
end
when info or button
begin
say_title("Affenblut")
say("Besorge das Affenblut.")
say("Einer der Sensenmaenner im Daemonenturm hat es.")
say("Du kannst pro run natuerlich nur einen Sensenmann toeten.")
say("Viel Glueck!")
end
when 1093.kill
begin
local s = number(1, 4)
if s <= 5 and pc.count_item(30137) < 1 then
pc.give_item2(30137, 1)
end
if pc.count_item(30137) >= 1 then
set_state(tlc13)
end
end
end
state tlc13 begin
when letter
begin
send_letter("Kehre zum Schmied zurueck!")
end
when info or button
begin
say_title("Kehre zum Schmied zurueck")
say("Du hast das Affenblut")
say("Gehe zurueck zum Schmied.")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v,"20016")
end
end
when __TARGET__.target.click or 20016.chat."Affenblut besorgt"
begin
say_title("Affenblut besorgt")
say("Da bist du ja endlich!")
say("Her mit dem Affenblut,")
say("ich kann es kaum erwarten!")
say("so dann wollen wir mal")
say(" ........... ")
say(" ........... ")
say("und fertig!")
say("Hier fuer deine muehen. Vielen Dank!")
pc.remove_item("30137", 1)
pc.give_item2("11249", 1)
pc.change_money(15000000000)
pc.give_exp2(11111)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
so sollte es gehen hattest bei pc.give_item2("11249, 1) ein " vergessen
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
mit diesem fehler sollte die quest eigentlich gar nicht laufen xD
PHP Code:
quest user begin
state start begin
when 70028.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, vielleicht beim nächsten mal")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Nix")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also deine Pferde-Daten wissen")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Nirgens")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich für 5 Minuten Verwandeln?")
say("5 Minuten kosten dich 5.000.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=5000000 then
say("Du wirst in einen Wildhund verwandelt")
pc.polymorph(101, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 2 then
if pc.money>=5000000 then
say("Du wirst in einen Wolf verwandelt")
pc.polymorph(102, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 3 then
if pc.money>=5000000 then
say("Du wirst in ein Ork verwandelt")
pc.polymorph(601, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 4 then
if pc.money>=5000000 then
say("Du wirst in eine Spinne verwandelt")
pc.polymorph(2001, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Okey ich verwandle dich für")
say("30 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Okey, ich verwandel dich zurück")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen bzw. einen Shop öffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Okey du bist nun ein Shop")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Gut, du bist wieder da")
pc.remove_polymorph()
end
if w == 3 then
say("Ok, dann halt nicht")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("******")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say("****")
say_reward("Die GameMaster´s [GM] :")
say("******")
say("*****")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Reittiere","Einkaufen","Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher")
say("Das du mich irgendwann gebrauchen wirst")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für eins?")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du bekommst meinen Kailer ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Kailer für")
say("5 Minuten")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du bekommst meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Okey, tschüüüss!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger offnen")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht, Byyee")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
if dd == 3 then
say("Möchtest du echt den Shop von Vivien öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
say("Dann halt nicht, Byyee!")
return
end
if ef == 1 then
say("Der Shop von Vivien wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang mache ich dich auch")
say_title("zu einem Gott")
say_reward("Du benötigst 50.000.000 Yang")
say("Willst du Göttlich werden?")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Ok Dann nicht, villeicht später")
return
end
if ff == 1 then
say("Wenn du deinen Rang auf 20.000 haben willst")
say("Und 50.000.000 Yang besitzt dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=50000000 then
say("Schön, du hast dein rang bekommen")
say("Nun bist du so ein Gott wie ich")
say("Viel spaß noch!")
pc.changemoney(-50000000)
pc.change_alignment(200000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 50.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen..willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Dann halt nicht, jetzt fühle ich mich schlecht!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch, wie kann ich dir")
say_title("großer GM"..pc.get_name().." weiterhelfen?")
local s = select("Gm-Notiz","Garnicht")
if s == 2 then
say("Okey, dann nicht...")
say("Vielleicht beim nächsten mal!")
return
end
if s == 1 then
say("Gib eine Notiz ein, die an alle Reiche")
say("gesendet wird!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end
so sollte es eher was werden ^^
aber wollte ja die sachen entfernt haben -.- die ich beschrieben hatte
quest mysteriose_rubintruhe begin state start begin when 50132.use begin if pc.count_item(50150) >= 1 then say_title("Mysteriöse Rubintruhe") say("") say("Möchtest du die Truhe öffnen?") say("") local open = select("Ja", "Nein lieber nicht!") if open == 1 then pc.remove_item(50132, 1) pc.remove_item(50150, 1) local r=number(1, 13) if r == 1 then pc.give_item2(72043, 1) -- Buch des Anfuhrers elseif r == 2 then pc.give_item2(71029, 1) -- Drachengott-Intelligenz elseif r == 3 then pc.give_item2(71027, 1) -- Drachengott-Leben elseif r == 4 then pc.give_item2(71030, 1) -- Drachengott-Verteidigung elseif r == 5 then pc.give_item2(71085, 1) -- Gegenstand verstarken elseif r == 6 then pc.give_item2(71094, 1) -- Konzentriertes Lesen elseif r == 7 then pc.give_item2(71044, 1) -- Kritischer Kampf elseif r == 8 then pc.give_item2(70039, 1) -- Schmiede-Handbuch elseif r == 9 then pc.give_item2(71032, 1) -- Schriftrolle des Drachen elseif r == 10 then pc.give_item2(25040, 1) -- Segenschriftrolle elseif r == 11 then pc.give_item2(70024, 1) -- Segenskugel elseif r == 12 then pc.give_item2(71083, 1) -- Stein-Handbuch elseif r == 13 then pc.give_item2(71126, 1) -- Streitwolf-Siegel else say("Du brauchst 1 Rubinschlüssel um die Truhe") say("zu öffnen hole ein oder lass es sein.") elseif open == 2 then return end end end end
aber wollte ja die sachen entfernt haben -.- die ich beschrieben hatte
ich setz mich dann morgen dran wenns nich schon jmd anderes macht wollte eig nur helfen weil sonst hätten die leute des rausgenommen und wundern sich warum es trzdem nicht funzt wie gesagt ich guck morgen mal
Quote:
Originally Posted by AnNoTriX
PHP Code:
quest mysteriose_rubintruhe begin
state start begin
when 50132.use begin
if pc.count_item(50150) >= 1 then
say_title("Mysteriöse Rubintruhe")
say("")
say("Möchtest du die Truhe öffnen?")
say("")
local open = select("Ja", "Nein lieber nicht!")
if open == 1 then
pc.remove_item(50132, 1)
pc.remove_item(50150, 1)
local r=number(1, 13)
if r == 1 then
pc.give_item2(72043, 1) -- Buch des Anfuhrers
elseif r == 2 then
pc.give_item2(71029, 1) -- Drachengott-Intelligenz
elseif r == 3 then
pc.give_item2(71027, 1) -- Drachengott-Leben
elseif r == 4 then
pc.give_item2(71030, 1) -- Drachengott-Verteidigung
elseif r == 5 then
pc.give_item2(71085, 1) -- Gegenstand verstarken
elseif r == 6 then
pc.give_item2(71094, 1) -- Konzentriertes Lesen
elseif r == 7 then
pc.give_item2(71044, 1) -- Kritischer Kampf
elseif r == 8 then
pc.give_item2(70039, 1) -- Schmiede-Handbuch
elseif r == 9 then
pc.give_item2(71032, 1) -- Schriftrolle des Drachen
elseif r == 10 then
pc.give_item2(25040, 1) -- Segenschriftrolle
elseif r == 11 then
pc.give_item2(70024, 1) -- Segenskugel
elseif r == 12 then
pc.give_item2(71083, 1) -- Stein-Handbuch
elseif r == 13 then
pc.give_item2(71126, 1) -- Streitwolf-Siegel
else
say("Du brauchst 1 Rubinschlüssel um die Truhe")
say("zu öffnen hole ein oder lass es sein.")
elseif open == 2 then
return
end
end
end
end
und was soll damit sein? musst schon sagen ob in vpc irgendein fehler kommt oder ob sies einfach so nicht tut
quest mysteriose_rubintruhe begin
state start begin
when 50132.use begin
if pc.count_item(50150) >= 1 then
say_title("Mysteriöse Rubintruhe")
say("")
say("Möchtest du die Truhe öffnen?")
say("")
local m = select("Ja", "Nein lieber nicht!")
if m == 1 then
pc.remove_item(50132, 1)
pc.remove_item(50150, 1)
local r=number(1, 13)
if r == 1 then
pc.give_item2(72043, 1) -- Buch des Anfuhrers
elseif r == 2 then
pc.give_item2(71029, 1) -- Drachengott-Intelligenz
elseif r == 3 then
pc.give_item2(71027, 1) -- Drachengott-Leben
elseif r == 4 then
pc.give_item2(71030, 1) -- Drachengott-Verteidigung
elseif r == 5 then
pc.give_item2(71085, 1) -- Gegenstand verstarken
elseif r == 6 then
pc.give_item2(71094, 1) -- Konzentriertes Lesen
elseif r == 7 then
pc.give_item2(71044, 1) -- Kritischer Kampf
elseif r == 8 then
pc.give_item2(70039, 1) -- Schmiede-Handbuch
elseif r == 9 then
pc.give_item2(71032, 1) -- Schriftrolle des Drachen
elseif r == 10 then
pc.give_item2(25040, 1) -- Segenschriftrolle
elseif r == 11 then
pc.give_item2(70024, 1) -- Segenskugel
elseif r == 12 then
pc.give_item2(71083, 1) -- Stein-Handbuch
elseif r == 13 then
pc.give_item2(71126, 1) -- Streitwolf-Siegel
elseif m == 2 then
say("Dann halt nicht!")
return
end
else
say("Du benötigst ein Schlüssel um")
say("die Truhe zu öffnen!")
end
end
end
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
aber sowas wird er wohl sehen ich denk nicht dass er total dumm ist 
