dos-like theme for emacs.

dos.el

(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(default ((t (:inherit nil :stipple nil :background "blue" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 140 :width normal :foundry "nil" :family "Menlo"))))
  '(custom-comment-tag ((t (:foreground "gray80"))))
  '(flx-highlight-face ((t (:inherit nil :underline t :weight bold))))
  '(font-lock-builtin-face ((t (:foreground "white"))))
  '(font-lock-comment-face ((t nil)))
  '(font-lock-constant-face ((t nil)))
  '(font-lock-doc-face ((t (:inherit nil))))
  '(font-lock-function-name-face ((t nil)))
  '(font-lock-keyword-face ((t nil)))
  '(font-lock-preprocessor-face ((t nil)))
  '(font-lock-regexp-grouping-construct ((t nil)))
  '(font-lock-string-face ((t nil)))
  '(font-lock-type-face ((t nil)))
  '(font-lock-variable-name-face ((t nil)))
  '(haskell-debug-newline-face ((t (:foreground "red" :weight bold))))
  '(haskell-debug-trace-number-face ((t (:background "red" :weight bold))))
  '(haskell-error-face ((t (:background "red" :foreground "white"))))
  '(isearch ((t (:background "blue" :foreground "white"))))
  '(isearch-fail ((t (:background "red" :foreground "white"))))
  '(js2-external-variable ((t nil)))
  '(js2-function-param ((t nil)))
  '(js2-instance-member ((t (:foreground "white"))))
  '(js2-jsdoc-html-tag-delimiter ((t nil)))
  '(js2-jsdoc-html-tag-name ((t nil)))
  '(js2-jsdoc-tag ((t nil)))
  '(js2-jsdoc-type ((t nil)))
  '(js2-jsdoc-value ((t nil)))
  '(js2-private-function-call ((t nil)))
  '(js2-private-member ((t nil)))
  '(magit-bisect-bad ((t (:foreground "red"))))
  '(magit-bisect-good ((t (:foreground "green"))))
  '(magit-bisect-skip ((t (:foreground "yellow"))))
  '(magit-branch-current ((t (:foreground "blue" :weight bold))))
  '(magit-branch-local ((t (:foreground "green"))))
  '(magit-branch-remote ((t (:foreground "red"))))
  '(magit-diff-added ((t (:foreground "green"))))
  '(magit-diff-added-highlight ((t (:inherit magit-diff-added))))
  '(magit-diff-base ((t (:foreground "yellow"))))
  '(magit-diff-base-highlight ((t (:background "blue" :foreground "white"))))
  '(magit-diff-conflict-heading ((t (:foreground "yellow"))))
  '(magit-diff-context ((t nil)))
  '(magit-diff-context-highlight ((t nil)))
  '(magit-diff-hunk-heading ((t (:background "blue" :foreground "white"))))
  '(magit-diff-hunk-heading-highlight ((t (:background "blue" :foreground "white"))))
  '(magit-diff-removed ((t (:foreground "red"))))
  '(magit-diff-removed-highlight ((t (:foreground "red"))))
  '(magit-diffstat-removed ((t (:foreground "red"))))
  '(magit-section-heading ((t (:weight bold))))
  '(magit-section-highlight ((t nil)))
  '(magit-sequence-part ((t nil)))
  '(magit-tag ((t (:foreground "yellow"))))
  '(minibuffer-prompt ((t nil)))
  '(mode-line ((t (:background "blue" :foreground "white"))))
  '(mode-line-highlight ((t nil)))
  '(mode-line-inactive ((t (:inherit mode-line :background "blue" :foreground "grey30"))))
  '(region ((t (:background "black" :foreground "white"))))
  '(shadow ((t (:foreground "grey30"))))
  '(show-paren-match ((t (:foreground "green"))))
  '(show-paren-mismatch ((t (:foreground "red"))))
  '(trailing-whitespace ((t (:background "red")))))