ja hatte das ganz schnell geschrieben :D aber sowas wird er wohl sehen ich denk nicht dass er total dumm ist ;)Quote:
Hoffe, du hast die nicht 1:1 übernommen, denn pc.get_map_index(9 ist eindeutig falsch
[SERVICE] Die Questkontrolle
08/19/2012 23:56
nachuhi#6616
08/20/2012 15:47
JediMax#6617
Ja geht einfach nicht und finde den Fehler nicht :D
Und noch eine weitere:
Der Bonus wird beim absitzen nicht abgezogen. Warum nicht?
PHP Code:
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
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
08/20/2012 17:37
Retrograd#6618
@JediMax:
probiers mal so:
probiers mal so:
PHP Code:
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
08/20/2012 18:22
seegartem#6619
Ich kriege die Quest nicht eingefügt :
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
mfg
PHP Code:
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
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
mfg
08/20/2012 19:28
kashima#6620
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 ist im Spoiler
Hier habe ich Teil1 meiner quest auch schon drin
und dort funktioniert alles reibungslos
[Only registered and activated users can see links. Click Here To Register...]
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 ist im Spoiler
Hier habe ich Teil1 meiner quest auch schon drin
und dort funktioniert alles reibungslos
[Only registered and activated users can see links. Click Here To Register...]
08/20/2012 20:05
Pаylasici#6621
Eventuell wird dieses "KILL" Event schon in einer anderen Quest abgefragtQuote:
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 ist im Spoiler
Hier habe ich Teil1 meiner quest auch schon drin
und dort funktioniert alles reibungslos
[Only registered and activated users can see links. Click Here To Register...]
und ist deshalb nicht doppelt verwendbar.
08/20/2012 21:00
kashima#6622
Vielen Dank für die schnelle Antwort, aber dieses when 8024.kill beginQuote:
und ist deshalb nicht doppelt verwendbar.
wird sonst nirgends abgefragt, es ist einzig und allein nur da ein kill event
auch ein relog hat nicht geholfen.
kannst du bitte hier
[Only registered and activated users can see links. Click Here To Register...]
mal vorbei schauen, falls du es nicht schon getan hast und es dir angucken? wäre dir sehr dankar dafür =)
08/20/2012 22:16
Weedrazzor#6623
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
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
08/20/2012 22:48
nachuhi#6624
Quote:
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")
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
08/21/2012 12:27
Kopfschuss.#6625
tagchen :o
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
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
08/21/2012 17:20
nachuhi#6626
Quote:
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
08/21/2012 22:54
Weedrazzor#6627
aber wollte ja die sachen entfernt haben -.- die ich beschrieben hatteQuote:
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
so sollte es eher was werden ^^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
08/22/2012 00:06
.Seriously#6628
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
08/22/2012 00:59
nachuhi#6629
ich setz mich dann morgen dran wenns nich schon jmd anderes macht :D wollte eig nur helfen weil sonst hätten die leute des rausgenommen und wundern sich warum es trzdem nicht funzt :D wie gesagt ich guck morgen mal ;)Quote:
und was soll damit sein? musst schon sagen ob in vpc irgendein fehler kommt oder ob sies einfach so nicht tut :)Quote:
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
08/22/2012 01:03
.Seriously#6630
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 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