[SCRIPT] Quest Generator

quest main_quest_lv55 begin
	state start begin
		when login or levelup or enter with pc.get_level() >= 55 begin
			setstate( gototeacher )
		end
	end
	state gototeacher begin
		when letter begin
			send_letter("Die Dunklen Beschw\195\182rer")

			local v=find_npc_by_vnum(20354)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Gehe zu ")
			end
		end
		when button or info begin
            say_title(":")
			say("Gehe zum Stadtw\195\164chter er hat einen Auftrag f\195\188r dich.")
		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")

			say_title(":")                                            l
            say("Ah, da bist du wie ich sehe ist was aus dir geworden,
[ENTER]ich habe hier eine neue Aufgabe f\195\188r dich.
[ENTER]Bitte gehe in das Orktal und erledige f\195\188r mich
[ENTER]die Stolzer Dunkler Beschw\195\182rer")
            wait()
            say("Wenn du mir den beweis bringen kannst erh\195\164lst du eine belohnung.")
			say_reward("T\195\182te f\195\188r den Stadtw\195\164chter 100 c")
			say("")
			set_state(kill)	

			pc.setqf("state", 0)
			q.set_counter("Restanzahl ", 0)
		end

	end

	state kill begin
		when letter begin
			send_letter("")
		end
		when button or info begin
			say_title(":")
			say("Du musst 100  t\195\182ten")
			say("")

			say_reward(..pc.getqf("state").." von 100 der Art   get\195\182tet")
			say("")
		end
		when 737.kill begin
			local count = pc.getqf("state") + 1

			if count <= 100 then
				pc.setqf("state", count)
				q.set_counter("Restanzahl ", 10 - count)

				if count == 100 then
					say_title(":")
					say("")
                    say("Komm nun bitte zu mir.")
					set_state(gototeacher2)
				end
			end
		end
		when 20354.chat." Jagen erledigt." with pc.getf("main_quest_lv2","state") < 10 begin
			say_title(":")
            say("Du hast die Aufgabe noch nicht angeschlossen")

			if pc.is_gm() then
				wait()
				say_title(":")
				say("Aufgabe \195\188berspringen?")
				local s = select("Ja", "Nein")
				if s == 1 then
					set_state(gototeacher2)
				end
			end
		end
		when 20354.chat." Jagen erledigt." with pc.getf("main_quest_lv2","state") >= 10 begin
			say_title(":")
			say("Ah, du hast es geschafft ich danke dir hier bekommst du etwas von mir")
			set_state(gototeacher2)
		end
	end
	state gototeacher2 begin
		when letter begin
			local v=find_npc_by_vnum(20354)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Gehe zu ")
			end
		end
		when letter begin
			send_letter("T\195\182te Stolzer Dunkler Beschw\195\182rer")
		end
		when button or info begin
			say_title("T\195\182te Stolzer Dunkler Beschw\195\182rer")
			say("Mache dich auf dem weg und hole den Beweis der vernichtung.")
		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say("Mache dich auf dem weg und hole den Beweis der vernichtung.")
                        say_reward("EXP 500000")
			pc.give_exp2( 500000 )
            			set_quest_state("levelup","run") -- levelup quest wieder starten
						pc.change_money( 100000 )
            say_reward("Yang 100000")
            					       )
              say_reward("Einige Gegenstaende")
            					       )
              say_reward("Pferd Level 1")
            			clear_letter()
			set_state( __COMPLETE__ )

			pc.setqf("state", 0) --Wenn wir in der Aufgabe Variablen setzen, kann die DB Belastung reduziert werden.
		end
	end
	state __COMPLETE__ begin
	end
end