init

lua/entities/gmod_track_switch/cl_init.lua

@@ -0,0 +1,26 @@
+include("shared.lua")
+
+local debug = GetConVar("metrostroi_drawsignaldebug")
+local function enableDebug()
+    if debug:GetBool() then
+        hook.Add("PostDrawTranslucentRenderables","MetrostroiSwitchDebug",function(bDrawingDepth,bDrawingSkybox)
+            for _,ent in pairs(ents.FindByClass("gmod_track_switch")) do
+                if bDrawingDepth and LocalPlayer():GetPos():Distance(sig:GetPos()) < 512 then
+					local pos = ent:LocalToWorld(Vector(30,0,75))
+					local ang = ent:LocalToWorldAngles(Angle(0,180,90))
+					cam.Start3D2D(pos, ang, 0.25)
+						surface.SetDrawColor(125, 125, 0, 255)
+						surface.DrawRect(0, 0, 160, 24)
+
+						draw.DrawText("SwitchID:"..ent:GetNW2String("ID"),"Trebuchet24",5,0,Color(0,0,0,255))
+					cam.End3D2D()
+                end
+            end
+        end)
+    else
+        hook.Remove("PostDrawTranslucentRenderables","MetrostroiSwitchDebug")
+    end
+end
+hook.Remove("PostDrawTranslucentRenderables","MetrostroiSwitchDebug")
+cvars.AddChangeCallback( "metrostroi_drawsignaldebug", enableDebug)
+enableDebug()

lua/entities/gmod_track_switch/init.lua

@@ -0,0 +1,130 @@
+AddCSLuaFile("shared.lua")
+AddCSLuaFile("cl_init.lua")
+include("shared.lua")
+
+function ENT:Initialize()
+	self:SetModel("models/metrostroi/signals/mus/box.mdl")
+	Metrostroi.DropToFloor(self)
+
+	-- Initial state of the switch
+	self.AlternateTrack = false
+	self.OldAlternateTrack = false
+	self.InhibitSwitching = false
+	self.LastSignalTime = 0
+
+	-- Find rotating parts which belong to this switch
+	local list = ents.FindInSphere(self:GetPos(),game.GetMap():find("metrostroi") and 512 or 256)
+	self.TrackSwitches = {}
+	for k,v in pairs(list) do
+		if (v:GetClass() == "prop_door_rotating") and (string.find(v:GetName(),"switch") or string.find(v:GetName(),"swh") or string.find(v:GetName(),"swit")) then
+			table.insert(self.TrackSwitches,v)
+
+			timer.Simple(0.05,function()
+				debugoverlay.Line(v:GetPos(),self:GetPos(),10,Color(255,255,0),true)
+			end)
+		end
+	end
+
+	Metrostroi.UpdateSignalEntities()
+	Metrostroi.UpdateSwitchEntities()
+	Metrostroi.UpdateARSSections()
+end
+
+function ENT:OnRemove()
+	Metrostroi.UpdateSignalEntities()
+	Metrostroi.UpdateSwitchEntities()
+	Metrostroi.UpdateARSSections()
+end
+
+function ENT:SendSignal(index,channel,route)
+	if not route then
+		if channel and channel ~= self:GetChannel() then return end
+
+		-- Switch to alternate track
+		if index == "alt" then self.AlternateTrack = true end
+		-- Switch to main track
+		if index == "main" then self.AlternateTrack = false end
+
+		-- Remember this signal
+		self.LastSignal = index
+		self.LastSignalTime = CurTime()
+	else
+		if index == "alt" then
+			for k,v in pairs(self.TrackSwitches) do v:Fire(self.Invertred and "Close" or "Open","","0") end
+		elseif index == "main" then
+			for k,v in pairs(self.TrackSwitches) do v:Fire(self.Invertred and "Open" or "Close","","0") end
+		end
+		if index == "alt" then self.AlternateTrack = true end
+		if index == "main" then self.AlternateTrack = false end
+	end
+
+end
+
+function ENT:SwitchTo(index)
+	if index == "alt" then
+		for k,v in pairs(self.TrackSwitches) do v:Fire(self.Invertred and "Close" or "Open","","0") end
+	elseif index == "main" then
+		for k,v in pairs(self.TrackSwitches) do v:Fire(self.Invertred and "Open" or "Close","","0") end
+	end
+end
+
+function ENT:Think()
+	-- Reset
+	self.InhibitSwitching = false
+
+	-- Check if local section of track is occupied or no
+
+	if self.NotChangePos == nil then
+		self.NotChangePos = false
+	end
+	-- Force door state state
+	if self.NotChangePos then
+		self.AlternateTrack = false
+		self.MainTrack = false
+		for k,v in pairs(self.TrackSwitches) do
+			self.AlternateTrack = self.AlternateTrack or not self.Invertred and v:GetSaveTable().m_eDoorState == 2 or self.Invertred and v:GetSaveTable().m_eDoorState == 0
+			self.MainTrack = self.MainTrack or not self.Invertred and v:GetSaveTable().m_eDoorState == 0 or self.Invertred and v:GetSaveTable().m_eDoorState == 2
+		end
+	else
+		local pos = self.TrackPosition
+		if pos and self.AlternateTrack then
+			local trackOccupied = Metrostroi.IsTrackOccupied(pos.node1,pos.x,pos.forward,"switch")
+			if trackOccupied then -- Prevent track switches from working when there's a train on segment
+				self.InhibitSwitching = true
+			end
+		end
+		if self.AlternateTrack then
+			for k,v in pairs(self.TrackSwitches) do if IsValid(v) then v:Fire(self.Invertred and "Close" or "Open","","0") end end
+		else
+			for k,v in pairs(self.TrackSwitches) do if IsValid(v) then v:Fire(self.Invertred and "Open" or "Close","","0") end end
+		end
+		-- Return switch to original position
+		if (self.InhibitSwitching == false) and (self.AlternateTrack == true) and
+		   (CurTime() - self.LastSignalTime > 20.0) then
+			self:SendSignal("main",self:GetChannel())
+		end
+		-- Force signal
+		if self.LockedSignal then
+			self:SendSignal(self.LockedSignal,self:GetChannel())
+		end
+	end
+	if self.AlternateTrack ~= self.OldAlternateTrack then
+		self.OldAlternateTrack = self.AlternateTrack
+		hook.Run("MetrostroiChangedSwitch",self,self.AlternateTrack)
+	end
+	-- Process logic
+	self:NextThink(CurTime() + 1.0)
+	if self.Name and self.Name ~= "" then
+		self:SetNW2String("ID",self.Name)
+	elseif self.TrackPosition then
+		--PrintTable(self.TrackPosition.node1)
+		self:SetNW2String("ID",self.TrackPosition.path.id.."/"..self.TrackPosition.node1.id)
+	end
+	return true
+end
+
+function ENT:GetSignal()
+	if self.InhibitSwitching and self.AlternateTrack then return 1 end
+	if self.AlternateTrack then return 3 end
+	return 0
+end

lua/entities/gmod_track_switch/shared.lua

@@ -0,0 +1,10 @@
+ENT.Type            = "anim"
+
+ENT.Category		= "Metrostroi (utility)"
+
+ENT.Spawnable       = true
+ENT.AdminSpawnable  = true
+
+function ENT:SetupDataTables()
+	self:NetworkVar("Int", 0, "Channel")
+end