adding wire lamp (don't remember who is the author)
This commit is contained in:
tad2020
60
wire/lua/entities/gmod_wire_lamp/cl_init.lua
Normal file
60
wire/lua/entities/gmod_wire_lamp/cl_init.lua
Normal file
@@ -0,0 +1,60 @@
|
||||
|
||||
include('shared.lua')
|
||||
|
||||
local matLight = Material( "sprites/light_ignorez" )
|
||||
local matBeam = Material( "effects/lamp_beam" )
|
||||
|
||||
ENT.RenderGroup = RENDERGROUP_BOTH
|
||||
|
||||
function ENT:Initialize()
|
||||
|
||||
self.PixVis = util.GetPixelVisibleHandle()
|
||||
|
||||
end
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: Draw
|
||||
---------------------------------------------------------*/
|
||||
function ENT:Draw()
|
||||
|
||||
self.BaseClass.Draw( self )
|
||||
|
||||
Wire_Render(self.Entity)
|
||||
|
||||
end
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: DrawTranslucent
|
||||
Desc: Draw translucent
|
||||
---------------------------------------------------------*/
|
||||
function ENT:DrawTranslucent()
|
||||
|
||||
local LightNrm = self.Entity:GetAngles():Up()
|
||||
local ViewDot = EyeVector():Dot( LightNrm )
|
||||
local r, g, b, a = self.Entity:GetColor()
|
||||
local LightPos = self.Entity:GetPos() + LightNrm * -6
|
||||
|
||||
// glow sprite
|
||||
/*
|
||||
render.SetMaterial( matBeam )
|
||||
|
||||
local BeamDot = BeamDot = 0.25
|
||||
|
||||
render.StartBeam( 3 )
|
||||
render.AddBeam( LightPos + LightNrm * 1, 128, 0.0, Color( r, g, b, 255 * BeamDot) )
|
||||
render.AddBeam( LightPos - LightNrm * 100, 128, 0.5, Color( r, g, b, 64 * BeamDot) )
|
||||
render.AddBeam( LightPos - LightNrm * 200, 128, 1, Color( r, g, b, 0) )
|
||||
render.EndBeam()
|
||||
*/
|
||||
|
||||
if ( ViewDot < 0 ) then return end
|
||||
|
||||
render.SetMaterial( matLight )
|
||||
local Visibile = util.PixelVisible( LightPos, 16, self.PixVis )
|
||||
local Size = math.Clamp( 512 * (1 - Visibile*ViewDot),128, 512 )
|
||||
|
||||
local Col = Color( r, g, b, 200*Visibile*ViewDot )
|
||||
|
||||
render.DrawSprite( LightPos, Size, Size, Col, Visibile * ViewDot )
|
||||
|
||||
end
|
||||
104
wire/lua/entities/gmod_wire_lamp/init.lua
Normal file
104
wire/lua/entities/gmod_wire_lamp/init.lua
Normal file
@@ -0,0 +1,104 @@
|
||||
|
||||
AddCSLuaFile( "cl_init.lua" )
|
||||
AddCSLuaFile( "shared.lua" )
|
||||
|
||||
ENT.WireDebugName = "Lamp"
|
||||
|
||||
local MODEL = Model( "models/props_wasteland/prison_lamp001c.mdl" )
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: Initialize
|
||||
---------------------------------------------------------*/
|
||||
function ENT:Initialize()
|
||||
|
||||
self.Entity:SetModel( MODEL )
|
||||
self.Entity:PhysicsInit( SOLID_VPHYSICS )
|
||||
self.Entity:SetMoveType( MOVETYPE_VPHYSICS )
|
||||
self.Entity:SetSolid( SOLID_VPHYSICS )
|
||||
|
||||
self.flashlight = ents.Create("effect_flashlight")
|
||||
self.flashlight:SetPos( self.Entity:GetPos() )
|
||||
self.flashlight:SetAngles( self.Entity:GetAngles() )
|
||||
self.flashlight:SetParent( self.Entity )
|
||||
self.flashlight:SetColor( self.Entity:GetVar( "lightr", 255 ), self.Entity:GetVar( "lightg", 255 ), self.Entity:GetVar( "lightb", 255 ), 255 )
|
||||
self.flashlight:Spawn()
|
||||
|
||||
local phys = self.Entity:GetPhysicsObject()
|
||||
|
||||
if (phys:IsValid()) then
|
||||
phys:Wake()
|
||||
end
|
||||
|
||||
self.r = self.Entity:GetVar( "lightr", 255 )
|
||||
self.g = self.Entity:GetVar( "lightg", 255 )
|
||||
self.b = self.Entity:GetVar( "lightb", 255 )
|
||||
|
||||
self.Inputs = Wire_CreateInputs(self.Entity, { "Red", "Green", "Blue" })
|
||||
|
||||
end
|
||||
|
||||
function ENT:Setup( r, g, b )
|
||||
|
||||
self:SetOverlayText( "Red:" .. r .. " Green:" .. g .. " Blue" .. b )
|
||||
|
||||
end
|
||||
|
||||
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: Sets the color of the light
|
||||
---------------------------------------------------------*/
|
||||
function ENT:SetLightColor( r, g, b )
|
||||
|
||||
self.Entity:SetVar( "lightr", r )
|
||||
self.Entity:SetVar( "lightg", g )
|
||||
self.Entity:SetVar( "lightb", b )
|
||||
|
||||
self.Entity:SetColor( r, g, b, 255 )
|
||||
|
||||
end
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: OnTakeDamage
|
||||
---------------------------------------------------------*/
|
||||
function ENT:OnTakeDamage( dmginfo )
|
||||
self.Entity:TakePhysicsDamage( dmginfo )
|
||||
end
|
||||
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: Use
|
||||
---------------------------------------------------------*/
|
||||
function ENT:Use( activator, caller )
|
||||
|
||||
end
|
||||
|
||||
/*---------------------------------------------------------
|
||||
Name: TriggerInput
|
||||
Desc: the inputs
|
||||
---------------------------------------------------------*/
|
||||
function ENT:TriggerInput(iname, value)
|
||||
if (iname == "Red") then
|
||||
self.r = value
|
||||
elseif (iname == "Green") then
|
||||
self.g = value
|
||||
elseif (iname == "Blue") then
|
||||
self.b = value
|
||||
end
|
||||
self:SetLightColor( self.r, self.g, self.b)
|
||||
self.flashlight:SetColor( self.Entity:GetVar( "lightr", 255 ), self.Entity:GetVar( "lightg", 255 ), self.Entity:GetVar( "lightb", 255 ), 255 )
|
||||
self:SetOverlayText( "Red:" .. self.r .. " Green:" .. self.g .. " Blue" .. self.b )
|
||||
end
|
||||
|
||||
|
||||
|
||||
function ENT:OnRemove()
|
||||
Wire_Remove(self.Entity)
|
||||
end
|
||||
|
||||
function ENT:OnRestore()
|
||||
Wire_Restored(self.Entity)
|
||||
end
|
||||
|
||||
include('shared.lua')
|
||||
|
||||
13
wire/lua/entities/gmod_wire_lamp/shared.lua
Normal file
13
wire/lua/entities/gmod_wire_lamp/shared.lua
Normal file
@@ -0,0 +1,13 @@
|
||||
|
||||
|
||||
ENT.Type = "anim"
|
||||
ENT.Base = "base_gmodentity"
|
||||
|
||||
ENT.PrintName = ""
|
||||
ENT.Author = ""
|
||||
ENT.Contact = ""
|
||||
ENT.Purpose = ""
|
||||
ENT.Instructions = ""
|
||||
|
||||
ENT.Spawnable = false
|
||||
ENT.AdminSpawnable = false
|
||||
196
wire/lua/weapons/gmod_tool/stools/wire_lamp.lua
Normal file
196
wire/lua/weapons/gmod_tool/stools/wire_lamp.lua
Normal file
@@ -0,0 +1,196 @@
|
||||
|
||||
TOOL.Category = "Wire - Display"
|
||||
TOOL.Name = "Lamps"
|
||||
TOOL.Command = nil
|
||||
TOOL.ConfigName = ""
|
||||
|
||||
if ( CLIENT ) then
|
||||
language.Add( "Tool_wire_lamp_name", "Wire Lamps" )
|
||||
language.Add( "Tool_wire_lamp_desc", "Spawns a lamp for use with the wire system." )
|
||||
language.Add( "Tool_wire_lamp_0", "Primary: Create hanging lamp Secondary: Create unattached lamp" )
|
||||
language.Add( "WireLampTool_RopeLength", "Rope Length:")
|
||||
language.Add( "WireLampTool_Color", "Color:" )
|
||||
language.Add( "SBoxLimit_wire_lamps", "You've hit the wire lamps limit!" )
|
||||
language.Add( "undone_WireLamp", "Undone Wire Lamp" )
|
||||
language.Add( "Cleanup_wire_lamp", "Wire Lamps" )
|
||||
language.Add( "Cleaned_wire_lamp", "Cleaned up all Wire Lamps" )
|
||||
end
|
||||
|
||||
if (SERVER) then
|
||||
CreateConVar('sbox_maxwire_lamps', 10)
|
||||
end
|
||||
|
||||
TOOL.ClientConVar[ "ropelength" ] = "64"
|
||||
TOOL.ClientConVar[ "ropematerial" ] = "cable/rope"
|
||||
TOOL.ClientConVar[ "r" ] = "255"
|
||||
TOOL.ClientConVar[ "g" ] = "255"
|
||||
TOOL.ClientConVar[ "b" ] = "255"
|
||||
|
||||
cleanup.Register( "wire_lamp" )
|
||||
|
||||
function TOOL:LeftClick( trace, attach )
|
||||
|
||||
if trace.Entity && trace.Entity:IsPlayer() then return false end
|
||||
if (CLIENT) then return true end
|
||||
if (attach == nil) then attach = true end
|
||||
|
||||
// If there's no physics object then we can't constraint it!
|
||||
if ( SERVER && attach && !util.IsValidPhysicsObject( trace.Entity, trace.PhysicsBone ) ) then return false end
|
||||
|
||||
local ply = self:GetOwner()
|
||||
|
||||
local pos, ang = trace.HitPos + trace.HitNormal * 10, trace.HitNormal:Angle() - Angle( 90, 0, 0 )
|
||||
|
||||
local r = math.Clamp( self:GetClientNumber( "r" ), 0, 255 )
|
||||
local g = math.Clamp( self:GetClientNumber( "g" ), 0, 255 )
|
||||
local b = math.Clamp( self:GetClientNumber( "b" ), 0, 255 )
|
||||
|
||||
if trace.Entity:IsValid() &&
|
||||
trace.Entity:GetClass() == "gmod_wire_lamp" &&
|
||||
trace.Entity:GetTable():GetPlayer() == ply
|
||||
then
|
||||
trace.Entity:GetTable():SetLightColor( r, g, b )
|
||||
trace.Entity:GetTable().r = r
|
||||
trace.Entity:GetTable().g = g
|
||||
trace.Entity:GetTable().b = b
|
||||
return true
|
||||
end
|
||||
|
||||
if ( !self:GetSWEP():CheckLimit( "wire_lamps" ) ) then return false end
|
||||
wire_lamp = MakeWireLamp( ply, pos, ang, r, g, b )
|
||||
|
||||
if (!attach) then
|
||||
|
||||
undo.Create("WireLamp")
|
||||
undo.AddEntity( wire_lamp )
|
||||
undo.SetPlayer( self:GetOwner() )
|
||||
undo.Finish()
|
||||
|
||||
return true
|
||||
|
||||
end
|
||||
|
||||
local length = self:GetClientNumber( "ropelength" )
|
||||
local material = self:GetClientInfo( "ropematerial" )
|
||||
|
||||
local LPos1 = Vector( 0, 0, 5 )
|
||||
local LPos2 = trace.Entity:WorldToLocal( trace.HitPos )
|
||||
|
||||
if (trace.Entity:IsValid()) then
|
||||
|
||||
local phys = trace.Entity:GetPhysicsObjectNum( trace.PhysicsBone )
|
||||
if (phys:IsValid()) then
|
||||
LPos2 = phys:WorldToLocal( trace.HitPos )
|
||||
end
|
||||
|
||||
end
|
||||
|
||||
local constraint, rope = constraint.Rope( wire_lamp, trace.Entity,
|
||||
0, trace.PhysicsBone,
|
||||
LPos1, LPos2,
|
||||
0, length,
|
||||
0,
|
||||
1.5,
|
||||
material,
|
||||
nil )
|
||||
|
||||
undo.Create("WireLamp")
|
||||
undo.AddEntity( wire_lamp )
|
||||
undo.AddEntity( rope )
|
||||
undo.AddEntity( constraint )
|
||||
undo.SetPlayer( ply )
|
||||
undo.Finish()
|
||||
|
||||
return true
|
||||
|
||||
end
|
||||
|
||||
function TOOL:RightClick( trace )
|
||||
|
||||
return self:LeftClick( trace, false )
|
||||
|
||||
end
|
||||
|
||||
function MakeWireLamp( pl, Pos, Ang, r, g, b, Vel, aVel, frozen )
|
||||
|
||||
if ( !pl:CheckLimit( "wire_lamps" ) ) then return false end
|
||||
|
||||
local wire_lamp = ents.Create( "gmod_wire_lamp" )
|
||||
if (!wire_lamp:IsValid()) then return end
|
||||
wire_lamp:SetPos( Pos )
|
||||
wire_lamp:SetAngles( Ang )
|
||||
wire_lamp:GetTable():SetLightColor( r, g, b )
|
||||
wire_lamp:Spawn()
|
||||
|
||||
wire_lamp:Setup( r, g, b )
|
||||
wire_lamp:GetTable():SetPlayer( pl )
|
||||
|
||||
|
||||
if (wire_lamp:GetPhysicsObject():IsValid()) then
|
||||
Phys = wire_lamp:GetPhysicsObject()
|
||||
if Vel then Phys:SetVelocity(Vel) end
|
||||
if Vel then Phys:AddAngleVelocity(aVel) end
|
||||
Phys:EnableMotion(frozen != true)
|
||||
end
|
||||
|
||||
pl:AddCount( "wire_lamps", wire_lamp )
|
||||
pl:AddCleanup( "wire_lamp", wire_lamp )
|
||||
|
||||
return wire_lamp
|
||||
end
|
||||
|
||||
duplicator.RegisterEntityClass( "gmod_wire_lamp", MakeWireLamp, "Pos", "Ang", "lightr", "lightg", "lightb", "Vel", "aVel", "frozen" )
|
||||
|
||||
function TOOL.BuildCPanel(panel)
|
||||
panel:AddControl("Header", { Text = "#Tool_wire_lamp_name", Description = "#Tool_wire_lamp_desc" })
|
||||
|
||||
panel:AddControl("ComboBox", {
|
||||
Label = "#Presets",
|
||||
MenuButton = "1",
|
||||
Folder = "wire_lamp",
|
||||
|
||||
Options = {
|
||||
["#Default"] = {
|
||||
wire_lamp_ropelength = "64",
|
||||
wire_lamp_ropematerial = "cable/rope",
|
||||
wire_lamp_r = "0",
|
||||
wire_lamp_g = "0",
|
||||
wire_lamp_b = "0"
|
||||
}
|
||||
},
|
||||
|
||||
CVars = {
|
||||
[0] = "wire_lamp_ropelength",
|
||||
[1] = "wire_lamp_ropematerial",
|
||||
[2] = "wire_lamp_r",
|
||||
[3] = "wire_lamp_g",
|
||||
[4] = "wire_lamp_b",
|
||||
}
|
||||
})
|
||||
|
||||
panel:AddControl("Slider", {
|
||||
Label = "#WireLampTool_RopeLength",
|
||||
Type = "Float",
|
||||
Min = "4",
|
||||
Max = "400",
|
||||
Command = "wire_lamp_ropelength"
|
||||
})
|
||||
|
||||
panel:AddControl("Color", {
|
||||
Label = "#WireLampTool_Color",
|
||||
Red = "wire_lamp_r",
|
||||
Green = "wire_lamp_g",
|
||||
Blue = "wire_lamp_b",
|
||||
ShowAlpha = "0",
|
||||
ShowHSV = "1",
|
||||
ShowRGB = "1",
|
||||
Multiplier = "255"
|
||||
})
|
||||
end
|
||||
|
||||
|
||||
TOOL.ClientConVar[ "ropelength" ] = "64"
|
||||
TOOL.ClientConVar[ "ropematerial" ] = "cable/rope"
|
||||
TOOL.ClientConVar[ "r" ] = "255"
|
||||
TOOL.ClientConVar[ "g" ] = "255"
|
||||
TOOL.ClientConVar[ "b" ] = "255"
|
||||
Reference in New Issue
Block a user