mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-17 13:53:45 +03:00
Upload
This commit is contained in:
lifestorm
196
lua/weapons/gmod_tool/stools/prop_thumper.lua
Normal file
196
lua/weapons/gmod_tool/stools/prop_thumper.lua
Normal file
@@ -0,0 +1,196 @@
|
||||
--[[
|
||||
| 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/
|
||||
--]]
|
||||
|
||||
|
||||
TOOL.Category = "Half-Life 2"
|
||||
TOOL.Name = "#tool.prop_thumper"
|
||||
|
||||
TOOL.ClientConVar["model" ] = "models/props_combine/CombineThumper002.mdl"
|
||||
TOOL.ClientConVar[ "dustscale" ] = "128"
|
||||
TOOL.ClientConVar[ "activate" ] = "38"
|
||||
TOOL.ClientConVar[ "deactivate" ] = "39"
|
||||
|
||||
cleanup.Register( "prop_thumpers" )
|
||||
|
||||
if ( SERVER ) then
|
||||
CreateConVar( "sbox_maxprop_thumpers", 10, FCVAR_ARCHIVE + FCVAR_REPLICATED + FCVAR_NOTIFY )
|
||||
|
||||
numpad.Register( "prop_thumper_on", function( ply, prop_thumper )
|
||||
if ( !IsValid( prop_thumper ) ) then return false end
|
||||
prop_thumper:Fire( "Enable" )
|
||||
end )
|
||||
|
||||
numpad.Register( "prop_thumper_off", function( ply, prop_thumper )
|
||||
if ( !IsValid( prop_thumper ) ) then return false end
|
||||
prop_thumper:Fire( "Disable" )
|
||||
end )
|
||||
|
||||
function MakeThumper( ply, model, pos, ang, keyOn, keyOff, dustscale, targetname, mapCreationID )
|
||||
if ( IsValid( ply ) and !ply:CheckLimit( "prop_thumpers" ) ) then return nil end
|
||||
|
||||
local prop_thumper = ents.Create( "prop_thumper" )
|
||||
if ( !IsValid( prop_thumper ) ) then return false end
|
||||
|
||||
prop_thumper:SetPos( pos )
|
||||
prop_thumper:SetAngles( ang )
|
||||
|
||||
keyOn = keyOn or -1
|
||||
keyOff = keyOff or -1
|
||||
dustscale = tonumber( dustscale ) or 128
|
||||
|
||||
if ( model == "models/props_combine/combinethumper001a.mdl" ) then
|
||||
local vec1 = Vector( -64, 72, 256 )
|
||||
vec1:Rotate( ang )
|
||||
local Lpos = pos + vec1
|
||||
|
||||
local ladder = ents.Create("func_useableladder")
|
||||
ladder:SetPos( Lpos )
|
||||
ladder:SetAngles( ang )
|
||||
ladder:SetKeyValue( "targetname", "rb655_ThumperLadder_" .. prop_thumper:EntIndex() )
|
||||
ladder:SetKeyValue( "point0", Lpos.x .. " " .. Lpos.y .. " " .. Lpos.z )
|
||||
ladder:SetKeyValue( "point1", Lpos.x .. " " .. Lpos.y .. " " .. ( Lpos.z - 252 ) )
|
||||
ladder:Spawn()
|
||||
|
||||
prop_thumper:DeleteOnRemove( ladder )
|
||||
ladder:DeleteOnRemove( prop_thumper )
|
||||
end
|
||||
|
||||
if ( targetname ) then prop_thumper:SetKeyValue( "targetname", targetname ) end
|
||||
if ( dustscale ) then prop_thumper:SetKeyValue( "dustscale", math.Clamp( dustscale, 64, 1024 ) ) end
|
||||
prop_thumper:SetModel( model )
|
||||
prop_thumper:Spawn()
|
||||
prop_thumper:Activate()
|
||||
|
||||
prop_thumper.NumpadOn = numpad.OnDown( ply, keyOn, "prop_thumper_on", prop_thumper )
|
||||
prop_thumper.NumpadOff = numpad.OnDown( ply, keyOff, "prop_thumper_off", prop_thumper )
|
||||
|
||||
table.Merge( prop_thumper:GetTable(), {
|
||||
ply = ply,
|
||||
keyOn = keyOn,
|
||||
keyOff = keyOff,
|
||||
dustscale = dustscale,
|
||||
targetname = targetname,
|
||||
MapCreationID = mapCreationID
|
||||
} )
|
||||
|
||||
if ( IsValid( ply ) ) then
|
||||
ply:AddCount( "prop_thumpers", prop_thumper )
|
||||
ply:AddCleanup( "prop_thumpers", prop_thumper )
|
||||
end
|
||||
|
||||
DoPropSpawnedEffect( prop_thumper )
|
||||
|
||||
if ( Wire_CreateOutputs and !mapCreationID ) then
|
||||
prop_thumper.Inputs = Wire_CreateInputs( prop_thumper, { "Turn On" } )
|
||||
|
||||
function prop_thumper:TriggerInput( name, value )
|
||||
if ( name == "Turn On" ) then self:Fire( value != 0 and "Enable" or "Disable" ) end
|
||||
end
|
||||
|
||||
rb655_hl2_CopyWireModMethods( prop_thumper )
|
||||
end
|
||||
|
||||
return prop_thumper
|
||||
end
|
||||
|
||||
duplicator.RegisterEntityClass( "prop_thumper", MakeThumper, "model", "pos", "ang", "keyOn", "keyOff", "dustscale", "targetname", "MapCreationID" )
|
||||
end
|
||||
|
||||
function TOOL:LeftClick( trace )
|
||||
if ( trace.HitSky or !trace.HitPos or trace.HitNormal.z < 0.98 ) then return false end
|
||||
if ( IsValid( trace.Entity ) and ( trace.Entity:GetClass() == "prop_thumper" or trace.Entity:IsPlayer() or trace.Entity:IsNPC() ) ) then return false end
|
||||
if ( CLIENT ) then return true end
|
||||
|
||||
local ply = self:GetOwner()
|
||||
|
||||
local ang = trace.HitNormal:Angle()
|
||||
ang.pitch = ang.pitch - 270
|
||||
|
||||
if ( trace.HitNormal.z > 0.9999 ) then ang.y = ply:GetAngles().y + 90 end
|
||||
|
||||
local prop_thumper = MakeThumper( ply, self:GetClientInfo( "model" ),
|
||||
trace.HitPos, ang,
|
||||
self:GetClientNumber( "activate" ),
|
||||
self:GetClientNumber( "deactivate" ),
|
||||
self:GetClientNumber( "dustscale" ),
|
||||
self:GetClientNumber( "distance" )
|
||||
)
|
||||
|
||||
undo.Create( "prop_thumper" )
|
||||
undo.AddEntity( prop_thumper )
|
||||
undo.SetPlayer( ply )
|
||||
undo.Finish()
|
||||
|
||||
return true
|
||||
end
|
||||
|
||||
function TOOL:UpdateGhostEntity( ent, ply )
|
||||
if ( !IsValid( ent ) ) then return end
|
||||
|
||||
local trace = ply:GetEyeTrace()
|
||||
|
||||
if ( !trace.Hit or trace.HitNormal.z < 0.98 or IsValid( trace.Entity ) and ( trace.Entity:GetClass() == "prop_thumper" or trace.Entity:IsPlayer() or trace.Entity:IsNPC() ) ) then
|
||||
ent:SetNoDraw( true )
|
||||
return
|
||||
end
|
||||
|
||||
local ang = trace.HitNormal:Angle()
|
||||
ang.pitch = ang.pitch - 270
|
||||
|
||||
if ( trace.HitNormal.z > 0.9999 ) then ang.y = ply:GetAngles().y + 90 end
|
||||
|
||||
local min = ent:OBBMins()
|
||||
ent:SetPos( trace.HitPos - trace.HitNormal * min.z )
|
||||
|
||||
ent:SetAngles( ang )
|
||||
ent:SetNoDraw( false )
|
||||
end
|
||||
|
||||
function TOOL:Think()
|
||||
if ( !IsValid( self.GhostEntity ) or self.GhostEntity:GetModel() != self:GetClientInfo( "model" ) ) then
|
||||
self:MakeGhostEntity( self:GetClientInfo( "model" ), Vector( 0, 0, 0 ), Angle( 0, 0, 0 ) )
|
||||
end
|
||||
self:UpdateGhostEntity( self.GhostEntity, self:GetOwner() )
|
||||
end
|
||||
|
||||
list.Set( "ThumperModels", "models/props_combine/CombineThumper001a.mdl", {} )
|
||||
list.Set( "ThumperModels", "models/props_combine/CombineThumper002.mdl", {} )
|
||||
|
||||
if ( SERVER ) then return end
|
||||
|
||||
TOOL.Information = { { name = "left" } }
|
||||
|
||||
language.Add( "tool.prop_thumper", "Thumpers" )
|
||||
language.Add( "tool.prop_thumper.name", "Thumper Tool" )
|
||||
language.Add( "tool.prop_thumper.desc", "Spawn thumpers from Half-Life 2" )
|
||||
language.Add( "tool.prop_thumper.left", "Spawn a thumper" )
|
||||
|
||||
language.Add( "tool.prop_thumper.model", "Thumper Model:" )
|
||||
language.Add( "tool.prop_thumper.dustscale", "Thumper dust size:" )
|
||||
language.Add( "tool.prop_thumper.dustscale.help", "The scale of dust produced when thumper hits ground." )
|
||||
language.Add( "tool.prop_thumper.activate", "Activate Thumper" )
|
||||
language.Add( "tool.prop_thumper.deactivate", "Deactivate Thumper" )
|
||||
|
||||
language.Add( "Cleanup_prop_thumpers", "Thumpers" )
|
||||
language.Add( "Cleaned_prop_thumpers", "Cleaned up all Thumpers" )
|
||||
language.Add( "SBoxLimit_prop_thumpers", "You've hit the Thumper limit!" )
|
||||
language.Add( "Undone_prop_thumper", "Thumper undone" )
|
||||
|
||||
language.Add( "max_prop_thumpers", "Max Thumpers:" )
|
||||
|
||||
local ConVarsDefault = TOOL:BuildConVarList()
|
||||
|
||||
function TOOL.BuildCPanel( panel )
|
||||
panel:AddControl( "ComboBox", { MenuButton = 1, Folder = "prop_thumper", Options = { [ "#preset.default" ] = ConVarsDefault }, CVars = table.GetKeys( ConVarsDefault ) } )
|
||||
|
||||
panel:AddControl( "PropSelect", { Label = "#tool.prop_thumper.model", Height = 1, ConVar = "prop_thumper_model", Models = list.Get( "ThumperModels" ) } )
|
||||
panel:AddControl( "Numpad", { Label = "#tool.prop_thumper.activate", Label2 = "#tool.prop_thumper.deactivate", Command = "prop_thumper_activate", Command2 = "prop_thumper_deactivate" } )
|
||||
panel:AddControl( "Slider", { Label = "#tool.prop_thumper.dustscale", Min = 64, Max = 1024, Command = "prop_thumper_dustscale", Help = true } )
|
||||
end
|
||||
Reference in New Issue
Block a user