diff --git a/docs/src/cows.md b/docs/src/cows.md
index c5f7b72..f367cb3 100644
--- a/docs/src/cows.md
+++ b/docs/src/cows.md
@@ -39,5 +39,6 @@ Cowsay.koala
 Cowsay.meow
 Cowsay.moose
 Cowsay.sheep
+Cowsay.stegosaurus
 Cowsay.vader_koala
 ```
diff --git a/src/Cowsay.jl b/src/Cowsay.jl
index 7becfbd..7cd7898 100644
--- a/src/Cowsay.jl
+++ b/src/Cowsay.jl
@@ -23,6 +23,7 @@ include("cows/mutilated.cow.jl")
 include("cows/sheep.cow.jl")
 include("cows/skeleton.cow.jl")
 include("cows/small.cow.jl")
+include("cows/stegosaurus.cow.jl")
 include("cows/udder.cow.jl")
 include("cows/vader-koala.cow.jl")
 include("cows/vader.cow.jl")
diff --git a/src/cows/stegosaurus.cow.jl b/src/cows/stegosaurus.cow.jl
new file mode 100644
index 0000000..b182483
--- /dev/null
+++ b/src/cows/stegosaurus.cow.jl
@@ -0,0 +1,50 @@
+##
+## A stegosaur with a top hat?
+##
+"""
+    function stegosaurus()
+
+A stegosaur with a top hat?
+
+# Example
+```jldoctest
+julia> cowsay("How do you do?", cow=Cowsay.stegosaurus)
+ ________________
+< How do you do? >
+ ----------------
+\\                             .       .
+ \\                           / `.   .' "
+  \\                  .---.  <    > <    >  .---.
+   \\                 |    \\  \\ - ~ ~ - /  /    |
+         _____          ..-~             ~-..-~
+        |     |   \\~~~\\.'                    `./~~~/
+       ---------   \\__/                        \\__/
+      .'  O    \\     /               /       \\  "
+     (_____,    `._.'               |         }  \\/~~~/
+      `----.          /       }     |        /    \\__/
+            `-.      |       /      |       /      `. ,~~|
+                ~-.__|      /_ - ~ ^|      /- _      `..-'
+                     |     /        |     /     ~-.     `-. _  _  _
+                     |_____|        |_____|         ~ - . _ _ _ _ _>
+```
+"""
+function stegosaurus(;eyes="oo", tongue="  ", thoughts="\\")
+the_cow =
+"""
+$thoughts                             .       .
+ $thoughts                           / `.   .' "
+  $thoughts                  .---.  <    > <    >  .---.
+   $thoughts                 |    \\  \\ - ~ ~ - /  /    |
+         _____          ..-~             ~-..-~
+        |     |   \\~~~\\.'                    `./~~~/
+       ---------   \\__/                        \\__/
+      .'  O    \\     /               /       \\  "
+     (_____,    `._.'               |         }  \\/~~~/
+      `----.          /       }     |        /    \\__/
+            `-.      |       /      |       /      `. ,~~|
+                ~-.__|      /_ - ~ ^|      /- _      `..-'
+                     |     /        |     /     ~-.     `-. _  _  _
+                     |_____|        |_____|         ~ - . _ _ _ _ _>
+"""
+return the_cow
+end