[SERVICE] Die Questkontrolle

Page 670 of 845 « First 170570620660668669 670 671672680720770 Last »
04/19/2014 12:10 sony199#10036
Hallo liebe com.

Ich möchte eine Quest schreiben, bei der, wenn man eine Goldene Münze mit dem Vnum(2531) hineinwirft (auf den NPC zieht), ein zufälliges Item aus einer "Liste" bekommen soll. Habe mein glück versucht aber leider funktioniert sie nicht.


Fehler in der VirtualBox:
PHP Code:
when doesnt"t have begin-end clause. (()
wunschbrunnen.quest:11:Error occurend on compile wunschbrunnen.quest 
04/19/2014 12:27 .Delta#10037
PHP Code:
quest wish_fountain begin
    state start begin        
        when 9152.click begin
            say_title("Der Wunschbrunnen")
            say_gold("")
            say_gold("Dieser Brunnen ist sehr alt, aber voller Magie!")
            say_gold("Wen man eine Goldene Münze in den Brunnen wirft,")
            say_gold("erhälst du ein Zufälliges Item.")
        end
        when 9152.take with item.get_vnum() == 2531 begin
            say_gold("Willst du die Goldene Münze hineinwerfen?")
            say_gold("Mit etwas Glück erhälst du sogar dein gewünschtes Item.")
            local choice = select("Ja","Nein")
            if choice == 1 then
                pc.remove_item(vnum)
                say_gold("Du wirfst nun eine Münze hinein, drücke fest die Daumen,")
                say_gold("damit dein Wunsch in erfüllung geht.")
                local wunschbelohnung = number(1, 5)
                if wunschbelohnung == 1 then
                    say_gold("Du hast Windschuhe erhalten.")
                    pc.give_item2("72702", 1)
                elseif wunschbelohnung == 2 then
                    say_gold("Du hast ein Schwert+9 erhalten.")
                    pc.give_item2 ("19", 1)
                elseif wunschbelohnung == 3 then
                    say_gold("Du hast Dolche+9 erhalten.")
                    pc.give_item2("1009", 1)
                elseif wunschbelohnung == 4 then
                    say_gold("Du hast Fächer+9 erhalten.")
                    pc.give_item2("7009", 1)
                elseif wunschbelohnung == 5 then
                    say_gold("Du hast eine Glefe+9 erhalten.")
                    pc.give_item2("3009", 1)
                end
            elseif choice == 2 then
                say_gold("Vielleicht beim nächsten mal.")
            end
        end
    end
end 
04/19/2014 13:01 ExoBiTe™#10038
Hey leute ich brauche nen Questbefehl :D Also wie mache ich eine Datenbankabfrage?
Meine in etwa so:
when 100.chat."Blablabla" begin
say("Auf dem Server sind zurzeit "..???.." Spieler online!")
Mit welchem Befehl kann ich die z.b. aus der tabelle player.item_proto einen eintrag ausgeben, und den in der Quest wiedergeben lassen?
Ich hoffe ihr wisst, was ich ich meine xD
Mfg

Edit: habe ihn schon gefunden^^
04/19/2014 13:15 sony199#10039
Quote:
Originally Posted by .Delta View Post
PHP Code:
quest wish_fountain begin
    state start begin        
        when 9152.click begin
            say_title("Der Wunschbrunnen")
            say_gold("")
            say_gold("Dieser Brunnen ist sehr alt, aber voller Magie!")
            say_gold("Wen man eine Goldene Münze in den Brunnen wirft,")
            say_gold("erhälst du ein Zufälliges Item.")
        end
        when 9152.take with item.get_vnum() == 2531 begin
            say_gold("Willst du die Goldene Münze hineinwerfen?")
            say_gold("Mit etwas Glück erhälst du sogar dein gewünschtes Item.")
            local choice = select("Ja","Nein")
            if choice == 1 then
                pc.remove_item(vnum)
                say_gold("Du wirfst nun eine Münze hinein, drücke fest die Daumen,")
                say_gold("damit dein Wunsch in erfüllung geht.")
                local wunschbelohnung = number(1, 5)
                if wunschbelohnung == 1 then
                    say_gold("Du hast Windschuhe erhalten.")
                    pc.give_item2("72702", 1)
                elseif wunschbelohnung == 2 then
                    say_gold("Du hast ein Schwert+9 erhalten.")
                    pc.give_item2 ("19", 1)
                elseif wunschbelohnung == 3 then
                    say_gold("Du hast Dolche+9 erhalten.")
                    pc.give_item2("1009", 1)
                elseif wunschbelohnung == 4 then
                    say_gold("Du hast Fächer+9 erhalten.")
                    pc.give_item2("7009", 1)
                elseif wunschbelohnung == 5 then
                    say_gold("Du hast eine Glefe+9 erhalten.")
                    pc.give_item2("3009", 1)
                end
            elseif choice == 2 then
                say_gold("Vielleicht beim nächsten mal.")
            end
        end
    end
end 
Fettes THX hat geklappt, genau das war der Befehl, bei dem ich nicht weiter wusste.
04/19/2014 13:20 He3o Sippel#10040
Quote:
Originally Posted by Streetkillah98 View Post
Hey leute ich brauche nen Questbefehl :D Also wie mache ich eine Datenbankabfrage?
Meine in etwa so:
when 100.chat."Blablabla" begin
say("Auf dem Server sind zurzeit "..???.." Spieler online!")
Mit welchem Befehl kann ich die z.b. aus der tabelle player.item_proto einen eintrag ausgeben, und den in der Quest wiedergeben lassen?
Ich hoffe ihr wisst, was ich ich meine xD
Mfg

Edit: habe ihn schon gefunden^^

PHP Code:
local type = mysql_query("select type from player.item_proto WHERE vnum = 19 ;")
say(type[1][1]) 
04/19/2014 13:21 joejoe99#10041
Hei ich brauche mal Hilfe ( Ich hab schon etwas gepostet hier aber irgendwie muss das geclosed werden, da die jetzige Quest n anderen Fehler hat..)

Code:
quest Story begin
	state start begin
		when login or levelup with pc.get_level() >= 99 begin
			set_state(eluva_1)
		end
	end
	state eluva_1 begin
		when letter begin
			send_letter("Das Abenteuer beginnt")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Die heiligen Waffen!")
			say("")
			say("Der Haputmann hat erfahren, dass du die Alte Dame")
			say("gefunden hast. Nun wünscht er, dass du zu ihm")
			say("gehst, da er denkt, dass du nun stark genug bist")
			say("um den Auftrag von ihm entgegen zu nehmen...")
			say("")
			say_reward("Begebe dich zum Hauptmann!")
		end
		when 20355.chat."Heilige Waffen" begin
			say_title(""..mob_name(20355)..":")
			say("")
			say("Hallo "..pc.get_name().."!")
			say("Ich habe erfahren, dass du Level 120 erreicht hast.")
			say("Woher ich das weiß? Ich habe beobachte dich seitdem")
			say("du hier angefangen hast zu trainieren. Jetzt ist")
			say("endlich der Zeitpunkt gekommen, an dem du dein")
			say("richtiges Abenteuer beginnen kannst. Ich habe ")
			say("eine schöne Aufgabe für dich.")
			say("")
			wait()
			say_title(""..mob_name(20355)..":")
			say("")
			say("Die Aufgabe besteht darin, mehr über die Heiligen Waffen")
			say("herrauszufinden. Dies tust du indem du als Erstes eine gewisse")
			say("Die Metins snd die Metin der Dunkelheit!")
			say("Du denkst diese Aufgabe wäre lächerlich?")
			say("Du wirst sehen wieviele du zerstören musst.")
			say("Sie enthalten Inschriften, die nur wenige Gelehrte entziffern können")
			say("Komm zu mir zurück, wenn du die 100 Metins zersört hast!")			
			say("")
			q.set_counter("Metin der Dunkelheit", 100)
			pc.setqf("killer", 100)
			set_state(kill_metin)
		end
	end

	state kill_metin begin
		when letter begin
			send_letter("Die erste Aufgabe")
		end

		when info or button begin
			say_title("Die erste Aufgabe")
			say("")
			say("Der Hauptmann hat dir die Aufgabe")
			say("aufgetragen, 100 Metin der Dunkelheit zu")
			say("zerstören.")
			say("")
			say_reward("Zerstöre 100 Metin der Dunkelheit.")
		end

		when 8006.kill begin
			local kill = pc.getqf("killer")-1
			q.set_counter("Metin der Dunkelheit", kill)
			pc.setqf("killer", pc.getqf("killer")-1)
			if pc.getqf("killer") <= 0 then
				set_state(finish)
			end
		end
	end

	state finish begin
		when letter begin
			send_letter("Auftrag abgeschlossen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end

		when info or button begin
			say_title("Inschriften entziffert!")
			say("")
			say("Du hast die Inschriften entziffern können!")
			say("Nun bist du einer der Auserwählten um")
			say("die Heiligen Waffen zu tragen!")
			say("")
			say_reward("Begebe dich zurück zum Haputmann.")
		end

		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Du hast also die Inschriften entziffern können?")
			say("Dann lass mal hören, was du erahren hast!")
			wait()
			say_title(""..pc.get_name()..":")		
			say_red("Die Zeit wird kommen! Die Zeit der.. Heiligen Kämpfer!")
			say("Eine Zeit des Krieges! Nur wenige haben die Fähigkeit Waffen zu schmieden,")
			say("die von dem Göttern wie Zeus oder Hades gesegnet sind!")
			say("Die heiligen Waffen werden den Auserwählten unmenschliche Kräfte geben!")
			set_state(eluva_1_complete)	
			
		end
	end
	state eluva_1_complete begin
		when login or levelup with pc.get_level() >= 140 begin
			set_state(eluva_2)
		end
	end
	
	state eluva_2 begin
		when letter begin
			send_letter("Die Heiligen Waffen?")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Die heiligen Waffen?")
			say("")
			say("Der Haputmann sucht nach Dir!")
			say("Das was du vorgelesen hast war anscheind den Teil,") 
			say("der bisher unbekannt war!")
			say("Bitte wende dich an ihn und er wird")
			say("dir sagen, was zu tun ist um die Waffen")
			say("zu schmieden.")
			say("")
			say_reward("Begib dich zum Hauptmann!")
		end
		
		when __TARGET__.click or 20355.click begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Ich kann es nicht glauben!! Du bist der Eine!")
			say("Wir die Alianz der Virtus-Kämpfer suchten solange nach dieser einen Info!")
			say("Nach dem ich jetzt weiß wer DU bist,")
			say("Sehe ich alles anders...")
			say("...Nun dann erzähle ich dir etwas:")
			say("Vor sehr langer Zeit gab es einen Schmied,") 
			say("er war der beste in seinem Handwerk und besaß als Einziger") 
			say("die Möglichkeit eine spezielle Waffengruppe herzustellen.")
			say("Ich rede von den Heiligen Waffen, wie eine Legende besagt wurde das Geheimnis der Herstellung von Gott an die Familie des Schmiedes weiter gegeben.")
			say("Denn vor vielen vielen Jahren gab es einen schrecklichen Herscher der jedes Reich unterwerfen wollte.") 
			say("Fast hätte er es geschafft doch dann stellte der Schmied")
			say("die erste Heilige Waffe her mit dem Jack-Sun seine Krieger in den Heiligen Kampf zwischen")
			say("dem Guten und dem Bösen zum Sieg führte.")
			say("Nun unsere Quellen haben in Erfahrung gebracht das Böse ist nicht ganz besiegt und baut seine Armee wieder auf.")
			say("Bringe in Erfahrung was man zur Herstellung der Heiligen Waffen benötigt und du wirst selbst eine von Ihnen besitzen.")
			say("Damit du die Erfahrung erlangst wie man diese Waffen schmiedet,")
			say("besiege 5 mal Kätpin Sharak!")
			say("")
			q.set_counter("Kätpin Sharak", 5)
			pc.setqf("killer", 5)
			set_state(oberork)
		end
	end
	
	state oberork begin
		when letter begin
			send_letter("Der Anführer")
		end
		
		when info or button begin
			say_title("Der Anführer!")
			say("")
			say("So nun die Zeit gekommen wo du")
			say("Kätpin Sharak töten musst!")
			say("Du wirst eine neue Kampfkunst erlernen..sie nennt sich Haki!")
			say("Sie ist keine Fertigkeit, um Gegner umzubringen,")
			say("sondern um Die Waffen zu Schmieden!")
			say("")
			say_reward("Töte den Kätpin Sharak 5-Mal.")
		end
		
		when 691.kill begin
			q.set_counter("Kätpin Sharak", pc.getqf("killer")-1)
			pc.setqf("killer", pc.getqf("killer")-1)
			if pc.getqf("killer") <= 0 then
				set_state(oberork_finish)
			end
		end
	end
	
	state oberork_finish begin
		when letter begin
			send_letter("Der Anführer ist tot")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Der Anführer ist tot!")
			say("")
			say("Du hast den Anführer der Orks getötet. Jetzt")
			say("begib dich zurück zum Haputmann und")
			say("erstatte ihm Bericht.")
			say("")
			say_reward("Begib dich zurück zum Haputmann!")
		end
		
		when __TARGET__.click or 20355.click begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Wie ich sehe, hast du den Anführer")
			say("erledigt. Jetzt können wir endlich mti dem Training anfangen")
			say("Ich will dass du morgen hier stehst, Wach und Kampfbereit!")
			say("Nun gehe erstmal zur Kontaktperson und lerne mehr über dieses Haki!")
			say("")
			set_state(goto_stalli)
		end
	end
	
	state goto_stalli begin
		when letter begin
			send_letter("Haki?")
			local v = find_npc_by_vnum(20349)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20349))
			end
		end
		
		when info or button begin
			say_title("Haki?!")
			say("")
			say("Du willst wissen was Haki ist?")
			say("Haki ist eine besondere Art von Energie,")
			say("die man braucht um Waffen zu schmieden,") 
			say("die von Göttern gesegnet wurden")
			say("")
			say_reward("Aber erstmal bekommst du eine der zwei Materialien, die du brauchen wirst!!")
		end
		
		when __TARGET__.click or 20349.chat."Meine Belohnung" begin

			say_title(mob_name(20349)..":")
			say("")
			say("Die alte Frau schickt dich also um deine Belohnung")
			say("abzuholen. Ich werde dir nun deine Belohnung geben.")
			say("")
			say_reward("Du erhälst ein Weißer-Löwe Siegel.")
			say_reward("Du erhälst ein Heiliges Kraut.")
			pc.give_item2(71124, 1)
			pc.give_item2(70251, 2)
			set_state(eluva2_complete)
		end
	end
	
	state eluva2_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva3)
		end
	end

	state eluva3 begin
		when letter begin
			send_letter("Es geht weiter!")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Es geht weiter!")
			say("")
			say("Du hast dein Training absolviert und beherschst Haki!")
			say("Nun könntest du mit deinee Aufgabe weiter machen,")
			say("die für dich besimmt ist!")
			say("")
			say_reward("Begib dich zum Hauptmann!")
		end
		
		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Hallo "..pc.get_name().."! Schön, dass du wieder")
			say("da bist. Wir haben nun zwei Jahre hart gearbeitet...")
			say("Endlich..!!")
			say("Gehe nun als erstes in den Tempel.")
			say("Dort wirst du Informationen erlangen,")
			say("wer dir bei der Waffenschmiedung behilflich ist!")
			say("")
			set_state(goto_denkmal)
		end
	end
	
	state goto_denkmal begin
		when letter begin
			send_letter("Informationsbeschaffung")
			local v = find_npc_by_vnum(20363)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20363))
			end
		end
			
		when info or button begin
			say_title("Informationsbeschaffung.")
			say("")
			say("Der Haputmann will, dass du in den Tempel gehst und")
			say("herausfindest wer dir behilflich sein kann!")
			say("Es wird ein harter Weg, deswegem solltest")
			say("du dich gut vorbereiten.")
			say("")
			say_reward("Begib dich in den dunklen Tempel und suche nach ")
			say_reward("Infos, die du dem Haputmann überbringen ")
			say_reward("kannst.")
		end
		
		when __TARGET__.target.click or 20363.click begin

			say_title(mob_name(20363)..":")
			say("")
			say("Du hast die Inschrift gelesen und aufgeschrieben.")
			say("Jetzt begib dich zurück zum Hauptmann.")
			say("")
			set_state(goback)
		end
	end
	
	state goback begin
		when letter begin
			send_letter("Du hast die Informationen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Du hast die Informationen.")
			say("")
			say("Du hast die Informationen aus dem Denkmal")
			say("übernommen. Nun überbringe dem Hauptmann")
			say("diese Informationen.")
		end
		
		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Wie ich sehe, hast du die Informationen gesammelt.")
			say("Ich werde Diese nun analysieren und gleich ")
			say("auswerten.")
			say("")
			wait()
			say_title(""..mob_name(20355)..":")
			say("")
			say("Ich habe jetzt alle Informationen ausgelesen. In ")
			say("diesen Schriften steht, dass in diesem Tempel ein ")
			say("Turm steht. In diesem Turm steht ein Waffenschmied!")
			say("Ich denke dieser Turm ist der Dämonenturm...")
			say("Geh zu dem Waffenschmied. Gucke was er dir sagen kann")
			say("")
			set_state(tempellehre)
		end
	end
	state tempellehre begin
		when letter begin
			send_letter("Waffenschmied")
		end
		when info or button begin
			say_title("Waffenschmied.")
			say("")
			say("Der Hauptmann will von dir, dass du den Dämonenturm hochgehst")
			say("und den Waffenschmied befragst.")
		end
	end
	state _backtoguard begin
		when letter begin
			send_letter("Turm-Schmied")
			local v = find_npc_by_vnum(20074)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20074))
			end
		end
		when info or button begin
			say_title("Turm-Schmied")
			say("")
			say("Du hast die Aufgabe den")
			say("Turm-Schmied für Waffen aufzusuchen!.")
			say("")
			say_reward("Begib dich zurück zum Waffenschmied.")
		end
		when 20074.chat."Heilige Waffen" begin

			say_title(mob_name(20074)..":")
			say("")
			say("Du bist also der Auserwählte?")
			say("Du musst von mir wissen wie wir beide die Heiligen Waffen schmiedest?")
			say("Eine Sache ist dir gesagt: Wenn du kein Haki beherschst wird das nichts!")
			say("Wenn du es beherschst stehen die Götter auf deiner Seite!")
			say("Es gibt noch etwas: Du kannst bei mir nicht nur die Waffen schmieden sondern auf die Rüstungen!.")
			say("")
			say("Also ich würde sagen wenn du wirklich der Eine bist,")
			say("komm wieder wenn du alles hast was benötigt wird!")
			pc.give_item2(50136, 5)
			set_state(eluva3_complete)
		end
	end
	state eluva3_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva4)
		end
	end
	state eluva4 begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20074)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20074))
			end
		end
		when 20074.chat."Heilige Waffen" begin
			say_title(mob_name(20074)..":")
			say("Aach...Du bist es!!")
			say("Ich wusste das du bald kommen würdest!")
			say("Ich könnte dir die Heiligen der Götter schmieden")
			say("Ich denke da du schon weit gekommen bist,")
			say("darf ich dir dieses Previleg auch erstatten!")
			say("Wenn du deine vorherigen Aufgaben erledigt hast, hast du die bestimmten Relikten schon,")
			say("die ich dafür brauche...")
			say("Nun: Willst du in das Geheimnis erfahren und mächtiger als alle anderen werden?")
			say("")
			wait()
			say("Also was möchtest du, dass ich dir es Schmiede? ?")
			local v = select ("Athelas´s Rüstung", "Hades´s Anzug", "Zeus´s Kleidung", "Poseidon´s Pattenpanzer", "Weiter")
			if v == 1 then
				if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12159, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
				else
					return
				end					
			elseif v == 2 then
				if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12169, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
				else
					return
				end					
			elseif v == 3 then
			    if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12189, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
			    else
					return
				end
			elseif v == 4 then
			    if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12179, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
			    else
					return
			    end
			elseif v == 5 then
			    local a = select ("Athelas´s Klinge", "Athelas´s Schwert", "Hades´s Bogen", "Hades´s Dolche", "Zeus´s Glocke", "Zeus´s Stab", "Poseidon´s Axt", "Abbrechen")
			    if a == 1 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65019, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 2 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65029, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end					
			    elseif a == 3 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65039, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 4 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65049, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 5 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65059, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 6 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65069, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 7 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65079, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 8 then			
					return
			    end
		end
	end
	state goto_geisterwald begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Du hast es geschafft!")
			say("Du bist nun im Besitz einer Heiligen Waffe")
			say("und oder einer Heiligen Rüstung")
			say("Überbringe diese Nachricht schnell dem Haputmann")
			say("")
			say_reward("Begib dich zurück zum Hauptmann!")
			set_state(kill_ready)
		end
	end
	state kill_ready begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Du hast es geschafft! Nun ist das Reich wieder sicher!")
			say("Ich denke du weißt, welche Aufgaben du hast?")
			say("")
			say("Nun dann erkläre ich dir deine Aufgabe:")
			say("Du bist der Auserwählte! Das bedeutet, dass du neue Kämpfer")
			say("helfen , unterstützen und vorran bringen sollst")
			say("Du bist auserdem nun in der Lage Reichskönig zu werden!")
			say("Nutze deine Macht um das Leben hier im Reich zu verbessern!")
			set_state(eluva4_complete)
		end
	end
	
	state eluva4_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva5)
		end
	end
	
	state eluva5 begin
		when letter begin
			send_letter("Das Leben")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Das Leben")
			say("")
			say("Du hast mit bekommen, dass Jack-Sun wieder da ist..")
			say("...jedoch bist du sein Erbe!")
			say("...wenn du wissen willst wer Jack-Sun war denke einfach an deine Verganenheit.")
			say("Nachdem du jetzt ein Heiliger Kämpfer bist kannst du in Runs")			
			say("kämpfen, die du bisher nicht betreten konntest!")
			say("Du kannst nun auswählen ob du diesen Posten annimst oder nicht")
			say_reward("Begib dich zum Wächter der Eluva.")
			set_state(goto_trent)
		end
	end
	state goto_trent begin
		when letter with pc.getqf("premium_user")==1 and not npc.is_pc() begin
			send_letter("Virtus-Elite")
		end
		when info or button with pc.getqf("premium_user")==0 begin
			say_title("Virtus-Team")
			say("")
			say("Nachdem du einer der heiligen Kämpfer bist,")
			say("Kannst du nun den Posten als einer der Virtus-Elite werden")
			say("Du bleibst für immer einer der Elite! Du Kannst dieses Item nur einmal")
			say("benutzen. Also entscheide Weise")
			say("")
			say_title("Willst du der Virtus Elite beitreten?")
			
			local s = select("Ja", "Nein")
				
			if s == 1 then
				pc.setqf("elite_user", 1)
				set_state(jeonuntot)	
			else
				return
			end
		end
	end
	state jeonuntot begin
		when letter begin
			send_letter("Letzte Ehre vom Hauptmann")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Letzte Ehre vom Hauptmann.")
			say("")
			say("Der Hauptmann steht nun unter deinen Befehlen!")
			say("Nutze deine Erfahrung und Macht für das Gute!")
			say("")
			notice_all("".. pc.get_name() .." ist nun einer der Virtus-Elite")
			notice_all("Falls ihr Fragen zum Spiel habt, könnt ihr unteranderm auch die Virtus-Elite anschreiben")
				end
			end
		end
04/19/2014 13:26 He3o Sippel#10042
Quote:
Originally Posted by joejoe99 View Post
Hei ich brauche mal Hilfe ( Ich hab schon etwas gepostet hier aber irgendwie muss das geclosed werden, da die jetzige Quest n anderen Fehler hat..)

Code:
quest Story begin
	state start begin
		when login or levelup with pc.get_level() >= 99 begin
			set_state(eluva_1)
		end
	end
	state eluva_1 begin
		when letter begin
			send_letter("Das Abenteuer beginnt")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Die heiligen Waffen!")
			say("")
			say("Der Haputmann hat erfahren, dass du die Alte Dame")
			say("gefunden hast. Nun wünscht er, dass du zu ihm")
			say("gehst, da er denkt, dass du nun stark genug bist")
			say("um den Auftrag von ihm entgegen zu nehmen...")
			say("")
			say_reward("Begebe dich zum Hauptmann!")
		end
		when 20355.chat."Heilige Waffen" begin
			say_title(""..mob_name(20355)..":")
			say("")
			say("Hallo "..pc.get_name().."!")
			say("Ich habe erfahren, dass du Level 120 erreicht hast.")
			say("Woher ich das weiß? Ich habe beobachte dich seitdem")
			say("du hier angefangen hast zu trainieren. Jetzt ist")
			say("endlich der Zeitpunkt gekommen, an dem du dein")
			say("richtiges Abenteuer beginnen kannst. Ich habe ")
			say("eine schöne Aufgabe für dich.")
			say("")
			wait()
			say_title(""..mob_name(20355)..":")
			say("")
			say("Die Aufgabe besteht darin, mehr über die Heiligen Waffen")
			say("herrauszufinden. Dies tust du indem du als Erstes eine gewisse")
			say("Die Metins snd die Metin der Dunkelheit!")
			say("Du denkst diese Aufgabe wäre lächerlich?")
			say("Du wirst sehen wieviele du zerstören musst.")
			say("Sie enthalten Inschriften, die nur wenige Gelehrte entziffern können")
			say("Komm zu mir zurück, wenn du die 100 Metins zersört hast!")			
			say("")
			q.set_counter("Metin der Dunkelheit", 100)
			pc.setqf("killer", 100)
			set_state(kill_metin)
		end
	end

	state kill_metin begin
		when letter begin
			send_letter("Die erste Aufgabe")
		end

		when info or button begin
			say_title("Die erste Aufgabe")
			say("")
			say("Der Hauptmann hat dir die Aufgabe")
			say("aufgetragen, 100 Metin der Dunkelheit zu")
			say("zerstören.")
			say("")
			say_reward("Zerstöre 100 Metin der Dunkelheit.")
		end

		when 8006.kill begin
			local kill = pc.getqf("killer")-1
			q.set_counter("Metin der Dunkelheit", kill)
			pc.setqf("killer", pc.getqf("killer")-1)
			if pc.getqf("killer") <= 0 then
				set_state(finish)
			end
		end
	end

	state finish begin
		when letter begin
			send_letter("Auftrag abgeschlossen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end

		when info or button begin
			say_title("Inschriften entziffert!")
			say("")
			say("Du hast die Inschriften entziffern können!")
			say("Nun bist du einer der Auserwählten um")
			say("die Heiligen Waffen zu tragen!")
			say("")
			say_reward("Begebe dich zurück zum Haputmann.")
		end

		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Du hast also die Inschriften entziffern können?")
			say("Dann lass mal hören, was du erahren hast!")
			wait()
			say_title(""..pc.get_name()..":")		
			say_red("Die Zeit wird kommen! Die Zeit der.. Heiligen Kämpfer!")
			say("Eine Zeit des Krieges! Nur wenige haben die Fähigkeit Waffen zu schmieden,")
			say("die von dem Göttern wie Zeus oder Hades gesegnet sind!")
			say("Die heiligen Waffen werden den Auserwählten unmenschliche Kräfte geben!")
			set_state(eluva_1_complete)	
			
		end
	end
	state eluva_1_complete begin
		when login or levelup with pc.get_level() >= 140 begin
			set_state(eluva_2)
		end
	end
	
	state eluva_2 begin
		when letter begin
			send_letter("Die Heiligen Waffen?")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Die heiligen Waffen?")
			say("")
			say("Der Haputmann sucht nach Dir!")
			say("Das was du vorgelesen hast war anscheind den Teil,") 
			say("der bisher unbekannt war!")
			say("Bitte wende dich an ihn und er wird")
			say("dir sagen, was zu tun ist um die Waffen")
			say("zu schmieden.")
			say("")
			say_reward("Begib dich zum Hauptmann!")
		end
		
		when __TARGET__.click or 20355.click begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Ich kann es nicht glauben!! Du bist der Eine!")
			say("Wir die Alianz der Virtus-Kämpfer suchten solange nach dieser einen Info!")
			say("Nach dem ich jetzt weiß wer DU bist,")
			say("Sehe ich alles anders...")
			say("...Nun dann erzähle ich dir etwas:")
			say("Vor sehr langer Zeit gab es einen Schmied,") 
			say("er war der beste in seinem Handwerk und besaß als Einziger") 
			say("die Möglichkeit eine spezielle Waffengruppe herzustellen.")
			say("Ich rede von den Heiligen Waffen, wie eine Legende besagt wurde das Geheimnis der Herstellung von Gott an die Familie des Schmiedes weiter gegeben.")
			say("Denn vor vielen vielen Jahren gab es einen schrecklichen Herscher der jedes Reich unterwerfen wollte.") 
			say("Fast hätte er es geschafft doch dann stellte der Schmied")
			say("die erste Heilige Waffe her mit dem Jack-Sun seine Krieger in den Heiligen Kampf zwischen")
			say("dem Guten und dem Bösen zum Sieg führte.")
			say("Nun unsere Quellen haben in Erfahrung gebracht das Böse ist nicht ganz besiegt und baut seine Armee wieder auf.")
			say("Bringe in Erfahrung was man zur Herstellung der Heiligen Waffen benötigt und du wirst selbst eine von Ihnen besitzen.")
			say("Damit du die Erfahrung erlangst wie man diese Waffen schmiedet,")
			say("besiege 5 mal Kätpin Sharak!")
			say("")
			q.set_counter("Kätpin Sharak", 5)
			pc.setqf("killer", 5)
			set_state(oberork)
		end
	end
	
	state oberork begin
		when letter begin
			send_letter("Der Anführer")
		end
		
		when info or button begin
			say_title("Der Anführer!")
			say("")
			say("So nun die Zeit gekommen wo du")
			say("Kätpin Sharak töten musst!")
			say("Du wirst eine neue Kampfkunst erlernen..sie nennt sich Haki!")
			say("Sie ist keine Fertigkeit, um Gegner umzubringen,")
			say("sondern um Die Waffen zu Schmieden!")
			say("")
			say_reward("Töte den Kätpin Sharak 5-Mal.")
		end
		
		when 691.kill begin
			q.set_counter("Kätpin Sharak", pc.getqf("killer")-1)
			pc.setqf("killer", pc.getqf("killer")-1)
			if pc.getqf("killer") <= 0 then
				set_state(oberork_finish)
			end
		end
	end
	
	state oberork_finish begin
		when letter begin
			send_letter("Der Anführer ist tot")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Der Anführer ist tot!")
			say("")
			say("Du hast den Anführer der Orks getötet. Jetzt")
			say("begib dich zurück zum Haputmann und")
			say("erstatte ihm Bericht.")
			say("")
			say_reward("Begib dich zurück zum Haputmann!")
		end
		
		when __TARGET__.click or 20355.click begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Wie ich sehe, hast du den Anführer")
			say("erledigt. Jetzt können wir endlich mti dem Training anfangen")
			say("Ich will dass du morgen hier stehst, Wach und Kampfbereit!")
			say("Nun gehe erstmal zur Kontaktperson und lerne mehr über dieses Haki!")
			say("")
			set_state(goto_stalli)
		end
	end
	
	state goto_stalli begin
		when letter begin
			send_letter("Haki?")
			local v = find_npc_by_vnum(20349)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20349))
			end
		end
		
		when info or button begin
			say_title("Haki?!")
			say("")
			say("Du willst wissen was Haki ist?")
			say("Haki ist eine besondere Art von Energie,")
			say("die man braucht um Waffen zu schmieden,") 
			say("die von Göttern gesegnet wurden")
			say("")
			say_reward("Aber erstmal bekommst du eine der zwei Materialien, die du brauchen wirst!!")
		end
		
		when __TARGET__.click or 20349.chat."Meine Belohnung" begin

			say_title(mob_name(20349)..":")
			say("")
			say("Die alte Frau schickt dich also um deine Belohnung")
			say("abzuholen. Ich werde dir nun deine Belohnung geben.")
			say("")
			say_reward("Du erhälst ein Weißer-Löwe Siegel.")
			say_reward("Du erhälst ein Heiliges Kraut.")
			pc.give_item2(71124, 1)
			pc.give_item2(70251, 2)
			set_state(eluva2_complete)
		end
	end
	
	state eluva2_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva3)
		end
	end

	state eluva3 begin
		when letter begin
			send_letter("Es geht weiter!")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Es geht weiter!")
			say("")
			say("Du hast dein Training absolviert und beherschst Haki!")
			say("Nun könntest du mit deinee Aufgabe weiter machen,")
			say("die für dich besimmt ist!")
			say("")
			say_reward("Begib dich zum Hauptmann!")
		end
		
		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Hallo "..pc.get_name().."! Schön, dass du wieder")
			say("da bist. Wir haben nun zwei Jahre hart gearbeitet...")
			say("Endlich..!!")
			say("Gehe nun als erstes in den Tempel.")
			say("Dort wirst du Informationen erlangen,")
			say("wer dir bei der Waffenschmiedung behilflich ist!")
			say("")
			set_state(goto_denkmal)
		end
	end
	
	state goto_denkmal begin
		when letter begin
			send_letter("Informationsbeschaffung")
			local v = find_npc_by_vnum(20363)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20363))
			end
		end
			
		when info or button begin
			say_title("Informationsbeschaffung.")
			say("")
			say("Der Haputmann will, dass du in den Tempel gehst und")
			say("herausfindest wer dir behilflich sein kann!")
			say("Es wird ein harter Weg, deswegem solltest")
			say("du dich gut vorbereiten.")
			say("")
			say_reward("Begib dich in den dunklen Tempel und suche nach ")
			say_reward("Infos, die du dem Haputmann überbringen ")
			say_reward("kannst.")
		end
		
		when __TARGET__.target.click or 20363.click begin

			say_title(mob_name(20363)..":")
			say("")
			say("Du hast die Inschrift gelesen und aufgeschrieben.")
			say("Jetzt begib dich zurück zum Hauptmann.")
			say("")
			set_state(goback)
		end
	end
	
	state goback begin
		when letter begin
			send_letter("Du hast die Informationen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Du hast die Informationen.")
			say("")
			say("Du hast die Informationen aus dem Denkmal")
			say("übernommen. Nun überbringe dem Hauptmann")
			say("diese Informationen.")
		end
		
		when 20355.chat."Heilige Waffen" begin

			say_title(""..mob_name(20355)..":")
			say("")
			say("Wie ich sehe, hast du die Informationen gesammelt.")
			say("Ich werde Diese nun analysieren und gleich ")
			say("auswerten.")
			say("")
			wait()
			say_title(""..mob_name(20355)..":")
			say("")
			say("Ich habe jetzt alle Informationen ausgelesen. In ")
			say("diesen Schriften steht, dass in diesem Tempel ein ")
			say("Turm steht. In diesem Turm steht ein Waffenschmied!")
			say("Ich denke dieser Turm ist der Dämonenturm...")
			say("Geh zu dem Waffenschmied. Gucke was er dir sagen kann")
			say("")
			set_state(tempellehre)
		end
	end
	state tempellehre begin
		when letter begin
			send_letter("Waffenschmied")
		end
		when info or button begin
			say_title("Waffenschmied.")
			say("")
			say("Der Hauptmann will von dir, dass du den Dämonenturm hochgehst")
			say("und den Waffenschmied befragst.")
		end
	end
	state _backtoguard begin
		when letter begin
			send_letter("Turm-Schmied")
			local v = find_npc_by_vnum(20074)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20074))
			end
		end
		when info or button begin
			say_title("Turm-Schmied")
			say("")
			say("Du hast die Aufgabe den")
			say("Turm-Schmied für Waffen aufzusuchen!.")
			say("")
			say_reward("Begib dich zurück zum Waffenschmied.")
		end
		when 20074.chat."Heilige Waffen" begin

			say_title(mob_name(20074)..":")
			say("")
			say("Du bist also der Auserwählte?")
			say("Du musst von mir wissen wie wir beide die Heiligen Waffen schmiedest?")
			say("Eine Sache ist dir gesagt: Wenn du kein Haki beherschst wird das nichts!")
			say("Wenn du es beherschst stehen die Götter auf deiner Seite!")
			say("Es gibt noch etwas: Du kannst bei mir nicht nur die Waffen schmieden sondern auf die Rüstungen!.")
			say("")
			say("Also ich würde sagen wenn du wirklich der Eine bist,")
			say("komm wieder wenn du alles hast was benötigt wird!")
			pc.give_item2(50136, 5)
			set_state(eluva3_complete)
		end
	end
	state eluva3_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva4)
		end
	end
	state eluva4 begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20074)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20074))
			end
		end
		when 20074.chat."Heilige Waffen" begin
			say_title(mob_name(20074)..":")
			say("Aach...Du bist es!!")
			say("Ich wusste das du bald kommen würdest!")
			say("Ich könnte dir die Heiligen der Götter schmieden")
			say("Ich denke da du schon weit gekommen bist,")
			say("darf ich dir dieses Previleg auch erstatten!")
			say("Wenn du deine vorherigen Aufgaben erledigt hast, hast du die bestimmten Relikten schon,")
			say("die ich dafür brauche...")
			say("Nun: Willst du in das Geheimnis erfahren und mächtiger als alle anderen werden?")
			say("")
			wait()
			say("Also was möchtest du, dass ich dir es Schmiede? ?")
			local v = select ("Athelas´s Rüstung", "Hades´s Anzug", "Zeus´s Kleidung", "Poseidon´s Pattenpanzer", "Weiter")
			if v == 1 then
				if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12159, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
				else
					return
				end					
			elseif v == 2 then
				if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12169, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
				else
					return
				end					
			elseif v == 3 then
			    if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12189, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
			    else
					return
				end
			elseif v == 4 then
			    if pc.count_item(70251) >= 1 then
					pc.remove_item(70251, 1)
					pc.give_item2(12179, 1)
					say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
					say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
					say("")
					say("")
					say_reward("Eine Heilige Rüstung erhalten erhalten")
					set_state(goto_geisterwald)
			    else
					return
			    end
			elseif v == 5 then
			    local a = select ("Athelas´s Klinge", "Athelas´s Schwert", "Hades´s Bogen", "Hades´s Dolche", "Zeus´s Glocke", "Zeus´s Stab", "Poseidon´s Axt", "Abbrechen")
			    if a == 1 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65019, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 2 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65029, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end					
			    elseif a == 3 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65039, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 4 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65049, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 5 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65059, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 6 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65069, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 7 then
					if pc.count_item(70251) >= 1 then
					    pc.remove_item(70251, 1)
					    pc.give_item2(65079, 1)
					    say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
					    say("das war viel Arbeit..")
					    say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
					    say("")
					    say_reward("Eine Heilige Waffe erhalten")
						set_state(goto_geisterwald)
					else
					    return
					end
			    elseif a == 8 then			
					return
			    end
		end
	end
	state goto_geisterwald begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Du hast es geschafft!")
			say("Du bist nun im Besitz einer Heiligen Waffe")
			say("und oder einer Heiligen Rüstung")
			say("Überbringe diese Nachricht schnell dem Haputmann")
			say("")
			say_reward("Begib dich zurück zum Hauptmann!")
			set_state(kill_ready)
		end
	end
	state kill_ready begin
		when letter begin
			send_letter("Heilige Waffen")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Du hast es geschafft! Nun ist das Reich wieder sicher!")
			say("Ich denke du weißt, welche Aufgaben du hast?")
			say("")
			say("Nun dann erkläre ich dir deine Aufgabe:")
			say("Du bist der Auserwählte! Das bedeutet, dass du neue Kämpfer")
			say("helfen , unterstützen und vorran bringen sollst")
			say("Du bist auserdem nun in der Lage Reichskönig zu werden!")
			say("Nutze deine Macht um das Leben hier im Reich zu verbessern!")
			set_state(eluva4_complete)
		end
	end
	
	state eluva4_complete begin
		when login or levelup with pc.get_level() >= 150 begin
			set_state(eluva5)
		end
	end
	
	state eluva5 begin
		when letter begin
			send_letter("Das Leben")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		when info or button begin
			say_title("Das Leben")
			say("")
			say("Du hast mit bekommen, dass Jack-Sun wieder da ist..")
			say("...jedoch bist du sein Erbe!")
			say("...wenn du wissen willst wer Jack-Sun war denke einfach an deine Verganenheit.")
			say("Nachdem du jetzt ein Heiliger Kämpfer bist kannst du in Runs")			
			say("kämpfen, die du bisher nicht betreten konntest!")
			say("Du kannst nun auswählen ob du diesen Posten annimst oder nicht")
			say_reward("Begib dich zum Wächter der Eluva.")
			set_state(goto_trent)
		end
	end
	state goto_trent begin
		when letter with pc.getqf("premium_user")==1 and not npc.is_pc() begin
			send_letter("Virtus-Elite")
		end
		when info or button with pc.getqf("premium_user")==0 begin
			say_title("Virtus-Team")
			say("")
			say("Nachdem du einer der heiligen Kämpfer bist,")
			say("Kannst du nun den Posten als einer der Virtus-Elite werden")
			say("Du bleibst für immer einer der Elite! Du Kannst dieses Item nur einmal")
			say("benutzen. Also entscheide Weise")
			say("")
			say_title("Willst du der Virtus Elite beitreten?")
			
			local s = select("Ja", "Nein")
				
			if s == 1 then
				pc.setqf("elite_user", 1)
				set_state(jeonuntot)	
			else
				return
			end
		end
	end
	state jeonuntot begin
		when letter begin
			send_letter("Letzte Ehre vom Hauptmann")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, mob_name(20355))
			end
		end
		
		when info or button begin
			say_title("Letzte Ehre vom Hauptmann.")
			say("")
			say("Der Hauptmann steht nun unter deinen Befehlen!")
			say("Nutze deine Erfahrung und Macht für das Gute!")
			say("")
			notice_all("".. pc.get_name() .." ist nun einer der Virtus-Elite")
			notice_all("Falls ihr Fragen zum Spiel habt, könnt ihr unteranderm auch die Virtus-Elite anschreiben")
				end
			end
		end


PHP Code:
quest Story begin
    state start begin
        when login or levelup with pc.get_level() >= 99 begin
            set_state(eluva_1)
        end
    end
    state eluva_1 begin
        when letter begin
            send_letter("Das Abenteuer beginnt")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        when info or button begin
            say_title("Die heiligen Waffen!")
            say("")
            say("Der Haputmann hat erfahren, dass du die Alte Dame")
            say("gefunden hast. Nun wünscht er, dass du zu ihm")
            say("gehst, da er denkt, dass du nun stark genug bist")
            say("um den Auftrag von ihm entgegen zu nehmen...")
            say("")
            say_reward("Begebe dich zum Hauptmann!")
        end
        when 20355.chat."Heilige Waffen" begin
            say_title(""..mob_name(20355)..":")
            say("")
            say("Hallo "..pc.get_name().."!")
            say("Ich habe erfahren, dass du Level 120 erreicht hast.")
            say("Woher ich das weiß? Ich habe beobachte dich seitdem")
            say("du hier angefangen hast zu trainieren. Jetzt ist")
            say("endlich der Zeitpunkt gekommen, an dem du dein")
            say("richtiges Abenteuer beginnen kannst. Ich habe ")
            say("eine schöne Aufgabe für dich.")
            say("")
            wait()
            say_title(""..mob_name(20355)..":")
            say("")
            say("Die Aufgabe besteht darin, mehr über die Heiligen Waffen")
            say("herrauszufinden. Dies tust du indem du als Erstes eine gewisse")
            say("Die Metins snd die Metin der Dunkelheit!")
            say("Du denkst diese Aufgabe wäre lächerlich?")
            say("Du wirst sehen wieviele du zerstören musst.")
            say("Sie enthalten Inschriften, die nur wenige Gelehrte entziffern können")
            say("Komm zu mir zurück, wenn du die 100 Metins zersört hast!")            
            say("")
            q.set_counter("Metin der Dunkelheit", 100)
            pc.setqf("killer", 100)
            set_state(kill_metin)
        end
    end

    state kill_metin begin
        when letter begin
            send_letter("Die erste Aufgabe")
        end

        when info or button begin
            say_title("Die erste Aufgabe")
            say("")
            say("Der Hauptmann hat dir die Aufgabe")
            say("aufgetragen, 100 Metin der Dunkelheit zu")
            say("zerstören.")
            say("")
            say_reward("Zerstöre 100 Metin der Dunkelheit.")
        end

        when 8006.kill begin
            local kill = pc.getqf("killer")-1
            q.set_counter("Metin der Dunkelheit", kill)
            pc.setqf("killer", pc.getqf("killer")-1)
            if pc.getqf("killer") <= 0 then
                set_state(finish)
            end
        end
    end

    state finish begin
        when letter begin
            send_letter("Auftrag abgeschlossen")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end

        when info or button begin
            say_title("Inschriften entziffert!")
            say("")
            say("Du hast die Inschriften entziffern können!")
            say("Nun bist du einer der Auserwählten um")
            say("die Heiligen Waffen zu tragen!")
            say("")
            say_reward("Begebe dich zurück zum Haputmann.")
        end

        when 20355.chat."Heilige Waffen" begin

            say_title(""..mob_name(20355)..":")
            say("")
            say("Du hast also die Inschriften entziffern können?")
            say("Dann lass mal hören, was du erahren hast!")
            wait()
            say_title(""..pc.get_name()..":")        
            say_red("Die Zeit wird kommen! Die Zeit der.. Heiligen Kämpfer!")
            say("Eine Zeit des Krieges! Nur wenige haben die Fähigkeit Waffen zu schmieden,")
            say("die von dem Göttern wie Zeus oder Hades gesegnet sind!")
            say("Die heiligen Waffen werden den Auserwählten unmenschliche Kräfte geben!")
            set_state(eluva_1_complete)    
            
        end
    end
    state eluva_1_complete begin
        when login or levelup with pc.get_level() >= 140 begin
            set_state(eluva_2)
        end
    end
    
    state eluva_2 begin
        when letter begin
            send_letter("Die Heiligen Waffen?")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Die heiligen Waffen?")
            say("")
            say("Der Haputmann sucht nach Dir!")
            say("Das was du vorgelesen hast war anscheind den Teil,") 
            say("der bisher unbekannt war!")
            say("Bitte wende dich an ihn und er wird")
            say("dir sagen, was zu tun ist um die Waffen")
            say("zu schmieden.")
            say("")
            say_reward("Begib dich zum Hauptmann!")
        end
        
        when __TARGET__.click or 20355.click begin

            say_title(""..mob_name(20355)..":")
            say("")
            say("Ich kann es nicht glauben!! Du bist der Eine!")
            say("Wir die Alianz der Virtus-Kämpfer suchten solange nach dieser einen Info!")
            say("Nach dem ich jetzt weiß wer DU bist,")
            say("Sehe ich alles anders...")
            say("...Nun dann erzähle ich dir etwas:")
            say("Vor sehr langer Zeit gab es einen Schmied,") 
            say("er war der beste in seinem Handwerk und besaß als Einziger") 
            say("die Möglichkeit eine spezielle Waffengruppe herzustellen.")
            say("Ich rede von den Heiligen Waffen, wie eine Legende besagt wurde das Geheimnis der Herstellung von Gott an die Familie des Schmiedes weiter gegeben.")
            say("Denn vor vielen vielen Jahren gab es einen schrecklichen Herscher der jedes Reich unterwerfen wollte.") 
            say("Fast hätte er es geschafft doch dann stellte der Schmied")
            say("die erste Heilige Waffe her mit dem Jack-Sun seine Krieger in den Heiligen Kampf zwischen")
            say("dem Guten und dem Bösen zum Sieg führte.")
            say("Nun unsere Quellen haben in Erfahrung gebracht das Böse ist nicht ganz besiegt und baut seine Armee wieder auf.")
            say("Bringe in Erfahrung was man zur Herstellung der Heiligen Waffen benötigt und du wirst selbst eine von Ihnen besitzen.")
            say("Damit du die Erfahrung erlangst wie man diese Waffen schmiedet,")
            say("besiege 5 mal Kätpin Sharak!")
            say("")
            q.set_counter("Kätpin Sharak", 5)
            pc.setqf("killer", 5)
            set_state(oberork)
        end
    end
    
    state oberork begin
        when letter begin
            send_letter("Der Anführer")
        end
        
        when info or button begin
            say_title("Der Anführer!")
            say("")
            say("So nun die Zeit gekommen wo du")
            say("Kätpin Sharak töten musst!")
            say("Du wirst eine neue Kampfkunst erlernen..sie nennt sich Haki!")
            say("Sie ist keine Fertigkeit, um Gegner umzubringen,")
            say("sondern um Die Waffen zu Schmieden!")
            say("")
            say_reward("Töte den Kätpin Sharak 5-Mal.")
        end
        
        when 691.kill begin
            q.set_counter("Kätpin Sharak", pc.getqf("killer")-1)
            pc.setqf("killer", pc.getqf("killer")-1)
            if pc.getqf("killer") <= 0 then
                set_state(oberork_finish)
            end
        end
    end
    
    state oberork_finish begin
        when letter begin
            send_letter("Der Anführer ist tot")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Der Anführer ist tot!")
            say("")
            say("Du hast den Anführer der Orks getötet. Jetzt")
            say("begib dich zurück zum Haputmann und")
            say("erstatte ihm Bericht.")
            say("")
            say_reward("Begib dich zurück zum Haputmann!")
        end
        
        when __TARGET__.click or 20355.click begin

            say_title(""..mob_name(20355)..":")
            say("")
            say("Wie ich sehe, hast du den Anführer")
            say("erledigt. Jetzt können wir endlich mti dem Training anfangen")
            say("Ich will dass du morgen hier stehst, Wach und Kampfbereit!")
            say("Nun gehe erstmal zur Kontaktperson und lerne mehr über dieses Haki!")
            say("")
            set_state(goto_stalli)
        end
    end
    
    state goto_stalli begin
        when letter begin
            send_letter("Haki?")
            local v = find_npc_by_vnum(20349)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20349))
            end
        end
        
        when info or button begin
            say_title("Haki?!")
            say("")
            say("Du willst wissen was Haki ist?")
            say("Haki ist eine besondere Art von Energie,")
            say("die man braucht um Waffen zu schmieden,") 
            say("die von Göttern gesegnet wurden")
            say("")
            say_reward("Aber erstmal bekommst du eine der zwei Materialien, die du brauchen wirst!!")
        end
        
        when __TARGET__.click or 20349.chat."Meine Belohnung" begin

            say_title(mob_name(20349)..":")
            say("")
            say("Die alte Frau schickt dich also um deine Belohnung")
            say("abzuholen. Ich werde dir nun deine Belohnung geben.")
            say("")
            say_reward("Du erhälst ein Weißer-Löwe Siegel.")
            say_reward("Du erhälst ein Heiliges Kraut.")
            pc.give_item2(71124, 1)
            pc.give_item2(70251, 2)
            set_state(eluva2_complete)
        end
    end
    
    state eluva2_complete begin
        when login or levelup with pc.get_level() >= 150 begin
            set_state(eluva3)
        end
    end

    state eluva3 begin
        when letter begin
            send_letter("Es geht weiter!")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Es geht weiter!")
            say("")
            say("Du hast dein Training absolviert und beherschst Haki!")
            say("Nun könntest du mit deinee Aufgabe weiter machen,")
            say("die für dich besimmt ist!")
            say("")
            say_reward("Begib dich zum Hauptmann!")
        end
        
        when 20355.chat."Heilige Waffen" begin

            say_title(""..mob_name(20355)..":")
            say("")
            say("Hallo "..pc.get_name().."! Schön, dass du wieder")
            say("da bist. Wir haben nun zwei Jahre hart gearbeitet...")
            say("Endlich..!!")
            say("Gehe nun als erstes in den Tempel.")
            say("Dort wirst du Informationen erlangen,")
            say("wer dir bei der Waffenschmiedung behilflich ist!")
            say("")
            set_state(goto_denkmal)
        end
    end
    
    state goto_denkmal begin
        when letter begin
            send_letter("Informationsbeschaffung")
            local v = find_npc_by_vnum(20363)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20363))
            end
        end
            
        when info or button begin
            say_title("Informationsbeschaffung.")
            say("")
            say("Der Haputmann will, dass du in den Tempel gehst und")
            say("herausfindest wer dir behilflich sein kann!")
            say("Es wird ein harter Weg, deswegem solltest")
            say("du dich gut vorbereiten.")
            say("")
            say_reward("Begib dich in den dunklen Tempel und suche nach ")
            say_reward("Infos, die du dem Haputmann überbringen ")
            say_reward("kannst.")
        end
        
        when __TARGET__.target.click or 20363.click begin

            say_title(mob_name(20363)..":")
            say("")
            say("Du hast die Inschrift gelesen und aufgeschrieben.")
            say("Jetzt begib dich zurück zum Hauptmann.")
            say("")
            set_state(goback)
        end
    end
    
    state goback begin
        when letter begin
            send_letter("Du hast die Informationen")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Du hast die Informationen.")
            say("")
            say("Du hast die Informationen aus dem Denkmal")
            say("übernommen. Nun überbringe dem Hauptmann")
            say("diese Informationen.")
        end
        
        when 20355.chat."Heilige Waffen" begin

            say_title(""..mob_name(20355)..":")
            say("")
            say("Wie ich sehe, hast du die Informationen gesammelt.")
            say("Ich werde Diese nun analysieren und gleich ")
            say("auswerten.")
            say("")
            wait()
            say_title(""..mob_name(20355)..":")
            say("")
            say("Ich habe jetzt alle Informationen ausgelesen. In ")
            say("diesen Schriften steht, dass in diesem Tempel ein ")
            say("Turm steht. In diesem Turm steht ein Waffenschmied!")
            say("Ich denke dieser Turm ist der Dämonenturm...")
            say("Geh zu dem Waffenschmied. Gucke was er dir sagen kann")
            say("")
            set_state(tempellehre)
        end
    end
    state tempellehre begin
        when letter begin
            send_letter("Waffenschmied")
        end
        when info or button begin
            say_title("Waffenschmied.")
            say("")
            say("Der Hauptmann will von dir, dass du den Dämonenturm hochgehst")
            say("und den Waffenschmied befragst.")
        end
    end
    state _backtoguard begin
        when letter begin
            send_letter("Turm-Schmied")
            local v = find_npc_by_vnum(20074)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20074))
            end
        end
        when info or button begin
            say_title("Turm-Schmied")
            say("")
            say("Du hast die Aufgabe den")
            say("Turm-Schmied für Waffen aufzusuchen!.")
            say("")
            say_reward("Begib dich zurück zum Waffenschmied.")
        end
        when 20074.chat."Heilige Waffen" begin

            say_title(mob_name(20074)..":")
            say("")
            say("Du bist also der Auserwählte?")
            say("Du musst von mir wissen wie wir beide die Heiligen Waffen schmiedest?")
            say("Eine Sache ist dir gesagt: Wenn du kein Haki beherschst wird das nichts!")
            say("Wenn du es beherschst stehen die Götter auf deiner Seite!")
            say("Es gibt noch etwas: Du kannst bei mir nicht nur die Waffen schmieden sondern auf die Rüstungen!.")
            say("")
            say("Also ich würde sagen wenn du wirklich der Eine bist,")
            say("komm wieder wenn du alles hast was benötigt wird!")
            pc.give_item2(50136, 5)
            set_state(eluva3_complete)
        end
    end
    state eluva3_complete begin
        when login or levelup with pc.get_level() >= 150 begin
            set_state(eluva4)
        end
    end
    state eluva4 begin
        when letter begin
            send_letter("Heilige Waffen")
            local v = find_npc_by_vnum(20074)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20074))
            end
        end
        when 20074.chat."Heilige Waffen" begin
            say_title(mob_name(20074)..":")
            say("Aach...Du bist es!!")
            say("Ich wusste das du bald kommen würdest!")
            say("Ich könnte dir die Heiligen der Götter schmieden")
            say("Ich denke da du schon weit gekommen bist,")
            say("darf ich dir dieses Previleg auch erstatten!")
            say("Wenn du deine vorherigen Aufgaben erledigt hast, hast du die bestimmten Relikten schon,")
            say("die ich dafür brauche...")
            say("Nun: Willst du in das Geheimnis erfahren und mächtiger als alle anderen werden?")
            say("")
            wait()
            say("Also was möchtest du, dass ich dir es Schmiede? ?")
            local v = select ("Athelas´s Rüstung", "Hades´s Anzug", "Zeus´s Kleidung", "Poseidon´s Pattenpanzer", "Weiter")
            if v == 1 then
                if pc.count_item(70251) >= 1 then
                    pc.remove_item(70251, 1)
                    pc.give_item2(12159, 1)
                    say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
                    say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
                    say("")
                    say_reward("Eine Heilige Rüstung erhalten erhalten")
                    set_state(goto_geisterwald)
                else
                    return
                end                    
            elseif v == 2 then
                if pc.count_item(70251) >= 1 then
                    pc.remove_item(70251, 1)
                    pc.give_item2(12169, 1)
                    say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
                    say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
                    say("")
                    say_reward("Eine Heilige Rüstung erhalten erhalten")
                    set_state(goto_geisterwald)
                else
                    return
                end                    
            elseif v == 3 then
                if pc.count_item(70251) >= 1 then
                    pc.remove_item(70251, 1)
                    pc.give_item2(12189, 1)
                    say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
                    say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
                    say("")
                    say("")
                    say_reward("Eine Heilige Rüstung erhalten erhalten")
                    set_state(goto_geisterwald)
                else
                    return
                end
            elseif v == 4 then
                if pc.count_item(70251) >= 1 then
                    pc.remove_item(70251, 1)
                    pc.give_item2(12179, 1)
                    say("Ich freue mich, dass ich endlich diese Rüstung herstellen durfte!")
                    say("Pass auf diese Rüstung gut auf, sie schützt dich in den schlimmsten Gefahren!")
                    say("")
                    say("")
                    say_reward("Eine Heilige Rüstung erhalten erhalten")
                    set_state(goto_geisterwald)
                else
                    return
                end
            elseif v == 5 then
                local a = select ("Athelas´s Klinge", "Athelas´s Schwert", "Hades´s Bogen", "Hades´s Dolche", "Zeus´s Glocke", "Zeus´s Stab", "Poseidon´s Axt", "Abbrechen")
                if a == 1 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65019, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 2 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65029, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end                    
                elseif a == 3 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65039, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 4 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65049, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 5 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65059, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 6 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65069, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 7 then
                    if pc.count_item(70251) >= 1 then
                        pc.remove_item(70251, 1)
                        pc.give_item2(65079, 1)
                        say("Endlich...konnte ich meine ganze Erfahrung beweisen.. puhh,")
                        say("das war viel Arbeit..")
                        say("Pass auf diese Waffe gut auf, sie verleit dir unmenschliche Stärke")
                        say("")
                        say_reward("Eine Heilige Waffe erhalten")
                        set_state(goto_geisterwald)
                    else
                        return
                    end
                elseif a == 8 then            
                    return
                end
            end
        end
    end
    state goto_geisterwald begin
        when letter begin
            send_letter("Heilige Waffen")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        when info or button begin
            say_title("Du hast es geschafft!")
            say("Du bist nun im Besitz einer Heiligen Waffe")
            say("und oder einer Heiligen Rüstung")
            say("Überbringe diese Nachricht schnell dem Haputmann")
            say("")
            say_reward("Begib dich zurück zum Hauptmann!")
            set_state(kill_ready)
        end
    end
    state kill_ready begin
        when letter begin
            send_letter("Heilige Waffen")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Du hast es geschafft! Nun ist das Reich wieder sicher!")
            say("Ich denke du weißt, welche Aufgaben du hast?")
            say("")
            say("Nun dann erkläre ich dir deine Aufgabe:")
            say("Du bist der Auserwählte! Das bedeutet, dass du neue Kämpfer")
            say("helfen , unterstützen und vorran bringen sollst")
            say("Du bist auserdem nun in der Lage Reichskönig zu werden!")
            say("Nutze deine Macht um das Leben hier im Reich zu verbessern!")
            set_state(eluva4_complete)
        end
    end
    
    state eluva4_complete begin
        when login or levelup with pc.get_level() >= 150 begin
            set_state(eluva5)
        end
    end
    
    state eluva5 begin
        when letter begin
            send_letter("Das Leben")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        when info or button begin
            say_title("Das Leben")
            say("")
            say("Du hast mit bekommen, dass Jack-Sun wieder da ist..")
            say("...jedoch bist du sein Erbe!")
            say("...wenn du wissen willst wer Jack-Sun war denke einfach an deine Verganenheit.")
            say("Nachdem du jetzt ein Heiliger Kämpfer bist kannst du in Runs")            
            say("kämpfen, die du bisher nicht betreten konntest!")
            say("Du kannst nun auswählen ob du diesen Posten annimst oder nicht")
            say_reward("Begib dich zum Wächter der Eluva.")
            set_state(goto_trent)
        end
    end
    state goto_trent begin
        when letter with pc.getqf("premium_user")==1 and not npc.is_pc() begin
            send_letter("Virtus-Elite")
        end
        when info or button with pc.getqf("premium_user")==0 begin
            say_title("Virtus-Team")
            say("")
            say("Nachdem du einer der heiligen Kämpfer bist,")
            say("Kannst du nun den Posten als einer der Virtus-Elite werden")
            say("Du bleibst für immer einer der Elite! Du Kannst dieses Item nur einmal")
            say("benutzen. Also entscheide Weise")
            say("")
            say_title("Willst du der Virtus Elite beitreten?")
            
            local s = select("Ja", "Nein")
                
            if s == 1 then
                pc.setqf("elite_user", 1)
                set_state(jeonuntot)    
            else
                return
            end
        end
    end
    state jeonuntot begin
        when letter begin
            send_letter("Letzte Ehre vom Hauptmann")
            local v = find_npc_by_vnum(20355)
            if v != 0 then
                target.vid("__TARGET__", v, mob_name(20355))
            end
        end
        
        when info or button begin
            say_title("Letzte Ehre vom Hauptmann.")
            say("")
            say("Der Hauptmann steht nun unter deinen Befehlen!")
            say("Nutze deine Erfahrung und Macht für das Gute!")
            say("")
            notice_all("".. pc.get_name() .." ist nun einer der Virtus-Elite")
            notice_all("Falls ihr Fragen zum Spiel habt, könnt ihr unteranderm auch die Virtus-Elite anschreiben")
                end
            end
        end
    end
end 
04/19/2014 13:37 .Namikaze#10043
Quote:
Originally Posted by .Namikaze View Post
Hallo Community,

ich habe ein problem mit der folgenden quest und zwar sobald ich auf den npc klicke und die urkunde tauschen möchte kommt dies hier
[Only registered and activated users can see links. Click Here To Register...]
das lustige ist aber habe die urkunde im inventar

hier die quest


hoffe das mir jemand helfen kann

mfg
.Namikaze
kann mir keiner bei diesem problem helfen? <.<
04/19/2014 17:45 .Delta#10044
@ .Weezy
PHP Code:
quest achievement begin  
    state start begin          
        --LOGIN  
        when login begin  
            local actual_achievement_points = pc.getqf("achievement_points")  
            if pc.getqf("firstlogin") != 1 then  
                local Reward = 1  
                pc.setqf("firstlogin", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Dein_erster_Login%".. actual_achievement_points + Reward .."")  
            else  
                cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
            end  
        end  
      
        --BOSSE  
        when 691.kill begin  
            local Reward = 2  
            local Achievement = "Oberork"  
            local killcount = pc.getqf("691")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("691", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 791.kill begin  
            local Reward = 3  
            local Achievement = "Dunkler_Anführer"  
            local killcount = pc.getqf("791")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("791", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 792.kill begin  
            local Reward = 4  
            local Achievement = "Dunkler_Geist-Anführer"  
            local killcount = pc.getqf("792")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("792", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 1094.kill begin  
            local Reward = 5  
            local Achievement = "Dämonen_Oberhaupt"  
            local killcount = pc.getqf("1094")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("1094", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 1095.kill begin  
            local Reward = 10  
            local Achievement = "Blauer_Tod"  
            local killcount = pc.getqf("1095")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("1095", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 1192.kill begin  
            local Reward = 12  
            local Achievement = "Große_Eishexe"  
            local killcount = pc.getqf("1192")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("1192", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 1304.kill begin  
            local Reward = 5  
            local Achievement = "Gelber_Tigergeist"  
            local killcount = pc.getqf("1304")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("1304", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 1901.kill begin  
            local Reward = 4  
            local Achievement = "Neunschwanz"  
            local killcount = pc.getqf("1901")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("1901", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 2091.kill begin  
            local Reward = 3  
            local Achievement = "Königinnenspinne"  
            local killcount = pc.getqf("2091")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("2091", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 2206.kill begin  
            local Reward = 3  
            local Achievement = "Flammenkönig"  
            local killcount = pc.getqf("2206")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("2206", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 2191.kill begin  
            local Reward = 5  
            local Achievement = "Große_Wüstenschildkröte"  
            local killcount = pc.getqf("2191")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("2191", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 2493.kill begin  
            local Reward = 25  
            local Achievement = "Beran-Setaou"  
            local killcount = pc.getqf("2493")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("2493", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
          
        --METINS  
        when 8020.kill begin  
            local Reward = 5  
            local Achievement = "Shinsoo-Felsen"  
            local killcount = pc.getqf("8020")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8020", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 8021.kill begin  
            local Reward = 5  
            local Achievement = "Jinno-Felsen"  
            local killcount = pc.getqf("8021")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8021", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 8022.kill begin  
            local Reward = 5  
            local Achievement = "Chunjo-Felsen"  
            local killcount = pc.getqf("8022")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8022", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 8023.kill begin  
            local Reward = 5  
            local Achievement = "Kaiserfelsen"  
            local killcount = pc.getqf("8023")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8023", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 8026.kill begin  
            local Reward = 2  
            local Achievement = "Tu-Young"  
            local killcount = pc.getqf("8026")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8026", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  
        when 8027.kill begin  
            local Reward = 3  
            local Achievement = "Jeon-Un"  
            local killcount = pc.getqf("8027")  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("8027", killcount + 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)  
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")  
        end  

        --LEVELS  
        when login or levelup with pc.get_level() >= 50 and pc.getqf("Level50") != 1 begin  
            local Reward = 2  
            local Achievement = "Level_50"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level50", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
        when login or levelup with pc.get_level() >= 75 and pc.getqf("Level75") != 1 begin  
            local Reward = 5  
            local Achievement = "Level_75"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level75", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
        when login or levelup with pc.get_level() >= 85 and pc.getqf("Level85") != 1 begin  
            local Reward = 10  
            local Achievement = "Level_85"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level85", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
        when login or levelup with pc.get_level() >= 90 and pc.getqf("Level90") != 1 begin  
            local Reward = 25  
            local Achievement = "Level_90"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level90", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
        when login or levelup with pc.get_level() >= 95 and pc.getqf("Level95") != 1 begin  
            local Reward = 50  
            local Achievement = "Level_95"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level95", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
        when login or levelup with pc.get_level() >= 99 and pc.getqf("Level99") != 1 begin  
            local Reward = 100  
            local Achievement = "Level_99"  
            local actual_achievement_points = pc.getqf("achievement_points")  
            pc.setqf("Level99", 1)  
            pc.setqf("achievement_points", actual_achievement_points + Reward)              
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")  
        end  
          
        --CHECK EQUIP  
        when login begin  
            loop_timer("check_eq", 10)  
        end  
        when check_eq.timer begin  
            local russi = pc.get_armor()  
            local waffe = pc.get_weapon()  
            local actual_achievement_points = pc.getqf("achievement_points")  
            local Reward = 5  
            if russi==11299 and pc.getqf("achievement_ssp") != 1 then  
                pc.setqf("achievement_ssp", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Schwarzstahl-Panzer+9%".. actual_achievement_points + Reward .."")  
            elseif russi==11499 and pc.getqf("achievement_swa") != 1 then  
                pc.setqf("achievement_swa", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Schwarzwindanzug+9%".. actual_achievement_points + Reward .."")  
            elseif russi==11699 and pc.getqf("achievement_mpp") != 1 then  
                pc.setqf("achievement_mpp", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Magie-Plattenpanzer+9%".. actual_achievement_points + Reward .."")  
            elseif russi==11899 and pc.getqf("achievement_sk") != 1 then  
                pc.setqf("achievement_sk", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Schwarze_Kleidung+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==189 and pc.getqf("achievement_gifti") != 1 then  
                pc.setqf("achievement_gifti", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Giftschwert+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==199 and pc.getqf("achievement_lowenschw.") != 1 then  
                pc.setqf("achievement_lowenschw.", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Löwenschwert+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==5129 and pc.getqf("achievement_orchiglocke") != 1 then  
                pc.setqf("achievement_orchiglocke", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Orchideenglocke+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==2179 and pc.getqf("achievement_krahenstahl") != 1 then  
                pc.setqf("achievement_krahenstahl", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Krähenstahlbogen+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==1139 and pc.getqf("achievement_teufelsflugenchak") != 1 then  
                pc.setqf("achievement_teufelsflugenchak", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Teufelsflügel-Chakram+9%".. actual_achievement_points + Reward .."")  
            elseif waffe==3169 and pc.getqf("achievement_Grolli") != 1 then  
                pc.setqf("achievement_Grolli", 1)  
                pc.setqf("achievement_points", actual_achievement_points + Reward)  
                cmdchat("achievement Grollschwert+9%".. actual_achievement_points + Reward .."")  
            end  
        end  
          
        when 20094.chat."Achievement Shop" begin  
            local actual_achievement_points = pc.getqf("achievement_points")  
            if actual_achievement_points <= 0 then  
                say_title("".. mob_name(20094) ..":")  
                say("")  
                say("Hallo ".. pc.get_name() ..",")  
                say("")  
                say("Hier kannst du deine erworbenen Achievement-Points")  
                say("gegen tolle Items eintauschen, falls du möchtest.")  
                say("Leider hast du im Moment keine Achievement-Points,")  
                say("die du eintauschen könntest")  
                say("")  
                say("")  
                say("")  
                say_reward("Komme mit Achievement-Points erneut zu mir")  
            else  
                say_title("".. mob_name(20094) ..":")  
                say("")  
                say("Hallo ".. pc.get_name() ..",")  
                say("")  
                say("Ich sehe du hast Achievement-Points gesammelt.")  
                say("Möchtest du diese gegen tolle Items eintauschen?")  
                say("Ich habe einige Items, ")  
                say("die sehr wertvoll sein könnten.")  
                local achievement = select("Eintauschen","Abbrechen")   
                if achievement == 2 then  
                    return  
                elseif achievement == 1 then  
                    say_title("".. mob_name(20094) ..":")  
                    say("")  
                    say("Bitte wähle deine Kategorie.")  
                    local selectcategory = select("Upp-Items","Hilfs-Items","Drachengott-Items","Bonus-Items","Shop verlassen")  
                    if selectcategory == 5 then  
                        return  
                    elseif selectcategory == 1 then  
                        say_title("".. mob_name(20094) ..":")  
                        say("")  
                        say("Du möchtest Upp-Items?")  
                        say("Ich habe ein großes Sortiment an Upp-Items.")  
                        local uppitems = select("Weiße Perle","Blaue Perle","Rote Perle","Magisches Metall","Shop verlassen")  
                        if uppitems == 5 then  
                            return  
                        elseif uppitems == 1 then  
                            local Price = 50  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Willst du eine Weiße Perle kaufen?")  
                            say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Weiße Perle kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Weiße Perle.")  
                                    say("Diese Achievement-Points sind mir diese Perle wert.")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_item_vnum(27992)  
                                    say_reward("Du hast eine Weiße Perle erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(27992, 1)  
                                end  
                            end  
                        elseif uppitems == 2 then  
                            local Price = 100  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Willst du eine Blaue Perle kaufen?")  
                            say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Blaue Perle kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Blaue Perle.")  
                                    say("Diese Achievement-Points sind mir diese Perle wert.")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say_item_vnum(27993)  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Du hast eine Blaue Perle erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(27993, 1)  
                                end  
                            end  
                        elseif uppitems == 3 then  
                            local Price = 150  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Willst du eine Rote Perle kaufen?")  
                            say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Rote Perle kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Rote Perle.")  
                                    say("Diese Achievement-Points sind mir diese Perle wert.")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_item_vnum(27994)  
                                    say_reward("Du hast eine Rote Perle erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(27994, 1)  
                                end  
                            end  
                        elseif uppitems == 4 then  
                            local Price = 200 
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Willst du einen Magischen Stein kaufen?")  
                            say("Damit kannst du deine Items verbessern,")  
                            say("ohne dass die Gefahr des Verlustes des Items besteht")  
                            say("Auch verschlechtert sich bei einem Fehlschlag")  
                            say("sich nicht die Qualität des Items")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Das kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Magischen Stein kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, dein Magischer Stein.")  
                                    say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")  
                                    say("falls dir mal wenig Geld zur Verfügung steht.")  
                                    say("Diese Achievement-Points sind mir dieser Stein auf jeden Fall wert.")  
                                    say("Passe gut auf es auf.")  
                                    say_item_vnum(25041)  
                                    say_reward("Du hast ein Magischen Stein erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(25041, 1)  
                                end  
                            end  
                        end  
                    elseif selectcategory == 2 then  
                        say_title("".. mob_name(20094) ..":")  
                        say("")  
                        say("Du brauchst also Items die dich im Spielverlauf")  
                        say("weiterbringen und unterstützen?")  
                        say("Sehr gern, auch hiervon hab ich einiges im Angebot")  
                        local hilfsitems = select("Exp-Ring","Handschuh des Diebes","Shop verlassen")  
                        if hilfsitems == 3 then  
                            return  
                        elseif hilfsitems == 1 then  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Eine gute Wahl, allerdings gibt habe ich hiervon")  
                            say("verschiedene Angebote für deine Achievement-Points.")  
                            say("Einige sind natürlich besser und ")  
                            say("kosten dich mehr als andere.")  
                            local expringe = select("30 Minuten Exp-Ring","3 Stunden Exp-Ring","10 Stunden Exp-Ring","Abbrechen")  
                            if expringe == 4 then  
                                return  
                            elseif expringe == 1 then  
                                local Price = 10 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Exp-Ring hält 30 Minuten lang.")  
                                say("Du kannst ihn jederzeit an- und ausziehen,")  
                                say("sodass du ihn sehr effizient benutzen kannst.")  
                                say("")  
                                say("")  
                                say("")  
                                say_reward("Das würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Exp-Ring kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 30 minütiger Exp-Ring.") 
                                        say_item_vnum(72002)  
                                        say_reward("Du hast einen 30 minütigen Exp-Ring erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72002, 1)  
                                    end  
                                end  
                            elseif expringe == 2 then  
                                local Price = 100 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Exp-Ring hält 3 Stunden    lang.")  
                                say("Du kannst ihn jederzeit an- und ausziehen,")  
                                say("sodass du ihn sehr effizient benutzen kannst.")  
                                say("")  
                                say("")  
                                say("")  
                                say_reward("Das würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Exp-Ring kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 3 stündiger Exp-Ring.") 
                                        say_item_vnum(72003)  
                                        say_reward("Du hast einen 3 stündigen Exp-Ring erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72003, 1)  
                                    end
                                end
                            elseif expringe == 3 then  
                                local Price = 250 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Exp-Ring hält 10 Stunden lang.") 
                                say("Du kannst ihn jederzeit an- und ausziehen,") 
                                say("sodass du ihn sehr effizient benutzen kannst.") 
                                say("")  
                                say("")  
                                say("") 
                                say_reward("Das würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Exp-Ring kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 10 stündiger Exp-Ring.")  
                                        say_item_vnum(72001)  
                                        say_reward("Du hast einen 10 stündigen Exp-Ring erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72001, 1)  
                                    end  
                                end  
                            end    
                        elseif hilfsitems == 2 then  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Eine gute Wahl, allerdings gibt habe ich hiervon")  
                            say("verschiedene Angebote für deine Achievement-Points.")  
                            say("Einige sind natürlich besser und ")  
                            say("kosten dich mehr als andere.")  
                            local handschuhe = select("30 Minuten Diebeshandschuh","3 Stunden Diebeshandschuh","10 Stunden Diebeshandschuh","Abbrechen")  
                            if handschuhe == 4 then  
                                return  
                            elseif handschuhe == 1 then  
                                local Price = 10 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Diebeshandschuh hält 30 Minuten lang.")  
                                say("Du kannst ihn jederzeit an- und ausziehen,")  
                                say("sodass du ihn sehr effizient benutzen kannst.")  
                                say("")  
                                say("")  
                                say("")  
                                say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Diebeshandschuh kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 30 minütiger Diebeshandschuh.")  
                                        say_item_vnum(72005)  
                                        say_reward("Du hast einen 30 minütigen Diebeshandschuh erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72005, 1)  
                                    end  
                                end  
                            elseif handschuhe == 2 then  
                                local Price = 50 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Diebeshandschuh hält 3 Stunden    lang.")  
                                say("Du kannst ihn jederzeit an- und ausziehen,")  
                                say("sodass du ihn sehr effizient benutzen kannst.") 
                                say("")  
                                say("")  
                                say("")  
                                say_reward("Das würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Diebeshandschuh kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 3 stündiger Diebeshandschuh.")  
                                        say_item_vnum(72006)  
                                        say_reward("Du hast einen 3 stündigen Diebeshandschuh erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72006, 1)  
                                    end
                                end
                            elseif handschuhe == 3 then  
                                local Price = 125 
                                say_title("".. mob_name(20094) ..":")  
                                say("")  
                                say("Dieser Diebeshandschuh hält 10 Stunden lang.")  
                                say("Du kannst ihn jederzeit an- und ausziehen,")  
                                say("sodass du ihn sehr effizient benutzen kannst.")  
                                say("")  
                                say("")  
                                say("")  
                                say_reward("Das würde dich ".. Price .." Achievement-Points kosten.")  
                                local buyselection = select("Diebeshandschuh kaufen","Abbrechen")  
                                if buyselection == 2 then  
                                    return  
                                elseif buyselection == 1 then  
                                    if pc.getqf("achievement_points") < Price then  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Du hast leider nicht genügend Achievement-Points.")  
                                        say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                        say("weitere Achievement-Points gesammelt hast")  
                                        say("")  
                                        say("")  
                                        say("")  
                                        say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                        return      
                                    else  
                                        say_title("".. mob_name(20094) ..":")  
                                        say("")  
                                        say("Hier bitte, dein 10 stündiger Diebeshandschuh.")  
                                        say_item_vnum(72004)  
                                        say_reward("Du hast einen 10 stündigen Diebeshandschuh erhalten")  
                                        pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                        cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                        pc.give_item2(72004, 1)  
                                    end  
                                end  
                            end
                        end
                    elseif selectcategory == 3 then  
                        say_title("".. mob_name(20094) ..":")  
                        say("")  
                        say("Du verlangst Drachengott-Items für deine AchievementPoints?")  
                        say("Die Drachengott-Items sind sehr selten und wertvoll,die gebe ich nur sehr ungern raus.")  
                        local drachengott = select("Drachengott-Leben","Drachengott-Angriff","Drachengott-Verteidigung","Drachengott-Intelligenz","Shop verlassen")  
                        if drachengott == 5 then  
                            return  
                        elseif drachengott == 1 then  
                            local Price = 20  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Das Drachengott-Leben erhöht deine Lebenspunkte")  
                            say("um 20% für eine geraume Zeit.")  
                            say("Er ist allgemein sehr hilfreich.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Drachengott-Leben kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Drachengott-Leben.")  
                                    say("Ich trenne mich nur ungern davon....")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say_item_vnum(71027)  
                                    say_reward("Du hast 3x Drachengott-Leben erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(71027, 3)  
                                end  
                            end                          
                        elseif drachengott == 2 then  
                            local Price = 20  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Der Drachengott-Angriff erhöht deinen Angriff")  
                            say("um 20% für eine geraume Zeit.")  
                            say("Mit ihm wirst du im Kampf erfolgreich sein.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Drachengott-Angriff kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, dein Drachengott-Angriff.")  
                                    say("Ich trenne mich nur ungern davon....")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say_item_vnum(71028)  
                                    say_reward("Du hast 3x Drachengott-Angriff erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(71028, 3)  
                                end  
                            end                          
                        elseif drachengott == 3 then  
                            local Price = 20  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Die Drachengott-Verteidigung erhöht deine Verteidigung")  
                            say("um 20% für eine geraume Zeit.")  
                            say("Mit ihm wirst du in der Verteidigung erfolgreich sein.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Drachengott-Verteidigung kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Drachengott-Verteidigung.")  
                                    say("Ich trenne mich nur ungern davon....")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say_item_vnum(71030)  
                                    say_reward("Du hast 3x Drachengott-Verteidigung erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(71030, 3)  
                                end  
                            end                          
                        elseif drachengott == 4 then  
                            local Price = 15  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Die Drachengott-Intelligenz erhöht deine Intelligenz")  
                            say("um 20% für eine geraume Zeit.")  
                            say("Mit ihm wirst du im magischen Kampf erfolgreich sein.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Drachengott-Intelligenz kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Drachengott-Intelligenz.")  
                                    say("Ich trenne mich nur ungern davon....")  
                                    say("Passe gut auf sie auf, sie ist sehr wertvoll.")  
                                    say_item_vnum(71029)  
                                    say_reward("Du hast 3x Drachengott-Intelligenz erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(71029, 3)  
                                end  
                            end      
                        end  
                    elseif selectcategory == 4 then  
                        say_title("".. mob_name(20094) ..":")  
                        say("")  
                        say("Du hättest gerne Bonus-Items für")  
                        say("deine Achievement-Points?")  
                        say("Die Bonus-Items sind sehr wertvoll, da sie")  
                        say("dich im Spielverlauf unterstützten.")  
                        local bonusitems = select("Gegenstand verstärken","Gegenstand verzaubern","Segenskugel","Shop verlassen")  
                        if bonusitems == 4 then  
                            return  
                        elseif bonusitems == 1 then  
                            local Price = 5  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Das Item Gegenstand verstärken verstärkt")  
                            say("deine Items, sodass sie einen Bonus erhalten.")  
                            say("Es ist sehr begehrt, da die Items mit Bonis")  
                            say("einen sehr großen Wert besitzen.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Gegenstand verstärken kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item")  
                                    return      
                                else  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Hier bitte, deine Gegenstand verstärken.")  
                                    say("Ich wünsche dir viel Erfolg mit den Bonis,")  
                                    say("immerhin waren das meine Gegenstand verstärken.")  
                                    say("")  
                                    say("")  
                                    say_item_vnum(71085)  
                                    say_reward("Du hast 10x Gegenstand verstärken erhalten")  
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)  
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points"))  
                                    pc.give_item2(71085, 10)  
                                end  
                            end                          
                        elseif bonusitems == 2 then  
                            local Price = 20  
                            say_title("".. mob_name(20094) ..":")  
                            say("")  
                            say("Das Item Gegenstand verzaubern verzaubert")  
                            say("deine bereits vorhanden Bonis eines Items.")  
                            say("Eventuell hast du großes Glück damit.")  
                            say("")  
                            say("")  
                            say("")  
                            say_reward("Es kostet dich ".. Price .." Achievement-Points.")  
                            local buyselection = select("Gegenstand verzaubern kaufen","Abbrechen")  
                            if buyselection == 2 then  
                                return  
                            elseif buyselection == 1 then  
                                if pc.getqf("achievement_points") < Price then  
                                    say_title("".. mob_name(20094) ..":")  
                                    say("")  
                                    say("Du hast leider nicht genügend Achievement-Points.")  
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")  
                                    say("weitere Achievement-Points gesammelt hast")  
                                    say("")  
                                    say("")  
                                    say("")  
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return 
                                else 
                                    say_title("".. mob_name(20094) ..":") 
                                    say("") 
                                    say("Hier bitte, deine Gegenstand verzaubern.") 
                                    say("Sie sind nicht nur wertvoll, sondern auch") 
                                    say("sehr begehrt, sodass du beim Verkauf") 
                                    say("einen hohen Preis erzielen könntest.") 
                                    say("") 
                                    say_item_vnum(71084) 
                                    say_reward("Du hast 20x Gegenstand verzaubern erhalten") 
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    pc.give_item2(71084, 20) 
                                end 
                            end 
                        elseif bonusitems == 3 then 
                            local Price = 50 
                            say_title("".. mob_name(20094) ..":") 
                            say("") 
                            say("Segenskugel sind sehr begehrt und haben") 
                            say("einen hohen spielerischen, als auch") 
                            say("wirtschaftlichen Wert.") 
                            say("Sie versehen dein Item bei Erfolg") 
                            say("mit einem 5. Bonus.") 
                            say("") 
                            say("") 
                            say_reward("Sie kostet dich ".. Price .." Achievement-Points.") 
                            local buyselection = select("Drachengott-Verteidigung kaufen","Abbrechen") 
                            if buyselection == 2 then 
                                return 
                            elseif buyselection == 1 then 
                                if pc.getqf("achievement_points") < Price then 
                                    say_title("".. mob_name(20094) ..":") 
                                    say("") 
                                    say("Du hast leider nicht genügend Achievement-Points.") 
                                    say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    say("weitere Achievement-Points gesammelt hast") 
                                    say("") 
                                    say("") 
                                    say("") 
                                    say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return 
                                else 
                                    say_title("".. mob_name(20094) ..":") 
                                    say("") 
                                    say("Hier bitte, deine Segenskugel.") 
                                    say("Du hast eine gute Wahl getroffen,") 
                                    say("immerhin kann sie jeder gut gebrauchen.") 
                                    say("") 
                                    say("") 
                                    say("") 
                                    say_item_vnum(70024) 
                                    say_reward("Du hast eine Segenskugel erhalten") 
                                    pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    pc.give_item2(70024, 3) 
                                end 
                            end 
                        end 
                    end 
                end 
            end 
        end 
    end 
end 
04/19/2014 19:13 turki77#10045
Can someone make quest for map like divle tower it start when you go to map and you have just 10mint
if you logoutyou will back to village
mob came when you kill the first onther one came just 4 mobs each mob 2 mint
04/19/2014 22:46 The Cookie Monster#10046
Ich hab mich mal an ne Quest fürs Osterevent gewagt^^
Aber mein Questcore zeigt nur "error on compile ostern.quest" an...
voerher lädt er aber ca. 3 Minuten bei der Quest...
Vllt findet ja einer von euch den Fehler:
PHP Code:
quest ostern begin
    state start begin
        when 30129.chat."Die Ostereiersuche" begin
            ----"0123456789012345678901234567890123456789012345678901234567890"
            say_title("Die Ostereiersuche")
            say("")
            say("Einem mysteriösen Umstand zufolge bin ich hier aufgetaucht.")
            say("Als ich hier wieder zu mir kam, waren meine ganzen Eier")
            say("verschwunden. Aber ich habe dafür ganz große Eier gesehen,")
            say("aus denen Monster raus kommen. Außerdem kommen, wenn man die")
            say("großen Ostereier besiegt, Körbchen raus. Dort sind meine")
            say("Ostereier drinne.")
            wait()
            say_title("Die Ostereiersuche")
            say("Ich habe nur nicht die Zeit alle meine Ostereier zurück")
            say("zu holen. Du siehst aber dafür sehr stark aus und könntest")
            say("für mich doch bestimmt ein paar Ostereier sammeln.")
            say("Ich werde mir dann ein paar nette Belohnungen")
            say("einfallen lassen.")
            say_reward("Viel Glück beim Ostermetin suchen :)")
        end
        when 30129.chat."Ich habe Ostereier gefunden" with pc.count_item(50160) >=1 begin
            belohnungen = 
            {
            -- Osterier Anzahl , Item_vnum , Anzahl, Item Name
            {20,80008,5,"Goldklumpen"},
            {20,30219,5,"Schrumpfkopf"},
            {20,27987,5,"Muschel"},
            {40,27992,25,"Weiße Perle"},
            {40,27993,25,"Blaue Perle"},
            {40,27994,25,"Rote Perle"},
            {40,12121,25,"Marlboro"},
            {40,12122,25,"LM"},
            {40,12123,25,"Phllip Morris"},
            {40,12124,25,"Black Devil"},
            {40,12125,25,"Marylong"},
            {40,12126,25,"Camel Blue"},
            {80,30182,20,"Legendäres Tagebuch"}, 
            {150,52006,1,"Wilder Löwe"},
            {150,50021,1,"Wilder Wolf"},
            {150,52051,1,"Wilder Tiger"},
            {300,53015,1,"Oster Pet"},
            }
            eier = pc.count_item(50160)
            anz_name = ""
            vnum = 0
            count = 0
            full_menu = {}
            for i = 1, table.getn(belohnungen), 1 do
                if belohnungen[i][1] <= eier then
                    anz_name = belohnungen[i][1].." "..belohnungen[i][4] -- z.b 2 Schwert+0 (wobei 2 die Anzahl der Ostereier sind)
                    table.insert(full_menu, anz_name)
                    if mod(table.getn(full_menu),5) == 0 then
                        table.insert(full_menu, "Weiter")
                        table.insert(full_menu, "Abbrechen")
                    end
                end
            end
            if mod(table.getn(full_menu),7) == 0 then
                table.remove(full_menu,(table.getn(full_menu)-1))
            else
                table.insert(full_menu, "Abbrechen")
            end
            teil_menu = {}
            if eier == 1 then
                s_word = "schon ein Ei gefunden."
            else
                s_word = "schon ein paar Eier gefunden."
            end
            say_title("Die Ostereier")
            say("")
            say("Oh... ich sehe du hast "..s_word)
            say("Mir ist auch schon eine angemessene Belohnung eingefallen.")
            say("")
            say("Du hast "..say_reward(eier.." Ostereier").." gesammelt")
            say("Du bekommst für eine bestimmte Anzahl an Eiern eine Belohnung.")
            wait()
            if table.getn(full_menu) <= 1 then
                say_title("Tut mir Leid..")
                say("Du hast noch zu wenig Ostereier für einen")
                say("Preis gesammelt.")
                say("Komm wieder. wenn du mehr gesammelt hast.")
                return
            end
            if table.getn(full_menu) > 7 then
                for i = 1 , 7 , 1 do
                    table.insert(teil_menu,full_menu[i])
                    table.remove(full_menu,i)
                end
                local s=select_table(teil_menu) -- Menü 1 
                if s == 7 then
                    return
                elseif s == 1 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 2 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 3 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 4 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 5 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 6 then
                    teil_menu = {}
                    for i = 1 , 7 , 1 do
                        table.insert(teil_menu,full_menu[i])
                        table.remove(full_menu,i)
                    end
                    local s=select_table(teil_menu) -- Menü 2 
                    if s == 7 then
                        return
                    elseif s == 1 and teil_menu[s] != "Abbrechen" then
                        local a,b = string.find(teil_menu[s]," ")
                        local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                        local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                        local rest = eier-value
                        for i = 1 , table.getn(belohnungen), 1 do
                            if belohnungen[i][4] == name then
                                vnum = tonumber(belohnungen[i][2])
                                count = tonumber(belohnungen[i][3])
                            end
                        end
                        say("Möchtest du "..name.." wirklich eintauschen?")
                        say("Dir bleiben danach noch "..rest.." Ostereier.")
                        local r = select("Ja","Nein")
                        if r == 2 then
                            return
                        else
                            pc.remove_item(50160,value)
                            pc.give_item(vnum,count)
                        end
                    elseif s == 2 and teil_menu[s] != "Abbrechen" then
                        local a,b = string.find(teil_menu[s]," ")
                        local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                        local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                        local rest = eier-value
                        for i = 1 , table.getn(belohnungen), 1 do
                            if belohnungen[i][4] == name then
                                vnum = tonumber(belohnungen[i][2])
                                count = tonumber(belohnungen[i][3])
                            end
                        end
                        say("Möchtest du "..name.." wirklich eintauschen?")
                        say("Dir bleiben danach noch "..rest.." Ostereier.")
                        local r = select("Ja","Nein")
                        if r == 2 then
                            return
                        else
                            pc.remove_item(50160,value)
                            pc.give_item(vnum,count)
                        end
                    elseif s == 3 and teil_menu[s] != "Abbrechen" then
                        local a,b = string.find(teil_menu[s]," ")
                        local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                        local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                        local rest = eier-value
                        for i = 1 , table.getn(belohnungen), 1 do
                            if belohnungen[i][4] == name then
                                vnum = tonumber(belohnungen[i][2])
                                count = tonumber(belohnungen[i][3])
                            end
                        end
                        say("Möchtest du "..name.." wirklich eintauschen?")
                        say("Dir bleiben danach noch "..rest.." Ostereier.")
                        local r = select("Ja","Nein")
                        if r == 2 then
                            return
                        else
                            pc.remove_item(50160,value)
                            pc.give_item(vnum,count)
                        end
                    elseif s == 4 and teil_menu[s] != "Abbrechen" then
                        local a,b = string.find(teil_menu[s]," ")
                        local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                        local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                        local rest = eier-value
                        for i = 1 , table.getn(belohnungen), 1 do
                            if belohnungen[i][4] == name then
                                vnum = tonumber(belohnungen[i][2])
                                count = tonumber(belohnungen[i][3])
                            end
                        end
                        say("Möchtest du "..name.." wirklich eintauschen?")
                        say("Dir bleiben danach noch "..rest.." Ostereier.")
                        local r = select("Ja","Nein")
                        if r == 2 then
                            return
                        else
                            pc.remove_item(50160,value)
                            pc.give_item(vnum,count)
                        end
                    elseif s == 5 and teil_menu[s] != "Abbrechen" then
                        local a,b = string.find(teil_menu[s]," ")
                        local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                        local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                        local rest = eier-value
                        for i = 1 , table.getn(belohnungen), 1 do
                            if belohnungen[i][4] == name then
                                vnum = tonumber(belohnungen[i][2])
                                count = tonumber(belohnungen[i][3])
                            end
                        end
                        say("Möchtest du "..name.." wirklich eintauschen?")
                        say("Dir bleiben danach noch "..rest.." Ostereier.")
                        local r = select("Ja","Nein")
                        if r == 2 then
                            return
                        else
                            pc.remove_item(50160,value)
                            pc.give_item(vnum,count)
                        end
                    elseif s == 6 then
                        teil_menu = {}
                        for i = 1 , 7 , 1 do
                            table.insert(teil_menu,full_menu[i])
                            table.remove(full_menu,i)
                        end
                        local s=select_table(teil_menu) -- Menü 3 
                        if s == 7 then
                            return
                        elseif s == 1 and teil_menu[s] != "Abbrechen" then
                            local a,b = string.find(teil_menu[s]," ")
                            local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                            local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                            local rest = eier-value
                            for i = 1 , table.getn(belohnungen), 1 do
                                if belohnungen[i][4] == name then
                                    vnum = tonumber(belohnungen[i][2])
                                    count = tonumber(belohnungen[i][3])
                                end
                            end
                            say("Möchtest du "..name.." wirklich eintauschen?")
                            say("Dir bleiben danach noch "..rest.." Ostereier.")
                            local r = select("Ja","Nein")
                            if r == 2 then
                                return
                            else
                                pc.remove_item(50160,value)
                                pc.give_item(vnum,count)
                            end
                        elseif s == 2 and teil_menu[s] != "Abbrechen" then
                            local a,b = string.find(teil_menu[s]," ")
                            local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                            local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                            local rest = eier-value
                            for i = 1 , table.getn(belohnungen), 1 do
                                if belohnungen[i][4] == name then
                                    vnum = tonumber(belohnungen[i][2])
                                    count = tonumber(belohnungen[i][3])
                                end
                            end
                            say("Möchtest du "..name.." wirklich eintauschen?")
                            say("Dir bleiben danach noch "..rest.." Ostereier.")
                            local r = select("Ja","Nein")
                            if r == 2 then
                                return
                            else
                                pc.remove_item(50160,value)
                                pc.give_item(vnum,count)
                            end
                        elseif s == 3 and teil_menu[s] != "Abbrechen" then
                            local a,b = string.find(teil_menu[s]," ")
                            local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                            local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                            local rest = eier-value
                            for i = 1 , table.getn(belohnungen), 1 do
                                if belohnungen[i][4] == name then
                                    vnum = tonumber(belohnungen[i][2])
                                    count = tonumber(belohnungen[i][3])
                                end
                            end
                            say("Möchtest du "..name.." wirklich eintauschen?")
                            say("Dir bleiben danach noch "..rest.." Ostereier.")
                            local r = select("Ja","Nein")
                            if r == 2 then
                                return
                            else
                                pc.remove_item(50160,value)
                                pc.give_item(vnum,count)
                            end
                        elseif s == 4 and teil_menu[s] != "Abbrechen" then
                            local a,b = string.find(teil_menu[s]," ")
                            local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                            local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                            local rest = eier-value
                            for i = 1 , table.getn(belohnungen), 1 do
                                if belohnungen[i][4] == name then
                                    vnum = tonumber(belohnungen[i][2])
                                    count = tonumber(belohnungen[i][3])
                                end
                            end
                            say("Möchtest du "..name.." wirklich eintauschen?")
                            say("Dir bleiben danach noch "..rest.." Ostereier.")
                            local r = select("Ja","Nein")
                            if r == 2 then
                                return
                            else
                                pc.remove_item(50160,value)
                                pc.give_item(vnum,count)
                            end
                        elseif s == 5 and teil_menu[s] != "Abbrechen" then
                            local a,b = string.find(teil_menu[s]," ")
                            local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                            local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                            local rest = eier-value
                            for i = 1 , table.getn(belohnungen), 1 do
                                if (belohnungen[i][4]) == name then
                                    vnum = tonumber(belohnungen[i][2])
                                    count = tonumber(belohnungen[i][3])
                                end
                            end
                            say("Möchtest du "..name.." wirklich eintauschen?")
                            say("Dir bleiben danach noch "..rest.." Ostereier.")
                            local r = select("Ja","Nein")
                            if r == 2 then
                                return
                            else
                                pc.remove_item(50160,value)
                                pc.give_item(vnum,count)
                            end
                        elseif s == 6 then
                            teil_menu = {}
                            for i = 1 , 7 , 1 do
                                table.insert(teil_menu,full_menu[i])
                                table.remove(full_menu,i)
                            end
                            local s=select_table(teil_menu) -- Menü 4 
                            if s == 7 then
                                return
                            elseif s == 1
                                local a,b = string.find(teil_menu[s]," ")
                                local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                                local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                                local rest = eier-value
                                for i = 1 , table.getn(belohnungen), 1 do
                                    if belohnungen[i][4] == name then
                                        vnum = tonumber(belohnungen[i][2])
                                        count = tonumber(belohnungen[i][3])
                                    end
                                end
                                say("Möchtest du "..name.." wirklich eintauschen?")
                                say("Dir bleiben danach noch "..rest.." Ostereier.")
                                local r = select("Ja","Nein")
                                if r == 2 then
                                    return
                                else
                                    pc.remove_item(50160,value)
                                    pc.give_item(vnum,count)
                                end
                            elseif s == 2 and teil_menu[s] != "Abbrechen" then
                                local a,b = string.find(teil_menu[s]," ")
                                local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                                local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                                local rest = eier-value
                                for i = 1 , table.getn(belohnungen), 1 do
                                    if belohnungen[i][4] == name then
                                        vnum = tonumber(belohnungen[i][2])
                                        count = tonumber(belohnungen[i][3])
                                    end
                                end
                                say("Möchtest du "..name.." wirklich eintauschen?")
                                say("Dir bleiben danach noch "..rest.." Ostereier.")
                                local r = select("Ja","Nein")
                                if r == 2 then
                                    return
                                else
                                    pc.remove_item(50160,value)
                                    pc.give_item(vnum,count)
                                end
                            elseif s == 3 and teil_menu[s] != "Abbrechen" then
                                local a,b = string.find(teil_menu[s]," ")
                                local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                                local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                                local rest = eier-value
                                for i = 1 , table.getn(belohnungen), 1 do
                                    if belohnungen[i][4] == name then
                                        vnum = tonumber(belohnungen[i][2])
                                        count = tonumber(belohnungen[i][3])
                                    end
                                end
                                say("Möchtest du "..name.." wirklich eintauschen?")
                                say("Dir bleiben danach noch "..rest.." Ostereier.")
                                local r = select("Ja","Nein")
                                if r == 2 then
                                    return
                                else
                                    pc.remove_item(50160,value)
                                    pc.give_item(vnum,count)
                                end
                            elseif s == 4 and teil_menu[s] != "Abbrechen" then
                                local a,b = string.find(teil_menu[s]," ")
                                local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                                local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                                local rest = eier-value
                                for i = 1 , table.getn(belohnungen), 1 do
                                    if belohnungen[i][4] == name then
                                        vnum = tonumber(belohnungen[i][2])
                                        count = tonumber(belohnungen[i][3])
                                    end
                                end
                                say("Möchtest du "..name.." wirklich eintauschen?")
                                say("Dir bleiben danach noch "..rest.." Ostereier.")
                                local r = select("Ja","Nein")
                                if r == 2 then
                                    return
                                else
                                    pc.remove_item(50160,value)
                                    pc.give_item(vnum,count)
                                end
                            elseif s == 5 and teil_menu[s] != "Abbrechen" then
                                local a,b = string.find(teil_menu[s]," ")
                                local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                                local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                                local rest = eier-value
                                for i = 1 , table.getn(belohnungen), 1 do
                                    if belohnungen[i][4] == name then
                                        vnum = tonumber(belohnungen[i][2])
                                        count = tonumber(belohnungen[i][3])
                                    end
                                end
                                say("Möchtest du "..name.." wirklich eintauschen?")
                                say("Dir bleiben danach noch "..rest.." Ostereier.")
                                local r = select("Ja","Nein")
                                if r == 2 then
                                    return
                                else
                                    pc.remove_item(50160,value)
                                    pc.give_item(vnum,count)
                                end
                            else
                                return -- Menü 4
                            end
                        else
                            return -- Menü 3
                        end
                    else
                        return -- Menü 2
                    end
                else
                    return -- Menü 1
                end
            else
                local s=select_table(full_menu) -- Menü 1 
                if s == 7 then
                    return
                elseif s == 1 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 2 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 3 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 4 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                elseif s == 5 and teil_menu[s] != "Abbrechen" then
                    local a,b = string.find(teil_menu[s]," ")
                    local value = tonumber(string.sub(teil_menu[s], 1, (a-1)))
                    local name = string.sub(teil_menu[s],a+1,string.len(teil_menu[s]))
                    local rest = eier-value
                    for i = 1 , table.getn(belohnungen), 1 do
                        if belohnungen[i][4] == name then
                            vnum = tonumber(belohnungen[i][2])
                            count = tonumber(belohnungen[i][3])
                        end
                    end
                    say("Möchtest du "..name.." wirklich eintauschen?")
                    say("Dir bleiben danach noch "..rest.." Ostereier.")
                    local r = select("Ja","Nein")
                    if r == 2 then
                        return
                    else
                        pc.remove_item(50160,value)
                        pc.give_item(vnum,count)
                    end
                else
                    return
                end
            end
        end
    end
end 
04/20/2014 01:13 KILLER3208#10047
Die PVP Quest geht nicht Error?!
Kann jemand helfen?
[Only registered and activated users can see links. Click Here To Register...]
04/20/2014 02:33 Dr.Sonii##10048
Folgendes Problem bei dieser Quest:
PHP Code:
quest nation begin
    state start begin
        when login begin
            say_title("teste mich")
            local nationen = select("Nation1","Nation2","Nation3")
            if 1==nationen then
                --pc.warp(987600, 987600)
            elseif 2==nationen then
                --pc.warp(9876500, 9876500)
            elseif 3==nationen then
                --pc.warp(98765400, 98765400)
            else
                return
            end
        end
    end
end 
Man kann zwar auswählen welche Nation man sein will , wird allerdings nicht teleportiert nach dem auswählen.
Syserr sagt das:
PHP Code:
SYSERR: Apr 20 03:27:34.453264 :: operator(): QUEST NOT END RUNNING on Login/Logout - nation 
mfg.
04/20/2014 11:27 The Cookie Monster#10049
Quote:
Originally Posted by .Sonii View Post
Folgendes Problem bei dieser Quest:
PHP Code:
quest nation begin
    state start begin
        when login begin
            say_title("teste mich")
            local nationen = select("Nation1","Nation2","Nation3")
            if 1==nationen then
                --pc.warp(987600, 987600)
            elseif 2==nationen then
                --pc.warp(9876500, 9876500)
            elseif 3==nationen then
                --pc.warp(98765400, 98765400)
            else
                return
            end
        end
    end
end 
Man kann zwar auswählen welche Nation man sein will , wird allerdings nicht teleportiert nach dem auswählen.
Syserr sagt das:
PHP Code:
SYSERR: Apr 20 03:27:34.453264 :: operator(): QUEST NOT END RUNNING on Login/Logout - nation 
mfg.
Mach die "--" weg, das ist ein kommentarzeichen.. vllt gehts dann..
und ich hatte ein ähnliches problem gehabt und ich weiß auch nicht warum^^
04/20/2014 12:11 Dr.Sonii##10050
Quote:
Originally Posted by The Cookie Monster View Post
Mach die "--" weg, das ist ein kommentarzeichen.. vllt gehts dann..
und ich hatte ein ähnliches problem gehabt und ich weiß auch nicht warum^^
Auch jetzt geht es leider immer noch nicht.
Page 670 of 845 « First 170570620660668669 670 671672680720770 Last »