Lua: "Solo dim" -slider

[spk77]

Haven't been coding for a while, so I guess it's time to test something.

Solo dim slider - smooth transition from "True solo" to "Dim unsoloed tracks by x decibels"

-- Solo dim slider by spk77 29-Aug-2019 (Thanks Lokasenna for the GUI Library)

-- The Core library must be loaded prior to anything else

local lib_path = reaper.GetExtState("Lokasenna_GUI", "lib_path_v2")
if not lib_path or lib_path == "" then
    reaper.MB("Couldn't load the Lokasenna_GUI library. Please run 'Script: Set Lokasenna_GUI v2 library path.lua' in your Action List.", "Whoops!", 0)
    return
end
loadfile(lib_path .. "Core.lua")()

GUI.req("Classes/Class - Slider.lua")()

-- If any of the requested libraries weren't found, abort the script nicely.
if missing_lib then return 0 end


------------------------------------
-------- Window settings -----------
------------------------------------


GUI.name = "Solo dim slider"
GUI.x, GUI.y, GUI.w, GUI.h = 0, 0, 256+40, 100
GUI.anchor, GUI.corner = "screen", "C"

------------------------------------
-------- GUI Elements --------------
------------------------------------

--[[  

  Slider    z,   x,   y,   w,   caption, min, max, defaults[, inc, dir]
  
]]--

GUI.New("sldr_dim", "Slider", 1, 20, 50, 256, "True solo", -30, -0.1, 0, 0.1, "h")
local sldr_dim = GUI.elms.sldr_dim
sldr_dim.show_values = false

------------------------------------
-------- Functions  ----------------
------------------------------------

function GUI.elms.sldr_dim:ondrag()
  GUI.Slider.ondrag(self)
  local thresh = GUI.Val("sldr_dim")
  if thresh == sldr_dim.min then
    if reaper.GetToggleCommandState(40745) == 1 then
      reaper.Main_OnCommand(40745, 0)
      sldr_dim.caption = "True solo"
    end
 else
    if reaper.GetToggleCommandState(40745) == 0 then
      reaper.Main_OnCommand(40745, 0)
    end
    sldr_dim.caption = "Dim unsoloed tracks by " .. thresh .. "dB"
  end
  reaper.SNM_SetIntConfigVar("solodimdb10", thresh*10)
end


------------------------------------
-- Init ----------------------------
------------------------------------

function init()
  if reaper.GetToggleCommandState(40745) == 1 then
    reaper.Main_OnCommand(40745, 0)
    sldr_dim.caption = "True solo"
  end
end

GUI.Init()
GUI.Main()
init()

[Lokasenna]

Nice.

I can't remember any of them off-hand, but aren't there a number of other global Solo settings tucked away in Preferences and the Action List? A script with all of them in one window might be handy so people don't have to go searching.