做了两个lispworks颜色主题

eink主题

(define-color-theme "eink" ()
  :foreground (color:make-rgb  0.00s0 0.00s0 0.00s0)
  :background (color:make-rgb 0.83s0 0.83s0 0.85s0)
  :region '(:foreground :color_highlighttext
        :background :color_highlight)
  :show-point-face `(:background ,(color:make-rgb 0.6275s0 0.1255s0 0.9412s0))
  :interactive-input-face '(:foreground :pink)
  :highlight '(:bold-p t)
  :non-focus-complete-face '(:background :tweak_background)
  :font-lock-function-name-face `(:foreground ,(color:make-rgb 0.45s0 0.11s0 0.49s0))
  :font-lock-comment-face `(:foreground ,(color:make-rgb 0.23s0 0.47s0 0.53s0))
  :font-lock-type-face `(:foreground ,(color:make-rgb 0.82s0 0.42s0 0.58s0))
  :font-lock-variable-name-face `(:foreground ,(color:make-rgb 0.02s0 0.07s0 0.49s0))
  :font-lock-string-face `(:foreground ,(color:make-rgb 0.55s0 0.55s0 0.55s0))
  :font-lock-keyword-face `(:foreground ,(color:make-rgb 0.01s0 0.14s0 0.96s0))
  :font-lock-builtin-face `(:foreground ,(color:make-rgb 0.93s0 0.39s0 0.28s0))
  :compiler-note-highlight '(:foreground :magenta)
  :compiler-warning-highlight '(:foreground :orange)
  :compiler-error-highlight '(:foreground :red))

效果

截屏2022-01-27 上午10.16.42.png

borland主题

(define-color-theme "borland" ()
  :foreground (color:make-rgb  0.47s0 0.67s0 1.0s0)
  :background (color:make-rgb 0.0s0 0.0s0 0.4s0)
  :region '(:foreground :color_highlighttext
        :background :color_highlight)
  :show-point-face `(:background ,(color:make-rgb 0.6275s0 0.1255s0 0.9412s0))
  :interactive-input-face '(:foreground :pink)
  :highlight '(:bold-p t)
  :non-focus-complete-face '(:background :tweak_background)
  :font-lock-function-name-face `(:foreground ,(color:make-rgb 1s0 1s0 0s0))
  :font-lock-comment-face `(:foreground ,(color:make-rgb 0.78s0 0.87s0 0.05s0))
  :font-lock-type-face `(:foreground ,(color:make-rgb 1s0 1s0 1s0))
  :font-lock-variable-name-face `(:foreground ,(color:make-rgb 0.47s0 0.67s0 1s0))
  :font-lock-string-face `(:foreground ,(color:make-rgb 1s0 0.78s0 0.0s0))
  :font-lock-keyword-face `(:foreground ,(color:make-rgb 0.75s0 0.84s0 1s0))
  :font-lock-builtin-face `(:foreground ,(color:make-rgb 0.75s0 0.64s0 0.64s0))
  :compiler-note-highlight '(:foreground :magenta)
  :compiler-warning-highlight '(:foreground :orange)
  :compiler-error-highlight '(:foreground :red))

效果

截屏2022-01-27 上午10.15.59.png