今年の基盤Ａを申請したときに使ったマクロです。数年前から既存のマクロを XeLaTeX を使用できるようにしていましたが、面倒になったので、昨年一から全部作りました。既存のマクロと比較した利点は
- １：プログラム自体が小さく単純で、毎年の変更箇所も少ないのでさっさと使える。
- ２：コマンド内でなく地の部分に文章を書き込む形式なので、他のマクロとの干渉がほぼ無い。
- ３：上の２と関連して、PDFのクリックでソースを表示できる。
- ４：XeLaTeX と pLaTeX の両方に対応する。
の4点あります。あと、既存のマクロに付随していた申請者グループの表も使用可能ですが、著作権に関わる可能性があるので、ここには載せません。
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This is a file for XeLaTeX/LaTeX %
% Document %
% by Norio Iwase (Feb. 1994) %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%!TEX encoding = UTF-8 Unicode
%!TEX TS-program = XeLaTeX%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 基盤Ａマクロ %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\input head.inc % TeX/XeTeX の違いを吸収
\usepackage{kibanA3} % 基盤Ａスタイル（要uline-?.sty）
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifdefined\XeTeXversion % フォント指定（XeLaTeX 用）
\setromanfont[Scale=1]{Times}
\setsansfont[Scale=1]{Lucida Sans}
\setmonofont[Scale=1]{Arial}
\setjamainfont[RawFeature=-palt]{HGSeikaishotaiPRO}
\setjasansfont[RawFeature=-palt]{DFPLeiSho-SB}
\setjamonofont[RawFeature=-palt]{HiraMaruProN-W4}
\fi
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% ここに使用するパッケージを記述する %
%\usepackage{fancybox,ascmac}
%\usepackage{curves}
%\usepackage[inline]{enumitem}
%\usepackage{tabularx}
%\usepackage[matrix,arrow]{xy}
%\usepackage{pb-diagram,pb-xy}
%\usepackage{insbox}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 研究計画調書 %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}
\pagestyle{empty}
\baselineskip 21pt
%
%\第一頁
%
\目的方法概要{20}{%
%
}
%
\目的方法本文{20}\noindent
%
\par\smallskip
%
\par\noindent
\textuul{\textbf{1）\ 項目１}}
%
\begin{kibanlist}
\item[\textbf{\textuuw{背景と問い}：}]
%
\item[\textbf{\textuuw{目的および独自性と創造性}：}]
%
\item[\textbf{\textuuw{何をどのように、どこまで明らかにしようとするのか}：}]
%
\end{kibanlist}
%
\par\noindent
\textuul{\textbf{2）\ 項目２}}%
%
\begin{kibanlist}
\item[\textbf{\textuuw{背景と問い}：}]
%
\item[\textbf{\textuuw{目的および独自性と創造性}：}]
%
\item[\textbf{\textuuw{何をどのように、どこまで明らかにしようとするのか}：}]
%
\end{kibanlist}
%
\par\noindent
\textuul{\textbf{3）\ 項目３}}%
%
\begin{kibanlist}
\item[\textbf{\textuuw{背景と問い}：}]
%
\item[\textbf{\textuuw{目的および独自性と創造性}：}]
%
\item[\textbf{\textuuw{何をどのように、どこまで明らかにしようとするのか}：}]
%
\end{kibanlist}
%
\par\noindent
\textuul{\textbf{4）\ 項目４}}%
%
\begin{kibanlist}
\item[\textbf{\textuuw{背景と問い}：}]
%
\item[\textbf{\textuuw{目的および独自性と創造性}：}]
\item[\textbf{\textuuw{何をどのように、どこまで明らかにしようとするのか}：}]
%
\end{kibanlist}
%
\着想経緯
%
\begin{kibanlist}
\vspace{-5ex}\item[\textuul{\textbf{(1) \ 本研究の着想に至った経緯と準備状況}}：]
\par\vskip0ex
%
\item[\textuul{\textbf{(2) \ 関連する国内外の研究動向と本研究の位置づけ}}：]
\par\vskip0ex
%
\end{kibanlist}
%
\研究能力環境\baselineskip18pt
\vspace{-4ex}
\newcounter{biblio}\setcounter{biblio}{0}
\def\labelenumi{[\arabic{enumi}]}
\begin{kibanlist}
\item[\textbf{\textuul{(1) これまでの研究活動}：}] ~\par\vspace{-.5ex}
\begin{kibanlist}
\item[\textbf{\textuuw{研究代表者}・\textuul{某々}：}]
%
\par
{{\baselineskip13pt\begin{biblist}
\vspace{1ex}\item
\vspace{-1ex}\item
\vspace{-1ex}\item
\setcounter{biblio}{\value{bibcount}}
\end{biblist}}}
%
\item[\textbf{\textuuw{研究分担者}\,(あいうえお順)：}]
\begin{kibanlist}
%
\item \textul{分担者１}：
%
\par
{{\baselineskip13pt\begin{biblist}
\vspace{1ex}\item
\vspace{-1ex}\item
\vspace{-1ex}\item
\setcounter{biblio}{\value{bibcount}}
\end{biblist}}}
%
\item \textul{分担者２}：
%
\par
{{\baselineskip13pt\begin{biblist}
\vspace{1ex}\item
\vspace{-1ex}\item
\vspace{-1ex}\item
\setcounter{biblio}{\value{bibcount}}
\end{biblist}}}
%
\item \textuw{分担者３}：
%
\par
{{\baselineskip13pt\begin{biblist}
\vspace{1ex}\item
\vspace{-1ex}\item
\vspace{-1ex}\item
\setcounter{biblio}{\value{bibcount}}
\end{biblist}}}
%
\item \textul{分担者４}：
%
\par
{{\baselineskip13pt\begin{biblist}
\vspace{1ex}\item
\vspace{-1ex}\item
\vspace{-1ex}\item
\setcounter{biblio}{\value{bibcount}}
\end{biblist}}}
%
\end{kibanlist}
\end{kibanlist}
\item[\textbf{\textuuw{(2) 研究環境}：}]~\par
%
\par\vskip0ex
%
\end{kibanlist}
%
\人権法令{該当しない。}
%
\最終年度研究課題{}{}{}{}当初研究{}理由{}
%
\終わり
インクルードファイルは、初期化用の head.inc と真のスタイルファイルの kibanA3.sty の二つあります。まず head.inc は次のものです。
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This is a file for XeLaTeX/LaTeX %
% head.inc %
% by Norio Iwase (Feb. 1994) %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 基盤Ａマクロ %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
\ifx\undefined\XeTeXversion
\documentclass[10pt,a4paper]{article}
\usepackage[dvipdfmx]{graphicx,xcolor}
\usepackage{uline--}
\else
\documentclass[10pt,a4paper]{article}
\usepackage[xetex]{graphicx,xcolor}
\usepackage{uline-x}
\fi
\usepackage{amsthm}
\usepackage[leqno]{amsmath}
\usepackage{amsfonts,amssymb}
\setcounter{totalnumber}{1}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifx\undefined\XeTeXversion
\ifdefined\OTF\usepackage[deluxe]{otf}\fi
\usepackage[dvipdfmx,bookmarks=true,bookmarksnumbered=true,bookmarkstype=toc,colorlinks=true,linkcolor=black]{hyperref}
\else
\usepackage[no-math]{fontspec}
\defaultfontfeatures{Scale=.962,Mapping=tex-text}
\usepackage[slantfont,boldfont]{xeCJK}
\CJKspace
\usepackage{zxjatype} % xeCJK を内部で読み込んでいる。
\ifdefined\OTF\usepackage{zxotf}\fi
\usepackage[xetex,bookmarks=true,bookmarksnumbered=true,bookmarkstype=toc,colorlinks=true,linkcolor=black]{hyperref}
\ifdefined\IPA\usepackage[ipa]{zxjafont}\fi
\fi
%
% Page Definitions
%
\textwidth=16.1cm
\textheight=25.0cm
\ifdefined\XeTeXversion
\hoffset -18.0mm
\voffset -23.0mm
\usepackage{pdfsync}
\else
\hoffset -18.0mm
\voffset -23.0mm
\fi
%
\pagestyle{empty}
\baselineskip 21pt
\addtolength\voffset{-16mm}
\addtolength\textheight{16mm}
%
次が真のスタイルファイルの kibanA3.sty です。
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This is a file for XeLaTeX/LaTeX %
% Main Macro %
% by Norio Iwase (Feb. 1994) %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 基盤Ａマクロ %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
\def\終わり{\end{document}\end}
%
\def\目的方法概要#1#2{\begin{figure}[htbp]\begin{picture}(430,340)(6,340)
\put(-66,-151){\includegraphics[page=1]{s-12}}
\put( 3,503){\begin{minipage}[t]{162mm}\baselineskip#1pt{\large#2}\end{minipage}}
\end{picture}\end{figure}}
%
\def\目的方法本文#1{\large\baselineskip#1pt\par
\目的方法{2}枚目%\baselineskip 21pt
\目的方法{3}枚目%\baselineskip 21pt
\目的方法{4}枚目%\baselineskip 21pt
\目的方法{5}枚目%\baselineskip 21pt
}
%
\def\目的方法#1枚目{\begin{figure}[t]{\begin{picture}(430,38)(6,-27)
\put(-66,-826){\includegraphics[page=#1]{s-12}}
\end{picture}}\end{figure}}
%
\def\着想経緯{%
\ifnum\value{page}<5\newpage~\fi
\ifnum\value{page}<5\newpage~\fi
\ifnum\value{page}<5\newpage~\fi
\ifnum\value{page}<5\newpage~\fi
\newpage\begin{figure}[t]{\begin{picture}(430,83)(6,642)
\put(-66,-109) {\includegraphics[page=6]{s-12}}
\end{picture}}\end{figure}}
%
\newcounter{NouKan}
%
\def\研究能力環境{\clearpage\begin{figure}[t]{\begin{picture}(430,94)(6,637)
\put(-66,-102) {\includegraphics[page=7]{s-12}}
\end{picture}}\end{figure}
\能力環境{2}枚目
}
%
\def\能力環境#1枚目{\begin{figure}[t]{\begin{picture}(430,30)(6,-27)
\setcounter{NouKan}{6}\addtocounter{NouKan}{#1}
\put(-66,-826){\includegraphics[page=\number\value{NouKan}]{s-12}}
\end{picture}}\end{figure}}
%
\def\人権法令#1{%
\ifnum\value{page}<8\newpage~\fi
\ifnum\value{page}<8\newpage~\fi
\clearpage\begin{picture}(430,680)(6,0)
\put(-77,-153) {\includegraphics[page=9]{s-12}}
\put(-10,514){\begin{minipage}[t]{163mm}\baselineskip 15pt{#1}\end{minipage}}\end{picture}}
%
\def\最終年度研究課題#1#2#3#4当初研究#5理由#6{\clearpage
\begin{picture}(430,680)(6,0)
\put(-77,-153) {\includegraphics[page=10]{s-12}}
\end{picture}}
%
\def\textul#1{\uline{#1}}\def\textol#1{\oline{#1}}
\def\textuw#1{\uwave{#1}}\def\textow#1{\owave{#1}}
\def\textud#1{\udash{#1}}\def\textod#1{\odash{#1}}
\def\textuul#1{\uline[lines=2]{#1}}\def\textool#1{\oline[lines=2]{#1}}
\def\textuuw#1{\uwave[lines=2]{#1}}\def\textoow#1{\owave[lines=2]{#1}}
\def\textuud#1{\udash[lines=2]{#1}}\def\textood#1{\odash[lines=2]{#1}}
%
\newcounter{kibancount}\setcounter{kibancount}{1}
\newenvironment{kibanlist}{\setcounter{kibancount}{1}\list{(\arabic{kibancount})~}{\usecounter{kibancount}%
\setlength{\rightmargin}{0mm}\setlength{\leftmargin}{0em}
\ifnum\@listdepth=\@ne\topsep.25\normalbaselineskip\else\topsep\z@\fi
\itemsep.25\normalbaselineskip
\itemindent0pt\labelwidth-5pt\labelsep 5pt\listparindent0pt
}}{\endlist}
%
\newcounter{bibcount}\setcounter{bibcount}{1}
\newenvironment{biblist}{\setcounter{bibcount}{1}\addtocounter{bibcount}{1}\list{[\arabic{bibcount}]}{\usecounter{bibcount}%
\setlength{\rightmargin}{1mm}\setlength{\leftmargin}{1mm}
\ifnum\@listdepth=\@ne\topsep.25\normalbaselineskip\else\topsep\z@\fi
\itemsep.5\normalbaselineskip
\itemindent2pt\labelwidth-2pt\labelsep4pt\listparindent1pt
}}{\endlist}
%
![[PukiWiki]](image/pukiwiki.png "[PukiWiki]")
