Great that you implemented the dark background stuff.
May I suggest some cosmetic improvements? I let you you try it out with the code replacement that I pasted below:
{$LUA}
function SetDarkBackgrounds(dark_mode)
local al = getAddressList()
if dark_mode then
--[BackgroundColor] --
al.Control[0].BackgroundColor = 0x200000
al.Control[1].BackgroundColor = 0x200000
-- [Checkboxes]
al.CheckboxActiveSelectedColor = 0x00FF00
al.CheckboxActiveColor = 0x00FF00
al.CheckboxSelectedColor = 0x0000FF
al.CheckboxColor = 0xFFFF00
-- Change default text color from BLACK to GREY for better visibility
local i
for i=0, al.Count-1 do
if al[i].Color==0x000000 then
al[i].Color=0xC0C0C0
end
end
else
-- [BackgroundColor] --
al.Control[0].BackgroundColor = 0XFFFFFF
al.Control[1].BackgroundColor = 0xFFFFFF
-- [Checkboxes]
al.CheckboxActiveSelectedColor = 0xFFFFFF
al.CheckboxActiveColor = 0x0000FF
al.CheckboxSelectedColor = 0x0000FF
al.CheckboxColor = 0x000000
-- Change default text color from GREY to BLACK for better visibility
local i
for i=0, al.Count-1 do
if al[i].Color==0xC0C0C0 then
al[i].Color=0x000000
end
end
end
end
[ENABLE]
SetDarkBackgrounds(true)
[DISABLE]
SetDarkBackgrounds(false)
-- color order is : BGRToHex(0, 0, 0)
-- [Active/SelectedColor] --
-- al.SelectedBackgroundColor
-- al.SelectedSecondaryBackgroundColor
-- al.SelectedColor
-- [Signs/Arrows] --
-- al.ExpandSignColor
-- al.DecreaseArrowColor
-- al.IncreaseArrowColor
-- [Foundlist/SearchColor] --
-- getMainForm().color
-- getMainForm().Foundlist3.Color