summaryrefslogtreecommitdiff
path: root/ftp_gmstranded/entities/weapons/gmod_tool
diff options
context:
space:
mode:
authorScott <scotth0828@gmail.com>2016-05-21 17:43:47 -0400
committerScott <scotth0828@gmail.com>2016-05-21 17:43:47 -0400
commit10ed1a54523fdd5bcddfbccf44dd9c0a15ab8357 (patch)
treedc40b8a399afea729a78fef6e3a92e7a41873b3d /ftp_gmstranded/entities/weapons/gmod_tool
parentd73e78d8d98da223410f51f390549336554eb54d (diff)
downloadgmstranded-10ed1a54523fdd5bcddfbccf44dd9c0a15ab8357.tar.gz
gmstranded-10ed1a54523fdd5bcddfbccf44dd9c0a15ab8357.tar.bz2
gmstranded-10ed1a54523fdd5bcddfbccf44dd9c0a15ab8357.zip
Fixed removing plants bug
Diffstat (limited to 'ftp_gmstranded/entities/weapons/gmod_tool')
-rw-r--r--ftp_gmstranded/entities/weapons/gmod_tool/stools/gms_rope.lua170
1 files changed, 0 insertions, 170 deletions
diff --git a/ftp_gmstranded/entities/weapons/gmod_tool/stools/gms_rope.lua b/ftp_gmstranded/entities/weapons/gmod_tool/stools/gms_rope.lua
deleted file mode 100644
index b7cac72..0000000
--- a/ftp_gmstranded/entities/weapons/gmod_tool/stools/gms_rope.lua
+++ /dev/null
@@ -1,170 +0,0 @@
-
-if ( !GMS ) then TOOL.AddToMenu = false end
-
-TOOL.Category = "Constraints"
-TOOL.Name = "#tool.rope.name"
-TOOL.Command = nil
-TOOL.ConfigName = nil
-
-TOOL.ClientConVar[ "forcelimit" ] = "0"
-TOOL.ClientConVar[ "addlength" ] = "0"
-TOOL.ClientConVar[ "material" ] = "cable/rope"
-TOOL.ClientConVar[ "width" ] = "2"
-TOOL.ClientConVar[ "rigid" ] = "0"
-
-function TOOL:LeftClick( trace )
-
- if ( trace.Entity:IsValid() && trace.Entity:IsPlayer() ) then return end
-
- -- If there's no physics object then we can't constraint it!
- if ( SERVER && !util.IsValidPhysicsObject( trace.Entity, trace.PhysicsBone ) ) then return false end
-
- local iNum = self:NumObjects()
-
- local Phys = trace.Entity:GetPhysicsObjectNum( trace.PhysicsBone )
- self:SetObject( iNum + 1, trace.Entity, trace.HitPos, Phys, trace.PhysicsBone, trace.HitNormal )
-
- if ( iNum > 0 ) then
-
- if ( CLIENT ) then
-
- self:ClearObjects()
- return true
-
- end
-
- -- Get client's CVars
- local forcelimit = self:GetClientNumber( "forcelimit" )
- local addlength = self:GetClientNumber( "addlength" )
- local material = self:GetClientInfo( "material" )
- local width = self:GetClientNumber( "width" )
- local rigid = self:GetClientNumber( "rigid" ) == 1
-
- -- Get information we're about to use
- local Ent1, Ent2 = self:GetEnt(1), self:GetEnt(2)
- local Bone1, Bone2 = self:GetBone(1), self:GetBone(2)
- local WPos1, WPos2 = self:GetPos(1), self:GetPos(2)
- local LPos1, LPos2 = self:GetLocalPos(1),self:GetLocalPos(2)
- local length = ( WPos1 - WPos2):Length()
-
- local constraint, rope = constraint.Rope( Ent1, Ent2, Bone1, Bone2, LPos1, LPos2, length, addlength, forcelimit, width, material, rigid )
-
- -- Clear the objects so we're ready to go again
- self:ClearObjects()
-
- -- Add The constraint to the players undo table
-
- undo.Create("Rope")
- undo.AddEntity( constraint )
- undo.AddEntity( rope )
- undo.SetPlayer( self:GetOwner() )
- undo.Finish()
-
- self:GetOwner():AddCleanup( "ropeconstraints", constraint )
- self:GetOwner():AddCleanup( "ropeconstraints", rope )
- if ( GMS ) then self:GetOwner():DecResource( "Rope", 1 ) end
- else
-
- self:SetStage( iNum+1 )
-
- end
-
- return true
-
-end
-
-function TOOL:RightClick( trace )
-
- if ( trace.Entity:IsValid() && trace.Entity:IsPlayer() ) then return end
-
- local iNum = self:NumObjects()
-
- local Phys = trace.Entity:GetPhysicsObjectNum( trace.PhysicsBone )
- self:SetObject( iNum + 1, trace.Entity, trace.HitPos, Phys, trace.PhysicsBone, trace.HitNormal )
-
- if ( iNum > 0 ) then
-
- if ( CLIENT ) then
-
- self:ClearObjects()
- return true
-
- end
-
- -- Get client's CVars
- local forcelimit = self:GetClientNumber( "forcelimit" )
- local addlength = self:GetClientNumber( "addlength" )
- local material = self:GetClientInfo( "material" )
- local width = self:GetClientNumber( "width" )
- local rigid = self:GetClientNumber( "rigid" ) == 1
-
- -- Get information we're about to use
- local Ent1, Ent2 = self:GetEnt(1), self:GetEnt(2)
- local Bone1, Bone2 = self:GetBone(1), self:GetBone(2)
- local WPos1, WPos2 = self:GetPos(1),self:GetPos(2)
- local LPos1, LPos2 = self:GetLocalPos(1),self:GetLocalPos(2)
- local length = ( WPos1 - WPos2 ):Length()
-
- local constraint, rope = constraint.Rope( Ent1, Ent2, Bone1, Bone2, LPos1, LPos2, length, addlength, forcelimit, width, material, rigid )
-
- -- Clear the objects and set the last object as object 1
- self:ClearObjects()
- iNum = self:NumObjects()
- self:SetObject( iNum + 1, Ent2, trace.HitPos, Phys, Bone2, trace.HitNormal )
- self:SetStage( iNum+1 )
-
- -- Add The constraint to the players undo table
-
- undo.Create("Rope")
- undo.AddEntity( constraint )
- if rope then undo.AddEntity( rope ) end
- undo.SetPlayer( self:GetOwner() )
- undo.Finish()
-
- self:GetOwner():AddCleanup( "ropeconstraints", constraint )
- self:GetOwner():AddCleanup( "ropeconstraints", rope )
-
- if ( GMS ) then self:GetOwner():DecResource( "Rope", 1 ) end
- else
-
- self:SetStage( iNum+1 )
-
- end
-
- return true
-
-end
-
-function TOOL:Reload( trace )
-
- if (!trace.Entity:IsValid() || trace.Entity:IsPlayer() ) then return false end
- if ( CLIENT ) then return true end
-
- local bool = constraint.RemoveConstraints( trace.Entity, "Rope" )
- return bool
-
-
-end
-
-function TOOL.BuildCPanel( CPanel )
-
- CPanel:AddControl( "Header", { Text = "#tool.rope.name", Description = "#tool.rope.help" } )
-
- CPanel:AddControl( "ComboBox",
- {
- Label = "#tool.presets",
- MenuButton = 1,
- Folder = "rope",
- Options = { Default = { rope_forcelimit = '0', rope_addlength='0', rope_width='1', rope_material='cable/rope', rope_rigid='0' } },
- CVars = { "rope_forcelimit", "rope_addlength", "rope_width", "rope_material", "rope_rigid" }
- })
-
- CPanel:AddControl( "Slider", { Label = "#tool.forcelimit", Type = "Float", Command = "rope_forcelimit", Min = "0", Max = "1000", Help=true } )
- CPanel:AddControl( "Slider", { Label = "#tool.rope.addlength", Type = "Float", Command = "rope_addlength", Min = "-500", Max = "500", Help=true } )
-
- CPanel:AddControl( "CheckBox", { Label = "#tool.rope.rigid", Command = "rope_rigid", Help=true } )
-
- CPanel:AddControl( "Slider", { Label = "#tool.rope.width", Type = "Float", Command = "rope_width", Min = "0", Max = "10" } )
- CPanel:AddControl( "RopeMaterial", { Label = "#tool.rope.material", convar = "rope_material" } )
-
-end \ No newline at end of file