gfx_shard_debug.lua

function widget:GetInfo()
   return {
      name      = "Shard FX",
      desc      = "Adds glow effect at debug points",
      author    = "AF and Floris",
      date      = "May 2018",
      license   = "GNU GPL, v2 or later",
      layer     = 2,
      enabled   = true,
   }
end



--------------------------------------------------------------------------------
--------------------------------------------------------------------------------

local commands					= {}
local mapDrawNicknameTime		= {}	-- this table is used to filter out previous map drawing nicknames if user has drawn something new
local mapEraseNicknameTime		= {}

local ownPlayerID				= Spring.GetMyPlayerID()

-- spring vars
local spGetCameraPosition		= Spring.GetCameraPosition
local spGetPlayerInfo			= Spring.GetPlayerInfo
local spTraceScreenRay			= Spring.TraceScreenRay
local spLoadCmdColorsConfig		= Spring.LoadCmdColorsConfig
local spGetTeamColor			= Spring.GetTeamColor
local spGetMouseState			= Spring.GetMouseState

local glCreateList				= gl.CreateList
local glDeleteList				= gl.DeleteList
local glCallList				= gl.CallList

local diag						= math.diag

--------------------------------------------------------------------------------
--------------------------------------------------------------------------------

local nicknameOpacityMultiplier	= 6		-- multiplier applied to the given color opacity of the type: 'map_draw'
local scaleWithCamera			= true
local showMouseclicks			= true

local generalSize 				= 30		-- overall size
local generalOpacity 			= 0.8		-- overall opacity
local generalDuration			= 1.2		-- overall duration

local imageDir					= ":n:LuaUI/Images/"

local types = {
	waiting = {
		size			= 1.0,
		endSize			= 0.25,
		duration		= 0.1,
		baseColor 		= {0.66 ,1 ,0.15 ,0.5}
	},
	nothing = {
		size			= 1.0,
		endSize			= 0.25,
		duration		= 0.2,
		baseColor 		= {1.0 ,0 ,0 ,0.5}
	},
	rightclick = {
		size			= 0.82,
		endSize			= 0.25,
		duration		= 0.85,
		baseColor		= {1.00 ,0.85 ,0.15 ,0.55}
	},
	leftclick2 = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {0.7 ,1 ,0.15 ,0.18}
	},
	rightclick2 = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor		= {1.00 ,0.85 ,0.15 ,0.20}
	},
	leftclick2 = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {0.7 ,1 ,0.15 ,0.18}
	},
	final_choice = {
		size			= 5,
		endSize			= 0.82,
		duration		= 3,
		baseColor 		= {0.1 ,1 ,0.15 ,0.5}
	},
	main_good = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {0.2 ,1 ,0 ,0.3}
	},
	main_bad = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {1 ,0 ,0.15 ,0.3}
	},
	secondary_good = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {0 ,1 ,1 ,0.1}
	},
	secondary_bad = {
		size			= 1.33,
		endSize			= 0.82,
		duration		= 1.65,
		baseColor 		= {1 ,0 ,1 ,0.1}
	},
}

--------------------------------------------------------------------------------
--------------------------------------------------------------------------------

local commandCount = 0
local partCache = {}
local mouseButton = false
local baseDlist


local function DrawGroundquad(x,y,z,size)
	gl.TexCoord(0,0)
	gl.Vertex(x-size,y,z-size)
	gl.TexCoord(0,1)
	gl.Vertex(x-size,y,z+size)
	gl.TexCoord(1,1)
	gl.Vertex(x+size,y,z+size)
	gl.TexCoord(1,0)
	gl.Vertex(x+size,y,z-size)
end


local function AddCommandSpotter(cmdType, x, y, z, osClock)
	commandCount = commandCount + 1
	commands[commandCount] = {
		cmdType		= cmdType,
		x			= x,
		y			= y,
		z			= z,
		osClock		= osClock
	}
end


------------------------------------------------------------------------------------
------------------------------------------------------------------------------------

--	Engine Triggers

------------------------------------------------------------------------------------
------------------------------------------------------------------------------------

function widget:Initialize()
	Spring.Echo( "shard debug point reciever listening" )
	widgetHandler:RegisterGlobal('shard_debug_position', shard_debug_position)
	baseDlist = glCreateList(function()
		gl.Texture(imageDir..'glow.dds')
		gl.BeginEnd(GL.QUADS,DrawGroundquad,0,0,0,1)
		gl.Texture(false)
	end)
end


function widget:Shutdown()
	widgetHandler:DeregisterGlobal('shard_debug_position')
	glDeleteList(baseDlist)
end


function shard_debug_position(x,z,col)
	Spring.Echo( "debug point recieved" )
	AddCommandSpotter(col, x, 0, z, os.clock())
end

function widget:DrawWorldPreUnit()
  if Spring.IsGUIHidden() then return end

	local osClock = os.clock()
	local camX, camY, camZ = spGetCameraPosition()
	gl.Blending(GL.SRC_ALPHA, GL.ONE_MINUS_SRC_ALPHA)
	--gl.Blending(GL.SRC_ALPHA, GL.ONE)
	gl.DepthTest(false)
	gl.PushMatrix()

	for cmdKey, cmdValue in pairs(commands) do

		local duration		= types[cmdValue.cmdType].duration * generalDuration
		local durationProcess = (osClock - cmdValue.osClock) / duration

		-- remove when duration has passed
		if osClock - cmdValue.osClock > duration  then
			commands[cmdKey] = nil

		-- remove nicknames when user has drawn something new
		elseif  cmdValue.cmdType == 'map_draw'  and  mapDrawNicknameTime[cmdValue.playerID] ~= nil  and  cmdValue.osClock < mapDrawNicknameTime[cmdValue.playerID] then

			commands[cmdKey] = nil

		-- draw all
		elseif  types[cmdValue.cmdType].baseColor[4] > 0 then
			local size	= generalSize * types[cmdValue.cmdType].size   +   ((generalSize * types[cmdValue.cmdType].endSize - generalSize * types[cmdValue.cmdType].size) * durationProcess)
			--local size	= generalSize * types[cmdValue.cmdType].size
			local a		= (1 - durationProcess) * generalOpacity

			local baseColor = types[cmdValue.cmdType].baseColor

			a			= a * baseColor[4]

			gl.Translate(cmdValue.x, cmdValue.y, cmdValue.z)

			local camDistance = diag(camX-cmdValue.x, camY-cmdValue.y, camZ-cmdValue.z)

			-- set scale   (based on camera distance)
			local scale = 1
			if scaleWithCamera and camZ then
				scale = 0.82 + camDistance / 20000
				gl.Scale(scale,scale,scale)
			end

			-- base glow
			if baseColor[4] > 0 then
				gl.Color(baseColor[1],baseColor[2],baseColor[3],a)
				gl.Scale(size,1,size)
				glCallList(baseDlist)
				gl.Scale(1/size,1,1/size)
				--gl.Texture(imageDir..'glow.dds')
				--gl.BeginEnd(GL.QUADS,DrawGroundquad,0,0,0,size)
				--gl.Texture(false)
			end
			if scaleWithCamera and camZ then
				gl.Scale(1/scale,1/scale,1/scale)
			end
			gl.Translate(-cmdValue.x, -cmdValue.y, -cmdValue.z)

		end
	end

	gl.PopMatrix()
	gl.Scale(1,1,1)
	gl.Color(1,1,1,1)
end