Emacs themes

dark.el

(defun cubshat ()
  (interactive)
  (color-theme-install
   '(cubshat
      ((background-color . "#222222")
      (background-mode . light)
      (border-color . "#222222")
      (cursor-color . "#999999")
      (foreground-color . "#e5dcdc")
      (mouse-color . "black"))
     (fringe ((t (:background "#222222"))))
     (mode-line ((t (:foreground "#dadea1" :background "#2b2b2b"))))
     (region ((t (:background "#444444"))))
     (font-lock-builtin-face ((t (:foreground "#cda8a8"))))
     (font-lock-comment-face ((t (:foreground "#878787"))))
     (font-lock-function-name-face ((t (:foreground "#BF8C8B"))))
     (font-lock-keyword-face ((t (:foreground "#8BBFA5"))))
     (font-lock-string-face ((t (:foreground "#FFE5CC"))))
     (font-lock-type-face ((t (:foreground "#da9595"))))
     (font-lock-variable-name-face ((t (:foreground "#e5dcdc"))))
     (minibuffer-prompt ((t (:foreground "#7299ff" :bold t))))
     (font-lock-warning-face ((t (:foreground "Red" :bold t))))
     )))

light.el

(defun wintergreen ()
  (interactive)
  (color-theme-install
   '(wintergreen
      ((background-color . "#f0f0f0")
      (background-mode . light)
      (border-color . "#eeeeee")
      (cursor-color . "#999999")
      (foreground-color . "#404040")
      (mouse-color . "black"))
     (fringe ((t (:background "#eeeeee"))))
     (mode-line ((t (:foreground "#444" :background "#e0e0e0"))))
     (region ((t (:background "#cccccc"))))
     (font-lock-builtin-face ((t (:foreground "#5f746e"))))
     (font-lock-comment-face ((t (:foreground "#C0A3A0"))))
     (font-lock-function-name-face ((t (:foreground "#555555"))))
     (font-lock-keyword-face ((t (:foreground "#47C292"))))
     (font-lock-string-face ((t (:foreground "#5f746e"))))
     (font-lock-type-face ((t (:foreground "#15934c"))))
     (font-lock-variable-name-face ((t (:foreground "#748683"))))
     (minibuffer-prompt ((t (:foreground "#444" :bold f))))
     (font-lock-warning-face ((t (:foreground "#128d5d" :bold t))))
     )))