doubleclick actions

some actions for base_class: rename, expand/collapse, show/hide, write notes

some are class-specific: hitscan shoot, sound play/stop, command execute, event invert...

some are event-specific: timerx reset, command trigger, flashlight toggle

you can revert to only the base_class actions or ignore the base_class actions and only trigger actions when a specific action exists for the part

the options are in menu bar and node expander

Author: pingu7867

lua/pac3/core/client/base_part.lua

@@ -606,6 +606,135 @@ do -- scene graph
 		end
 	end
 
+	local pac_doubleclick_type = CreateClientConVar("pac_doubleclick_action", "expand", true, true, "What function should be run if you double-click on a part node.\n\nexpand : expand or collapse the node\nrename : rename the part\nnotes : write notes for the part\nshowhide : shows or hides the part\nspecific_only : only trigger class-specific actions, such as playing sounds, triggering hitscans, etc.\nnone : disable double-click actions")
+
+	function PART:OnDoubleClickBaseClass()
+		pace.doubleclickfunc = pac_doubleclick_type:GetString()
+		if pace.doubleclickfunc == "specific_only" then return end
+
+		pace.FlashNotification("double click action : " .. pace.doubleclickfunc)
+
+		if pace.doubleclickfunc == "expand" then
+			if not self:HasChildren() then return end
+			self:SetEditorExpand(not self:GetEditorExpand())
+			pace.RefreshTree()
+		elseif pace.doubleclickfunc == "rename" then
+			local pnl = vgui.Create("DTextEntry")
+			pnl:SetFont(pace.CurrentFont)
+			pnl:SetDrawBackground(false)
+			pnl:SetDrawBorder(false)
+			pnl:SetText(self:GetName())
+			pnl:SetKeyboardInputEnabled(true)
+			pnl:RequestFocus()
+			pnl:SelectAllOnFocus(true)
+
+			local hookID = tostring({})
+			local textEntry = pnl
+			local delay = os.clock() + 0.3
+
+			local old_name = self:GetName()
+
+			pac.AddHook('Think', hookID, function(code)
+				if not IsValid(textEntry) then return pac.RemoveHook('Think', hookID) end
+				if textEntry:IsHovered() then return end
+				if delay > os.clock() then return end
+				if not input.IsMouseDown(MOUSE_LEFT) and not input.IsKeyDown(KEY_ESCAPE) then return end
+				pac.RemoveHook('Think', hookID)
+				textEntry:Remove()
+				pnl:OnEnter()
+			end)
+
+			--local x,y = pnl:GetPos()
+			--pnl:SetPos(x+3,y-4)
+			--pnl:Dock(FILL)
+			local x, y = self.pace_tree_node.Label:LocalToScreen()
+			local inset_x = self.pace_tree_node.Label:GetTextInset()
+			pnl:SetPos(x + inset_x, y)
+			pnl:SetSize(self.pace_tree_node.Label:GetSize())
+			pnl:SetWide(ScrW())
+			pnl:MakePopup()
+
+			pnl.OnEnter = function()
+				local input_text = pnl:GetText()
+				pnl:Remove()
+				if old_name == input_text then return end
+				self:SetName(input_text)
+				if self.pace_tree_node then
+					if input_text ~= "" then
+						self.pace_tree_node:SetText(input_text)
+					else
+						timer.Simple(0, function()
+							self.pace_tree_node:SetText(self:GetName())
+						end)
+					end
+				end
+				pace.PopulateProperties(self)
+			end
+
+			local old = pnl.Paint
+			pnl.Paint = function(...)
+				if not self:IsValid() then pnl:Remove() return end
+
+				surface.SetFont(pnl:GetFont())
+				local w = surface.GetTextSize(pnl:GetText()) + 6
+
+				surface.DrawRect(0, 0, w, pnl:GetTall())
+				surface.SetDrawColor(self.pace_tree_node:GetSkin().Colours.Properties.Border)
+				surface.DrawOutlinedRect(0, 0, w, pnl:GetTall())
+
+				pnl:SetWide(w)
+
+				old(...)
+			end
+		elseif pace.doubleclickfunc == "notes" then
+			if IsValid(pace.notes_pnl) then
+				pace.notes_pnl:Remove()
+			end
+			local pnl = vgui.Create("DFrame")
+			pace.notes_pnl = pnl
+			local DText = vgui.Create("DTextEntry", pnl)
+			local DButtonOK = vgui.Create("DButton", pnl)
+			DText:SetMaximumCharCount(50000)
+
+			pnl:SetSize(1200,800)
+			pnl:SetTitle("Long text with newline support for Notes.")
+			pnl:Center()
+			DButtonOK:SetText("OK")
+			DButtonOK:SetSize(80,20)
+			DButtonOK:SetPos(500, 775)
+			DText:SetPos(5,25)
+			DText:SetSize(1190,700)
+			DText:SetMultiline(true)
+			DText:SetContentAlignment(7)
+			pnl:MakePopup()
+			DText:RequestFocus()
+			DText:SetText(self:GetNotes())
+
+			DButtonOK.DoClick = function()
+				self:SetNotes(DText:GetText())
+				pace.RefreshTree(true)
+				pnl:Remove()
+			end
+		elseif pace.doubleclickfunc == "showhide" then
+			self:SetHide(not self:GetHide())
+		end
+	end
+
+	local pac_doubleclick_specified = CreateClientConVar("pac_doubleclick_action_specified", "2", true, true, "Whether the base_part functions for double-click should be replaced by specific functions when available.\n\nset to 0 : only use base_class actions (expand, rename, notes, showhide)\nset to 1 : Use specific actions. most single-shot parts will trigger (sounds play, commands run, hitscans fire etc.), and events will invert\nset to 2 : When appropriate, some event types will have even more specific actions. command events trigger or toggle (depending on the time), is_flashlight_on will toggle the flashlight, timerx events will reset\n\nIf your selected base action is none, These won't trigger.\n\nIf you only want specific actions, you may select specific_only in the pac_doubleclick_action command if you only want specifics")
+	function PART:OnDoubleClickSpecified()
+		--override
+	end
+
+	function PART:DoDoubleClick()
+		pace.doubleclickfunc = pac_doubleclick_type:GetString()
+		if pace.doubleclickfunc == "none" or pace.doubleclickfunc == "" then return end
+		if pac_doubleclick_specified:GetInt() ~= 0 and self.ImplementsDoubleClickSpecified then
+			pace.FlashNotification("double click action : class-specific")
+			self:OnDoubleClickSpecified()
+		else
+			self:OnDoubleClickBaseClass()
+		end
+	end
 end
 
 do -- hidden / events

lua/pac3/core/client/parts/command.lua

@@ -5,6 +5,8 @@ PART.ClassName = "command"
 PART.Group = "advanced"
 PART.Icon = "icon16/application_xp_terminal.png"
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 
 BUILDER:SetPropertyGroup("generic")
@@ -312,4 +314,6 @@ function PART:Execute(commandstring)
 	end
 end
 
+PART.OnDoubleClickSpecified = PART.Execute
+
 BUILDER:Register()

lua/pac3/core/client/parts/damage_zone.lua

@@ -6,6 +6,8 @@ PART.ClassName = "damage_zone"
 PART.Group = "combat"
 PART.Icon = "icon16/package.png"
 
+PART.ImplementsDoubleClickSpecified = true
+
 local renderhooks = {
 	"PostDraw2DSkyBox",
 	"PostDrawOpaqueRenderables",
@@ -682,6 +684,10 @@ function PART:OnShow()
 	end
 end
 
+function PART:OnDoubleClickSpecified()
+	self:SendNetMessage()
+end
+
 local dmgzone_requesting_corpses = {}
 function PART:SetAttachPartsToTargetEntity(b)
 	self.AttachPartsToTargetEntity = b

lua/pac3/core/client/parts/event.lua

@@ -17,6 +17,8 @@ PART.ThinkTime = 0
 PART.AlwaysThink = true
 PART.Icon = 'icon16/clock.png'
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 	BUILDER:GetSet("Event", "", {enums = function(part)
 		local output = {}
@@ -45,6 +47,36 @@ PART.Tutorials = {}
 local registered_command_event_series = {}
 local event_series_bounds = {}
 
+function PART:OnDoubleClickSpecified()
+	if GetConVar("pac_doubleclick_specified"):GetInt() == 1 then
+		self:SetInvert(not self:GetInvert())
+		pace.PopulateProperties(self)
+		return
+	end
+
+	if self.Event == "command" then
+		local cmd, time, hide = self:GetParsedArgumentsForObject(self.Events.command)
+		if time == 0 then --toggling mode
+			pac.LocalPlayer.pac_command_events[cmd] = pac.LocalPlayer.pac_command_events[cmd] or {name = cmd, time = pac.RealTime, on = 0}
+			----MORE PAC JANK?? SOMETIMES, THE 2 NOTATION DOESN'T CHANGE THE STATE YET
+			if pac.LocalPlayer.pac_command_events[cmd].on == 1 then
+				RunConsoleCommand("pac_event", cmd, "0")
+			else
+				RunConsoleCommand("pac_event", cmd, "1")
+			end
+		else
+			RunConsoleCommand("pac_event", cmd)
+		end
+	elseif self.Event == "is_flashlight_on" then
+		RunConsoleCommand("impulse", "100")
+	elseif self.Event == "timerx" or self.Event == "timerx2" then
+		self.time = nil
+	else
+		self:SetInvert(not self:GetInvert())
+		pace.PopulateProperties(self)
+	end
+end
+
 function PART:register_command_event(str,b)
 	local ply = self:GetPlayerOwner()
 
@@ -3411,12 +3443,27 @@ function PART:GetParentEx()
 	return self:GetParent()
 end
 
+function PART:GetTargetingModePrefix()
+	local modes = {}
+	if self.AffectChildrenOnly then
+		table.insert(modes, "ACO")
+	end
+	if IsValid(self:GetDestinationPart()) then
+		table.insert(modes, "TP")
+	end
+	if self.MultiTargetPart then
+		table.insert(modes, "MTP")
+	end
+	if table.IsEmpty(modes) then return "" end
+	return "[" .. table.concat(modes, " ") .. "] "
+end
+
 function PART:GetNiceName()
 	local event_name = self:GetEvent()
 
 	if not PART.Events[event_name] then return "unknown event" end
 
-	return PART.Events[event_name]:GetNiceName(self, get_owner(self))
+	return self:GetTargetingModePrefix() .. PART.Events[event_name]:GetNiceName(self, get_owner(self))
 end
 
 local function is_hidden_by_something_else(part, ignored_part)

lua/pac3/core/client/parts/force.lua

@@ -7,6 +7,8 @@ PART.Icon = "icon16/database_go.png"
 PART.ManualDraw = true
 PART.HandleModifiersManually = true
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 	:SetPropertyGroup("AreaShape")
 		:GetSet("HitboxMode", "Box", {enums = {
@@ -97,6 +99,10 @@ function PART:OnShow()
 	self:Impulse(true)
 end
 
+function PART:OnDoubleClickSpecified()
+	self:Impulse(true)
+end
+
 function PART:OnHide()
 	pac.RemoveHook("PostDrawOpaqueRenderables", "pac_force_Draw"..self.UniqueID)
 	self:Impulse(false)

lua/pac3/core/client/parts/hitscan.lua

@@ -9,6 +9,8 @@ PART.ClassName = "hitscan"
 PART.Group = "combat"
 PART.Icon = "icon16/user_gray.png"
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 	:GetSet("ServerBullets", true, {description = "serverside bullets can do damage and exert a physical impact force"})
 	:SetPropertyGroup("bullet properties")
@@ -130,6 +132,10 @@ function PART:Shoot()
 	end
 end
 
+function PART:OnDoubleClickSpecified()
+	self:Shoot()
+end
+
 
 --NOT THE ACTUAL DAMAGE TYPES. UNIQUE IDS TO COMPRESS NET MESSAGES
 local damage_ids = {

lua/pac3/core/client/parts/legacy/sound.lua

@@ -8,6 +8,8 @@ PART.ThinkTime = 0
 PART.Group = 'effects'
 PART.Icon = 'icon16/sound.png'
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 BUILDER:SetPropertyGroup("generic")
 	BUILDER:GetSet("Sound", "")
@@ -329,6 +331,16 @@ function PART:StopSound(force_stop)
 	end
 end
 
+function PART:OnDoubleClickSpecified()
+	if self.playing then
+		self:StopSound(true)
+		self.playing = false
+	else
+		self:PlaySound()
+		self.playing = true
+	end
+end
+
 local channels =
 {
 	CHAN_AUTO = 0,

lua/pac3/core/client/parts/lock.lua

@@ -40,6 +40,7 @@ PART.ClassName = "lock"
 PART.Group = "combat"
 PART.Icon = "icon16/lock.png"
 
+PART.ImplementsDoubleClickSpecified = true
 
 BUILDER:StartStorableVars()
 	:SetPropertyGroup("Behaviour")
@@ -436,6 +437,12 @@ function PART:OnShow()
 	end
 end
 
+function PART:OnDoubleClickSpecified()
+	if self.Mode ~= "Grab" then
+		self:OnShow()
+	end
+end
+
 function PART:OnHide()
 	pac.RemoveHook("PostDrawOpaqueRenderables", "pace_draw_lockpart_preview"..self.UniqueID)
 	self.teleported = false

lua/pac3/core/client/parts/projectile.lua

@@ -18,6 +18,8 @@ PART.ClassName = "projectile"
 PART.Group = {"advanced", "combat"}
 PART.Icon = "icon16/bomb.png"
 
+PART.ImplementsDoubleClickSpecified = true
+
 BUILDER:StartStorableVars()
 	BUILDER:SetPropertyGroup("Firing")
 		BUILDER:GetSet("Speed", 1)
@@ -446,6 +448,10 @@ function PART:Shoot(pos, ang, multi_projectile_count)
 	end
 end
 
+function PART:OnDoubleClickSpecified()
+	self:Shoot()
+end
+
 function PART:SetRadius(val)
 	self.Radius = val
 	local sv_dist = GetConVar("pac_sv_projectile_max_phys_radius"):GetInt()

lua/pac3/core/client/parts/sound.lua

@@ -8,6 +8,7 @@ PART.ClassName = "sound2"
 PART.Icon = 'icon16/music.png'
 PART.Group = 'effects'
 
+PART.ImplementsDoubleClickSpecified = true
 
 BUILDER:StartStorableVars()
 	BUILDER:SetPropertyGroup("generic")
@@ -359,6 +360,16 @@ function PART:OnShow(from_rendering)
 	self.stopsound = false
 end
 
+function PART:OnDoubleClickSpecified()
+	if self.playing then
+		self:StopSound(true)
+		self.playing = false
+	else
+		self:PlaySound()
+		self.playing = true
+	end
+end
+
 function PART:OnHide()
 	self:StopSound()
 end