[comp.sources.wanted] year-at-a-glance

ryding@trwrb.dsd.trw.com (Mark Ryding) (04/25/89)

I was looking for a program to help plan annual leave for the government.
The program needs to print an entire year on one page with enough space
under the individual dates for a single letter to be entered.  Any help
will be greatly appreciated.

Mark Ryding
{...trwrb!ryding}
{ryding@trwrb.dsd.trw.com}

bink@aplcen.apl.jhu.edu (Ubben Greg) (04/30/89)

In article <44@trwrb.dsd.trw.com> ryding@trwrb.dsd.trw.com (Mark Ryding) writes:
> I was looking for a program to help plan annual leave for the government.
> The program needs to print an entire year on one page with enough space
> under the individual dates for a single letter to be entered.  Any help
> will be greatly appreciated.

"cal | sed" works well for enlarging both monthly and yearly calendar pages.
Here is one way of producing a 127-column by 131-line calendar:

set 1989
banner "      $1"
cal $1 | sed '
	1,3b
	4d
	/^$/d
	/[JO]/{
		s/.*Mar/ January  February  March  /
		s/.*Jun/  April     May      June  /
		s/.*Sep/   July    August September/
		s/.*Dec/ October  November December/
		s/.\{9\}/              &                      /g
		i\
		\

		a\

		b
	}
	s/.\{23\}/&    /g
	s/.\{2,3\}/  &/g
	s/^/ /
	/S/!{
		s/$/  /
		s/ \( .[^ ] \)/|\1/g
		s/\([0-9] \) /\1|/g
		h
		s/[^|]/ /g
		H; H
		s/|    |/+----+/g
		s/+    [|+]/+----+/g
		x
	}
	/20/,/S/{ /[0-9]/G; }
	/ 1 /,/20/{ H; g; }
'

					-- Greg Ubben
					   bink@aplcen.apl.jhu.edu

jpr@dasys1.UUCP (Jean-Pierre Radley) (05/02/89)

In article <44@trwrb.dsd.trw.com> ryding@trwrb.dsd.trw.com (Mark Ryding) writes:
>I was looking for a program to help plan annual leave for the government.
>The program needs to print an entire year on one page with enough space
>under the individual dates for a single letter to be entered.  Any help
>will be greatly appreciated.

You might fiddle with
	cal 1989 | pr -td

You will probably need to fiddle, because
	cal 1989 | pr -td | wc -l
shows 80 lines being ouput.
-- 
Jean-Pierre Radley		Honi soit		jpr@dasys1.UUCP
New York, New York		qui mal			...!hombre!jpradley!jpr
CIS: 76120,1341			y pense			...!hombre!trigere!jpr