summaryrefslogtreecommitdiffstats
path: root/emacs.d/color-theme-weirdness.el
blob: c75996c2b4595dbe86ba014063cee94f595196fb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
(require 'color-theme)

;; weirdness color-theme
(defun color-theme-weirdness ()
  (interactive)
  (color-theme-install
   '(color-theme-weirdness
     ((background-color . "#000000")
      (background-mode . dark)
      (border-color . "#000000")
      (cursor-color . "#FFFFFF")
      (foreground-color . "#FFFFFF")
      (mouse-color . "#000000"))
     (org-level-1                      ((t (:foreground "#5BFD5B" :weight normal))))
     (org-level-2                      ((t (:foreground "#379A37" :weight normal))))
     (org-level-3                      ((t (:foreground "#757575" :weight normal))))
     (org-level-4                      ((t (:foreground "#778899" :weight normal))))
     (org-level-5                      ((t (:foreground "#9898FF" :weight normal))))
     (org-level-6                      ((t (:foreground "#0000B0" :weight normal))))
     (org-level-7                      ((t (:foreground "#740091" :weight normal))))
     (org-level-8                      ((t (:foreground "#B275C1" :weight normal))))
     (fringe                           ((t (:background "#000000"))))
     (mode-line                        ((t (:foreground "#B3B3B3" :background "#43527A" :background "#000000" :box nil))))
     (region                           ((t (:background "#3D3D3D"))))
     (minibuffer-prompt                ((t (:foreground "#72F3FF" :bold t))))
     (flymake-warnline                 ((t (:background "#000060"))))
     (flymake-errline                  ((t (:background "#600000"))))
     (font-lock-builtin-face           ((t (:foreground "#C436C4"))))
     (font-lock-comment-face           ((t (:foreground "#00AC00" :background "#004000" :bold t :box (:line-width 1 :color "#006000" :style nil)))))
     (font-lock-comment-delimiter-face ((t (:inherit 'font-lock-comment-face))))
     (font-lock-function-name-face     ((t (:foreground "#0FFF28"))))
     (font-lock-keyword-face           ((t (:foreground "#4E61BB" :bold t))))
     (font-lock-string-face            ((t (:foreground "#E00900"))))
     (font-lock-type-face              ((t (:foreground "#8522DD"))))
     (font-lock-variable-name-face     ((t (:foreground "#18EFF2"))))
     (font-lock-warning-face           ((t (:foreground "#FF0000" :bold t)))))))

;; weirdnes color-theme 2
;; thinking of improving it.
(defun color-theme-weirdness2 ()
  (interactive)
  (color-theme-install
   '(color-theme-weirdness
     ((background-color . "#000000")
      (background-mode . dark)
      (border-color . "#000000")
      (cursor-color . "#FFFFFF")
      (foreground-color . "#FFFFFF")
      (mouse-color . "#000000"))
     (org-level-1                      ((t (:foreground "#5BFD5B" :weight normal))))
     (org-level-2                      ((t (:foreground "#379A37" :weight normal))))
     (org-level-3                      ((t (:foreground "#757575" :weight normal))))
     (org-level-4                      ((t (:foreground "#778899" :weight normal))))
     (org-level-5                      ((t (:foreground "#9898FF" :weight normal))))
     (org-level-6                      ((t (:foreground "#0000B0" :weight normal))))
     (org-level-7                      ((t (:foreground "#740091" :weight normal))))
     (org-level-8                      ((t (:foreground "#B275C1" :weight normal))))
     (fringe                           ((t (:background "#000000"))))
     (mode-line                        ((t (:foreground "#B3B3B3" :background "#43527A" :background "#000000" :box nil))))
     (region                           ((t (:background "#3D3D3D"))))
     (minibuffer-prompt                ((t (:foreground "#72F3FF" :bold t))))
     (flymake-warnline                 ((t (:background "#000060"))))
     (flymake-errline                  ((t (:background "#600000"))))
     (font-lock-builtin-face           ((t (:foreground "#C436C4"))))
     (font-lock-comment-face           ((t (:foreground "#00AC00" :background "#004000" :bold t :box (:line-width 1 :color "#006000" :style nil)))))
     (font-lock-comment-delimiter-face ((t (:inherit 'font-lock-comment-face))))
     (font-lock-function-name-face     ((t (:foreground "#8522DD"))))
     (font-lock-keyword-face           ((t (:foreground "royal blue"))))
     (font-lock-string-face            ((t (:foreground "#E00900"))))
     (font-lock-type-face              ((t (:foreground "#FF9800"))))
     (font-lock-variable-name-face     ((t (:foreground "#18EFF2"))))
     (font-lock-warning-face           ((t (:foreground "#FF0000" :bold t)))))))

(provide 'color-theme-weirdness)