quest warpring begin
	state start begin
		when 70058.use begin
			local x
			local y
			local t
			local e = pc.get_empire()
			say_title("Teleporter:")
			say("Incotro vrei sa mergi straine?")
			local s = select("Map1", "Map2", "Valea Orcilor", "Desert", "Sohan", "Tara de foc", "Urmatoarele", "Inchide")
			if s==7 then
				say_title("Teleporter:")
				say("Incotro vrei sa mergi straine?")
				local p = select("DT", "V1(44-60)", "Padurea Fantomelor", "Padurea Rosie", "V3-PvP", "V2(60-75)", "V4(75+)", "Inchide")
				if p==1 then
					x="590400"
					y="110500"
				elseif p==2 then
					x="91900"
					y="525400"
				elseif p==3 then
					x="289000"
					y="5800"
				elseif p==4 then
					say_title("Teleporter")
					say("Incotro vrei sa mergi straine?")
					t = select("Inceput", "Sfarsit", "Inchide")
					if t==1 then
						x="1119900"
						y="70800"
					elseif t==2 then
						x="1119200"
						y="7000"
					end
				elseif p==5 then
					x="10000"
					y="1214200"
				elseif p==6 then
					x="704100"
					y="464100"
				elseif p==7 then
					x="241700"
					y="1274900"
				end
			elseif s==1 then
				say_title("Teleporter")
				say("Incotro vrei sa mergi straine?")
				t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru","Inchide")
				if t==1 then
					x="473900"
					y="954600"
				elseif t==2 then
					x="63200"
					y="166700"
				elseif t==3 then
					x="959600"
					y="269700"
				end
			elseif s==2 then
				say_title("Teleporter:")
				say("Incotro vrei sa mergi straine?")
				t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru", "Inchide")
				if t==1 then
					x="352300"
					y="882700"
				elseif t==2 then
					x="145700"
					y="239800"
				elseif t==3 then
					x="863800"
					y="246000"
				end
			elseif s==3 then
				say_title("Teleporter:")
				say("Incotro vrei sa mergi straine?")
				t = select("Inceput", "Centru", "Arahani", "Inchide")
				if t==1 then
					if e==1 then
						x="402100"
						y="673900"						
					elseif e==2 then
						x="270400"
						y="739900"
					elseif e==3 then
						x="321300"
						y="808000"
					end
				elseif t==2 then
					x="332700"
					y="745600"
				elseif t==3 then
					x="282800"
					y="792800"
				end
			elseif s==4 then
				say_title("Teleporter:")
				say("Incotro vrei sa mergi straine?")
				t = select("Inceput", "Sfarsit", "Inchide")
				if t==1 then
					if e==1 then
						x="217800"
						y="627200"						
					elseif e==2 then
						x="221900"
						y="502700"
					elseif e==3 then
						x="344000"
						y="502500"
					end
				elseif t==2 then
					x="296300"
					y="547500"
				end
			elseif s==5 then
				say_title("Teleporter")
				say("Incotro vrei sa mergi straine?")
				t = select("Inceput", "Mijloc", "Inchide")
				if t==1 then
					if e==1 then
						x="434200"
						y="290600"						
					elseif e==2 then
						x="375200"
						y="174900"
					elseif e==3 then
						x="491800"
						y="173600"
					end
				elseif t==2 then
					x="436200"
					y="215300"
				end			
			elseif s==6 then
				say_title("Teleporter:")
				say("Incotro vrei sa mergi straine?")
				t = select("Inceput", "Inchide")
				if t==1 then
					if e==1 then
						x="599400"
						y="756300"						
					elseif e==2 then
						x="597800"
						y="622200"
					elseif e==3 then
						x="730700"
						y="689800"
					end
				elseif t==2 then
					return
				end
			end			
			if s!=8 or p!= 7 then
				pc.warp(x, y)
			end
		end
	end
end