diff --git a/colors/monotone.vim b/colors/monotone.vim new file mode 100644 index 0000000..10835dd --- /dev/null +++ b/colors/monotone.vim @@ -0,0 +1,3 @@ +let g:colors_name = 'monotone' + +lua require('lush')(require('lush_theme.monotone')) diff --git a/lua/lush_theme/monotone.lua b/lua/lush_theme/monotone.lua new file mode 100644 index 0000000..3eee56f --- /dev/null +++ b/lua/lush_theme/monotone.lua @@ -0,0 +1,286 @@ +-- +-- 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 = 0 +-- 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 { gui = 'italic' }, -- 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 }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline) + LspDiagnosticsDefaultWarning { fg = yellow }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline) + LspDiagnosticsDefaultInformation { fg = blue }, -- Used as the base highlight group. Other LspDiagnostic highlights link to this by default (except Underline) + LspDiagnosticsDefaultHint { fg = green }, -- 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)