Web Kino

--[[
Teather 1.0 @KonradSch 2015
Namensnennung benötigt bei verwendung auf anderen Servern
--]]
-- theater server
Theater = {}
Theater.NullUrl = "http://www.youtube.com/watch?v=dolT4pz_oCg"
Theater.Video = ""
Theater.Running = false
Theater.Players = {}
Theater.Map = {
{2395,-2.4,6.8,-6,0,0,0,1},{2395,-17.6,3.6,-6,0,0,90,1},{2395,-9.8,6.8,-6,0,0,0,1},{2395,-13.5,6.8,-6,0,0,0,1},{2395,-17.2,6.8,-6,0,0,0,1},{2395,-6.1,6.8,-6,0,0,0,1},{2395,-17.6,-0.1,-6,0,0,90,1},{2395,-17.6,-3.8,-6,0,0,90,1},{2395,-17.6,-7.5,-6,0,0,90,1},{2395,-17.6,-11.2,-6,0,0,90,1},{2395,-17.6,-14.9,-6,0,0,90,1},{2395,-14.4,-15.3,-6,0,0,180,1},{2395,-10.7,-15.3,-6,0,0,179.995,1},{2395,-7,-15.3,-6,0,0,179.995,1},{2395,-3.3,-15.3,-6,0,0,179.995,1},{2395,0.4,-15.3,-6,0,0,179.995,1},{2395,0.8,-12.1,-6,0,0,270,1},{2395,0.8,-8.4,-6,0,0,270,1},{2395,0.8,-4.7,-6,0,0,270,1},{2395,0.8,-1,-6,0,0,270,1},{2395,0.8,2.7,-6,0,0,270,1},{2395,0.8,6.4,-6,0,0,270,1},{3983,1.4,-13.9,-9.7,0,0,0,1},{3983,-4.3,-17,-5.4,0,180,0,1},{2395,-14.40039,-15.2998,-8.74,0,0,179.995,1},{2395,-10.70019,-15.2998,-8.74,0,0,179.995,1},{2395,-7,-15.2998,-8.74,0,0,180,1},{2395,-3.2998,-15.2998,-8.74,0,0,179.995,1},{2395,0.40039,-15.2998,-8.74,0,0,179.995,1},{2395,-17.59961,-14.90039,-8.74,0,0,90,1},{2395,-17.59961,-11.20019,-8.74,0,0,90,1},{2395,-17.59961,-7.5,-8.74,0,0,90,1},{2395,-17.59961,-3.7998,-8.74,0,0,90,1},{2395,-17.59961,-0.09961,-8.74,0,0,90,1},{2395,-17.59961,3.59961,-8.74,0,0,90,1},{2395,-17.20019,6.7998,-8.74,0,0,0,1},{2395,-13.5,6.7998,-8.74,0,0,0,1},{2395,-9.7998,6.7998,-8.74,0,0,0,1},{2395,-6.09961,6.7998,-8.74,0,0,0,1},{2395,-2.40039,6.7998,-8.74,0,0,0,1},{2395,0.7998,6.40039,-8.74,0,0,270,1},{2395,0.7998,2.7002,-8.74,0,0,270,1},{2395,0.7998,-1,-8.74,0,0,270,1},{2395,0.7998,-4.7002,-8.74,0,0,270,1},{2395,0.7998,-8.40039,-11.48,0,0,270,1},{2395,0.7998,-12.09961,-8.74,0,0,270,1},{2395,-14.40039,-15.2998,-11.48,0,0,179.995,1},{2395,-10.70019,-15.2998,-11.48,0,0,179.995,1},{2395,-7,-15.2998,-11.48,0,0,179.995,1},{2395,-3.2998,-15.2998,-11.48,0,0,179.995,1},{2395,0.40039,-15.2998,-11.48,0,0,179.995,1},{2395,-17.59961,-14.90039,-11.48,0,0,90,1},{2395,-17.59961,-11.20019,-11.48,0,0,90,1},{2395,-17.59961,-7.5,-11.48,0,0,90,1},{2395,-17.59961,-3.7998,-11.48,0,0,90,1},{2395,-17.59961,-0.09961,-11.48,0,0,90,1},{2395,-17.59961,3.59961,-11.48,0,0,90,1},{2395,-17.2002,6.7998,-11.48,0,0,0,1},{2395,-13.5,6.7998,-11.48,0,0,0,1},{2395,-9.7998,6.7998,-11.48,0,0,0,1},{2395,-6.09961,6.7998,-11.48,0,0,0,1},{2395,-2.40039,6.7998,-11.48,0,0,0,1},{2395,0.7998,6.40039,-11.48,0,0,270,1},{2395,0.7998,2.7002,-11.48,0,0,270,1},{2395,0.7998,-1,-11.48,0,0,270,1},{2395,0.7998,-8.40039,-8.74,0,0,270,1},{2395,0.7998,-4.7002,-11.48,0,0,270,1},{2395,0.7998,-12.09961,-11.48,0,0,270,1},{1259,-7,-11.7,-15.9,0,0,270,1.8},{2291,-8.9,-0.2,-11.5,0,0,0,1},{2291,-9.9,-0.2,-11.5,0,0,0,1},{2291,-10.9,-0.2,-11.5,0,0,0,1},{2291,-7.9,-0.2,-11.5,0,0,0,1},{2291,-6.9,-0.2,-11.5,0,0,0,1},{2291,-5.9,-0.2,-11.5,0,0,0,1},{2291,-4.9,-0.2,-11.5,0,0,0,1},{2291,-4.9,2.2,-10.5,0,0,0,1},{2291,-5.9,2.2,-10.5,0,0,0,1},{2291,-6.9,2.2,-10.5,0,0,0,1},{2291,-7.9,2.2,-10.5,0,0,0,1},{2291,-8.9,2.2,-10.5,0,0,0,1},{2291,-9.9,2.2,-10.5,0,0,0,1},{2291,-10.9,2.2,-10.5,0,0,0,1},{1475,-3.1,-0.45,-11.95,0,0,0,1},{1475,-11.7,-0.45,-11.95,0,0,0,1},{1476,-3.1,1.3,-10.9,0,0,0,1},{1476,-11.7,1.3,-10.9,0,0,0,1},{1476,-10.2,1.3,-10.9,0,0,0,1},{1476,-8.7,1.3,-10.9,0,0,0,1},{1476,-7.2,1.3,-10.9,0,0,0,1},{1476,-5.7,1.3,-10.9,0,0,0,1},{1476,-4.5,1.3,-10.9,0,0,0,1},{1475,-3.1,2.056,-11.15,0,0,0,1},{1476,-4.6,3.8,-10.1,0,0,0,1},{1476,-6.1,3.8,-10.1,0,0,0,1},{1476,-7.5,3.8,-10.1,0,0,0,1},{1476,-9,3.8,-10.1,0,0,0,1},{1476,-10.5,3.8,-10.1,0,0,0,1},{1476,-11.7,3.8,-10.1,0,0,0,1},{1475,-11.7,2.0316,-11.165,0,0,0,1},{2291,-5.9,4.9,-9.6,0,0,0,1},{2291,-4.8,4.9,-9.6,0,0,0,1},{2291,-7.9,4.9,-9.6,0,0,0,1},{2291,-6.9,4.9,-9.6,0,0,0,1},{2291,-8.9,4.9,-9.6,0,0,0,1},{2291,-9.9,4.9,-9.6,0,0,0,1},{2291,-10.9,4.9,-9.6,0,0,0,1},{1476,-3.1,3.8,-10.1,0,0,0,1},{1475,-11.7,4.6,-10.3,0,0,0,1},{1475,-3.1,4.7,-10.3,0,0,0,1},{1476,-11.7,6.35,-9.25,0,0,0,1},{1476,-10.2,6.35,-9.25,0,0,0,1},{1476,-8.7,6.35,-9.25,0,0,0,1},{1476,-7.2,6.35,-9.25,0,0,0,1},{1476,-5.7,6.35,-9.25,0,0,0,1},{1476,-4.6,6.35,-9.25,0,0,0,1},{1476,-3.1,6.35,-9.25,0,0,0,1},{3062,-17.7,6.86,-10.1,0,0,0,1},}
function Theater.Init()
	Theater.GenerateCinema()
	addCommandHandler("playyt",function(player,cmd,url)
		local x,y,z = getElementPosition(player)
		setElementData(player,"LastPositionBeforeCinema",{x = x,y = y,z = z},false)
		if getElementData(player,"Cinema") == nil or getElementData(player,"Cinema") == false then
			Theater.TeleportToCinema(player)
		end
		if url == nil then
			outputChatBox("Keine Url angegeben = nur teleport")
		else
			outputChatBox("Url angegeben = teleport und url set")
			Theater.Video = url
		end
	end)
	addCommandHandler("startyt",function(player,cmd)
		if getElementData(player,"Cinema") and getElementData(player,"Cinema") == true then
			Theater.StopVideo()
			Theater.StartVideo()
		end
	end)
	addCommandHandler("stopyt",function(player,cmd)
		if getElementData(player,"Cinema") and getElementData(player,"Cinema") == true then
			Theater.StopVideo()
		end
	end)
	Theater.CreateMarkers()
	for i,k in pairs(getElementsByType("player")) do
		setElementData(k,"Cinema",false)
	end	
	outputDebugString("[SERVER] KonradSch Teather has been initalized")
end
function Theater.GenerateCinema()
	for i,v in ipairs(Theater.Map) do
		local obj = createObject(v[1], v[2], v[3], v[4], v[5], v[6], v[7])
		setObjectScale(obj, v[8])
		setElementDimension(obj, 0)
		setElementInterior(obj, 0)
		setElementDoubleSided(obj, true)
	end
end
function Theater.StartVideo()
	for i,k in pairs(Theater.Players) do
		Theater.TriggerVideo(k,Theater.Video)
	end
	Theater.Running = true
end
function Theater.StopVideo()
	for i,k in pairs(Theater.Players) do
		Theater.TriggerVideo(k,Theater.NullUrl)
	end
	Theater.Running = true
end
function Theater.TriggerVideo(player,url)
	local sx,sy,sz,rotX,rotY,rotZ,lx,ly,lz = -1980.900390625, -520.900390625,39,0,0,270.7470703125,0,0,270.7470703125 --leinwand
	triggerClientEvent("RestartTheater",player)
	triggerClientEvent("ChangeTeatherURL",player,url,sx,sy,sz,rotX,rotY,rotZ,lx,ly,lz,url ~= Theater.NullUrl)
end
function Theater.TeleportToCinema(player)
	triggerClientEvent("StartTheater",player)
	fadeCamera(player,false)
	setTimer(function()
		fadeCamera(player,true)
		setElementDimension(player,0)
		setElementPosition(player,-2003,-519,35)   -- spawn im cinema
		setElementData(player,"Cinema",true)
		table.insert(Theater.Players,player)
		if Theater.Running == true then
			Theater.StopVideo()
			Theater.StartVideo()
		else
			Theater.StopVideo()
		end
	end,1000,1)
end
function Theater.TeleportFromCinema(player)
	triggerClientEvent("StopTheater",player)
	fadeCamera(player,false)
	setTimer(function()
		fadeCamera(player,true)
		setElementDimension(player,0)
		Theater.TriggerVideo(player,Theater.NullUrl)
		local data = getElementData(player,"LastPositionBeforeCinema")
		setElementPosition(player,data.x,data.y,data.z)
		setElementData(player,"Cinema",false)
		for i,k in pairs(Theater.Players) do
			if k == player then
				table.remove(Theater.Players,i)
			end
		end
	end,1000,1)
end
function Theater.MarkerHit(obj,matchDim)
	if getElementType(obj) == "player" and isPedInVehicle(obj) == false then
		Theater.TeleportFromCinema(obj)
	end
end
function Theater.CreateMarkers()
	Theater.BackMarker = createMarker(-16.992305,6.171184,-9.5,"arrow",2,255,0,0)
	setElementDimension(Theater.BackMarker,1)
	addEventHandler( "onMarkerHit", Theater.BackMarker, Theater.MarkerHit )
end
Theater.Init()