diff --git a/slate.cabal b/slate.cabal
--- a/slate.cabal
+++ b/slate.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 0ed91232973ab0351a59fb06271930c070cbac5157ada7dacfc9a1f51bb3e185
+-- hash: edb8e7f9ac7e6790ea6e2c0e191b5cff55cfc5e8285924b5f72abdb18c125fae
 
 name:           slate
-version:        0.3.0.0
+version:        0.4.0.0
 synopsis:       A note taking CLI tool.
 description:    Please see the README on Github at <https://github.com/evuez/slate#readme>
 homepage:       https://github.com/evuez/slate#readme
diff --git a/src/AnsiStyle.hs b/src/AnsiStyle.hs
--- a/src/AnsiStyle.hs
+++ b/src/AnsiStyle.hs
@@ -5,6 +5,7 @@
 data Style
   = Normal
   | Emphasized
+  | Code
   deriving (Show)
 
 data Text = Text
@@ -16,8 +17,10 @@
 getStyle :: Style -> Char -> (Style, String)
 getStyle Normal '*' = (Emphasized, "\x1B[1m")
 getStyle Normal '_' = (Emphasized, "\x1B[1m")
-getStyle Emphasized '*' = (Normal, "\x1B[0m")
-getStyle Emphasized '_' = (Normal, "\x1B[0m")
+getStyle Normal '`' = (Code, "\x1B[4m")
+getStyle Emphasized '*' = (Normal, "\x1B[21m")
+getStyle Emphasized '_' = (Normal, "\x1B[21m")
+getStyle Code '`' = (Normal, "\x1B[24m")
 getStyle s c = (s, [c])
 
 toAnsi :: String -> String