mirror of
https://github.com/He4eT/desolate.nvim.git
synced 2026-05-04 17:07:23 +00:00
286 lines
17 KiB
Lua
286 lines
17 KiB
Lua
--
|
|
-- m o n o t o n e
|
|
--
|
|
--
|
|
-- Copyright 2021 Kim Silkebækken
|
|
--
|
|
-- Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
-- of this software and associated documentation files (the "Software"), to
|
|
-- deal in the Software without restriction, including without limitation the
|
|
-- rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
|
-- sell copies of the Software, and to permit persons to whom the Software is
|
|
-- furnished to do so, subject to the following conditions:
|
|
--
|
|
-- The above copyright notice and this permission notice shall be included in
|
|
-- all copies or substantial portions of the Software.
|
|
--
|
|
-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
-- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
-- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
-- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
-- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
-- FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
|
-- IN THE SOFTWARE.
|
|
--
|
|
--
|
|
-- Lua configuration example:
|
|
--
|
|
-- vim.g.monotone_h = 85
|
|
-- vim.g.monotone_s = 30
|
|
-- vim.g.monotone_l = 50
|
|
-- vim.g.monotone_contrast = 100
|
|
-- vim.g.monotone_true_monotone = true
|
|
-- vim.o.background = 'light'
|
|
--
|
|
|
|
local lush = require('lush')
|
|
local hsl = lush.hsl
|
|
|
|
-- Config options
|
|
local opt = {
|
|
bg = vim.o.background,
|
|
color = hsl(
|
|
tonumber(vim.g.monotone_h) or 15,
|
|
tonumber(vim.g.monotone_s) or 5,
|
|
(tonumber(vim.g.monotone_l) or 50) + 35
|
|
),
|
|
contrast = (tonumber(vim.g.monotone_contrast) or 105) / 100,
|
|
true_monotone = vim.g.monotone_true_monotone or false,
|
|
}
|
|
|
|
-- Handle dark/light background color
|
|
local offset_fn = 'lighten'
|
|
if opt.bg == 'light' then
|
|
opt.color = opt.color.darken(50)
|
|
offset_fn = 'darken'
|
|
end
|
|
|
|
-- Monochrome shades
|
|
local shade = function(color, offset)
|
|
return color[offset_fn](offset * opt.contrast)
|
|
end
|
|
local s = { -22, -32, -46, -55, -69, -75, -88, normal = 0, inv = 100 }
|
|
for k, v in pairs(s) do
|
|
s[k] = shade(opt.color, v)
|
|
end
|
|
|
|
-- Highlight colors
|
|
local red = shade(hsl(5, 90, s.normal.l), -25)
|
|
local yellow = shade(hsl(32, 100, s.normal.l), -25)
|
|
local blue = shade(hsl(205, 85, s.normal.l), -20)
|
|
local green = shade(hsl(90, 40, s.normal.l), -40)
|
|
local eob = shade(hsl(240, 30, s.normal.l), -40)
|
|
local nt = shade(hsl(330, 30, s.normal.l), -50)
|
|
|
|
if opt.true_monotone then
|
|
-- Disable all colors
|
|
red = s[3]
|
|
yellow = s[2]
|
|
blue = s[1]
|
|
green = s[4]
|
|
eob = s[4]
|
|
nt = s[4]
|
|
end
|
|
|
|
local hl1 = red
|
|
local hl2 = yellow
|
|
local hl3 = blue
|
|
|
|
return lush(function()
|
|
return {
|
|
Normal { fg = s.normal, bg = s[7] }, -- Normal text
|
|
|
|
SyntaxError { sp = red, gui = 'undercurl' },
|
|
SyntaxWarning { sp = yellow, gui = 'undercurl' },
|
|
SyntaxInfo { sp = blue, gui = 'undercurl' },
|
|
SyntaxHint { sp = green, gui = 'undercurl' },
|
|
|
|
Comment { fg = s[4], gui = 'italic' }, -- any comment
|
|
ColorColumn { bg = s[6] }, -- used for the columns set with 'colorcolumn'
|
|
Conceal { }, -- placeholder characters substituted for concealed text (see 'conceallevel')
|
|
Cursor { bg = hl1 }, -- character under the cursor
|
|
CursorI { bg = s.inv }, -- insert cursor TODO make this based on other colors
|
|
CursorR { bg = hl2 }, -- replace cursor
|
|
CursorO { bg = hl3 }, -- operator-pending cursor
|
|
-- lCursor { }, -- the character under the cursor when |language-mapping| is used (see 'guicursor')
|
|
-- CursorIM { }, -- like Cursor, but used when in IME mode |CursorIM|
|
|
-- CursorColumn { }, -- Screen-column at the cursor, when 'cursorcolumn' is set.
|
|
CursorLine { bg = Normal.bg[offset_fn](5) }, -- Screen-line at the cursor, when 'cursorline' is set. Low-priority if foreground (ctermfg OR guifg) is not set.
|
|
Directory { }, -- directory names (and other special names in listings)
|
|
DiffAdd { fg = green }, -- diff mode: Added line |diff.txt|
|
|
DiffChange { fg = yellow }, -- diff mode: Changed line |diff.txt|
|
|
DiffDelete { fg = red }, -- diff mode: Deleted line |diff.txt|
|
|
DiffText { fg = s[6], bg = red }, -- diff mode: Changed text within a changed line |diff.txt|
|
|
EndOfBuffer { fg = eob }, -- filler lines (~) after the end of the buffer. By default, this is highlighted like |hl-NonText|.
|
|
-- TermCursor { }, -- cursor in a focused terminal
|
|
-- TermCursorNC { }, -- cursor in an unfocused terminal
|
|
Error { fg = hl1, gui = 'bold' }, -- (preferred) any erroneous construct
|
|
ErrorMsg { Error }, -- error messages on the command line
|
|
VertSplit { fg = s[1] }, -- the column separating vertically split windows
|
|
Folded { fg = s.normal, bg = s[5], gui = 'italic' }, -- line used for closed folds
|
|
FoldColumn { }, -- 'foldcolumn'
|
|
SignColumn { }, -- column where |signs| are displayed
|
|
IncSearch { fg = s[7], bg = hl3 }, -- 'incsearch' highlighting; also used for the text replaced with ":s///c"
|
|
Substitute { }, -- |:substitute| replacement text highlighting
|
|
LineNr { fg = s[1] }, -- Line number for ":number" and ":#" commands, and when 'number' or 'relativenumber' option is set.
|
|
CursorLineNr { fg = s[1] }, -- Like LineNr when 'cursorline' or 'relativenumber' is set for the cursor line.
|
|
MatchParen { fg = s[7], bg = hl2 }, -- The character under the cursor or just before it, if it is a paired bracket, and its match. |pi_paren.txt|
|
|
ParenMatch { MatchParen },
|
|
ModeMsg { }, -- 'showmode' message (e.g., "-- INSERT -- ")
|
|
MsgArea { }, -- Area for messages and cmdline
|
|
MsgSeparator { }, -- Separator for scrolled messages, `msgsep` flag of 'display'
|
|
MoreMsg { fg = hl3, gui = 'bold' }, -- |more-prompt|
|
|
NonText { fg = nt }, -- '@' at the end of the window, characters from 'showbreak' and other characters that do not really exist in the text (e.g., ">" displayed when a double-wide character doesn't fit at the end of the line). See also |hl-EndOfBuffer|.
|
|
NormalFloat { }, -- Normal text in floating windows.
|
|
NormalNC { }, -- Normal text in non-current windows
|
|
Pmenu { fg = s[1], bg = s[6] }, -- Popup menu: Normal item.
|
|
PmenuSel { fg = s[6], bg = s[1] }, -- Popup menu: selected item.
|
|
PmenuSbar { bg = s[6] }, -- Popup menu: scrollbar.
|
|
PmenuThumb { bg = s[6] }, -- Popup menu: Thumb of the scrollbar.
|
|
Question { }, -- |hit-enter| prompt and yes/no questions
|
|
QuickFixLine { }, -- Current |quickfix| item in the quickfix window. Combined with |hl-CursorLine| when the cursor is there.
|
|
Search { fg = s[7], bg = hl2 }, -- Last search pattern highlighting (see 'hlsearch'). Also used for similar items that need to stand out.
|
|
SpecialKey { gui = 'bold' }, -- Unprintable characters: text displayed differently from what it really is. But not 'listchars' whitespace. |hl-Whitespace|
|
|
SpellBad { SyntaxError }, -- Word that is not recognized by the spellchecker. |spell| Combined with the highlighting used otherwise.
|
|
SpellCap { SyntaxInfo }, -- Word that should start with a capital. |spell| Combined with the highlighting used otherwise.
|
|
SpellLocal { SyntaxHint }, -- Word that is recognized by the spellchecker as one that is used in another region. |spell| Combined with the highlighting used otherwise.
|
|
SpellRare { SyntaxWarning }, -- Word that is recognized by the spellchecker as one that is hardly ever used. |spell| Combined with the highlighting used otherwise.
|
|
StatusLine { fg = s[1], gui = 'underline' }, -- status line of current window
|
|
StatusLineNC { fg = s[3], gui = 'underline' }, -- status lines of not-current windows Note: if this is equal to "StatusLine" Vim will use "^^^" in the status line of the current window.
|
|
TabLine { fg = s[3] }, -- tab pages line, not active tab page label
|
|
TabLineFill { fg = s[3] }, -- tab pages line, where there are no labels
|
|
TabLineSel { fg = s[1], gui = 'bold' }, -- tab pages line, active tab page label
|
|
Title { gui = 'bold' }, -- titles for output from ":set all", ":autocmd" etc.
|
|
Visual { fg = s[7], bg = s.normal }, -- Visual mode selection
|
|
VisualNOS { }, -- Visual mode selection when vim is "Not Owning the Selection".
|
|
Warning { fg = hl2, gui = 'bold' }, -- warning messages
|
|
WarningMsg { Warning }, -- warning messages
|
|
Whitespace { fg = s[6] }, -- "nbsp", "space", "tab" and "trail" in 'listchars'
|
|
WildMenu { fg = s[6], fg = s.normal }, -- current match in 'wildmenu' completion
|
|
|
|
Constant { }, -- (preferred) any constant
|
|
String { fg = s[2] }, -- a string constant: "this is a string"
|
|
Character { }, -- a character constant: 'c', '\n'
|
|
Number { }, -- a number constant: 234, 0xff
|
|
Boolean { gui = 'italic' }, -- a boolean constant: TRUE, false
|
|
Float { }, -- a floating point constant: 2.3e10
|
|
|
|
Identifier { gui = 'italic' }, -- (preferred) any variable name
|
|
Function { gui = 'bold' }, -- function name (also: methods for classes)
|
|
|
|
Statement { gui = 'bold,italic' }, -- (preferred) any statement
|
|
Conditional { }, -- if, then, else, endif, switch, etc.
|
|
Repeat { }, -- for, do, while, etc.
|
|
Label { }, -- case, default, etc.
|
|
Operator { }, -- "sizeof", "+", "*", etc.
|
|
Keyword { }, -- any other keyword
|
|
Exception { }, -- try, catch, throw
|
|
|
|
PreProc { }, -- (preferred) generic Preprocessor
|
|
Include { gui = 'italic' }, -- preprocessor #include
|
|
Define { }, -- preprocessor #define
|
|
Macro { }, -- same as Define
|
|
PreCondit { }, -- preprocessor #if, #else, #endif, etc.
|
|
|
|
Type { gui = 'bold' }, -- (preferred) int, long, char, etc.
|
|
StorageClass { }, -- static, register, volatile, etc.
|
|
Structure { }, -- struct, union, enum, etc.
|
|
Typedef { }, -- A typedef
|
|
|
|
Special { }, -- (preferred) any special symbol
|
|
SpecialChar { }, -- special character in a constant
|
|
Tag { }, -- you can use CTRL-] on this
|
|
Delimiter { fg = s[1] }, -- character that needs attention
|
|
SpecialComment { }, -- special things inside a comment
|
|
Debug { }, -- debugging statements
|
|
|
|
Underlined { gui = 'underline' }, -- (preferred) text that stands out, HTML links
|
|
Bold { gui = 'bold' },
|
|
Italic { gui = 'italic' },
|
|
|
|
-- Ignore { }, -- (preferred) left blank, hidden |hl-Ignore|
|
|
|
|
Todo { fg = hl2, gui = 'bold,italic' }, -- (preferred) anything that needs extra attention; mostly the keywords TODO FIXME and XXX
|
|
|
|
-- LspReferenceText { }, -- used for highlighting "text" references
|
|
-- LspReferenceRead { }, -- used for highlighting "read" references
|
|
-- LspReferenceWrite { }, -- used for highlighting "write" references
|
|
|
|
LspDiagnosticsDefaultError { fg = red, bg = shade(red, -78) }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline)
|
|
LspDiagnosticsDefaultWarning { fg = yellow, bg = shade(yellow, -78) }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline)
|
|
LspDiagnosticsDefaultInformation { fg = blue, bg = shade(blue, -78) }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline)
|
|
LspDiagnosticsDefaultHint { fg = green, bg = shade(green, -78) }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline)
|
|
|
|
-- LspDiagnosticsVirtualTextError { }, -- Used for "Error" diagnostic virtual text
|
|
-- LspDiagnosticsVirtualTextWarning { }, -- Used for "Warning" diagnostic virtual text
|
|
-- LspDiagnosticsVirtualTextInformation { }, -- Used for "Information" diagnostic virtual text
|
|
-- LspDiagnosticsVirtualTextHint { }, -- Used for "Hint" diagnostic virtual text
|
|
|
|
LspDiagnosticsUnderlineError { SyntaxError }, -- Used to underline "Error" diagnostics
|
|
LspDiagnosticsUnderlineWarning { SyntaxWarning }, -- Used to underline "Warning" diagnostics
|
|
LspDiagnosticsUnderlineInformation { SyntaxInfo }, -- Used to underline "Information" diagnostics
|
|
LspDiagnosticsUnderlineHint { SyntaxHint }, -- Used to underline "Hint" diagnostics
|
|
|
|
-- LspDiagnosticsFloatingError { }, -- Used to color "Error" diagnostic messages in diagnostics float
|
|
-- LspDiagnosticsFloatingWarning { }, -- Used to color "Warning" diagnostic messages in diagnostics float
|
|
-- LspDiagnosticsFloatingInformation { }, -- Used to color "Information" diagnostic messages in diagnostics float
|
|
-- LspDiagnosticsFloatingHint { }, -- Used to color "Hint" diagnostic messages in diagnostics float
|
|
|
|
-- LspDiagnosticsSignError { }, -- Used for "Error" signs in sign column
|
|
-- LspDiagnosticsSignWarning { }, -- Used for "Warning" signs in sign column
|
|
-- LspDiagnosticsSignInformation { }, -- Used for "Information" signs in sign column
|
|
-- LspDiagnosticsSignHint { }, -- Used for "Hint" signs in sign column
|
|
|
|
-- TSAnnotation { }; -- For C++/Dart attributes, annotations that can be attached to the code to denote some kind of meta information.
|
|
-- TSAttribute { }; -- (unstable) TODO: docs
|
|
-- TSBoolean { }; -- For booleans.
|
|
-- TSCharacter { }; -- For characters.
|
|
-- TSComment { }; -- For comment blocks.
|
|
-- TSConstructor { }; -- For constructor calls and definitions: ` { }` in Lua, and Java constructors.
|
|
-- TSConditional { }; -- For keywords related to conditionnals.
|
|
TSConstant { gui = 'underline' }; -- For constants
|
|
-- TSConstBuiltin { }; -- For constant that are built in the language: `nil` in Lua.
|
|
-- TSConstMacro { }; -- For constants that are defined by macros: `NULL` in C.
|
|
-- TSError { }; -- For syntax/parser errors.
|
|
-- TSException { }; -- For exception related keywords.
|
|
-- TSField { }; -- For fields.
|
|
-- TSFloat { }; -- For floats.
|
|
-- TSFunction { }; -- For function (calls and definitions).
|
|
-- TSFuncBuiltin { }; -- For builtin functions: `table.insert` in Lua.
|
|
-- TSFuncMacro { }; -- For macro defined fuctions (calls and definitions): each `macro_rules` in Rust.
|
|
-- TSInclude { }; -- For includes: `#include` in C, `use` or `extern crate` in Rust, or `require` in Lua.
|
|
-- TSKeyword { }; -- For keywords that don't fall in previous categories.
|
|
-- TSKeywordFunction { }; -- For keywords used to define a fuction.
|
|
-- TSLabel { }; -- For labels: `label:` in C and `:label:` in Lua.
|
|
-- TSMethod { }; -- For method calls and definitions.
|
|
-- TSNamespace { }; -- For identifiers referring to modules and namespaces.
|
|
-- TSNone { }; -- TODO: docs
|
|
-- TSNumber { }; -- For all numbers
|
|
-- TSOperator { }; -- For any operator: `+`, but also `->` and `*` in C.
|
|
-- TSParameter { }; -- For parameters of a function.
|
|
-- TSParameterReference { }; -- For references to parameters of a function.
|
|
TSProperty { gui = 'italic' }; -- Same as `TSField`.
|
|
-- TSPunctDelimiter { }; -- For delimiters ie: `.`
|
|
-- TSPunctBracket { }; -- For brackets and parens.
|
|
-- TSPunctSpecial { }; -- For special punctutation that does not fall in the catagories before.
|
|
-- TSRepeat { }; -- For keywords related to loops.
|
|
-- TSString { }; -- For strings.
|
|
TSStringRegex { fg = s[1], gui = 'italic' }; -- For regexes.
|
|
TSStringEscape { fg = s.normal, gui = 'bold' }; -- For escape characters within a string.
|
|
-- TSSymbol { }; -- For identifiers referring to symbols or atoms.
|
|
-- TSType { }; -- For types.
|
|
-- TSTypeBuiltin { }; -- For builtin types.
|
|
-- TSVariable { }; -- Any variable name that does not have another highlight.
|
|
-- TSVariableBuiltin { }; -- Variable names that are defined by the languages, like `this` or `self`.
|
|
|
|
-- TSTag { }; -- Tags like html tag names.
|
|
-- TSTagDelimiter { }; -- Tag delimiter like `<` `>` `/`
|
|
-- TSText { }; -- For strings considered text in a markup language.
|
|
-- TSEmphasis { }; -- For text to be represented with emphasis.
|
|
-- TSUnderline { }; -- For text to be represented with an underline.
|
|
-- TSStrike { }; -- For strikethrough text.
|
|
-- TSTitle { }; -- Text that is part of a title.
|
|
-- TSLiteral { }; -- Literal text.
|
|
-- TSURI { }; -- Any URI like a link or email.
|
|
}
|
|
end)
|