readded udpated scripts directory

scripts/newcal

@@ -0,0 +1,28 @@
+#!/bin/sh
+
+# cal: nicer interface to usr/bin/cal
+
+case $# in
+    0)  set 'date'; m=$2; y=$6 ;;       # no args; use today
+    1)  m=$1; set 'date'; y=$6 ;;       # 1 arg; use this year
+    2)  m=$1; y=$2 ;;                   # 2 args; month and year
+esac
+
+case $m in
+    jan*|Jan*)  m=1 ;;
+    feb*|Feb*)  m=2 ;;
+    mar*|Mar*)  m=3 ;;
+    apr*|Apr*)  m=4 ;;
+    may*|May*)  m=5 ;;
+    jun*|Jun*)  m=6 ;;
+    jul*|Jul*)  m=7 ;;
+    aug*|Aug*)  m=8 ;;
+    sep*|Sep*)  m=9 ;;
+    oct*|Oct*)  m=10 ;;
+    nov*|Nov*)  m=11 ;;
+    dec*|Dec*)  m=12 ;;
+    [1-9]|10|11|12) ;;                  # numeric month
+    *)          y=$m; m="" ;;           # plain year
+esac
+
+/usr/bin/cal $m $y                      # run the real one