%%%
%%% 	定型 FAX 送信票スタイルファイル  Mfax.sty <ver. 1.8>
%%%
%%%	Copyright (C) 	Manabu YAMADA 2001--2006.
%%%               	All rights reserved.
%%%
%%%     $Id: Mfax.sty,v 1.8 2006/07/05 08:59:54 mym Exp $
%%%
%%%	履歴:	2006/07/05	Manabu YAMADA  ver. 1.8 
%%%					  Mlistheadder デフォルト値宣言
%%%	履歴:	2004/07/20	Manabu YAMADA  ver. 1.6 
%%%					  インデント用コマンド追加
%%%	履歴:	2003/05/29	Manabu YAMADA  ver. 1.5 
%%%					  Mfax コマンド内の 
%%%					  M@toaffili, M@tofaxnum の
%%%					  未定義処理追加.
%%%	履歴:	2002/10/30	Manabu YAMADA  ver. 1.4 
%%%					  Mdate コマンド定義.
%%%	履歴:	2002/09/20	Manabu YAMADA  ver. 1.3 
%%%					  Mto コマンド修正.
%%%	履歴:	2001/10/28	Manabu YAMADA  ver. 1.2 
%%%					  ヘッダー出力コマンド定義.
%%%	履歴:	2001/09/11	Manabu YAMADA  ver. 1.1 
%%%					  一覧表題用コマンド定義を付け足す.
%%%	履歴:	2001/05/14	Manabu YAMADA  ver. 1.0 作成
%%%

% 使用パッケージ宣言
\usepackage{graphicx}
\usepackage{fancybox}
\usepackage{boxedminipage}
%
% 出力送付年月日を西暦とする
%
\西暦true
%\西暦false : 元号にする場合.
%
% コマンド定義
%
\newcommand{\Mheadder}[1][FAX送信票]{\def\M@headder{\huge\bf #1}}
% もしヘッダー文字列を変更したい場合
% \Mheadder[変更したい文字列] と宣言すること.
\newif\ifMheadder
\newcommand{\MheadderOff}{\Mheadderfalse}
\newcommand{\MheadderOn}{\Mheaddertrue}
\MheadderOn


%
% インデント
%
\newlength{\M@parindent}
\newcommand{\MindentOn}{\setlength{\M@parindent}{1zw}}
\newcommand{\MindentOff}{\setlength{\M@parindent}{0zw}}
\MindentOn

%
%
%
\newcommand{\Mlistheadder}[1][送信内容一覧]{\def\M@listheadder{{\bf #1}}}
\Mlistheadder
% もし一覧表題文字列を変更したい場合
% \Mlistheadder[変更したい文字列] と宣言すること.



\newcommand{\Mheadderimage}{./Hokudai-logo-for-print.eps}
% もし張り込みロゴを変更したい場合
% \renewcommand{\Mheadderimage}{./image_file_name.ps}
% を指定すること.
\newcommand{\Mlogo}{
	\includegraphics[height=3cm, width=3cm, clip]
			{\Mheadderimage}
}

%
% 送信先情報用コマンド定義
%
\newcommand{\Mtoaffili}[1]{\def\M@toaffili{#1}}
\newcommand{\Mto}[1]{\def\M@to{\underline{\hspace{1cm}\Large #1 様\hspace{1cm}}}}

\newcommand{\Mtofaxnum}[1]{\def\M@tofaxnum{FAX: #1}}
%\renewcommand{\Mtofaxnum}[1]{\def\M@tofaxnum{}}

%
% 送信元情報用コマンド定義
%
\newcommand{\Mfromaffili}[1]{\def\M@fromaffili{#1}}
%\newcommand{\Mfromaffilii}[1]{\def\M@fromaffilii{#1}}
\newcommand{\Mfrom}[1]{\def\M@from{#1}}
\newcommand{\Mfromemail}[1]{\def\M@fromemail{email: #1}}
\newcommand{\Mfromzip}[1]{\def\M@fromzip{〒 #1}}
\newcommand{\Mfromaddress}[1]{\def\M@fromaddress{#1}}
\newcommand{\Mfromtellnum}[1]{\def\M@fromtellnum{電話: #1}}
\newcommand{\Mfromfaxnum}[1]{\def\M@fromfaxnum{FAX: #1}}

%
% 日付関係
%
\def\Mdate#1{\def\M@date{#1}}
\def\M@date{\today}    %\Mdate が宣言されない場合\M@dateは\today(今日の日付).
%
% 本文内容
%
\newcommand{\Mhonbun}[1]{\def\M@honbun{#1}}
%
% 送信内容一覧表出力環境(Mlist)
%
\newcounter{Mitemnum}
\newenvironment{Mlist}
	{
          \ifMheadder{
	    \@ifundefined{M@listheadder}{\Mlistheadder}{}
          }\fi
	  %
	  \begin{center}
	  \begin{boxedminipage}{0.9\textwidth}
		% 一覧の表題表示
		\M@listheadder
		\vspace{0.01\textheight}
		\hspace{0.01\textwidth}
			\begin{itemize}
	}
	{\end{itemize}
	\addtocounter{Mitemnum}{1}
	(本紙を含め計\arabic{Mitemnum}枚)
	  \end{boxedminipage}
	  \end{center}
	}
\newcommand{\Mitem}{\@ifnextchar [{\M@item}{\M@item[1]}}
\def\M@item[#1]#2{\item #2 \dotfill\ #1 枚 \addtocounter{Mitemnum}{#1}}
%
% 本文出力コマンド定義
%
\def\Mfax{
\pagestyle{empty}
\@ifundefined{M@headder}{\Mheadder}{}
%
% 送信内容ヘッダーの出力
%
\ifMheadder
  \begin{center}
        \doublebox{\M@headder} 
  \end{center}
\fi
%
% 罫線出力
%
\M@date \hrulefill
%\today \hrulefill
%
% 送り先/送り主出力
%
\begin{center}
\begin{tabular}[!h]{cl}
%\hline
	% 左側(送り先)
	\begin{minipage}{0.5\textwidth}
		%\M@toaffili\\
	        \@ifundefined{M@toaffili}{}{\M@toaffili\hfill\\}
		\M@to \\
	        \@ifundefined{M@tofaxnum}{}{\M@tofaxnum}
	\end{minipage}&
	% 右側(送り主)
	\begin{minipage}{0.4\textwidth}
		\begin{flushright}
		\Mlogo \\
		{\footnotesize
		\M@fromaffili\\
		%\M@fromaffilii\\
		}
		\M@from\\
		{\footnotesize
		\M@fromemail\\
		\hspace{2cm}\M@fromzip \hfill \\
		\M@fromaddress \\
		\M@fromtellnum \\
		\M@fromfaxnum \\
		}
		\end{flushright}
	\end{minipage}
%\\ \hline
\end{tabular}
\end{center}
%
% 罫線出力
%
\hrulefill
\vspace{1cm}
%
% 本文出力
%
\begin{center}
	\begin{minipage}{0.8\textwidth}
	\vspace{0.01\textheight}
	\hspace{0.01\textwidth}
	\vbox to 0.2\textheight{
	\M@honbun
	}
	\end{minipage}
\end{center}
}
