diff --git a/tcshrc.prompt.defs b/tcshrc.prompt.defs
index ed79015..a78d96d 100644
--- a/tcshrc.prompt.defs
+++ b/tcshrc.prompt.defs
@@ -37,6 +37,17 @@ set reference_colors_original=( ${csi}91m ${csi}92m ${csi}93m ${csi}38\;5\;33m $
 # Select a set of Unicode codepoints for prompt referencing...
 set referencechars_raw=""
 
+alias add_refchar 'set referencechars_raw="${referencechars_raw} \!:*"'
+
+# Solid 90mm disc
+add_refchar 1f5aa
+
+# Open 90mm disc
+add_refchar 1f5ab
+
+# Older media (5.25" then tape)
+add_refchar 1f5ad 1f5ae
+
 # Public Phone
 set referencechars_raw="${referencechars_raw} 2706"