quest change_guild_master begin
	state start begin
		function change_master( name , level_limit , time_resign_limit , time_be_other_leader , time_be_other_member , iscacheitem )
			local ret = guild.change_master_with_limit( name , level_limit , time_resign_limit , time_be_other_leader , time_be_other_member, iscacheitem)
			local result = false
			if ret == 0 then
				say("Wprowadzono nieprawidłowa nazwę.")
			elseif ret == 1 then
				say("Tylko liderzy gildii mogą korzystać z tej pozycji.")
			elseif ret == 2 then
				say("Nie możesz znaleźć członków gildii.")
			elseif ret == 3 then
				say("Pomyślnie zmieniono lidera gildii.")
				result = true
			elseif ret == 4 then
				say("Nie jesteś w gildii.")
			elseif ret == 5 then
				say("Gracz nie jest online.")
			elseif ret == 6 then
				say("Poziom gracza jest zbyt niski.")
			elseif ret == 7 then
				say("Gracz jest za krótko, aby być liderem.")
			end
			return result
		end
		when 71099.use begin
			say_title("Pierscien Sekcji")
			if pc.is_guild_master() == false then
				say("Tylko liderzy moga korzystac z pierscienia.")
				say("")
				return
			end
			say_reward("Wprowadź nazwę swojego lidera!")
			say("")
			local s = input()
			say_title("Pierscień Sekcji")
			if s == pc.name then
				say("Nie można wpisać nazwy.")
				say("")
				return
			elseif s == "" then
				say("Wpisz nazwę!")
				say("")
				return
			end
			if not pc.is_near_vid( find_pc_by_name( s ) , 10 ) then
				say("Gracz musi być z Tobą!")
				say("")
				return
			end
			if change_guild_master.change_master( s , 40 , 0 , 0 , 0 ,true) == true then
				pc.remove_item(71099)
			elseif ret == 5 then
			elseif ret == 6 then
				say("Poziom gracza jest zbyt niski!")
			end
		end
	end
end
quest item_change_sex begin
	state start begin
		when 71048.use begin
			if pc.get_level() < 50 then
				say_title("Zmiana płci")
				say("")
				say("Chciałbyś zmienić płeć?")
				say("Przykro mi lecz nie posiadasz")
				say("odpowiedniego poziomu by tego dokonać.")
				say("")
				say_reward("Aby zmienić płeć osiągnij 50 poziom!")
				return;
			end
			if pc.is_engaged() then
				say_title("Zmiana Płci")
				say("")
				say("Chciałbyś zmienić płeć?")
				say("Przykro mi lecz nie możesz zmienić ")
				say("płci gdyż jesteś zaręczony!")
				say_reward("Nie możesz zmienić płci będąc zaręczonym!")
				say("")
				say("")
				say("")
				say("")
				return;
			end
			if pc.is_married() then
				say_title("Zmiena Płci")
				say("")
				say("Chciałbyś zmienić płeć?")
				say("Przykro mi lecz nie możesz zmienić ")
				say("płci gdyż jesteś w związku!")
				say("")
				say_reward("Nie możesz będąc w związku!")
				say("")
				say("")
				say("")
				say("")
				return;
			end
			if pc.is_polymorphed() then
				say_title("Zmiena Płci")
				say("")
				say("Chciałbyś zmienić płeć?")
				say("Przykro mi lecz nie możesz zmienić ")
				say("płci gdyż jesteś potworem!")
				say("")
				say_reward("Nie możesz zmienić płci będąc potworem!")
				say("")
				return
			end
			if get_time() < pc.getqf("next_time") then
				say_title("Zmiena Płci")
				say("")
				say("Chciałbyś zmienić płeć?")
				say("Przykro mi lecz nie możesz zmienić ")
				say("płci gdyż Twój czas od ostatniej")
				say("zmiany jeszcze nie minął!")
				say("")
				say_reward("Musisz odczekać 3 dni!")
				say("")
				if pc.is_gm() then
					say(string.format("    %s", time_to_str(pc.getqf("next_time"))))
					say("")
					say("Jesteś GM!")
					say("Możesz zmieniać płeć kiedy tylko zechcesz!")
					say("lecy Twjój czas od ostatniej zmiany")
					say("jeszcze nie minął...")
					say("Możesz go jednak zrestartować!")
					say_reward("Czy chcesz zresetować czas?")
					local s = select("Tak!", "Nie..")
					if s == 1 then
						say("Twój czas został zrestartowany.")
						say("Możesz teraz zmienić płeć!")
						pc.setqf("next_time", 0)
					end
				end
				return
			end
			say_title("Zmiana Płci")
			say("Więc chciałbyś zmienić swoją płeć?")
			say("")
			say("czy zdajesz sobie sprawę jakie tego")
			say("są konsekwencje?")
			wait()
			say_title("Zmiana płci")
			say("Możesz zmieniać płeć tylko co trzy dni.")
			say("Nie możesz już zmienić płci jak będziesz w związku.")
			say("Czy jesteś tego pewien?.")
			say("")
			say_reward("Czy chcesz zmienić swoją płeć?")
			local s=select(
				"Tak, chciałbym!",
				"Jednak się rozmyśliłem..")
			if 1==s then
				say_title("Zmiana Płci")
				say("Zmieniłeś swoją płeć!")
				say("od teraz jesteś inną osobą..")
				say("")
				say_reward("Proszę zmień postać w celu uaktualnienia płci.")
				say("")
				pc.remove_item("71048",1)
				pc.setqf("next_time", get_time() + 86400 * 3)
				pc.change_sex()
				local m_sex = pc.get_sex()
				if m_sex == 0 then
				    char_log(0, "CHANGE_SEX", "F -> M")
				else
				    char_log(0, "CHANGE_SEX", "M -> F")
				end
			elseif 2==s then
				say_title("Zmiana Płci")
				say("Słuszny wybór!")
				say("Nie warto zmieniać płci..")
			end
		end
	end
end
quest reset_status begin
	state start begin
		when 71103.use or 71104.use or 71105.use or 71106.use begin
			local name = { "VIT", "INT", "STR", "DEX" }
			local idx = item.get_vnum() - 71103
			local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }
			if func[idx+1]() == 1 then
				say(name[idx+1].." jest już.")
				say(name[idx+1].." nie można zresetować..")
				say("")
				return
			end
			say_title("Reset statusu:")
			say("Dzięki temu zwoju możesz zresetować swoje")
			say(name[idx+1].." punkty.")
			say("")
			say_reward("Chcesz zresetować: "..name[idx+1].." ?")
			local s = select("Tak!", "Nie!")
			if s == 1 then
				if pc.reset_status( idx ) == true then
					say_title("Reset statusu:")
					say_reward("Twoje "..name[idx+1].." punkty zostały zresetowane!")
					say("")
					pc.remove_item(item.get_vnum())
				else
					say_title("Reset statusu:")
					say_reward("Wystąpił błąd.")
					say("")
				end
			end
		end
	end
end
quest reset_scroll begin
    state start begin
		when 71002.use begin
			local result = BuildSkillList(pc.get_job(), pc.get_skill_group())
			local vnum_list = result[1]
			local name_list = result[2]
			if table.getn(vnum_list) < 2 then
				syschat("<Skille>Nie wybrałes jeszce drogi rozwoju.")
			else
				say_orzech("Zwój zapomnienia")
				say("Czy chcesz zapomnieć swoich umiejętności?")
				local s = select("Tak", "Jednak Nie")
				if s == 1 then
					local b = number(0, 1)
					if b == 0 then
						syschat("<Skille>Zrozumiałeś zawartość zwoju.")
						pc.set_skill_group(0)
						pc.clear_skill()
					else
						syschat("<Skille>Niestety nie zrozumiałeś zawartość zwoju.")
					end
					pc.remove_item(71002, 1)
				end
			end
		end
		when 71003.use begin
			say_title("Powrót umiejętności")
			say("Zastosowanie tego umożliwia przywrócenie punktów ")
			say("umiejętności")
			say("Po przeczytaniu zostanie przywrócone 17 punktów.")
			local result = BuildSkillList(pc.get_job(), pc.get_skill_group())
			local vnum_list = result[1]
			local name_list = result[2]
			if table.getn(vnum_list) < 2 then
				say("")
				say_reward("Nie masz rozdanych żadnych umiejętności!")
				say("")
				return
			end
			say("")
			say_reward("Wybierz umiejętność:")
			local i = select_table(name_list)
			if table.getn(name_list) == i then
				return
			end
			local name = name_list[i]
			local vnum = vnum_list[i]
			say_title("Ostrzeżenie:")
			say_reward("Nie możesz odwrócić tego efektu")
			say_reward("i zostanie przywrócone tylko 17 punktów")
			say_reward("umiejętności! ")
			say("")
			say(string.format("Czy przywrócić %s ", name))
			local s = select("Tak!", "Nie.")
			if 2 == s then
				return
			end
			char_log(0, "RESET_ONE_SKILL", "USE_ITEM(71003)")
			pc.remove_item(71003)
			char_log(0, "RESET_ONE_SKILL", string.format("RESET_SKILL[%s]", name))
			pc.clear_one_skill(vnum)
			char_log(0, "RESET_ONE_SKILL", "APPLY_17MASTER_BONUS")
			pc.setqf("force_to_master_skill", 1)
			say_title("Sukcess!")
			say(string.format("%s - pomyślnie przywrócono!", name))
			say("")
			say_reward("Zostało dodane 17 punktów. ")
			say("")
		end
	end
end

quest changeempire begin
	state start begin
		when 71054.use begin
			if pc.is_engaged() then
				syschat("Jesteś zaręczony/zaręczona,")
				syschat("Nie możesz zmienić królestwa.")
				syschat("")
			elseif pc.is_married() then
				syschat("Jesteś żonaty/zamężna,")
				syschat("Nie możesz zmienić królestwa.")
			elseif pc.is_polymorphed() then
				syschat("Jesteś przemieniony")
				syschat("Nie możesz zmienić królestwa.")
			elseif pc.has_guild() then
				syschat("Jesteś w Gildii.")
				syschat("Nie możesz zmienić królestwa.")
			else
				say_malina("Olejek Wygnania:")
				say("Czy chcesz wetrzeć olejek?")
				local s = select("Tak", "Chyba sobie żartujesz.")
				if s == 1 then
					if pc.get_empire() == 1 then
						say_malina("Olejek Wygnania:")
						say("Zmieniasz narodowość,")
						say("od teraz Narfell jest twoim domem.")
						say_reward("-Przeloguj się, aby zawierdzić zmiany")
						pc.change_empire(3)
						pc.remove_item(71054, 1)
					elseif pc.get_empire() == 3 then
						say_malina("Olejek Wygnania:")
						say("Zmieniasz narodowość,")
						say("od teraz Damara jest twoim domem.")
						say_reward("-Przeloguj się, aby zawierdzić zmiany")
						pc.change_empire(1)
						pc.remove_item(71054, 1)
					end
				end
			end
		end
	end
end