部屋の週間使用予定表(第2型)のLatexソース(cut and pasteして御利用下さい）

% 部屋の週間使用予定表 （タイプ-２）
% weeklySchedule2.tex 
% 2008/3/13 created by N.Tajima 
%
\documentstyle[12pt]{article}
\topmargin=-35mm
\oddsidemargin=-17mm   % side margin for odd-page-number page
\evensidemargin=-17mm  %                 even
\textheight=199mm
\textwidth=286mm
\newcommand{\disregard}[1]{}
% \newcommand{\disregard}[1]{#1}

\begin{document}
\pagestyle{empty}
\baselineskip=7.0mm

\unitlength 1mm

\newcommand{\weekly}{
\noindent
\begin{picture}(0,0)

\thicklines

\put(1,-11){\makebox(0,0)[bl]{\LARGE %
20\underline{\phantom{HHHHH}}年度　\underline{\phantom{HHHH}}期}}

\put(279,-11){\makebox(0,0)[br]{\LARGE %
\underline{\phantom{HHHHHHHH}}号室 週間使用予定表}}

\put(0,-15){\line(1,0){280}}
\multiput(0,-25)(0,-32){6}{\line(1,0){280}}

\put(0,-15){\line(0,-1){170}}
\put(20,-15){\line(0,-1){170}}
\put(40,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(70,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(75,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(105,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(125,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(155,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(160,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(190,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(195,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(225,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(230,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(260,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}
\put(280,-15){\line(0,-1){170}}

\put(40,-15){\multiput(0,0)(0,-2){85}{\line(0,-1){1}}}


\put(10,-41){\makebox(0,0){\Huge 月}}
\put(10,-73){\makebox(0,0){\Huge 火}}
\put(10,-105){\makebox(0,0){\Huge 水}}
\put(10,-137){\makebox(0,0){\Huge 木}}
\put(10,-169){\makebox(0,0){\Huge 金}}

\put(30,-20){\makebox(0,0)[c]{\large 早朝}}
\put(55,-20){\makebox(0,0)[c]{\LARGE 1限}}
\put(73,-20){\makebox(0,0)[c]{\large 休}}
\put(90,-20){\makebox(0,0)[c]{\LARGE 2限}}
\put(115,-20){\makebox(0,0)[c]{\Large 昼休}}
\put(140,-20){\makebox(0,0)[c]{\LARGE 3限}}
\put(158,-20){\makebox(0,0)[c]{\large 休}}
\put(175,-20){\makebox(0,0)[c]{\LARGE 4限}}
\put(193,-20){\makebox(0,0)[c]{\large 休}}
\put(210,-20){\makebox(0,0)[c]{\LARGE 5限}}
\put(228,-20){\makebox(0,0)[c]{\large 休}}
\put(245,-20){\makebox(0,0)[c]{\LARGE 6限}}
\put(270,-20){\makebox(0,0)[c]{\large 夜}}

\multiput(25,-186)(20,0){13}{\circle*{1}}

\put(25,-188){\makebox(0,0)[t]{\small 8時}}
\put(45,-188){\makebox(0,0)[t]{\small 9時}}
\put(65,-188){\makebox(0,0)[t]{\small 10時}}
\put(85,-188){\makebox(0,0)[t]{\small 11時}}
\put(105,-188){\makebox(0,0)[t]{\small 12時}}
\put(125,-188){\makebox(0,0)[t]{\small 13時}}
\put(145,-188){\makebox(0,0)[t]{\small 14時}}
\put(165,-188){\makebox(0,0)[t]{\small 15時}}
\put(185,-188){\makebox(0,0)[t]{\small 16時}}
\put(205,-188){\makebox(0,0)[t]{\small 17時}}
\put(225,-188){\makebox(0,0)[t]{\small 18時}}
\put(245,-188){\makebox(0,0)[t]{\small 19時}}
\put(265,-188){\makebox(0,0)[t]{\small 20時}}

\end{picture}
}

\weekly

\end{document}