gmod_camera.lua

AddCSLuaFile()

-- Variables that are used on both client and server

SWEP.Author			= ""
SWEP.Contact		= ""
SWEP.Purpose		= ""
SWEP.Instructions	= ""

SWEP.ViewModel		= "models/weapons/c_arms_animations.mdl"
SWEP.WorldModel		= "models/MaxOfS2D/camera.mdl"

util.PrecacheModel( SWEP.ViewModel )
util.PrecacheModel( SWEP.WorldModel )

SWEP.Primary.ClipSize		= -1
SWEP.Primary.DefaultClip	= -1
SWEP.Primary.Automatic		= false
SWEP.Primary.Ammo			= "none"

SWEP.Secondary.ClipSize		= -1
SWEP.Secondary.DefaultClip	= -1
SWEP.Secondary.Automatic	= true
SWEP.Secondary.Ammo			= "none"

SWEP.ShootSound				= "NPC_CScanner.TakePhoto"

SWEP.PrintName			= "#GMOD_Camera"			
SWEP.Slot				= 5
SWEP.SlotPos			= 1
SWEP.DrawAmmo			= false
SWEP.DrawCrosshair		= false
SWEP.Spawnable			= true

if ( SERVER ) then

	SWEP.Weight				= 5
	SWEP.AutoSwitchTo		= false
	SWEP.AutoSwitchFrom		= false

	--
	-- A concommand to quickly switch to the camera
	--
	concommand.Add( "gmod_camera", function( player, command, arguments )

		player:SelectWeapon( "gmod_camera" )

	end )

end

if ( CLIENT ) then

	SWEP.WepSelectIcon		= surface.GetTextureID( "vgui/gmod_camera" )

end

--
-- Network/Data Tables
--
function SWEP:SetupDataTables()

	self:NetworkVar( "Float", 0, "Zoom" );
	self:NetworkVar( "Float", 1, "Roll" );

	if ( SERVER ) then
		self:SetZoom( 70 )
		self:SetRoll( 0 )
	end

end



--[[---------------------------------------------------------
   Initialize Stuff
-----------------------------------------------------------]]
function SWEP:Initialize()

	self:SetWeaponHoldType( "camera" )

end

--[[---------------------------------------------------------
   Precache Stuff
-----------------------------------------------------------]]
function SWEP:Precache()

	util.PrecacheSound( self.ShootSound )

end

--[[---------------------------------------------------------
	Reload does nothing
-----------------------------------------------------------]]
function SWEP:Reload()

	if ( !self.Owner:KeyDown( IN_ATTACK2 ) ) then self:SetZoom( self.Owner:GetInfoNum( "fov_desired", 75 ) ) end
	self:SetRoll( 0 )
		
end


--[[---------------------------------------------------------
   The effect when a weapon is fired successfully
-----------------------------------------------------------]]
function SWEP:DoShootEffect()

	self.Weapon:EmitSound( self.ShootSound )
	self.Weapon:SendWeaponAnim( ACT_VM_PRIMARYATTACK )
	self.Owner:SetAnimation( PLAYER_ATTACK1 )

	if ( SERVER && !game.SinglePlayer() ) then

		--
		-- Note that the flash effect is only 
		-- shown to other players!
		--

		local vPos = self.Owner:GetShootPos()
		local vForward = self.Owner:GetAimVector()

		local trace = {}
		trace.start = vPos
		trace.endpos = vPos + vForward * 256
		trace.filter = self.Owner

		local tr = util.TraceLine( trace )

		local effectdata = EffectData()
		effectdata:SetOrigin( tr.HitPos )
		util.Effect( "camera_flash", effectdata, true )

	end
	
end

--[[---------------------------------------------------------
	PrimaryAttack
-----------------------------------------------------------]]
function SWEP:PrimaryAttack()

	self:DoShootEffect()
	
	-- If we're multiplayer this can be done totally clientside
	if ( !game.SinglePlayer() && SERVER ) then return end
	if ( CLIENT && !IsFirstTimePredicted() ) then return end
	
	self.Owner:ConCommand( "jpeg" )
	
end

--[[---------------------------------------------------------
	SecondaryAttack
-----------------------------------------------------------]]
function SWEP:SecondaryAttack()

	-- Nothing. See Think for zooming.
	
end

--[[---------------------------------------------------------
   
-----------------------------------------------------------]]
function SWEP:Tick()

	local cmd = self.Owner:GetCurrentCommand()
	
	local fDelta = 0.05

	self:DoZoomThink( cmd, fDelta )
	self:DoRotateThink( cmd, fDelta )

end

--[[---------------------------------------------------------
   
-----------------------------------------------------------]]
function SWEP:DoZoomThink( cmd, fDelta )

	-- Right held down
	if ( !cmd:KeyDown( IN_ATTACK2 ) ) then return end
	
	self:SetZoom( math.Clamp( self:GetZoom() + cmd:GetMouseY() * 2 * fDelta, 0.1, 175 ) )

end

if ( CLIENT ) then

	-- Don't draw the weapon info on the weapon selection thing
	function SWEP:DrawHUD() end
	function SWEP:PrintWeaponInfo( x, y, alpha ) end

	function SWEP:HUDShouldDraw( name )

		-- So we can change weapons
		if ( name == "CHudWeaponSelection" ) then return true end
		if ( name == "CHudChat" ) then return true end
	
		return false;
	
	end
	
	function SWEP:FreezeMovement()

		-- Don't aim if we're holding the right mouse button
		if ( self.Owner:KeyDown( IN_ATTACK2 ) || self.Owner:KeyReleased( IN_ATTACK2 ) ) then 
			return true 
		end

		return false
	
	end

	function SWEP:CalcView( ply, origin, angles, fov )

		if ( self:GetRoll() != 0 ) then
			angles.Roll = self:GetRoll()
		end

		return origin, angles, fov
	
	end
	
	function SWEP:AdjustMouseSensitivity()

		if ( self.Owner:KeyDown( IN_ATTACK2 )  ) then return 1 end

		return 1 * ( self:GetZoom() / 80 )
	
	end

end




--
-- Rotate Think
--
function SWEP:DoRotateThink( cmd, fDelta )

	if ( cmd:KeyDown( IN_ATTACK2 ) ) then

		self:SetRoll( self:GetRoll() + cmd:GetMouseX() * 0.5 * fDelta )
		
	end

end

--
-- TranslateFOV
--
function SWEP:TranslateFOV( current_fov )
	
	return self:GetZoom()

end

--
-- Allow lastinv
--
function SWEP:Deploy()

	return true
	
end

--
-- Set FOV to players desired FOV
--
function SWEP:Equip()

	if ( self:GetZoom() == 70 && self.Owner:IsPlayer() ) then
		self:SetZoom( self.Owner:GetInfoNum( "fov_desired", 75 ) )
	end

end

function SWEP:ShouldDropOnDie() return false end