wnsrc/lua/entities/prop_door_dynamic.lua

--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| 	Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]


AddCSLuaFile()

ENT.Base = "base_entity"
ENT.Type = "anim"

ENT.AutomaticFrameAdvance = true

function ENT:Initialize()

	if ( CLIENT ) then return end

	self.NextToggle = 0
	self.CloseDelay = 0

	-- self:PhysicsInit( SOLID_VPHYSICS )

	if ( SERVER ) then
		self:CreateBoneFollowers()
	end

	if ( self:GetModel() == "models/props/portal_door_combined.mdl" ) then
		self:SetOpened( true )
		self:Close()
	end

end

function ENT:SetupDataTables()

	self:NetworkVar( "Bool", 0, "Opened" )
	self:NetworkVar( "Bool", 1, "Locked" )

	if ( SERVER ) then
		self:SetOpened( false )
		self:SetLocked( false )
	end

end

function ENT:SetCloseDelay( num )

	self.CloseDelay = tonumber( num )

end

function ENT:OnDuplicated( table )

	-- On duplicaton, if opened, make sure the animation is all good
	if ( self:GetOpened() ) then
		self:SetOpened( false )
		local locked = self:GetLocked()
		self:SetLocked( false )
		self:Open()
		self:SetLocked( locked )
	end

end

function ENT:PlayAnimation( str )

	self:ResetSequence( self:LookupSequence( str ) )

end

function ENT:Open()

	if ( self.NextToggle > CurTime() or self:GetLocked() or self:GetOpened() == true ) then return end

	self:PlayAnimation( "Open" )

	local model = self:GetModel():lower()
	if ( model == "models/props_mining/elevator01_cagedoor.mdl" ) then
		self:EmitSound( "ambient/levels/outland/ol04elevatorgate_up.wav" )
	end
	if ( model == "models/props_mining/techgate01.mdl" or model == "models/props_mining/techgate01_outland03.mdl" ) then
		self:EmitSound( "ambient/levels/outland/ol03_slidingoverhead_open.wav" )
	end
	if ( model == "models/props_lab/elevatordoor.mdl" ) then
		self:EmitSound( "plats/hall_elev_door.wav" )
	end
	if ( model == "models/props/portal_door_combined.mdl" ) then
		self:EmitSound( "plats/door_round_blue_unlock_01.wav" )
		timer.Simple( SoundDuration("plats/door_round_blue_unlock_01.wav") - 0.3, function()
			if ( !IsValid( self ) ) then return end
			self:EmitSound( "plats/door_round_blue_open_01.wav" )
		end )
	end
	if ( model == "models/combine_gate_vehicle.mdl" ) then
		self:EmitSound( "Doors.CombineGate_citizen_move1" )
		self:EmitSound( "plats/hall_elev_door.wav" )
		timer.Simple( self:SequenceDuration() - 0.7, function()
			if ( !IsValid( self ) ) then return end
			self:StopSound( "Doors.CombineGate_citizen_move1" )
			self:EmitSound( "Doors.CombineGate_citizen_stop2" )
		end )
	end

	self.NextToggle = CurTime() + self:SequenceDuration()
	self:SetOpened( true )

	if ( self.CloseDelay < 0 ) then return end
	timer.Create( "rb655_door_autoclose_" .. self:EntIndex(), self:SequenceDuration() + self.CloseDelay, 1, function() if ( IsValid( self ) ) then self:Close() end end )

end

function ENT:Close()

	if ( self.NextToggle > CurTime() or self:GetLocked() or self:GetOpened() == false ) then return end

	timer.Remove( "rb655_door_autoclose_" .. self:EntIndex() )

	self:PlayAnimation( "close" )

	local model = self:GetModel():lower()
	if ( model == "models/props_mining/elevator01_cagedoor.mdl" ) then
		self:EmitSound( "ambient/levels/outland/ol01a_gate_open.wav" )
	end
	if ( model == "models/props_mining/techgate01.mdl" or model == "models/props_mining/techgate01_outland03.mdl" ) then
		self:EmitSound( "ambient/levels/outland/ol03_slidingoverhead_open.wav" )
	end
	if ( model == "models/props_lab/elevatordoor.mdl" ) then
		self:EmitSound( "plats/elevator_stop1.wav" )
	end
	if ( model == "models/props/portal_door_combined.mdl" ) then
		self:EmitSound( "plats/door_round_blue_close_01.wav" )
		timer.Simple( SoundDuration("plats/door_round_blue_close_01.wav") - 0.3, function()
			if ( !IsValid( self ) ) then return end
			self:EmitSound( "plats/door_round_blue_lock_01.wav" )
		end )
	end
	if ( model == "models/combine_gate_vehicle.mdl" ) then
		self:EmitSound( "Doors.CombineGate_citizen_move1" )
		self:EmitSound( "plats/hall_elev_door.wav" )
		timer.Simple( self:SequenceDuration() - 0.7, function()
			if ( !IsValid( self ) ) then return end
			self:StopSound( "Doors.CombineGate_citizen_move1" )
			self:EmitSound( "Doors.CombineGate_citizen_stop2" )
		end )
	end

	self.NextToggle = CurTime() + self:SequenceDuration()
	self:SetOpened( false )

end

function ENT:OnRemove()

	if ( SERVER ) then
		self:StopSound( "Doors.Move10" ) -- Small combine doors
		self:StopSound( "Doors.Move11" ) -- Kleiner lab door
		self:StopSound( "Doors.Move12" ) -- Vertical combine doors
		self:StopSound( "Doors.CombineGate_citizen_move1" ) -- Big Combine doors
	end

end

function ENT:AcceptInput( name, activator, caller, data )

	name = string.lower( name )

	if ( name == "open" and self.NextToggle < CurTime() and !self:GetLocked() and self:GetOpened() == false ) then
		self:Open()
	elseif ( name == "close" and self.NextToggle < CurTime() and !self:GetLocked() and self:GetOpened() == true ) then
		self:Close()
	elseif ( name == "lock" ) then
		self:SetLocked( true )
	elseif ( name == "unlock" ) then
		self:SetLocked( false )
	end

end

function ENT:Think()

	if ( SERVER ) then
		self:UpdateBoneFollowers()

		self:NextThink( CurTime() )
		return true
	end

end

function ENT:Draw( flags )

	self:DrawModel( flags )

end

function ENT:DrawTranslucent( flags )

	self:Draw( flags )

end