iwase/kakenhi の履歴ソース(No.1) - PukiWiki 
今年の基盤Ａを申請したときに使ったマクロです。数年前から既存のマクロを XeLaTeX を使用できるようにしていましたが、面倒になったので、昨年一から全部作りました。既存のマクロと比較した利点は

１：プログラム自体が小さく単純で、毎年の変更箇所も少ないのでさっさと使える。
２：コマンド内でなく地の部分に文章を書き込む形式なので、他のマクロとの干渉がほぼ無い。
３：上の２と関連して、PDFのクリックでソースを表示できる。
４：XeLaTeX と pLaTeX の両方に対応する。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	This is a file for XeLaTeX/LaTeX	%
 %	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	%
 %	by Norio Iwase  (Feb. 1994)			%
 %	Document Style
 %
 \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	%
 %	by Norio Iwase  (Feb. 1994)			%
 %	Kaken Macros
 %
 \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}
 %
トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS