[QUEST]Anfänger - Hilfe!

quest Blablatest begin
	state run begin
		when login with pc.level<=45 begin
			set_state(information)
		end
	end
	state information begin 
		when letter begin 
			send_letter("Schatzsuche") 
		end
		when button or info begin
			say_title("Schatzsuche")
			say("In diesem Gebiet ist eine Schatztruhe vergraben.")
			say("Sie beinhaltet ein Vermögen und viele kostbare Dinge.")
			say("Finde den Schlüssel & die Karte, die dich zu ihr führt.")
			say("Der Schlüssel ist in einem Stein versteckt. Zerstöre ihn.")
			say("Starke Wüstenbanditen bewachen & hüten die Schatzkarte.")
			say_reward("Zerstöre Metin d. Schattens um den Schlüssel zu bekommen.")
			say_reward("Töte die Banditen, welche die Schatzkarte bewachen.")
		end
		when 8009.kill begin
			local s = number(1, 200)
			if s <= 5 then
				pc.give_item2(Value des Schlüssels)
				if pc.count_item(Value der Karte) == 1 and pc.count_item(Value des Schlüssels) == 1 then
					set_state(finish)
				end
			end
		end
		when 2108.kill begin
			local s = number(1, 200)
			if s <= 5 then
				pc.give_item2(Value der Karte)
				if pc.count_item(Value der Karte) == 1 and pc.count_item(Value des Schlüssels) == 1 then
					set_state(finish)
				end
			end
		end
	end
	state finish begin
		when letter begin
			local v = find_npc_by_vnum(Value des NPC's)
			if v != 0 then
				target.vid("__TARGET__", v, "Briefname")
			end
			send_letter("Briefname")
		end
		when button or info begin
			say_title("Überschrift")
			say("Text")
		end
		when Value des NPC's.klick begin
			target.delete("__TARGET__")
			say_title("Name des NPC's")
			say("Text")
			pc.give_item2(Item-Belohung)
			pc.give_exp(EXP-Belohung)
			pc.change_money(Yang-Belohung)
		end
	end
end