[SERVICE] Die Questkontrolle

quest armortrade2 begin
	state start begin
		when 9001.chat."110er zur 120er Rüstung Uppen" begin
			say("Hey Landratte")
			say("Möchtest du deine Lv110 Rüstung zur Lv120 Rüstung Uppen?")
			say("")
			say("Es kostet dich 100000000 Yang, 10x Plasma Perlen, 10x Violetter Kristall, 10x Weißer Kristall.")
			local a=select("Ja, Krieger","Ja, Sura","Ja, Ninja","Ja, Schamane","Nein Danke")
			if 1==a then
				if pc.money>=100000000 and pc.count_item("13229")>=1 and pc.count_item("33012")>=10 and pc.count_item("33014")>=10 and pc.count_item("33015")>=10 then
					pc.changemoney(-100000000)
					pc.removeitem("13229", 1)
					pc.removeitem("33012", 10)
					pc.removeitem("33014", 10)
					pc.removeitem("33015", 10)
					say("Hier hast du eine")
					say("Level 120er Krieger Rüstung")
					pc.give_item2("13250", 1)
				else
					say("Ok")
					say("Dann nicht")
					say("Hast bestimmt wichtigeres zu tun.")
				end
			elseif 2==a then
				if pc.money>=100000000 and pc.count_item("13219")>=1 and pc.count_item("33012")>=10 and pc.count_item("33014")>=10 and pc.count_item("33015")>=10 then
					pc.changemoney(-100000000)
					pc.removeitem("13219", 1)
					pc.removeitem("33012", 10)
					pc.removeitem("33014", 10)
					pc.removeitem("33015", 10)
					say("Hier hast du eine")
					say("Level 120er Sura Rüstung")
					pc.give_item2("13280", 1)
				else
					say("Ok")
					say("Dann nicht")
					say("Hast bestimmt wichtigeres zu tun.")
				end
			elseif 3==a then
				if pc.money>=100000000 and pc.count_item("13239")>=1 and pc.count_item("33012")>=10 and pc.count_item("33014")>=10 and pc.count_item("33015")>=10 then
					pc.changemoney(-100000000)
					pc.removeitem("13239", 1)
					pc.removeitem("33012", 10)
					pc.removeitem("33014", 10)
					pc.removeitem("33015", 10)
					say("Hier hast du eine")
					say("Level 120er Ninja Rüstung")
					pc.give_item2("13270", 1)
				else
					say("Ok")
					say("Dann nicht")
					say("Hast bestimmt wichtigeres zu tun.")
				end
			elseif 4==a then
				if pc.money>=100000000 and pc.count_item("13249")>=1 and pc.count_item("33012")>=10 and pc.count_item("33014")>=10 and pc.count_item("33015")>=10 then
					pc.changemoney(-100000000)
					pc.removeitem("13249", 1)
					pc.removeitem("33012", 10)
					pc.removeitem("33014", 10)
					pc.removeitem("33015", 10)
					say("Hier hast du eine")
					say("Level 120er Schamanen Rüstung")
					pc.give_item2("13260", 1)
				else
					say("Ok")
					say("Dann nicht")
					say("Hast bestimmt wichtigeres zu tun.")
				end
			elseif 5==a then
				return
			end
		end
	end
end

quest korb begin
	state start begin
		when 50180.use begin
			say_title("Leerer Korb:")
			say("")
			say_gold("Willst du den Korb mit Eiern Füllen?")
			say_gold("du brauchst immer 5 Eier egal welcher art")
			say_gold("dafür erhälst du im austausch ein Korb mit Ostereiern")
			say_gold("da kommen Tolle ding raus")
			local main_set = select("Ja, befühlen","Nein, jetzt nicht")
			if main_set == 2 then
				return
			end
			if pc.count_item(50168) < 5 then
				say_gold("du hast nicht genug Ostereier du") 
				say_gold("kannst denn Korb nicht fühlen.")
				return
			end
			pc.removeitem(50168, 5)
			pc.removeitem(50180, 1)
			pc.give_item2(50181)    
		end
	end
end

quest feuerundeis begin      
    state start begin  
        when login or levelup with pc.level >= 80 and pc.level <= 127 begin 
            local v=find_npc_by_vnum(20023)  
            if 0==v then  
            else  
                target.vid("__TARGET__", v, "Soon")  
            end  
            send_letter("Feuer und Eis")  
        end 

        when button or info begin 
            say_title("Feuer und Eis") 
            say("") 
            say("Soon sucht dich er braucht deine Hilfe!") 
            say("er sagte es sei sehr wichig und sehr") 
            say("dringend beeil dich lieber!") 
            say("") 
            say_reward("Gehe zu Soon") 
            say("") 
        end  

        when 20023.chat."Feuer und Eis" begin  
            say_title("Soon")  
            say("")  
            say("Hey da bist du ja endlich!")  
            say("ich habe dich schon gesucht...")  
            say("naja kommen wir zur sache, ich brauche")  
            say("deine Hilfe. Nachdem du mir das")  
            say("Legendäre Tagebuch verkauft hast bin ich")  
            say("auf einen Tipp gestoßen!")  
            say("Du musst für mich nun nurnoch ein paar Dinge")  
            say("erledigen!")  
            say("Zuerst musst du mir die Düstere Holzmaske") 
            say("in eine Verzauberte Asche umwandeln")  
            say("indem du Flammengeister tötest!")  
            say("")  
            say_reward("Ziehe los und töte Flammengeister.") 
            pc.give_item2(100031, 1)  
            target.delete("__TARGET__")  
            set_state(kill)  
        end  
    end 

    state kill begin 
        when letter begin  
            send_letter("Feuer und Eis")              
        end  
        when button or info begin  
            say_title("Feuer und Eis")  
            say("")  
            say("Soon hat dir Aufertragen die Düstere Holzmaske")  
            say("in eine Verzauberte Asche zu Verwandeln!")  
            say("Dies kannst du machen indem du Flammengeister")  
            say("tötest!")  
            say("") 
            say_reward("Töte Flammengeister um die Düstere Holzmaske") 
            say_reward("in eine Verzauberte Asche umzuwandeln!")    
        end 
        when 2202.kill begin  
            local n = number(1,100)  
            if n <= 15 then 
                pc.remove_item(100031,1)  
                pc.give_item2(100032, 1)  
                    if pc.count_item(100032) == 1 then 
                        say_title("Feuer und Eis")  
                        say("")  
                        say("Du hast die Verzauberte Asche!")  
                        say("nun gehe zurück zu Soon und gib sie ihm.")  
                        say("") 
                        say_reward("Kehre zurück zu Soon!")   
                        set_state(backtosoon)  
                    end  
            end  
        end          
    end  

    state backtosoon begin  
        when letter begin  
            send_letter("Feuer und Eis")  
              
            local v=find_npc_by_vnum(20023)  
            if 0==v then  
            else  
                target.vid("__TARGET1__", v, "Soon")  
            end  

        end  
        when button or info begin  
            say_title("Feuer und Eis")  
            say("")  
            say("Du hast die Verzauberte Asche!")  
            say("nun gehe zurück zu Soon und gib sie ihm.")  
            say("") 
            say_reward("Kehre zurück zu Soon!")  
        end 
        when 20023.chat."Feuer und Eis" with pc.count_item(100032)==1 begin   
            target.delete("__TARGET1__")  
            say_title("Soon")  
            say("")  
            say("Ahh wie erwartet!")  
            say("Du hast die Verzauberte Asche")  
            say("Dann gib sie mal her ich werde das")  
            say("Analysieren.")   
            say("") 
            wait() 
            say_title("Soon")  
            say("")  
            say("Das sieht gut aus!")  
            say("jedoch brauche ich noch 10x Klumpen Eis!")  
            say("Gehe in das Eisland und töte Yetis!")  
            say("")   
            say_reward("Gehe ins Eisland und töte dort Yetis") 
            say_reward("Bis du 10x Klumpen Eis hast!")  
            pc.remove_item(100032,1)  
            set_state(kill2) 
        end  
    end 
    
     state kill2 begin 
        when letter begin  
            send_letter("Feuer und Eis")              
        end  
        when button or info begin  
            say_title("Feuer und Eis")  
            say("")  
            say("Nachdem du Soon die Verzauberte Asche")  
            say("besorgt hast, möchte er noch das du")  
            say("in das Eisland gehst und dort Yetis tötest")  
            say("bis du 10x Klumpen Eis von ihnen bekommen hast.")  
            say("") 
            say_reward("Gehe in das Eisland und töte Yetis") 
            say_reward("bis du 10x Klumpen Eis hast!")    
        end 
        when 1106.kill begin  
            local n = number(1,100)  
            if n <= 15 then  
                pc.give_item2(100033, 1)  
                    if pc.count_item(100033) == 10 then 
                        say_title("Feuer und Eis")  
                        say("")  
                        say("Klasse!")  
                        say("Du hast 10x Klumpen Eis gedroppt") 
                        say("Gehe nun zurück zu Soon und bring")  
                        say("sie ihm!")  
                        say("") 
                        say_reward("Kehre zurück zu Soon!")   
                        set_state(backtosoon2)  
                    end  
            end  
        end          
    end 

     state backtosoon2 begin  
        when letter begin  
            send_letter("Feuer und Eis")  
              
            local v=find_npc_by_vnum(20023)  
            if 0==v then  
            else  
                target.vid("__TARGET2__", v, "Soon")  
            end  

        end  
        when button or info begin   
            say_title("Feuer und Eis")  
            say("")  
            say("Nachdem du Soon die Verzauberte Asche")  
            say("besorgt hast, möchte er noch das du")  
            say("in das Eisland gehst und dort Yetis tötest")  
            say("bis du 10x Klumpen Eis von ihnen bekommen hast.")  
            say("") 
            say_reward("Gehe in das Eisland und töte Yetis") 
            say_reward("bis du 10x Klumpen Eis hast!")  
        end 
        when 20023.chat."Feuer und Eis" with pc.count_item(100033)==10 begin   
            target.delete("__TARGET2__") 
            say_title("Soon")  
            say("")  
            say("Gut gemacht du hast die Eisklumpen!")  
            say("Du bist wirklich ein starker Kämpfer")  
            say("lass mich die eisklumpen einen moment")  
            say("untersuchen.")   
            say("") 
            wait() 
            say_title("Soon")  
            say("")  
            say("Ich habe die Verzauberte Asche mit den")  
            say("Eisklumpen vermischt und sie wurden zu")  
            say("einem ganz komischen Schwarzen Eis") 
            say("Gerüchten zu folge muss man das")  
            say("Schwarze Eis auf den Dunklen Schrein")  
            say("der Grotte der Verbannung legen!") 
            say("das wäre doch die ideala aufgabe für dich!")  
            say("")   
            say_reward("Gehe in die Grotte der Verbannung") 
            say_reward("und benutzt das Schwarze eis auf dem") 
            say_reward("Dunklen Schrein!")  
            pc.remove_item(100033,10) 
            pc.give_item2(100034, 1)  
            set_state(gotoschrein) 
        end  
    end 

     state gotoschrein begin  
        when letter begin  
            send_letter("Feuer und Eis")  
              
            local v=find_npc_by_vnum(30123)  
            if 0==v then  
            else  
                target.vid("__TARGET3__", v, "Dunkler Schrein")  
            end  

        end  
        when button or info begin   
            say_title("Feuer und Eis")  
            say("")  
            say("Es ist fast vollbracht du musst nun")  
            say("nurnoch das Schwarze Eis an dem")  
            say("Dunklen Schrein benutzen!")   
            say("") 
            say_reward("Gehe in die Grotte der Verbannung") 
            say_reward("und benutzte das Schwarze Eis am") 
            say_reward("Dunklen Schrein.")  
        end 
        when 30123.chat."Schwarzes Eis benutzen" with pc.count_item(100034)==1 begin   
            target.delete("__TARGET3__") 
            say_title("Dunkler Schren")  
            say("")  
            say("Du willst das Schwarze Eis benutzten?")  
            say("nun gut ich lass es dich benutzen!") 
            pc.remove_item(100034,1) 
            set_state(backtosoon3) 
        end  
    end 

     state backtosoon3 begin  
        when letter begin  
            send_letter("Feuer und Eis")  
              
            local v=find_npc_by_vnum(20023)  
            if 0==v then  
            else  
                target.vid("__TARGET4__", v, "Soon")  
            end  

        end  
        when button or info begin   
            say_title("Feuer und Eis")  
            say("")  
            say("Du hast das Schwarze Eis erfolgreich")  
            say("am Dunklen Schrein benutzt!")  
            say("Gehe nun zu Soon zurück und berichte")  
            say("ihm davon!")  
            say("") 
            say_reward("Kehre zurück zu Soon.") 
        end 
        when 20023.chat."Feuer und Eis" begin 
            target.delete("__TARGET4__") 
            say_title("Soon")  
            say("")  
            say("Der Dunkle Schrein?!")  
            say("Das, Das, Das ist Unglaublich!")  
            say("warte mal kurz ich brauch nen moment.") 
            say("") 
            wait() 
            say_title("Soon")  
            say("")  
            say("Du hast es wirklich geschafft")  
            say("das Schwarze eis an dem")  
            say("Dunklen Schrein zu benutzen!") 
            say("dafür hast du dir deine Belohnung")  
            say("reglich verdient!")   
            say("") 
            say_reward("120.000.000 EXP erhalten")  
            say_reward("3.000.000 Yang erhalten") 
            pc.give_exp2(120000000)  
            pc.change_money(3000000)
			set_state(__complete)
        end  
    end
	state __complete begin
	end
end

quest rsrun begin
    state start begin
		when 20019.chat."Die Legendären Metins" begin
			if pc . get_level ( ) > 2 then 
				say ("Du bist kein GM!") 
			else 
				say_title("Teleporter:")
				say("")
				say("Ich werde dich in die Map der Legendären Metins teleportieren.")
				say("")
				say_reward("Soll ich dich in die Map der Legendären Metins teleportieren?")
				
				local s = select("Teleportieren", "Hier bleiben")
					if s == 1 then
						pc.warp(5510100, 5505400)
					else
						return
					end
			end
		end
		
		when 1093.kill or 1192.kill with pc.get_map_index()==193 begin
			local jump1 = number(1, 20)
			if jump1<=10 then
				chat("Das muss der Die Legendaeren Metins sein.")
				chat("Bringe die Karte nach Yang-Shing.")
				game.drop_item(30126, 1)
			else
				chat("Hier war anscheinend keine Karte..")
				warp_to_village()
			end
		end
		
		when 20019.chat."Die Karte" with pc.get_map_index()==193 begin
		
			if pc.count_item(30126)>=1 then
				say("Du hast eine Karte gefunden?!")
				say("Lass mal sehen!")
				pc.removeitem("30126", 1)
				wait()
				say("Okay, ich denke als nächstes..")
				say("Ja das ist okay.. Bis später!")
				wait()				
				pc.warp(5512000, 5521100)
				d.setf("rslevel", 1)
				-- Removed Schlüsselsteine aus deinem Inventar falls vorhanden, um Bugusing vorzubeugen. --
				local boxto7= pc.count_item(30300)  
				pc.remove_item(30300,boxto7)
			--------------------------------------------------------------------------------------------
				local vid = d.spawn_mob(8028, 55, 177)
				d.regen_file("data/dungeon/rsrun_regen2.txt")
				d.set_unique("real", vid)
				d.notice("Zerstöre alle Monster und Metins.");
			else
				say("Ich habe gehört, dass man hier")
				say("in der Umgebung Teile von Karten finden kann,")
				say("wenn man sie zerstört. Wenn du mir ein solches")
				say("Teil bringen könntest, könnte ich dich in das")
				say("nächste Gebiet teleportieren, da ich dann das")
				say("Gebiet genauer untersuchen könnte.")
			end
		end
		
		when 8028.kill with pc.in_dungeon() begin
			if d.is_unique_dead("real") then
				d.setf("rslevel", 2)
				d.clear_regen()
				pc.warp(5517600, 5506200)
			end
		end
------------------
		when chat."Die Legendaeren Metins" begin
			if pc.money>=10 then
				pc.changemoney(-10)
				local vid = d.spawn_mob(11505, 60, 197)
				d.regen_file("data/dungeon/rsrun_regen3.txt")
				d.set_unique("real1", vid)
				d.notice("Zerstöre den Goldenen Frosch.");
			else
				say("Zerstöre den Goldenen Frosch.")
			end
		end
	
		when 11505.kill with pc.in_dungeon() begin
			if d.is_unique_dead("real1") then
				d.setf("rslevel", 3)
				d.clear_regen()
				pc.warp(5521700, 5510300)
			end
		end

------------------
		when chat."Die Legendaeren Metins" begin
			if pc.money>=10 then
				pc.changemoney(-10)
				local vid = d.spawn_mob(11508, 217, 111)
				d.regen_file("data/dungeon/rsrun_regen4.txt")
				d.set_unique("real2", vid)
				d.notice("Zerstöre den Feuer der Macht.");
			else
				say("Zerstöre den Feuer der Macht.")
			end
		end
		
		when 11508.kill with pc.in_dungeon() begin
				if d.is_unique_dead("real2") then
				d.setf("rslevel", 4)
				d.clear_regen()
				pc.warp(5521900, 5516200)
			end
		end
------------------
		when chat."Die Legendaeren Metins" begin
			if pc.money>=10 then
				pc.changemoney(-10)
				local vid = d.spawn_mob(11510, 219, 176)
				d.regen_file("data/dungeon/rsrun_regen5.txt")
				d.set_unique("real3", vid)
				d.notice("Zerstöre den Feuer der Macht.");
			else
				say("Zerstöre den Feuer der Macht.")
			end
		end
		
		when 11510.kill with pc.in_dungeon() begin
				if d.is_unique_dead("real3") then
				d.setf("rslevel", 5)
				d.clear_regen()
				pc.warp(5515200, 5517800)
			end
		end
------------------
		when chat."Die Legendaeren Metins" with pc.in_dungeon() and d.getf("rslevel") == 5 begin	
			say_title("Finale Ebene")
			say("Jetzt kommt die Finale Ebene.")
			say("Viel glück und Viel spaß wünscht dir das RoyalStarsMT2 Team")
			wait()
			d.setf("rslevel", 6)
			timer("rsrun_jump1", 1)			
		end
------------------
		when rsrun_jump1.timer begin
				d.regen_file("data/dungeon/rsrun_regen6.txt")
				d.spawn_mob(8034, 148, 114)
				d.spawn_mob(8035, 147, 109)
				d.spawn_mob(8036, 152, 106)
				d.spawn_mob(8037, 157, 108)
				d.spawn_mob(8038, 157, 115)
				d.spawn_mob(8039, 153, 119)
				d.setf("rsrunstone_count", 6)
				timer('rsrunstone1', 300)
				d.notice("Dies ist die Final Ebene!!! Mache schnell und töte alle Metins wenn möglich, um alle Upp-Items zu erhalten");
			end
		
		when rsrunstone1.timer begin
			d.notice("Verbleibende Zeit: 5 Minuten")
			timer('rsrunstone2', 300)
		end

		when rsrunstone2.timer begin
			d.clear_regen()
			d.setf("rslevel", 0)
			d.notice("Die Zeit ist abgelaufen")
			d.notice("Ihr werdet nun nach draußen teleportiert")
			warp_to_village()
		end
	end
end

quest find_squareguard begin
	state start begin
	end

	state run begin
		when login with pc.level<=5 begin
			set_state(find)
		end
	end
	state find begin
		when letter begin
			if pc.get_empire()==1 then
				find_npc_vnum = 20088
			elseif pc.get_empire()==2 then
				find_npc_vnum = 20089
			elseif pc.get_empire()==3 then
				find_npc_vnum = 20355
			end

			local v=find_npc_by_vnum(find_npc_vnum)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Kage des Dorfes")
			end
		end
		when letter begin
			send_letter("Kage des Dorfes")
		end
		when button begin
			say(locale.NOTICE_COLOR.." INformation:"..locale.NORMAL_COLOR)
			say("Gehe ins Dorf und sprich mit")
			say("dem Kage deines Dorfes")
		end
		when info begin
			say(locale.NOTICE_COLOR.." INformation:"..locale.NORMAL_COLOR)
			say("Gehe ins Dorf und sprich mit")
			say("dem Kage deines Dorfes")

		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say("Willkommen in unserem Dorf, Genin!")
			say("Wenn du in deinen Beutel siehst, ist dir vielleicht")
			say("schon ein Item mit dem Namen 'Segen des Engels' ")
			say("oder das Item 'Horn des dunklen Fürsten' aufgefallen.")
			say("Öffne diese Items, um deine Missionen zu erhalten.")
			say("Jede erfüllte Mission lässt dich in deinem Rang")
			say("aufsteigen. Achja, kannst du mir einen gefallen tun ?")
			local b=select("Ja")
			if 1==b then
				say("Mir ist das Kampf-Pulver ausgegangen,")
				say("und ein Kage unserer verfeindeten Dörfer")
				say("will sich mit mir duellieren !")
				say("Ohne dieses wichtige Pulver binn ich aufgeschmissen !")
				say("Bei der Gemischtwarenheandlerinn kannst du")
				say("dieses Pulver bekommen. Hier hast du 10.000 Gold")
				pc.changemoney(10000
				set_state(buy)
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
	end
	state buy begin
		when letter begin
			local v=find_npc_by_vnum(9003)
			if 0==v then
			else
				target.vid("__TARGET__", v, "")
			end
		end
		when letter begin
			send_letter("Kaufe Kampf-Pulver")
		end
		when button or info begin
			say(locale.NOTICE_COLOR.." Information:"..locale.NORMAL_COLOR)
			say("Kaufe Kampf-Pulver bei der Gemischtwaren-")
			say("heandlerinn und bringe ihn dem Kage.")
		end
		when 20088.chat."¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")
		end
		when 20089.chat." ¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")

		end
		when 20355.chat." ¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")

		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say("Sei gegruesst Abenteurer!")
			say("Oh, der ehrenwerte Kage schickt dich zu")
			say("mir? Er benötigt wieder Kampf-Pulver?")
			say("Ich gebe dir 10 Pulverfläschchen!")
			say("Hier, nimm sie. Sie dienen der unerkannten")
			say("Flucht im Kampf, und sind bei schwierigen")
			say("Gegnern sehr wirksam.")
			say("[DELAY value=300]... Weiter ... [/DELAY]")
			say("§ä¨ì¤F. ¦å²~´N¬O¦³¥Í©R¤O«ì´_®ÄªGªºª««~. ")
			say("")
			wait()
			say("Du bist zwar neu hier in dieser Gegend, aber ich ")
			say("bin davon ueberzeugt, dass du bald ein")
			say("regelmässiger Kunde sein wirst. Aus diesem Grund")
			say("überlasse ich dir das Pulver kostenlos. Komm")
			say("bald mal wieder.")
			pc.give_item2("90007", 10)
			set_state(deliver)
		end
	end
	state deliver begin
		when letter begin
			if pc.get_empire()==1 then
				find_npc_vnum = 20088
			elseif pc.get_empire()==2 then
				find_npc_vnum = 20089
			elseif pc.get_empire()==3 then
				find_npc_vnum = 20355
			end

			local v=find_npc_by_vnum(find_npc_vnum)
			if 0==v then
			else
				target.vid("__TARGET__", v, "¥h§ä¾Ô»î")
			end





		end
		when letter begin
			send_letter("Rueckkehr zum Weachter des Dorfplatzes")
		end
		when button or info begin
			say(locale.NOTICE_COLOR.." Information:"..locale.NORMAL_COLOR)
			say("Kehre zum Kage deines Dorfes zurück,")
			say("und händige ihm das Kampf-Pulver aus.")
		end
		when __TARGET__.target.click with pc.countitem("27001")<1 begin
			target.delete("__TARGET__")
			say("§A»¡¦å²~¤w¸g½æ§¹¤F?")
			say("«u§r ~«ç»ò·|¨Æ. *þ¨S¤èªk")
			say("§A®³¥h³Ñ¤Uªº¿ú§a")
			say("*è¤~¾·~±Ð©x§ä§A")
			say("§A¥h§ä¥L§a")
			set_quest_state("find_skillteacher", "find")
			set_state(__COMPLETE__)
		end
		when __TARGET__.target.click with pc.countitem("90007")>=1 begin
			target.delete("__TARGET__")
			say("Vielen Dank, dass du mir das Kampf-Pulver")
			say("gebracht hast !So musste ich meinen Platz hier im Dorf")
			say("nicht verlassen und kann dem feindlichen Kage wieder")
			say("ohne Furcht entgegentreten.")
			wait()
			say("Uebrigens sind die Lehrer auf der Suche nach dir")
			say("Du solltest dich zu ihnen begeben.")
			say("Oh, eines heatte ich fast vergessen!")
			say("Als Zeichen meiner Wertscheatzung kannst du das")
			say("Wechselgeld behalten!")
			say("Wir werden uns sicherlich speater ")
			say("wiedersehen")
			if pc.countitem("90007")>=1 then
				pc.removeitem("90007", 1)
				local r=number(1, 4)
				if r==1 then
					pc.give_item2("12209", 1)
				elseif r==2 then
					pc.give_item2("12349", 1)
				elseif r==3 then
					pc.give_item2("12489", 1)
				elseif r==4 then
					pc.give_item2("12629", 1)
				end
			end
			set_quest_state("find_skillteacher", "find")
			clear_letter()
			set_state(__COMPLETE__)
		end
	end
	state __COMPLETE__ begin
	end
end

quest find_skillteacher2 begin
	state start begin
	end

	state run begin
		when login with pc.level<=1 begin
			set_state(find)
		end
	end
	state find begin
		when letter begin
			if pc.get_empire()==1 then
				find_npc_vnum = 20088
			elseif pc.get_empire()==2 then
				find_npc_vnum = 20089
			elseif pc.get_empire()==3 then
				find_npc_vnum = 20355
			end

			local v=find_npc_by_vnum(find_npc_vnum)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Kage des Dorfes")
			end
		end
		when letter begin
			send_letter("Kage des Dorfes")
		end
		when button begin
			say(locale.NOTICE_COLOR.." Information:"..locale.NORMAL_COLOR)
			say("Gehe ins Dorf und sprich mit")
			say("dem Kage deines Dorfes")
		end
		when info begin
			say(locale.NOTICE_COLOR.." INformation:"..locale.NORMAL_COLOR)
			say("Gehe ins Dorf und sprich mit")
			say("dem Kage deines Dorfes")

		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say("Willkommen in unserem Dorf, Genin!")
			say("Wenn du in deinen Beutel siehst, ist dir vielleicht")
			say("schon ein Item mit dem Namen 'Segen des Engels' ")
			say("oder das Item 'Horn des dunklen Fürsten' aufgefallen.")
			say("Öffne diese Items, um deine Missionen zu erhalten.")
			say("Jede erfüllte Mission lässt dich in deinem Rang")
			say("aufsteigen. Achja, kannst du mir einen gefallen tun ?")
			local b=select("Ja")
			if 1==b then
				say("Mir ist das Kampf-Pulver ausgegangen,")
				say("und ein Kage unserer verfeindeten Dörfer")
				say("will sich mit mir duellieren !")
				say("Ohne dieses wichtige Pulver binn ich aufgeschmissen !")
				say("Bei der Gemischtwarenheandlerinn kannst du")
				say("dieses Pulver bekommen. Hier hast du 10.000 Gold")
				pc.changemoney(10000)
				set_state(buy)
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
	end
	state buy begin
		when letter begin
			local v=find_npc_by_vnum("9003")
			if 0==v then
			else
				target.vid("__TARGET__", v, "")
			end
		end
		when letter begin
			send_letter("Kaufe Kampf-Pulver")
		end
		when button or info begin
			say(locale.NOTICE_COLOR.." Information:"..locale.NORMAL_COLOR)
			say("Kaufe Kampf-Pulver bei der Gemischtwaren-")
			say("händlerin und bringe ihn dem Kage.")
		end
		when 20088.chat."¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")
		end
		when 20089.chat." ¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")

		end
		when 20355.chat." ¦b*þ¸Ì¥i¥H¶R¦å²~?" begin
			say("¦bÂø³f°Ó©±¥i¥H¶R¦å²~")
			say("¥h¤p«¬¦a¹Ï¤W¼Ð¥ÜªºÂø³f©±ªº")
			say("¥D¤Hªº¦ì¸m")

		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say("Sei gegruesst Abenteurer!")
			say("Oh, der ehrenwerte Kage schickt dich zu")
			say("mir? Er benötigt wieder Kampf-Pulver?")
			say("Ich gebe dir 10 Pulverfläschchen!")
			say("Hier, nimm sie. Sie dienen der unerkannten")
			say("Flucht im Kampf, und sind bei schwierigen")
			say("Gegnern sehr wirksam.")
			say("[DELAY value=300]... Weiter ... [/DELAY]")
			say("§ä¨ì¤F. ¦å²~´N¬O¦³¥Í©R¤O«ì´_®ÄªGªºª««~. ")
			say("")
			wait()
			say("Du bist zwar neu hier in dieser Gegend, aber ich ")
			say("bin davon ueberzeugt, dass du bald ein")
			say("regelmässiger Kunde sein wirst. Aus diesem Grund")
			say("überlasse ich dir das Pulver kostenlos. Komm")
			say("bald mal wieder.")
			pc.give_item2("90007", 10)
			set_state(deliver)
		end
	end
	state deliver begin
		when letter begin
			if pc.get_empire()==1 then
				find_npc_vnum = 20088
			elseif pc.get_empire()==2 then
				find_npc_vnum = 20089
			elseif pc.get_empire()==3 then
				find_npc_vnum = 20355
			end

			local v=find_npc_by_vnum(find_npc_vnum)
			if 0==v then
			else
				target.vid("__TARGET__", v, "¥h§ä¾Ô»î")
			end
		end
		when letter begin
			send_letter("Rueckkehr zum Kage des Dorfes")
		end
		when button or info begin
			say(locale.NOTICE_COLOR.." Information:"..locale.NORMAL_COLOR)
			say("Kehre zum Kage deines Dorfes zurück,")
			say("und händige ihm das Kampf-Pulver aus.")
		end
		when __TARGET__.target.click with pc.countitem("90007")<1 begin
			target.delete("__TARGET__")
			say("§A»¡¦å²~¤w¸g½æ§¹¤F?")
			say("«u§r ~«ç»ò·|¨Æ. *þ¨S¤èªk")
			say("§A®³¥h³Ñ¤Uªº¿ú§a")
			say("*è¤~¾·~±Ð©x§ä§A")
			say("§A¥h§ä¥L§a")
			set_quest_state("find_skillteacher", "find")
			set_state(__COMPLETE__)
		end
		when __TARGET__.target.click with pc.countitem("90007")>=1 begin
			target.delete("__TARGET__")
			say("Vielen Dank, dass du mir das Kampf-Pulver")
			say("gebracht hast !So musste ich meinen Platz hier im Dorf")
			say("nicht verlassen und kann dem feindlichen Kage wieder")
			say("ohne Furcht entgegentreten.")
			wait()
			say("Uebrigens sind die Lehrer auf der Suche nach dir")
			say("Du solltest dich zu ihnen begeben.")
			say("Oh, eines hätte ich fast vergessen!")
			say("Als Zeichen meiner Wertschätzung kannst du das")
			say("Wechselgeld gerne behalten!")
			say("Wir werden uns sicherlich im Verlaufe der Zeit ")
			say("Noch einmal Wiedersehen.")
			if pc.countitem("90007")>=1 then
				pc.removeitem("90007", 1)
				local r=number(1, 4)
				if r==1 then
					pc.give_item2("12209", 1)
				elseif r==2 then
					pc.give_item2("12349", 1)
				elseif r==3 then
					pc.give_item2("12489", 1)
				elseif r==4 then
					pc.give_item2("12629", 1)
				end
			end
			set_quest_state("find_skillteacher", "find")
			clear_letter()
			set_state(__COMPLETE__)
		end
	end
	state __COMPLETE__ begin
	end
end