new and impruved
This commit is contained in:
zastian@mrthoddata.com
120
dots/doom/themes/doom-hardcore-theme.el
Executable file
120
dots/doom/themes/doom-hardcore-theme.el
Executable file
@@ -0,0 +1,120 @@
|
||||
;;; doom-hardcore-theme.el --- inspired by the Hardcore theme -*- lexical-binding: t; no-byte-compile: t; -*-
|
||||
;;
|
||||
;; Added: February 23, 2025
|
||||
;; Author: Your Name <https://github.com/yourusername>
|
||||
;; Maintainer: Your Name <https://github.com/yourusername>
|
||||
;; Source: Hardcore Theme
|
||||
;;
|
||||
;;; Commentary:
|
||||
;;; Code:
|
||||
|
||||
(require 'doom-themes)
|
||||
|
||||
;;
|
||||
;;; Variables
|
||||
|
||||
(defgroup doom-hardcore-theme nil
|
||||
"Options for the `doom-hardcore' theme."
|
||||
:group 'doom-themes)
|
||||
|
||||
(defcustom doom-hardcore-brighter-modeline nil
|
||||
"If non-nil, more vivid colors will be used to style the mode-line."
|
||||
:group 'doom-hardcore-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-hardcore-brighter-comments nil
|
||||
"If non-nil, comments will be highlighted in more vivid colors."
|
||||
:group 'doom-hardcore-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-hardcore-colorful-headers nil
|
||||
"If non-nil, headers in org-mode will be more colorful."
|
||||
:group 'doom-hardcore-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-hardcore-comment-bg doom-hardcore-brighter-comments
|
||||
"If non-nil, comments will have a subtle, darker background."
|
||||
:group 'doom-hardcore-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-hardcore-padded-modeline doom-themes-padded-modeline
|
||||
"If non-nil, adds a 4px padding to the mode-line. Can be an integer."
|
||||
:group 'doom-hardcore-theme
|
||||
:type '(choice integer boolean))
|
||||
|
||||
;;
|
||||
;;; Theme definition
|
||||
|
||||
(def-doom-theme doom-hardcore
|
||||
"A dark theme based on the Hardcore theme."
|
||||
|
||||
;; name default 256 16
|
||||
((bg '("#141414" "#121212" "black" ))
|
||||
(bg-alt '("#141414" "#0d0d0d" "black" ))
|
||||
(base0 '("#0f0f0f" "#0a0a0a" "black" ))
|
||||
(base1 '("#191919" "#161616" "brightblack" ))
|
||||
(base2 '("#242424" "#202020" "brightblack" ))
|
||||
(base3 '("#303030" "#282828" "brightblack" ))
|
||||
(base4 '("#3c3c3c" "#363636" "brightblack" ))
|
||||
(base5 '("#4e4e4e" "#484848" "brightblack" ))
|
||||
(base6 '("#8c8c8c" "#888888" "brightblack" ))
|
||||
(base7 '("#b2b2b2" "#b0b0b0" "brightblack" ))
|
||||
(base8 '("#ffffff" "#eeeeee" "white" ))
|
||||
(fg '("#e0e0e0" "#ffffff" "white" ))
|
||||
(fg-alt '("#c6c6c6" "#b0b0b0" "brightwhite" ))
|
||||
|
||||
(grey base4)
|
||||
(red '("#ff5f5f" "#ff6b6b" "red" ))
|
||||
(orange '("#ffaf5f" "#ffae5f" "brightred" ))
|
||||
(green '("#5fff5f" "#6bff6b" "green" ))
|
||||
(teal '("#5fafd7" "#5faed7" "brightgreen" ))
|
||||
(yellow '("#ffff5f" "#ffff6b" "yellow" ))
|
||||
(blue '("#5fafff" "#5faeff" "brightblue" ))
|
||||
(dark-blue '("#005f87" "#004f77" "blue" ))
|
||||
(magenta '("#af5fff" "#ae5fff" "magenta" ))
|
||||
(violet '("#875fff" "#865fff" "brightmagenta"))
|
||||
(cyan '("#5fdfff" "#5fceff" "brightcyan" ))
|
||||
(dark-cyan '("#0087af" "#00779f" "cyan" ))
|
||||
|
||||
;; face categories -- required for all themes
|
||||
(highlight magenta)
|
||||
(vertical-bar (doom-darken base1 0.1))
|
||||
(selection dark-blue)
|
||||
(builtin orange)
|
||||
(comments (if doom-hardcore-brighter-comments dark-cyan base5))
|
||||
(doc-comments (doom-lighten (if doom-hardcore-brighter-comments dark-cyan base5) 0.25))
|
||||
(constants cyan)
|
||||
(functions green)
|
||||
(keywords magenta)
|
||||
(methods teal)
|
||||
(operators violet)
|
||||
(type violet)
|
||||
(strings yellow)
|
||||
(variables (doom-lighten magenta 0.6))
|
||||
(numbers violet)
|
||||
(region `(,(car base3) ,@(cdr base1)))
|
||||
(error red)
|
||||
(warning yellow)
|
||||
(success green)
|
||||
(vc-modified orange)
|
||||
(vc-added green)
|
||||
(vc-deleted red)
|
||||
|
||||
;; modeline
|
||||
(-modeline-bright doom-hardcore-brighter-modeline)
|
||||
(-modeline-pad (when doom-hardcore-padded-modeline (if (integerp doom-hardcore-padded-modeline) doom-hardcore-padded-modeline 4)))
|
||||
(modeline-bg `(,(doom-darken (car bg) 0.15) ,@(cdr base0)))
|
||||
(modeline-bg-l `(,(car bg) ,@(cdr base0)))
|
||||
(modeline-bg-inactive `(,(doom-darken (car bg) 0.075) ,@(cdr base1)))
|
||||
(modeline-bg-inactive-l (doom-darken bg 0.1)))
|
||||
|
||||
;; Base theme face overrides
|
||||
(((line-number &override) :foreground base5)
|
||||
((line-number-current-line &override) :foreground fg)
|
||||
(mode-line :background modeline-bg :foreground base8
|
||||
:box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
|
||||
(mode-line-inactive :background modeline-bg-inactive :foreground base5
|
||||
:box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive))))
|
||||
)
|
||||
|
||||
;;; doom-hardcore-theme.el ends here
|
||||
107
dots/doom/themes/doom-pandora-theme.el
Executable file
107
dots/doom/themes/doom-pandora-theme.el
Executable file
@@ -0,0 +1,107 @@
|
||||
;;; doom-pandora-theme.el --- Pandora Base16 theme for Doom Emacs -*- lexical-binding: t; no-byte-compile: t; -*-
|
||||
;;
|
||||
;; Based on Base16 Pandora scheme by Cassandra Fox.
|
||||
;; Adapted from doom-dracula-theme.el
|
||||
;;
|
||||
;;; Commentary:
|
||||
;; This theme is a modification of the Doom Dracula theme,
|
||||
;; replacing the Dracula palette with the Base16 Pandora colors.
|
||||
;;
|
||||
;;; Code:
|
||||
|
||||
(require 'doom-themes)
|
||||
|
||||
(defgroup doom-pandora-theme nil
|
||||
"Options for the `doom-pandora' theme."
|
||||
:group 'doom-themes)
|
||||
|
||||
(defcustom doom-pandora-brighter-modeline nil
|
||||
"If non-nil, more vivid colors will be used to style the mode-line."
|
||||
:group 'doom-pandora-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-pandora-brighter-comments nil
|
||||
"If non-nil, comments will be highlighted in more vivid colors."
|
||||
:group 'doom-pandora-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-pandora-colorful-headers nil
|
||||
"If non-nil, headers in org-mode will be more colorful."
|
||||
:group 'doom-pandora-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-pandora-comment-bg doom-pandora-brighter-comments
|
||||
"If non-nil, comments will have a subtle, darker background to enhance legibility."
|
||||
:group 'doom-pandora-theme
|
||||
:type 'boolean)
|
||||
|
||||
(defcustom doom-pandora-padded-modeline doom-themes-padded-modeline
|
||||
"If non-nil, adds a padding to the mode-line. It can be an integer to specify exact padding."
|
||||
:group 'doom-pandora-theme
|
||||
:type '(choice integer boolean))
|
||||
|
||||
|
||||
(def-doom-theme doom-pandora
|
||||
"A dark theme based on the Base16 Pandora color scheme by Cassandra Fox."
|
||||
|
||||
;; Palette:
|
||||
;; Base16 Pandora (keys from base00 to base0F)
|
||||
((bg '("#131213" nil nil)) ; base00
|
||||
(bg-alt '("#2f1823" nil nil)) ; base01
|
||||
(base02 '("#472234" nil nil)) ; base02
|
||||
(base03 '("#ffbee3" nil nil)) ; base03
|
||||
(base04 '("#9b2a46" nil nil)) ; base04
|
||||
(fg '("#f15c99" "#f15c99" "brightwhite")) ; base05
|
||||
(fg-alt '("#9ddf69" "#9ddf69" "white")) ; base0B
|
||||
(accent '("#008080" nil nil)) ; base0D
|
||||
|
||||
(base06 '("#81506a" nil nil)) ; base06
|
||||
(base07 '("#632227" nil nil)) ; base07
|
||||
(base08 '("#b00b69" nil nil)) ; base08 (red)
|
||||
(base09 '("#ff9153" nil nil)) ; base09 (orange)
|
||||
(base0A '("#ffcc00" nil nil)) ; base0A (yellow)
|
||||
(base0C '("#714ca6" nil nil)) ; base0C (blue)
|
||||
(base0D '("#008080" nil nil)) ; base0D (teal; reused as accent)
|
||||
(base0E '("#a24030" nil nil)) ; base0E (magenta)
|
||||
(base0F '("#a24030" nil nil)) ; base0F (duplicate of base0E)
|
||||
|
||||
;; You may optionally define a "grey" for extra use:
|
||||
(grey base04))
|
||||
|
||||
;; Face categories:
|
||||
;; Here we map our palette to Doom's standard face categories.
|
||||
((red base08)
|
||||
(orange base09)
|
||||
(green base0B)
|
||||
(teal base0D)
|
||||
(yellow base0A)
|
||||
(blue base0C)
|
||||
(dark-blue (doom-darken base0C 0.2))
|
||||
(magenta base0E)
|
||||
(violet (doom-blend base0E base0C 0.5))
|
||||
(cyan base0D)) ; Using base0D for cyan (teal)
|
||||
|
||||
;; Base theme face overrides
|
||||
(((line-number &override) :foreground base04)
|
||||
((line-number-current-line &override) :foreground fg)
|
||||
((font-lock-comment-face &override)
|
||||
:background (if doom-pandora-comment-bg (doom-lighten bg 0.05) 'unspecified))
|
||||
(mode-line
|
||||
:background accent :foreground fg
|
||||
:box (when doom-pandora-padded-modeline
|
||||
`(:line-width ,(if (integerp doom-pandora-padded-modeline)
|
||||
doom-pandora-padded-modeline 4)
|
||||
:color ,accent)))
|
||||
(mode-line-inactive
|
||||
:background (doom-darken bg 0.075) :foreground base04
|
||||
:box (when doom-pandora-padded-modeline
|
||||
`(:line-width ,(if (integerp doom-pandora-padded-modeline)
|
||||
doom-pandora-padded-modeline 4)
|
||||
:color ,(doom-darken bg 0.075))))
|
||||
(mode-line-emphasis :foreground (if doom-pandora-brighter-modeline fg accent))
|
||||
;; Example for org-mode customizations:
|
||||
((org-tag &override) :foreground (doom-lighten orange 0.3)))
|
||||
;; No additional variable overrides
|
||||
())
|
||||
|
||||
;;; doom-pandora-theme.el ends here
|
||||
Reference in New Issue
Block a user