diff --git a/cli/dotdash/dotdash.tal b/cli/dotdash/dotdash.tal
new file mode 100644
index 0000000..4b7fdd1
--- /dev/null
+++ b/cli/dotdash/dotdash.tal
@@ -0,0 +1,18 @@
+( . _ )
+
+|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
+
+|100
+
+@on-reset ( -> )
+	;on-console .Console/vector DEO2
+	BRK
+
+@on-console ( -> )
+	[ LITr -Console/read ] DEIr #f8
+	&>l ( -- )
+		[ LIT2 "._ ] STHkr #01 AND ?{ SWP }
+		POP #18 DEO
+		[ LITr 01 ] SFTr INC DUP ?&>l
+	POP POPr BRK
+