diff --git a/Makefile b/Makefile
index 0a63e40..09ac0fb 100644
--- a/Makefile
+++ b/Makefile
@@ -1,4 +1,4 @@
-all: bash cardinal ghc git input python scripts tmux valgrind vim zepto zsh
+all: bash cardinal ghc git input python sbcli scripts tmux valgrind vim zepto zsh
 
 bash:
 	cp bash_profile ~/.bash_profile
@@ -23,6 +23,9 @@ python:
 scripts:
 	cp -r .scripts ~/
 
+sbcli:
+	cp -r sbclirc ~/
+
 tmux:
 	cp dev-tmux ~/dev-tmux
 	cp tmux.conf ~/.tmux.conf
diff --git a/sbclirc b/sbclirc
new file mode 100644
index 0000000..070d2cb
--- /dev/null
+++ b/sbclirc
@@ -0,0 +1,31 @@
+(defvar *colors* (make-hash-table))
+
+(mapcar (lambda (pair) (setf (gethash (car pair) *colors*) (cadr pair)))
+  '((:black 30)
+    (:red 31)
+    (:green 32)
+    (:yellow 33)
+    (:blue 34)
+    (:magenta 35)
+    (:cyan 36)
+    (:white 37)
+    (:reset 0)
+    (:none 0)
+    (:bold 1)
+    (:italic 3)
+    (:underline 4)
+    (:blink-slow 5)
+    (:blink-rapid 6)
+    (:bg-black 40)
+    (:bg-red 41)
+    (:bg-green 42)
+    (:bg-yellow 43)
+    (:bg-blue 44)
+    (:bg-magenta 45)
+    (:bg-cyan 46)
+    (:bg-white 47)))
+
+(defun colorize (color var)
+  (format nil "~a[~dm~a~a[0m" (code-char 27) (gethash color *colors*) var (code-char 27)))
+(setf *prompt* (colorize :bold (colorize :blue *prompt*)))
+(setf *ret*    (colorize :bold (colorize :red *ret*)))
diff --git a/zshrc b/zshrc
index 34b8799..844d2dc 100644
--- a/zshrc
+++ b/zshrc
@@ -215,6 +215,7 @@ save_dotfiles(){
     cp ~/.inputrc ${DOTPATH}inputrc
     cp ~/.pip-upgrade ${DOTPATH}pip-upgrade
     cp ~/.pythonrc ${DOTPATH}pythonrc
+    cp ~/.sbclirc ${DOTPATH}sbclirc
     cp ~/.tmux.conf ${DOTPATH}tmux.conf
     cp ~/.valgrindrc ${DOTPATH}valgrindrc
     cp ~/.vimrc ${DOTPATH}vimrc