diff --git a/tecs/make_list.tcsh b/tecs/make_list.tcsh
new file mode 100755
index 0000000..c1b23e7
--- /dev/null
+++ b/tecs/make_list.tcsh
@@ -0,0 +1,11 @@
+#!/bin/tcsh
+printf "\n\n"
+foreach file ($*)
+  set nam=${file:t:s/.cfg//}
+  set def="`grep "dev=" $file`"
+  alias def "set$def"
+  if ("$def" != "") then
+    def
+    printf "%-10s %s\n" $nam "$dev"
+  endif
+end