iwase/hifuyou の変更点 - PukiWiki

そう言えば、今年は被扶養者申告書のマクロも作った。これも、もしかしたら uplatex でも動くかもしれない。
昨年も被扶養者申告書のマクロを更新していた。これも、もしかしたら uplatex でも動くかもしれない。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %                             %
 %  被扶養者申告書・九大用     %
 %                             %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %								%
 %  被扶養者申告書・九大用		%
 %								%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %!TEX TS-program = XeLaTeX
 %!TEX encoding = UTF-8 Unicode
 %%%%%%%%%%%%%%%%%%%%%
 \input hifuyou-17.inc
 %%%%%%%%%%%%%%%%%%%%%
 \ここから文書開始   %
 %%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \def\mac{}
 \input sinkoku-18.inc
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \ここから文書開始				%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 %\共済組合:{文部科学省}支部{九州大学}
 \申告先:{文部科学省}共済組合{九州大学}支部
 %
 %%%%%%%%%%%%%%%%%%%%%
 %  本人のID       %
 %%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  本人のID					%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \所属部局:{数理学研究院}職{教授}
 \本人姓{九}{キュウ}
 \本人姓{大}{ダイ}
 \本人名{某}{ナニ}
 \本人名{某}{ガシ}
 \住所{福岡市西区元岡1丁目2番3号}
 \本人{昭和}{12}年{03}月{04}日生({X})個人番号{12345678}  % Xは 男 または 女 のいずれか一方
 \本人は{昭和}{12}年{03}月{04}日生({X})で個人番号{12345678}  % Xは 男 または 女 のいずれか一方
 %
 %%%%%%%%%%%%%%%%%%%%%
 %  申告内容         %
 %%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  申告内容						%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \申告:平成{29}年{04}月{01}日
 \親族{子}({X})姓名{九大 何某}読み{キュウダイ ナニガシ}(平成{12年3月4日}生)は
  {会社員}(年間所得{1234567}円、住所{\footnotesize 福岡市西区元岡4丁目5番6号})で
  {\footnotesize 平成29年4月1日\hfill 就職\,}の為 % Xは 男 または 女 のいずれか一方
 \申告:平成{31}年{04}月{14}日
 %
 %%%%%%%%%%%%%%%%%%%%%
 \これで終り書き出し %
 %%%%%%%%%%%%%%%%%%%%%
 \親族同{続柄}姓名{姓名}ヨミ{ヨミ}は明治{年月日}生({男})の{職業}(年間所得{1234567}円{住所}在住)で{日付と事由}の為 % 黒字で書く。
 %
 \親族異{続柄}姓名{姓名}ヨミ{ヨミ}は昭和{年月日}生({X})の{職業}(年間所得{1234567}円{住所}在住)で{日付と事由}の為 % 赤字で書く。Xは 男 または 女 のいずれか一方
 %
 \親族同{続柄}姓名{姓名}ヨミ{ヨミ}は平成{年月日}生({X})の{職業}(年間所得{0}円{住所}在住)で{\begin{flushright}\footnotesize\fitwidth{26.0mm}{年月日}\\{事由}\,\end{flushright}}の為 % 黒字で書く。Xは 男 または 女 のいずれか一方
 %
 \親族異{続柄}姓名{姓名}ヨミ{ヨミ}は令和{年月日}生({女})の{職業}(年間所得{0}円{住所}在住)で{\begin{flushright}\footnotesize\fitwidth{26.0mm}{年月日}\\{事由}\,\end{flushright}}の為 % 赤字で書く。
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \これで終り書き出し				%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

以下が hifuyou-17.inc の中身である。均等割り付けのマクロ fitwidth.sty は http://www.math.nagoya-u.ac.jp/~kubo/ja/latex/tips-003.html から取って来た。
以下が sinkoku-18.inc の中身である。均等割り付けのマクロ fitwidth.sty は http://www.math.nagoya-u.ac.jp/~kubo/ja/latex/tips-003.html から取って来た。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %                                        %
 %  被扶養者申告書 Form by Norio Iwase    %
 %                                        %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %										%
 %	被扶養申告書 Macro by Norio Iwase	%
 %										%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \ifx\undefined\XeTeXversion
  \documentclass[12pt,a4j]{jarticle}
  \usepackage[dvipdfmx]{graphicx}
  \usepackage[deluxe]{otf}
  \usepackage[dvipdfmx]{graphicx,color}
  \ifdefined\mac\usepackage[deluxe]{otf}\fi
 \else
  \documentclass[12pt,a4paper]{article}
  \usepackage[xetex]{graphicx}
  \usepackage[xetex]{graphicx,color}
  \usepackage[no-math]{fontspec}
  \usepackage[boldfont,slantfont]{xeCJK}
  \usepackage{zxjatype}
  \usepackage{zxotf}
  \usepackage{xunicode}\usepackage{xltxtra}
  \ifdefined\mac\usepackage{zxotf}\fi
  \CJKspace
 %
  \defaultfontfeatures{Mapping=tex-text}
  \setromanfont{Times}\setsansfont{Papyrus}\setmonofont{Arial}
  \setjamainfont[Scale=0.95]{HGSeikaishotaiPRO}
  \setjasansfont[Scale=0.9]{IPAexMincho}
  \setjamonofont[Scale=0.9]{Osaka-Mono}
  \defaultfontfeatures{Mapping=tex-text,Scale=0.9}
  \usepackage[ipa]{zxjafont}
  \ifdefined\mac
   \setromanfont{Times}\setsansfont{Papyrus}\setmonofont{Arial}
   \setjamainfont[Scale=0.95]{HGSeikaishotaiPRO}
   \setjasansfont[Scale=0.9]{IPAexMincho}
   \setjamonofont[Scale=0.9]{Osaka-Mono}
  \fi
 \fi
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  共通設定               %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	共通設定						%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \setlength{\voffset}		{  46.0mm}
 \setlength{\hoffset}		{ -11.5mm}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \usepackage{amssymb}
 \usepackage{xcolor}
 \usepackage{ifthen,numbersty}
 \usepackage{lscape}
 \usepackage{fitwidth}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  \姓・\名 コマンド      %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	申告状況マクロ   			%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \newcommand{\rubi}[2]{\hbox{\shortstack{{\tiny #2}\\[.0mm]{#1}}}}
 \newcommand{\Sei}{}\newcommand{\Mei}{}
 \newcommand{\sei}{}\newcommand{\mei}{}
 \def\申告先:#1共済組合#2支部{
   \put(142.0,93.5){\makebox(10,8)[cr]{\ifdefined\XeTeXversion\ifdefined\mac\large\fi\tt\else\bf\fi \fitwidth{5.45em}{#1}\fitwidth{4.35em}{共済組合}}}
   \put(243.0,93.5){\makebox(10,8)[cr]{\ifdefined\XeTeXversion\ifdefined\mac\large\fi\tt\else\bf\fi \fitwidth{4.35em}{#2}\hskip.7em\fitwidth{4.35em}{支部長殿}}}
 }
 \def\rubi#1#2{\shortstack{{\tiny #2}\\[.0mm]{#1}}}
 \def\Rubi#1#2{\hbox{\rubi{#1}{#2}}}
 \def\Sei{}\def\Mei{}
 \def\sei{}\def\mei{}
 \def\本人姓#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Sei}{}}{}{\xdef\Sei{\Sei\protect{ }}}%
   \xdef\Sei{\Sei\protect\rubi{#1}{#2}}%
   \xdef\Sei{\Sei\protect\Rubi{#1}{#2}}%
   \ifthenelse{\equal{\sei}{}}{}{\xdef\sei{\sei\protect{}}}%
   \xdef\sei{\sei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\本人名#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Mei}{}}{}{\xdef\Mei{\Mei\protect{ }}}%
   \xdef\Mei{\Mei\protect\rubi{#1}{#2}}%
   \xdef\Mei{\Mei\protect\Rubi{#1}{#2}}%
   \ifthenelse{\equal{\mei}{}}{}{\xdef\mei{\mei\protect{}}}%
   \xdef\mei{\mei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \gdef\Showa{昭和}\gdef\Heisei{平成}
 \def\showa{}\def\heisei{}
 \gdef\menoko{}\gdef\onoko{}
 \def\本人#1#2年#3月#4日生(#5)個人番号#6{
 \def\本人は#1#2年#3月#4日生(#5)で個人番号#6{
 \def\Hera{#1}\def\Hnen{#2}\def\Htsuki{#3}\def\Hhi{#4}\def\Hsex{#5}\def\Hbangou{#6}%
 \ifx\Showa\Hera\def\showa{\Large 〇}\fi%
 \ifx\Heisei\Hera\def\heisei{\Large 〇}\fi%
 \ifx\Onoko\Hsex\def\onoko{\Large 〇}\fi%
 \ifx\Menoko\Hsex\def\menoko{\Large 〇}\fi%
  \put( 9.4,311.4)	{\makebox(140,8)[cc]{\fitwidth{10.2em}{#6}}}
  \put(12.5,310.0)	{\makebox(140,8)[cc]{\fitwidth{11.25em}{#6}}}
  %\put(543.9,376){\scriptsize$\frown$}
  %\put(544.0,331.5){\scriptsize$\smile$}
  \put(230.0,336.0)	{\makebox( 60,8)[cl]{\Sei { } \Mei}}
  \put(230.0,316.0)	{\makebox( 60,8)[cl]{\shozoku}}
  \put(331.0,88.2)	{\makebox(140,8)[cl]{\jusho}}
  \put(331.0,75.2)	{\makebox(130,8)[cl]{\hfill\small (\sei \ \mei)}}
  \put(345.06,334.9)	{\makebox( 40,0)[cc]{\onoko}}
  \put(361.06,334.9)	{\makebox( 40,0)[cc]{\menoko}}
  \put(425.0,343.6)	{\makebox( 40,0)[cc]{\showa}}
  \put(425.0,334.1)	{\makebox( 40,0)[cc]{\heisei}}
 }
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  マクロ                 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  マクロ						%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \def\申告:平成#1年#2月#3日{
 \put(259.2,116.3){\makebox(19,6)[cr]{\fitwidth{2.42em}{#1}}}%
 \put(259.5,116.3){\makebox(19,6)[cr]{\fitwidth{2.42em}{#1}}}%
 \put(306.5,116.3){\makebox(19,6)[cr]{\fitwidth{2.42em}{#2}}}
 \put(350.5,116.3){\makebox(19,6)[cr]{\fitwidth{2.42em}{#3}}}}
 \put(350.5,116.3){\makebox(19,6)[cr]{\fitwidth{2.42em}{#3}}}
 \hskip.7em}
 %
 \def\所属部局:#1職#2{\gdef\shozoku{#1}\gdef\shoku{#2}}
 \def\電話#1{\gdef\denwa{#1}}
 \def\住所#1{\gdef\jusho{#1}}
 %
 \newcounter{FUYOSHA}\setcounter{FUYOSHA}{249}
 \newcounter{SEIBETSU}\setcounter{SEIBETSU}{126}
 \newcounter{TSUZUKI}\setcounter{TSUZUKI}{140}
 \newcounter{NENGO}\setcounter{NENGO}{165}
 \gdef\Menoko{女}\gdef\Onoko{男}
 %
 \def\親族#1(#2)姓名#3読み#4(平成#5生)は#6(年間所得#7円、住所#8)で#9の為{{
 \def\seibetu{#2}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{10}
 \put(122.0,\number\value{FUYOSHA}.9)	{\makebox( 40,0)[cc]{\color{red} 〇}}
 \addtocounter{FUYOSHA}{-10}
 \makeatletter
 \def\親族異#1姓名#2ヨミ#3は{\ifdefined\mac\hskip-.7em\else\hskip-.8em\fi\color{red}\@ifnextchar{令}{\令和親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{平}{\平成親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{昭}{\昭和親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{大}{\大正親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{明}{\明治親族{#1}姓名{#2}ヨミ{#3}は}{}}}}}}
 \def\親族同#1姓名#2ヨミ#3は{\ifdefined\mac\hskip-.7em\else\hskip-.8em\fi\color{black}\@ifnextchar{令}{\令和親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{平}{\平成親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{昭}{\昭和親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{大}{\大正親族{#1}姓名{#2}ヨミ{#3}は}{\@ifnextchar{明}{\明治親族{#1}姓名{#2}ヨミ{#3}は}{}}}}}}
 \makeatother
 %
 \def\令和親族#1姓名#2ヨミ#3は令和#4生(#5)の#6(年間所得#7円#8在住)で#9の為{
 %\hskip-.2em\hskip-.7em\color{black}
 \def\seibetu{#5}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{8}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.7)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-8}
 \fi\ifx\Menoko\seibetu
 \addtocounter{FUYOSHA}{-5}
 \put(122.0,\number\value{FUYOSHA}.2)	{\makebox( 40,0)[cc]{\color{red} 〇}}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.0)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{5}
 \fi
 \addtocounter{FUYOSHA}{2}
 \put(138.0,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\color{red}#1}}
 \addtocounter{FUYOSHA}{-10}
 \put(160.0,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\color{red} 〇}}
 \addtocounter{FUYOSHA}{7}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\color{red}\small #3}}
 \put(\number\value{TSUZUKI},\value{FUYOSHA})	{\makebox( 40,0)[cc]{#1}}
 \addtocounter{FUYOSHA}{-12}
 \put(\number\value{NENGO},\number\value{FUYOSHA}.8)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{12}
 \addtocounter{FUYOSHA}{-3}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\small #2}}
 \addtocounter{FUYOSHA}{16}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\color{red}\footnotesize #4}}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\footnotesize #3}}
 \addtocounter{FUYOSHA}{-15}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\color{red}\small 円}}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\small 円}}
 \addtocounter{FUYOSHA}{3}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\color{red}\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \addtocounter{FUYOSHA}{2}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\color{red}\footnotesize \fitwidth{5.2em}{#5}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\color{red}\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\color{red}\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(426.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\color{red}\begin{minipage}[c]{27.0mm}\baselineskip12pt\small#9\end{minipage}}}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\footnotesize \fitwidth{4.5em}{#4}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(425.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\begin{minipage}[c]{26.8mm}\baselineskip12pt\small#9\end{minipage}}}
 \addtocounter{FUYOSHA}{1}
 \addtocounter{FUYOSHA}{-40}
 }}
 \hskip.2em
 }
 \def\平成親族#1姓名#2ヨミ#3は平成#4生(#5)の#6(年間所得#7円#8在住)で#9の為{
 \def\seibetu{#5}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{8}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.7)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-8}
 \fi\ifx\Menoko\seibetu
 \addtocounter{FUYOSHA}{-5}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.0)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{5}
 \fi
 \addtocounter{FUYOSHA}{2}
 \put(\number\value{TSUZUKI},\value{FUYOSHA})	{\makebox( 40,0)[cc]{#1}}
 \addtocounter{FUYOSHA}{-6}
 \put(\number\value{NENGO},\number\value{FUYOSHA}.4)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{6}
 \addtocounter{FUYOSHA}{-3}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\small #2}}
 \addtocounter{FUYOSHA}{16}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\footnotesize #3}}
 \addtocounter{FUYOSHA}{-15}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\small 円}}
 \addtocounter{FUYOSHA}{3}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \addtocounter{FUYOSHA}{2}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\footnotesize \fitwidth{4.5em}{#4}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(425.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\begin{minipage}[c]{26.8mm}\baselineskip12pt\small#9\end{minipage}}}
 \addtocounter{FUYOSHA}{1}
 \addtocounter{FUYOSHA}{-40}
 \hskip.2em
 }
 \def\昭和親族#1姓名#2ヨミ#3は昭和#4生(#5)の#6(年間所得#7円#8在住)で#9の為{
 \def\seibetu{#5}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{8}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.7)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-8}
 \fi\ifx\Menoko\seibetu
 \addtocounter{FUYOSHA}{-5}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.0)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{5}
 \fi
 \addtocounter{FUYOSHA}{2}
 \put(\number\value{TSUZUKI},\value{FUYOSHA})	{\makebox( 40,0)[cc]{#1}}
 \addtocounter{FUYOSHA}{0}
 \put(\number\value{NENGO},\number\value{FUYOSHA})	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{0}
 \addtocounter{FUYOSHA}{-3}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\small #2}}
 \addtocounter{FUYOSHA}{16}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\footnotesize #3}}
 \addtocounter{FUYOSHA}{-15}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\small 円}}
 \addtocounter{FUYOSHA}{3}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \addtocounter{FUYOSHA}{2}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\footnotesize \fitwidth{4.5em}{#4}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(425.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\begin{minipage}[c]{26.8mm}\baselineskip12pt\small#9\end{minipage}}}
 \addtocounter{FUYOSHA}{1}
 \addtocounter{FUYOSHA}{-40}
 \hskip.2em
 }
 \def\大正親族#1姓名#2ヨミ#3は大正#4生(#5)の#6(年間所得#7円#8在住)で#9の為{
 \def\seibetu{#5}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{8}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.7)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-8}
 \fi\ifx\Menoko\seibetu
 \addtocounter{FUYOSHA}{-5}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.0)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{5}
 \fi
 \addtocounter{FUYOSHA}{2}
 \put(\number\value{TSUZUKI},\value{FUYOSHA})	{\makebox( 40,0)[cc]{#1}}
 \addtocounter{FUYOSHA}{5}
 \put(\number\value{NENGO},\number\value{FUYOSHA}.9)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-5}
 \addtocounter{FUYOSHA}{-3}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\small #2}}
 \addtocounter{FUYOSHA}{16}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\footnotesize #3}}
 \addtocounter{FUYOSHA}{-15}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\small 円}}
 \addtocounter{FUYOSHA}{3}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \addtocounter{FUYOSHA}{2}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\footnotesize \fitwidth{4.5em}{#4}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(425.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\begin{minipage}[c]{26.8mm}\baselineskip12pt\small#9\end{minipage}}}
 \addtocounter{FUYOSHA}{1}
 \addtocounter{FUYOSHA}{-40}
 \hskip.2em
 }
 \def\明治親族#1姓名#2ヨミ#3は明治#4生(#5)の#6(年間所得#7円#8在住)で#9の為{
 \def\seibetu{#5}\ifx\Onoko\seibetu
 \addtocounter{FUYOSHA}{8}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.7)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-8}
 \fi\ifx\Menoko\seibetu
 \addtocounter{FUYOSHA}{-5}
 \put(\number\value{SEIBETSU},\number\value{FUYOSHA}.0)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{5}
 \fi
 \addtocounter{FUYOSHA}{2}
 \put(\number\value{TSUZUKI},\value{FUYOSHA})	{\makebox( 40,0)[cc]{#1}}
 \addtocounter{FUYOSHA}{11}
 \put(\number\value{NENGO},\number\value{FUYOSHA}.8)	{\makebox( 40,0)[cc]{〇}}
 \addtocounter{FUYOSHA}{-11}
 \addtocounter{FUYOSHA}{-3}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\small #2}}
 \addtocounter{FUYOSHA}{16}
 \put(76.5,\value{FUYOSHA})	{\makebox( 40,0)[cc]{\footnotesize #3}}
 \addtocounter{FUYOSHA}{-15}
 \put(282.5,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\small 円}}
 \addtocounter{FUYOSHA}{3}
 \put(235.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{15.0mm}\small\hfill#6\end{minipage}}}
 \addtocounter{FUYOSHA}{2}
 \put(181,\value{FUYOSHA})	{\makebox( 41,0)[cr]{\footnotesize \fitwidth{4.5em}{#4}}}
 \put(280.0,\value{FUYOSHA})	{\makebox( 14,0)[cr]{\small{\milnumber#7}}}
 \put(365.0,\value{FUYOSHA})	{\makebox( 20,0)[cr]{\begin{minipage}[c]{39.0mm}\small#8\end{minipage}}}
 \put(425.0,\value{FUYOSHA})	{\makebox( 20,0)[cl]{\begin{minipage}[c]{26.8mm}\baselineskip12pt\small#9\end{minipage}}}
 \addtocounter{FUYOSHA}{1}
 \addtocounter{FUYOSHA}{-40}
 \hskip.2em
 }
 %
 \def\ここから文書開始{%
 \color{black}
 \pagestyle{empty}
 \begin{document}
 \begin{landscape}
 \setlength{\textwidth}		{ 200.0mm}
 \setlength{\textheight}		{ 280.0mm}
 \setlength{\textheight}	{ 280.0mm}
 \setlength{\oddsidemargin}	{  -6.8mm}
 \setlength{\unitlength}		{   0.5mm}
 \setlength{\unitlength}	{   0.5mm}
 \setlength\unitlength{0.5mm}
 \begin{picture}(280,200)(0,200)
 \put(.5,7)	{\makebox(565,402){\includegraphics{hifuyou10}}}
 \ifdefined\XeTeXversion
  \put( .5,7)	{\makebox(572,398.3){\includegraphics{hifuyou13sinkoku11}}}
 \else
  \put( .0,8.5)	{\makebox(572,398.3){\includegraphics{hifuyou13sinkoku11.pdf}}}
 \fi
 \multiput(175,258.8)(0,-33.85){4}  {\makebox(10,8)[cl]{\scriptsize\sf 明}}
 \multiput(181.5,258.9)(0,-33.85){4}  {\makebox(10,7)[cl]{\scriptsize\tt (1)}}
 \multiput(175,253.0)(0,-33.85){4}  {\makebox(10,8)[cl]{\scriptsize\sf 大}}
 \multiput(181.5,253.1)(0,-33.85){4}  {\makebox(10,7)[cl]{\scriptsize\tt (2)}}
 \multiput(175,247.1)(0,-33.85){4}  {\makebox(10,8)[cl]{\scriptsize\sf 昭}}
 \multiput(181.5,247.2)(0,-33.85){4}  {\makebox(10,7)[cl]{\scriptsize\tt (3)}}
 \multiput(175,241.3)(0,-33.85){4}  {\makebox(10,8)[cl]{\scriptsize\sf 平}}
 \multiput(181.5,241.4)(0,-33.85){4}  {\makebox(10,7)[cl]{\scriptsize\tt (4)}}
 \multiput(175,235.5)(0,-33.85){4}  {\makebox(10,8)[cl]{\scriptsize\sf 令}}
 \multiput(181.5,235.6)(0,-33.85){4}  {\makebox(10,7)[cl]{\scriptsize\tt (5)}}
 }
 %
 \def\これで終り書き出し{%
 \put(543.9,376){\scriptsize$\frown$}
 \put(543.9,331.5){\scriptsize$\smile$}
 \put(230.0,336.0)	{\makebox( 60,8)[cl]{\Sei { } \Mei}}
 \put(230.0,316.0)	{\makebox( 60,8)[cl]{\shozoku}}
 \put(331.0,88.2)	{\makebox(140,8)[cl]{\jusho}}
 \put(331.0,75.2)	{\makebox(130,8)[cl]{\hfill\small (\sei \ \mei)}}
 \put(344.9,335.7)	{\makebox( 40,0)[cc]{\onoko}}
 \put(360.9,335.7)	{\makebox( 40,0)[cc]{\menoko}}
 \put(425.0,345.0)	{\makebox( 40,0)[cc]{\showa}}
 \put(425.0,335.5)	{\makebox( 40,0)[cc]{\heisei}}
 \put(476.5,340.2)	{\makebox( 10,0)[cr]{\Hnen}}
 \put(501.5,340.2)	{\makebox( 10,0)[cr]{\Htsuki}}
 \put(526.5,340.2)	{\makebox( 10,0)[cr]{\Hhi}}
 %
 \def\これで終り書き出し{\color{black}%
 \put(470.5,338.5)	{\makebox( 10,0)[cr]{\Hnen}}
 \put(495.5,338.5)	{\makebox( 10,0)[cr]{\Htsuki}}
 \put(520.5,338.5)	{\makebox( 10,0)[cr]{\Hhi}}
 \end{picture}
 \end{landscape}
 %
 \end{document}
 }
 %

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS