Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server
You last visited: Today at 04:14

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[SERVICE] Die Questkontrolle

Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.

Reply
 
Old 04/19/2014, 12:10   #10036
 
elite*gold: 0
Join Date: Sep 2011
Posts: 378
Received Thanks: 33
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 
sony199 is offline  
Old 04/19/2014, 12:27   #10037
 
.Delta's Avatar
 
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
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(15)
                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 
.Delta is offline  
Thanks
1 User
Old 04/19/2014, 13:01   #10038
 
ExoBiTe™'s Avatar
 
elite*gold: 130
Join Date: Dec 2012
Posts: 346
Received Thanks: 39
Hey leute ich brauche nen Questbefehl 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^^
ExoBiTe™ is offline  
Old 04/19/2014, 13:15   #10039
 
elite*gold: 0
Join Date: Sep 2011
Posts: 378
Received Thanks: 33
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(15)
                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.
sony199 is offline  
Old 04/19/2014, 13:20   #10040
 
elite*gold: 0
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
Quote:
Originally Posted by Streetkillah98 View Post
Hey leute ich brauche nen Questbefehl 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]) 
He3o Sippel is offline  
Thanks
1 User
Old 04/19/2014, 13:21   #10041
 
elite*gold: 0
Join Date: Oct 2010
Posts: 60
Received Thanks: 6
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
joejoe99 is offline  
Old 04/19/2014, 13:26   #10042
 
elite*gold: 0
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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(711241)
            
pc.give_item2(702512)
            
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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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(501365)
            
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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
== 1 then
                
if pc.count_item(70251) >= 1 then
                    pc
.remove_item(702511)
                    
pc.give_item2(121591)
                    
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 == 2 then
                
if pc.count_item(70251) >= 1 then
                    pc
.remove_item(702511)
                    
pc.give_item2(121691)
                    
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 == 3 then
                
if pc.count_item(70251) >= 1 then
                    pc
.remove_item(702511)
                    
pc.give_item2(121891)
                    
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 == 4 then
                
if pc.count_item(70251) >= 1 then
                    pc
.remove_item(702511)
                    
pc.give_item2(121791)
                    
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 == 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 
== 1 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650191)
                        
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 == 2 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650291)
                        
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 == 3 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650391)
                        
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 == 4 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650491)
                        
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 == 5 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650591)
                        
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 == 6 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650691)
                        
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 == 7 then
                    
if pc.count_item(70251) >= 1 then
                        pc
.remove_item(702511)
                        
pc.give_item2(650791)
                        
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 == 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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
!= 0 then
                target
.vid("__TARGET__"vmob_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")==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 
== 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 
!= 0 then
                target
.vid("__TARGET__"vmob_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 
He3o Sippel is offline  
Old 04/19/2014, 13:37   #10043

 
.Namikaze's Avatar
 
elite*gold: 17
Join Date: Mar 2009
Posts: 135
Received Thanks: 30
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

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? <.<
.Namikaze is offline  
Old 04/19/2014, 17:45   #10044
 
.Delta's Avatar
 
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
@ .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(279921)  
                                
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(279931)  
                                
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(279941)  
                                
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(250411)  
                                
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(720021)  
                                    
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(720031)  
                                    
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(720011)  
                                    
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(720051)  
                                    
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(720061)  
                                    
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(720041)  
                                    
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(710273)  
                                
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(710283)  
                                
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(710303)  
                                
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(710293)  
                                
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(7108510)  
                                
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(7108420
                                
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(700243
                                
end 
                            end 
                        end 
                    end 
                end 
            end 
        end 
    end 
end 
.Delta is offline  
Thanks
1 User
Old 04/19/2014, 19:13   #10045
 
elite*gold: 0
Join Date: Jan 2012
Posts: 21
Received Thanks: 0
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
turki77 is offline  
Old 04/19/2014, 22:46   #10046
 
The Cookie Monster's Avatar
 
elite*gold: 134
Join Date: Dec 2013
Posts: 135
Received Thanks: 28
Quest...

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 AnzahlItem 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 
1table.getn(belohnungen), do
                if 
belohnungen[i][1] <= eier then
                    anz_name 
belohnungen[i][1].." "..belohnungen[i][4] -- z.b 2 Schwert+(wobei 2 die Anzahl der Ostereier sind)
                    
table.insert(full_menuanz_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 do
                    
table.insert(teil_menu,full_menu[i])
                    
table.remove(full_menu,i)
                
end
                local s
=select_table(teil_menu) -- Menü 1 
                
if == 7 then
                    
return
                elseif 
== and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == 6 then
                    teil_menu 
= {}
                    for 
do
                        
table.insert(teil_menu,full_menu[i])
                        
table.remove(full_menu,i)
                    
end
                    local s
=select_table(teil_menu) -- Menü 2 
                    
if == 7 then
                        
return
                    elseif 
== and teil_menu[s] != "Abbrechen" then
                        local a
,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 table.getn(belohnungen), 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 
== 2 then
                            
return
                        else
                            
pc.remove_item(50160,value)
                            
pc.give_item(vnum,count)
                        
end
                    
elseif == and teil_menu[s] != "Abbrechen" then
                        local a
,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 table.getn(belohnungen), 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 
== 2 then
                            
return
                        else
                            
pc.remove_item(50160,value)
                            
pc.give_item(vnum,count)
                        
end
                    
elseif == and teil_menu[s] != "Abbrechen" then
                        local a
,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 table.getn(belohnungen), 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 
== 2 then
                            
return
                        else
                            
pc.remove_item(50160,value)
                            
pc.give_item(vnum,count)
                        
end
                    
elseif == and teil_menu[s] != "Abbrechen" then
                        local a
,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 table.getn(belohnungen), 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 
== 2 then
                            
return
                        else
                            
pc.remove_item(50160,value)
                            
pc.give_item(vnum,count)
                        
end
                    
elseif == and teil_menu[s] != "Abbrechen" then
                        local a
,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 table.getn(belohnungen), 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 
== 2 then
                            
return
                        else
                            
pc.remove_item(50160,value)
                            
pc.give_item(vnum,count)
                        
end
                    
elseif == 6 then
                        teil_menu 
= {}
                        for 
do
                            
table.insert(teil_menu,full_menu[i])
                            
table.remove(full_menu,i)
                        
end
                        local s
=select_table(teil_menu) -- Menü 3 
                        
if == 7 then
                            
return
                        elseif 
== and teil_menu[s] != "Abbrechen" then
                            local a
,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 table.getn(belohnungen), 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 
== 2 then
                                
return
                            else
                                
pc.remove_item(50160,value)
                                
pc.give_item(vnum,count)
                            
end
                        
elseif == and teil_menu[s] != "Abbrechen" then
                            local a
,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 table.getn(belohnungen), 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 
== 2 then
                                
return
                            else
                                
pc.remove_item(50160,value)
                                
pc.give_item(vnum,count)
                            
end
                        
elseif == and teil_menu[s] != "Abbrechen" then
                            local a
,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 table.getn(belohnungen), 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 
== 2 then
                                
return
                            else
                                
pc.remove_item(50160,value)
                                
pc.give_item(vnum,count)
                            
end
                        
elseif == and teil_menu[s] != "Abbrechen" then
                            local a
,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 table.getn(belohnungen), 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 
== 2 then
                                
return
                            else
                                
pc.remove_item(50160,value)
                                
pc.give_item(vnum,count)
                            
end
                        
elseif == and teil_menu[s] != "Abbrechen" then
                            local a
,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 table.getn(belohnungen), 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 
== 2 then
                                
return
                            else
                                
pc.remove_item(50160,value)
                                
pc.give_item(vnum,count)
                            
end
                        
elseif == 6 then
                            teil_menu 
= {}
                            for 
do
                                
table.insert(teil_menu,full_menu[i])
                                
table.remove(full_menu,i)
                            
end
                            local s
=select_table(teil_menu) -- Menü 4 
                            
if == 7 then
                                
return
                            elseif 
== 1
                                local a
,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 table.getn(belohnungen), 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 
== 2 then
                                    
return
                                else
                                    
pc.remove_item(50160,value)
                                    
pc.give_item(vnum,count)
                                
end
                            
elseif == and teil_menu[s] != "Abbrechen" then
                                local a
,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 table.getn(belohnungen), 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 
== 2 then
                                    
return
                                else
                                    
pc.remove_item(50160,value)
                                    
pc.give_item(vnum,count)
                                
end
                            
elseif == and teil_menu[s] != "Abbrechen" then
                                local a
,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 table.getn(belohnungen), 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 
== 2 then
                                    
return
                                else
                                    
pc.remove_item(50160,value)
                                    
pc.give_item(vnum,count)
                                
end
                            
elseif == and teil_menu[s] != "Abbrechen" then
                                local a
,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 table.getn(belohnungen), 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 
== 2 then
                                    
return
                                else
                                    
pc.remove_item(50160,value)
                                    
pc.give_item(vnum,count)
                                
end
                            
elseif == and teil_menu[s] != "Abbrechen" then
                                local a
,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 table.getn(belohnungen), 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 
== 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 == 7 then
                    
return
                elseif 
== and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
elseif == and teil_menu[s] != "Abbrechen" then
                    local a
,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 table.getn(belohnungen), 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 
== 2 then
                        
return
                    else
                        
pc.remove_item(50160,value)
                        
pc.give_item(vnum,count)
                    
end
                
else
                    return
                
end
            end
        end
    end
end 
The Cookie Monster is offline  
Old 04/20/2014, 01:13   #10047
 
elite*gold: 0
Join Date: Feb 2012
Posts: 129
Received Thanks: 2
Die PVP Quest geht nicht Error?!
Kann jemand helfen?
KILLER3208 is offline  
Old 04/20/2014, 02:33   #10048
 
elite*gold: 26
Join Date: May 2010
Posts: 865
Received Thanks: 767
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(987600987600)
            elseif 
2==nationen then
                
--pc.warp(98765009876500)
            elseif 
3==nationen then
                
--pc.warp(9876540098765400)
            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:
SYSERRApr 20 03:27:34.453264 :: operator(): QUEST NOT END RUNNING on Login/Logout nation 
mfg.
Dr.Sonii# is offline  
Old 04/20/2014, 11:27   #10049
 
The Cookie Monster's Avatar
 
elite*gold: 134
Join Date: Dec 2013
Posts: 135
Received Thanks: 28
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(987600987600)
            elseif 
2==nationen then
                
--pc.warp(98765009876500)
            elseif 
3==nationen then
                
--pc.warp(9876540098765400)
            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:
SYSERRApr 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^^
The Cookie Monster is offline  
Old 04/20/2014, 12:11   #10050
 
elite*gold: 26
Join Date: May 2010
Posts: 865
Received Thanks: 767
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.
Dr.Sonii# is offline  
Reply




All times are GMT +1. The time now is 04:15.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.