[SERVICE] Die Questkontrolle

quest Dieb begin
state start begin
when login or levelup with pc.get_level() >=5 begin
set_state(information)
end
end

state information begin
when letter begin
local v = find_npc_by_vnum(20006)
if v != 0 then
target.vid("__TARGET__", v, "Mirinie")
end
send_letter("Server Aufklärung")
end
when button or info begin
say_title("Aufklärung")
say("")
say("Gehe zur Mirinie sie hat den Auftrag")
say("dir alles über den Server zu Erklären.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say("Mirinie:")
say("Grundregeln des Servers:")
say("")
say("Sei gegrüst Neuling! Wie ich sehe")
say("hast du dich gerade hier eingeloggt.")
say("Da werde ich dich gleich mal Einweihen!")
say("Ich habe vom CillOut Team die Aufgabe bekommen")
say("dich über alles hier auf den Server aufzuklären!")
say("Fangen wir an!")
say("")
wait()
say_title("Vorgangs Weiße auf den Server")
say("Hier auf den Server wird dein können Getestet!")
say("Das Uppsystem ist auf Brutalste Weiße angepasst")
say("und hällt für die Überraschungen bereit!")
say("Jeder Mob auf den Server hat zusetztlich Bonis")
say("bekommen das sorgt für mehr mühe auf den Server")
say("Die Yang,Exp,Trop und Uppchancen sind per DB eingestellt.")
say("Das sorgt für Verniss auf den Server")
say("Der Server bietet alle Neuen Waffen, Steine,Rüstungen usw...")
say("Zurzeit sind die Waffen bis zu den 92 Waffen Uppbar die")
say("Speziellen Neuen Waffen müssen vorerst bei GM´s erworben werden.")
say("Nun zu den Grundlegenden Kenntnissen:")
say("")
wait()
say_title("Grundlegenden Kenntnissen:")
say("Alle neuen Metinsteine usw eingefügt!")
say("Shops perfekt angepasst!")
say("Dennoch fehlt es dir immer noch an")
say("Respekt hier auf den Server musst du dich")
say("echt beeweißen! Wenn du nicht den Mut und")
say("Ergeiz hast hier was zu erreichen und nicht")
say("gleich alle Geschenkt zu bekommen bist du hier FALSCH!")
say("So und nun Beweg dich und lerne den Server auswendig!")
say("Es nützt nichts wenn du hier rumstehst und")
say("Cillst.")
say("")
say("Willst du weiter auf den Server Spielen?")
say("")
local s = select("Ja, ich schaffe DAS!!!", "Nein, dass schaffe ich nicht ich bin zu schwach!")
if s == 1 then
say("Viel Erfolg!")
say("Euer CillOut Team.")
say("")
else
say("Viel Spaß auf den nächsten Server!")
say("Bitte log dich in den nächsten 5 min aus!")
say("Sonst bekommst du einen Bann!!!")
say("CillOut Team")
set_state( __COMPLETE__ )
end
end
end
state __COMPLETE__ begin
end
end

quest sspupgrade begin
	state start begin
		when 20014.chat."SSP Upgrade" begin
			if pc.get_level() < 90 then
				say("Du bist noch zu schwach, um deinen SSP zu verbessern!")
				say_reward("Komm wieder wenn du Level 90 erreicht hast!")
				return
			end
			say("Heyjo!")
			say("Willst du deinen SSP verbessern?")
			say("Überlege gut, auf welchen Panzer du ihn aufwerten willst!")
			say("Es kann natürlich auch sein, dass es nicht klappt!")
			say("Willst du beginnen?")
			local s=select("Auf gehts!", "Lieber nicht")
			if s==1 then
				say("Nungut!")
				say("Übergib mir deine Rüstung!")
				say("Ich werde sie mit allerhöchster vorsicht aufwerten.")
					if pc.job == 0 then
						local b=select("edelstahl", "mpp",)
						if b==1 then
							if pc.get_gold() < 200000 then
								say("Du hast nicht genug Yang.")
							elseif pc.count_item(11299)>0 then
							pc.remove_item(11299)
							pc.changegold(-200000)
							pc.give_item2(11310)
							else say("zu low")
						else
							if pc.get_gold() < 200000 then
								say("Du hast nicht genug Yang.")
							elseif pc.count_item(11299)>0
							pc.remove_item(11299)
							pc.changegold(-200000)
							pc.give_item2(11209)
							else say("zu low")
							end
							end
						end
					else say("pech gehabt")
					end
			else
				say("Eine gute Entscheidung!")
				say("Auf Wiedersehn")
			end
		end
	end
end