diff --git a/archetypes/default.md b/archetypes/default.md
index 00e77bd..3d13579 100644
--- a/archetypes/default.md
+++ b/archetypes/default.md
@@ -1,5 +1,5 @@
 ---
-title: "{{ replace .Name "-" " " | title }}"
+title: "{{ .Name | humanize }}"
 date: {{ .Date }}
 draft: true
 ---
diff --git a/archetypes/reply.md b/archetypes/reply.md
new file mode 100644
index 0000000..bc0177c
--- /dev/null
+++ b/archetypes/reply.md
@@ -0,0 +1,10 @@
+---
+title: "{{ .Name | humanize }}"
+date: {{ .Date }}
+replyURI: ""
+replyTitle: ""
+replyType: ""
+replyAuthor: ""
+replyAuthorURI: ""
+---
+
diff --git a/scripts/bin/hugo-new-note b/scripts/bin/hugo-new-note
new file mode 100755
index 0000000..945dea7
--- /dev/null
+++ b/scripts/bin/hugo-new-note
@@ -0,0 +1,58 @@
+#!/usr/bin/env dash
+
+set -e -u
+
+# the name of this program
+progname="$(basename "${0}")"
+
+help_text="Usage: ${progname} [OPTION...] FILENAME
+
+Compose a new note
+
+Options:
+  -h            Print this help and exit
+  -r            Whether this note should be a reply
+"
+
+usage() {
+	printf '%s' "${help_text}"
+}
+
+# when the user passess bad args, send a msg to stderr and exit
+# usage: bad_option <option> <reason>
+bad_option() {
+	echo "${progname}: option ${1}: ${2}" >&2
+	usage >&2
+	exit 1
+}
+
+reply='0'
+
+while getopts "hr" flags; do
+	case ${flags} in
+		h)
+			usage
+			exit 0
+			;;
+		r)
+			reply='1'
+			shift
+			;;
+		*)
+			bad_option "${flags}" 'invalid option'
+			exit 1
+			;;
+	esac
+done
+
+filename="notes/$1.md"
+
+if [ "$reply" = '1' ]; then
+	hugo new --kind reply "$filename"
+else
+	hugo new "$filename"
+fi
+
+"${EDITOR-nvim}" "content/$filename"
+
+# vi:ft=sh