diff --git a/h/Harbour.prg b/h/Harbour.prg
new file mode 100644
index 00000000..17304708
--- /dev/null
+++ b/h/Harbour.prg
@@ -0,0 +1,5 @@
+PROCEDURE Main()
+
+   ? "Hello World"
+
+   RETURN
diff --git a/readme.md b/readme.md
index 041bc3bf..c49b1c88 100644
--- a/readme.md
+++ b/readme.md
@@ -8,7 +8,7 @@ Thanks to everyone who continues to contribute; new languages are created every
 Make sure to see [contributing.md](/contributing.md) for instructions on contributing to the project!
 
 <!--Languages start-->
-## Languages (909 total)
+## Languages (910 total)
 
 * [!](%23/%21)
 * [!@#$%^&*()_+](%23/%21%40%23%24%25%5E%26%E2%88%97%28%29_%2B)
@@ -436,6 +436,7 @@ Make sure to see [contributing.md](/contributing.md) for instructions on contrib
 * [Guile](g/Guile.scm)
 * [Hack](h/Hack.hh)
 * [Haml](h/Haml.haml)
+* [Harbour](h/Harbour.prg)
 * [Haskell](h/Haskell.hs)
 * [Haxe](h/Haxe.hx)
 * [Hello](h/Hello)