Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!ub!acsu.buffalo.edu
From: xiaofei@acsu.buffalo.edu (Xiaofei Wang)
Newsgroups: comp.text.tex
Subject: TeX and Canlendar
Message-ID: <60733@eerie.acsu.Buffalo.EDU>
Date: 20 Feb 91 05:06:38 GMT
Sender: news@acsu.Buffalo.EDU
Organization: SUNY Buffalo
Lines: 123
Nntp-Posting-Host: autarch.acsu.buffalo.edu

Dear netters,

The following is a single sheet of 1991 canlendar I made using
TeX. I know it is not good but I can not think of a clever way to do it.
The best thing I can think of is to use FORTRAN to output TeX code.
If any netter can give me a hint of how to make a canlendar in a
better way, I will appreciate it.

xiaofei@acsu.buffalo.edu / rutgers!ub!xiaofei / v118raqa@ubvms.bitnet

%it is to be output in landscape mode.
\font\tenrm=cmr10
\font\cmsyten=cmsy10
\font\cmttten=cmtt10
\hoffset=0.0 truein
\hsize=8.2 truein
\nopagenumbers

%\def\makeactive#1{\catcode`#113\relax}
%\makeactive\ \let\ =\relax
\def\mycr{\cr\noalign{\hrule}}
\def\thickvrule{{\vrule \hskip0.5pt \vrule}}
\def\thickhrule{{\hrule \vskip0.5pt \hrule}}
$$%\textfont1=\cmttten
 \vbox{\tabskip=0pt \offinterlineskip \halign to \hsize{
 \strut#&\thickvrule#\tabskip 0em plus 1em&     
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\thickvrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\thickvrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\vrule#& 
 \hfil#&\thickvrule#\tabskip=0pt\cr\noalign{\thickhrule}
 & & \multispan{41} \hfil 1991 \hfil &\cr\noalign{\thickhrule}
 & & \multispan{13} \hfil Jan\hfil& 
   & \multispan{13} \hfil Feb \hfil& 
   & \multispan{13} \hfil Mar \hfil&\cr\noalign{\thickhrule}
&& S&& M&&Tu&& W&&Th&& F&& S&&   S&& M&&Tu&& W&&Th&& F&& S 
&& S&& M&&Tu&& W&&Th&& F&& S&\mycr
&&  &&  && 1&& 2&& 3&& 4&& 5&&    &&  &&  &&  &&  && 1&& 2 
&&  &&  &&  &&  &&  && 1&& 2&\mycr
&& 6&& 7&& 8&& 9&&10&&11&&12&&   3&& 4&& 5&& 6&& 7&& 8&& 9 
&& 3&& 4&& 5&& 6&& 7&& 8&& 9&\mycr
&&13&&14&&15&&16&&17&&18&&19&&  10&&11&&12&&13&&14&&15&&16 
&&10&&11&&12&&13&&14&&15&&16&\mycr
&&20&&21&&22&&23&&24&&25&&26&&  17&&18&&19&&20&&21&&22&&23 
&&17&&18&&19&&20&&21&&22&&23&\mycr
&&27&&28&&29&&30&&31&&  &&  &&  24&&25&&26&&27&&28&&  &&   
&&24&&25&&26&&27&&28&&29&&30&\mycr
&&  &&  &&  &&  &&  &&  &&  &&    &&  &&  &&  &&  &&  &&   
&&31&&  &&  &&  &&  &&  &&  &\cr\noalign{\thickhrule}
  && \multispan{13} \hfil Apr\hfil& 
   & \multispan{13} \hfil May\hfil& 
   & \multispan{13} \hfil Jun\hfil&\cr\noalign{\thickhrule}
&& S&& M&&Tu&& W&&Th&& F&& S&&   S&& M&&Tu&& W&&Th&& F&& S&&   
S&& M&&Tu&& W&&Th&& F&& S&\mycr
&&  && 1&& 2&& 3&& 4&& 5&& 6&&    &&  &&  && 1&& 2&& 3&& 4&&   
 &&  &&  &&  &&  &&  && 1&\mycr
&& 7&& 8&& 9&&10&&11&&12&&13&&   5&& 6&& 7&& 8&& 9&&10&&11&&   
2&& 3&& 4&& 5&& 6&& 7&& 8&\mycr
&&14&&15&&16&&17&&18&&19&&20&&  12&&13&&14&&15&&16&&17&&18&&  
9&&10&&11&&12&&13&&14&&15&\mycr
&&21&&22&&23&&24&&25&&26&&27&&  19&&20&&21&&22&&23&&24&&25&&  
16&&17&&18&&19&&20&&21&&22&\mycr
&&28&&29&&30&&  &&  &&  &&  &&  26&&27&&28&&29&&30&&31&&  &&  
23&&24&&25&&26&&27&&28&&29&\mycr
&&  &&  &&  &&  &&  &&  &&  &&    &&  &&  &&  &&  &&  &&  &&  
30&&  &&  &&  &&  &&  &&  &\cr\noalign{\thickhrule}

 & & \multispan{13} \hfil Jul\hfil& 
   & \multispan{13} \hfil Aug\hfil& 
   & \multispan{13} \hfil Sep\hfil&\cr\noalign{\thickhrule}
&& S&& M&&Tu&& W&&Th&& F&& S&&   S&& M&&Tu&& W&&Th&& F&& S&&  
 S&& M&&Tu&& W&&Th&& F&& S&\mycr
&&  && 1&& 2&& 3&& 4&& 5&& 6&&    &&  &&  &&  && 1&& 2&& 3&&   
1&& 2&& 3&& 4&& 5&& 6&& 7&\mycr
&& 7&& 8&& 9&&10&&11&&12&&13&&   4&& 5&& 6&& 7&& 8&& 9&&10&&  
 8&& 9&&10&&11&&12&&13&&14&\mycr
&&14&&15&&16&&17&&18&&19&&20&&  11&&12&&13&&14&&15&&16&&17&&  
15&&16&&17&&18&&19&&20&&21&\mycr
&&21&&22&&23&&24&&25&&26&&27&&  18&&19&&20&&21&&22&&23&&24&&  
22&&23&&24&&25&&26&&27&&28&\mycr
&&28&&29&&30&&31&&  &&  &&  &&  25&&26&&27&&28&&29&&30&&31&&  
29&&30&&  &&  &&  &&  &&  &\cr\noalign{\thickhrule}

 & & \multispan{13} \hfil Oct\hfil& 
   & \multispan{13} \hfil Nov \hfil& 
   & \multispan{13} \hfil Dec \hfil&\cr\noalign{\thickhrule}
&& S&& M&&Tu&& W&&Th&& F&& S&&   S&& M&&Tu&& W&&Th&& F&& S&&   
 S&& M&&Tu&& W&&Th&& F&& S&\mycr
&&  &&  && 1&& 2&& 3&& 4&& 5&&    &&  &&  &&  &&  && 1&& 2&&  
 1&& 2&& 3&& 4&& 5&& 6&& 7&\mycr
&& 6&& 7&& 8&& 9&&10&&11&&12&&   3&& 4&& 5&& 6&& 7&& 8&& 9&&  
 8&& 9&&10&&11&&12&&13&&14&\mycr
&&13&&14&&15&&16&&17&&18&&19&&  10&&11&&12&&13&&14&&15&&16&&  
15&&16&&17&&18&&19&&20&&21&\mycr
&&20&&21&&22&&23&&24&&25&&26&&  17&&18&&19&&20&&21&&22&&23&&  
22&&23&&24&&25&&26&&27&&28&\mycr
&&27&&28&&29&&30&&31&&  &&  &&  24&&25&&26&&27&&28&&29&&30&&  
29&&30&&31&&  &&  &&  &&  &\cr\noalign{\thickhrule}
}}$$ 
\def\copyleft{{\ooalign
   {\hfil\raise.07ex\hbox{L}\hfil\crcr\mathhexbox20D}}}
\copyleft copylefted by xiaofei@acsu.buffalo.edu 1991%
%
\end%
%
-- 
xiaofei@acsu.buffalo.edu / rutgers!ub!xiaofei / v118raqa@ubvms.bitnet