diff --git a/20221026/vic b/20221026/vic
new file mode 100755
index 0000000000000000000000000000000000000000..547a7d574bc218a911436922f908cb3fd438ab77
--- /dev/null
+++ b/20221026/vic
@@ -0,0 +1,41 @@
+#!/bin/bash
+
+debug=true
+
+if [ $# -gt 0 ]; then
+  $debug && echo "parameters = $@"
+  shift $(( $# - 1 ))
+  file_template="$1"
+else
+  file_template=$(ls -rt *.c *.cpp *.sh *.py *.tex *.diff 2>/dev/null | tail -1)
+fi
+
+$debug && echo "file_template = $file_template"
+
+file_extension=$(echo $file_template | sed -e 's/.*\.\(.*$\)/\1/')
+file_base=$(echo $file_template | sed -e 's/\(.*\)\..*$/\1/')
+
+$debug && echo "file_extension = $file_extension"
+$debug && echo "file_base = $file_base"
+
+file_number=$(echo $file_base | sed -e 's/^.*-\([0-9]*$\)/\1/')
+file_stem=$(echo $file_base | sed -e 's/^\(.*\)-[0-9]*$/\1/')
+
+$debug && echo "file_number = $file_number"
+$debug && echo "file_number = $file_stem"
+
+while [ -e "$file_stem-$file_number.$file_extension" -o  -e "$file_stem-0$file_number.$file_extension" ]; do
+#  file_number=$((file_number + 1))
+  file_number=$(echo "$file_number + 1" | bc)
+  $debug && echo "file_number = $file_number"
+done
+new_file_name="$file_stem-$(printf "%02d" $file_number).$file_extension"
+
+$debug && echo "new_file_name = $new_file_name" && read junk
+
+cp -pi "$file_template" "$new_file_name"
+#$EDITOR "$new_file_name"
+/usr/bin/vim -X -c 'set sw=2' -c 'set expandtab' -c 'set ai' -c 'set nowrap' \
+  "$new_file_name"
+clear
+cat "$new_file_name"