calxxxx

git-svn-id: svn://tug.org/texlive/trunk@734 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 102 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex b/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex
new file mode 100644
index 00000000000..91bdc77dfbd
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex
@@ -0,0 +1,102 @@
+% This is a freeware program written in LaTeX2e. It prints calendar for the
+% years 1990--2020. For the years 1901--2099, use the 28-year period, so the
+% year 2099 has the same calendar as 2099-3*28=2015. Outside this interval,
+% period is 2800 years, but a program `CalXXXX.tex' can help.
+
+% Safe modifications are between two `=====' lines. Any other modification are
+% recommended only for TeXperts.
+
+\documentclass{article}
+\usepackage{array}
+\nofiles\thispagestyle{empty}
+
+\newif\ifCmRule    % cm rule at right
+
+%========== Start of Safe Modifications =============
+% The following definitions are safe to change
+
+\setlength{\topmargin}{-1in} \setlength{\oddsidemargin}{-1in} % No margins
+
+\setlength{\tabcolsep}{.6pt}\renewcommand{\arraystretch}{.9}% Lenghts in the table
+\setlength{\extrarowheight}{1pt}\setlength{\doublerulesep}{2pt}
+
+\newcommand{\nsize}{\tiny}\newcommand{\tsize}{\scriptsize} % Numbers and text sizes
+
+% Language dependent definitions
+\newcommand{\YearMonths} % `Year' and months
+{Year & \bfseries J& F & \bfseries M & A & \bfseries M & J & \bfseries J & \bfseries A & S &
+ \bfseries O & N & \bfseries D}
+\newcommand{\Day}[1]{\bfseries\ifcase#1 S \or M \or T \or W \or T \or F \or S \fi} % days of the week
+
+% Do you wish a cm rule? (default is false)
+\CmRulefalse % don't print the cm rule
+%\CmRuletrue % print the cm rule
+
+%========== End of Safe Modifications =============
+% It is not recommended to change anything below this line!
+
+% Print the cm scale at right
+\def\cmscale(#1,#2){\setlength{\unitlength}{1mm}
+\begin{picture}(0,0)(#1,#2)\tsize
+  \newcounter{cms}\put(-.3,71){cm}
+  \multiput(2,70)(0,-1){73}{\line(1,0){1}} \multiput(1,65)(0,-10){7}{\line(1,0){2}}
+  \multiput(0,70)(0,-10){8}{\line(1,0){3}}
+  \multiput(1,60.5)(0,-10){7}{\makebox(0,0)[b]{\addtocounter{cms}{1}\arabic{cms}}}
+\end{picture}}
+
+\begin{document} \nsize\noindent
+
+\ifCmRule\cmscale(-76,74.5)\fi% Print cm rule
+
+\begin{tabular}[t]{|r|*{4}{*{3}{>{\centering}m{6pt}}|}|c|rrrrrr|c|rrrrrr|}
+  \hline
+\YearMonths&\multicolumn{7}{c|}{\textbf{0}}&\multicolumn{7}{c|}{\textbf{1}}\\  \hline
+1990 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{0}& 1& 8&15&22&29&&\Day{0}&  & 7&14&21&28&\\
+1991 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{1}& 2& 9&16&23&30&&\Day{1}& 1& 8&15&22&29&\\
+1992 &3&6&0&3&5&1&3&6&2&4&0&2&\Day{2}& 3&10&17&24&31&&\Day{2}& 2& 9&16&23&30&\\
+1993 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{3}& 4&11&18&25&  &&\Day{3}& 3&10&17&24&31&\\
+1994 &6&2&2&5&0&3&5&1&4&6&2&4&\Day{4}& 5&12&19&26&  &&\Day{4}& 4&11&18&25&  &\\
+1995 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{5}& 6&13&20&27&  &&\Day{5}& 5&12&19&26&  &\\
+1996 &1&4&5&1&3&6&1&4&0&2&5&0&\Day{6}& 7&14&21&28&  &&\Day{6}& 6&13&20&27&  &\\
+  \cline{14-27}
+1997 &3&6&6&2&4&0&2&5&1&3&6&1&\multicolumn{7}{c|}{\textbf{2}}&\multicolumn{7}{c|}{\textbf{3}}\\
+  \cline{14-27}
+1998 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{0}&  & 6&13&20&27&&\Day{0}&  & 5&12&19&26&\\
+1999 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{1}&  & 7&14&21&28&&\Day{1}&  & 6&13&20&27&\\
+2000 &6&2&3&6&1&4&6&2&5&0&3&5&\Day{2}& 1& 8&15&22&29&&\Day{2}&  & 7&14&21&28&\\
+  \cline{1-13}
+2001 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{3}& 2& 9&16&23&30&&\Day{3}& 1& 8&15&22&29&\\
+2002 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{4}& 3&10&17&24&31&&\Day{4}& 2& 9&16&23&30&\\
+2003 &3&6&6&2&4&0&2&5&1&3&6&1&\Day{5}& 4&11&18&25&  &&\Day{5}& 3&10&17&24&31&\\
+2004 &4&0&1&4&6&2&4&0&3&5&1&3&\Day{6}& 5&12&19&26&  &&\Day{6}& 4&11&18&25&  &\\
+  \cline{14-27}
+2005 &6&2&2&5&0&3&5&1&4&6&2&4&\multicolumn{7}{c|}{\textbf{4}}&\multicolumn{7}{c|}{\textbf{5}}\\
+  \cline{14-27}
+2006 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{0}&  & 4&11&18&25&&\Day{0}&  & 3&10&17&24&31\\
+2007 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{1}&  & 5&12&19&26&&\Day{1}&  & 4&11&18&25&\\
+2008 &2&5&6&2&4&0&2&5&1&3&6&1&\Day{2}&  & 6&13&20&27&&\Day{2}&  & 5&12&19&26&\\
+2009 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{3}&  & 7&14&21&28&&\Day{3}&  & 6&13&20&27&\\
+2010 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{4}& 1& 8&15&22&29&&\Day{4}&  & 7&14&21&28&\\
+  \cline{1-13}
+2011 &6&2&2&5&0&3&5&1&4&6&2&4&\Day{5}& 2& 9&16&23&30&&\Day{5}& 1& 8&15&22&29&\\
+2012 &0&3&4&0&2&5&0&3&6&1&4&6&\Day{6}& 3&10&17&24&31&&\Day{6}& 2& 9&16&23&30&\\
+  \cline{14-27}
+2013 &2&5&5&1&3&6&1&4&0&2&5&0&\multicolumn{7}{c|}{\textbf{6}}&\multicolumn{7}{c|}{}\\ \cline{14-20}
+2014 &3&6&6&2&4&0&2&5&1&3&6&1&\Day{0}&  & 2& 9&16&23&30&
+    \multicolumn{7}{l|}{\ \tsize For the other}\\
+2015 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{1}&  & 3&10&17&24&31&
+    \multicolumn{7}{l|}{\ \tsize years, add or}\\
+2016 &5&1&2&5&0&3&5&1&4&6&2&4&\Day{2}&  & 4&11&18&25&  &
+    \multicolumn{7}{l|}{\ \tsize subtract 28.}\\
+2017 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{3}&  & 5&12&19&26& &
+    \multicolumn{7}{l|}{\ \tsize So, for year}\\
+2018 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{4}& & 6&13&20&27& &
+    \multicolumn{7}{l|}{\ \tsize 2080, look for}\\
+2019 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{5}& & 7&14&21&28& &
+    \multicolumn{7}{l|}{\ \tsize $2080-3\times28$}\\
+2020 &3&6&0&3&5&1&3&6&2&4&0&2&\Day{6}& 1& 8&15&22&29& &
+    \multicolumn{7}{l|}{\ \tsize $=1996$}\\
+\hline \multicolumn{27}{l}{\ \copyright Slobodan Jankovi\'c
+    (\texttt{slobodan@archimed.filfak.ni.ac.yu})}
+\end{tabular}\\
+\end{document}