[SERVICE]Ich erstelle Quest jeglicher Art für euch

quest zombie_map begin
state start begin
when 9012.chat."Zombie Map" begin
say_title("Die Zombie Map")
say("")
say("Hey "..pc.get_name()..",
say("Du willst also zur Zombie Map?")
say("ich kann dich Teleportieren!")
say("Willst du?")
local s = select("Ja","Nein")
if s == 2 then
return
end
if s == 1 then
pc.warp(xxxx00, xxxx00)
end
end
end
end

quest dt begin
	state start begin
		when 20016.chat."Die 3 Kraeuter" with pc.level == 70 begin
		say_title("Die 3 Kraeuter")
		say("")
		say("Hey, "..pc.get_name()..",")
		say("Hast du eines der Kraeuter gesehen die ich suche?")
		say("Nein?")
		say("Hmm...das ist schlecht, denn die einzigen")
		say("Personen, die diese Kraeuter besitzten, sind die")
		say("Schmiede im Daemonenturm!")
		say("Nein, sie verkaufen KEIN Marihuana!")
		say("Aber ich brauche diese Kraeuter trotzdem!")
		local s = select("Ja, ich hole die Planzen","Nein, ich will nicht")
		if s == 2 then
		return
		end
		if s == 1 then
			set_state(information)
			end
		end
	end

	state information begin
		when letter begin
			send_letter("Kraeuter fuer den Schmied")
		end

		when info or button begin
			say_title("Kraeuter fuer den Schmied")
			say("")
			say("gehe in den Daemonenturm, und komme so oft")
			say("in die Schmied etage, bis du alle 3 Kraeuter hast!")
			say("Jeder Schmied verkauft ein anderes!")
			say("Komme erst wieder wenn du alle 3 Kraeuter hast!")
			say("Du kannst sie nur mit Level 71, 78 und 80 beim")
			say("Dorfschmied abgeben!")
			say_reward("Merke dir die Level gut!, das ist deine einzige Chance!")
			say_reward("Hole die Kraeuter!")
			say("")
			set_state(__COMPLETE__)
		end
	end

	state __COMPLETE__ begin
	end
end

quest schmied_dt begin 
    state start begin 
        when 20044.chat."Das Kraut" with pc.get_level >=70 begin
		say_title("Das Kraut")
		say("")
		say("Ich habe schon erfahren, dass du auf")
		say("der Suche nach einem sehr seltenen")
		say("Kraut bist!")
		say("Ich kann dir eines der 3 Kraeuter geben!")
		say("Die anderen musst du dir noch bei den")
		say("anderen abholen!")
		say_title("Willst du eines der Kraeuter haben?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(*KRAUT1 ID*)
		end
		end
		when 20045.chat."Das Kraut" with pc.get_level >=70 begin
		say_title("Das Kraut")
		say("")
		say("Ich habe schon erfahren, dass du auf")
		say("der Suche nach einem sehr seltenen")
		say("Kraut bist!")
		say("Ich kann dir eines der 3 Kraeuter geben!")
		say("Die anderen musst du dir noch bei den")
		say("anderen abholen!")
		say_title("Willst du eines der Kraeuter haben?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(*KRAUT2 ID*)
		end
		end
		when 20046.chat."Das Kraut" with pc.get_level >=70 begin
		say_title("Das Kraut")
		say("")
		say("Ich habe schon erfahren, dass du auf")
		say("der Suche nach einem sehr seltenen")
		say("Kraut bist!")
		say("Ich kann dir eines der 3 Kraeuter geben!")
		say("Die anderen musst du dir noch bei den")
		say("anderen abholen!")
		say_title("Willst du eines der Kraeuter haben?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(*KRAUT3 ID*)
		end
		end	
		when 20016.chat."Die 3 Kraeuter" with pc.get_level ==71 begin
		say_title("Die 3 Kraeuter")
		say("")
		say("Wenn du die 3 Kraeuter hast,")
		say("Dann bekommst du")
		say_reward("1x Gegenangriffstrategie")
		say_reward("1x Weisse Perle")
		say_reward("Stein gg Krieger +4")
		say_reward("30.000.000 Yang")
		say("")
		say_title("Hast du alle 3 Kraeuter?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(27992)
		pc.give_item2(28433)
		pc.give_item2(70031)
		pc.change_money(30000000)
		end
		elseif pc.count_item(*KRAUT1 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT2 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT3 ID*) then
		say("Dir fehlt ein Kraut!")
		end
		end
		when 20016.chat."Die 3 Kraeuter" with pc.get_level ==78 begin
		say_title("Die 3 Kraeuter")
		say("")
		say("Wenn du die 3 Kraeuter hast,")
		say("Dann bekommst du")
		say_reward("1x Gegenangriffstrategie")
		say_reward("1x Weisse Perle")
		say_reward("Stein gg Krieger +4")
		say_reward("30.000.000 Yang")
		say("")
		say_title("Hast du alle 3 Kraeuter?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(27992)
		pc.give_item2(28433)
		pc.give_item2(70031)
		pc.change_money(30000000)
		end
		elseif pc.count_item(*KRAUT1 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT2 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT3 ID*) then
		say("Dir fehlt ein Kraut!")
		end
		end
		when 20016.chat."Die 3 Kraeuter" with pc.get_level ==80 begin
		say_title("Die 3 Kraeuter")
		say("")
		say("Wenn du die 3 Kraeuter hast,")
		say("Dann bekommst du")
		say_reward("1x Gegenangriffstrategie")
		say_reward("1x Weisse Perle")
		say_reward("Stein gg Krieger +4")
		say_reward("30.000.000 Yang")
		say("")
		say_title("Hast du alle 3 Kraeuter?")
		local s = select("Ja","Nein")
		if s == 2 then
		return
		end
		if s == 1 then
		pc.give_item2(27992)
		pc.give_item2(28433)
		pc.give_item2(70031)
		pc.change_money(30000000)
		end
		elseif pc.count_item(*KRAUT1 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT2 ID*) then
		say("Dir fehlt ein Kraut!")
		elseif pc.count_item(*KRAUT3 ID*) then
		say("Dir fehlt ein Kraut!")
		end
		end
	end 
end