% kyakuchu.sty by Shinsaku Fujita 1998/08/30
% Copyright (C) 1998 by Shinsaku Fujita, All rights reserved. 
%
%  �c���ɂ�����r������
%
%  �쐬��: ���c����
%          fujitas@chem.kit.ac.jp
%
%   ���c���쒘�u��LaTeX2e�K��(�c����)�v����
%
%   ���ۏ�
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\j@urnalname{kyakuchu}
\def\versi@ndate{August 30, 1998}
\def\versi@nno{ver1.00}
\def\copyrighth@lder{SF} % Shinsaku Fujita
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\typeout{Option Style `\j@urnalname' (\versi@nno) <\versi@ndate>\space 
[\copyrighth@lder]}
%
% �r���̃��C�A�E�g
%  \handurawidth
%  \textwidth
%  \marginparsep�@���
%  \marginparwidth (�v�Z)
%
\newdimen\handurawidth
\def\setkyakuchuu{%
  \setlength\@tempdima{\handurawidth}
  \addtolength\@tempdima{-\textwidth}
  \addtolength\@tempdima{-\marginparsep}
  \setlength\marginparwidth{\@tempdima}
  \@settopoint\marginparwidth
  \addtolength\footskip{\@tempdima}
  \addtolength\footskip{\marginparsep}
  \addtolength\headsep{\maxdepth}
}
%
% �r���ԍ��̃p�����[�^�[
%
\@ifundefined{c@kcbango}{\newcounter{kcbango}}{}
\newif\ifchuukanjibango \chuukanjibangofalse
%
%���������g���Ƃ��̃X�C�b�`
%    
\def\kanjichuu{\chuukanjibangotrue
\def\thekcbango{{\gt\Kanji{kcbango}}}%
\let\chuuRef=\ref}
%
% �A���r�A�������g���Ƃ��̃X�C�b�`
%
\def\arabicchuu{\chuukanjibangofalse
\def\chuuRef##1{\rensuji{\ref{##1}}}}
%
%�f�t�H���g�̓A���r�A����
%
\arabicchuu
%\kanjichuu
%
% ��������(�{�����ւ̋r���ԍ��̏o�͌`��)
%
\def\@maketatekcmark#1{%
  \hbox to\z@{\hskip-.25zw\raise.9zh\hbox{%
  \kanjiskip=0pt plus.5pt minus.4pt%added by SF 1998/11/06
  \hbox{\scriptsize \chuuRef{#1}}}\hss}}
\def\@makeyokokcmark#1{\hbox{%
  \kanjiskip=0pt plus.5pt minus.4pt%added by SF 1998/11/06
  \@textsuperscript{\normalfont\chuuRef{#1}}}}
%
% �r��(����)�ԍ���{���֏o��
% \kyakuchumark{�Q�ƃL�[}
%
\def\kyakuchumark#1{%
%  \refstepcounter{kcbango}\label{#1}%
  \leavevmode
  \ifhmode\edef\@x@sf{\the\spacefactor}\nobreak\fi
  \ifydir\@makeyokokcmark{#1}\else\@maketatekcmark{#1}\fi
  \ifhmode\spacefactor\@x@sf\fi\relax}
%
% �r��(����)�ւ̒ʂ��ԍ��̏o�͌`��(��������)
%
\def\@kyakuchubango#1{\leavevmode
 \refstepcounter{kcbango}\label{#1}%
 \hbox to0pt{\hss \ifchuukanjibango \thekcbango \else
 \rensuji{\thekcbango}\fi \kern.2zw}}
%
% �r��(����)�̓��e
% \kyakuchutext{�Q�ƃL�[}{���e}
%
\def\kyakuchutext#1#2{\marginpar{\scriptsize\@kyakuchubango{#1}#2}}
\normalmarginpar
\endinput
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%�ᕶ
% chutest3.tex
% ���c����u��LaTeX2e�K��(�c�g��)�v
%
\documentclass{tarticle}
\usepackage{furiknkt}
\usepackage{kyakuchu}

\textwidth=39zw
\handurawidth=49zw
\marginparsep=2zw
\setkyakuchuu%�r���̈�̌v�Z

%\kanjichuu

\begin{document}

�̖��Ƃ��āA
%
\kyakuchutext{A1}{���������͎s�ɂ��������B�X���̊֏��B}
\kyakuchutext{A2}{%
�m�ԁu�����̂ق����v
���� ���j �Z���A��g���Ɏ��� (�����)�B}
\kyakuchutext{A3}{%
���}�� ����u���ד����ԏ��v(�����̂ق��݂����������傤�B
����\ref{A2}�ɕt�^�Ƃ��Čf��)�̒��߂��A
�T���𖾂炩�ɂ��Ă���B}
%%%%%%%%%%%%%%%%%%%%
\kyakuchumark{A1}���͂̊ւ͌×��L���ł���B
�������O��\Kanakt{����}{�݂��̂�}�Ƃ��āA
�l�X�̗�����������Ă�ꏊ�ł������B
�����m��\kyakuchumark{A2}�u���̍ד��v
�̔���(����)�̊ւ̏��ɂ́A���̖̉���ǂݍ���
\kyakuchumark{A3}�É̂̈�߂����肰�Ȃ����p����Ă���B

\vspace{.5\baselineskip}
�݂��̂��ɂ̔��͊ւ������肯���
\hfill \kyakuchumark{A4}������
\kyakuchutext{A4}{������̂��˂���B\rensuji{?}�`���Z�B
�����O���̉̐l�B�O�\�Z�̐�̈�l�B�]�܈ʉ��x�͎�B
�ƏW�Ɂu�����W�v������B}
\begin{verse}
\kyakuchumark{A5}%
����肠��΂����œs�ւ����ނ��ӂ����̊ւ͂����ʂ�
\end{verse}
\kyakuchutext{A5}{�u�E��W�v�ʁE�O�O��}

\vspace{.5\baselineskip}
�����ɏC�s���Ă܂��肯��ɁA���͂̊ւɂƂ܂�āA
�Ƃ��낪��ɂ�A��������������낭���͂�ɂāA
�\�����u�H���������v�Ɛ\�����ސ܁A���Ȃ肯��
�Ǝv�Џo�ł��āA�]�g�������ڂ�����΁A
�։��̒��ɏ���������
\hfill\kyakuchumark{A6}���s�@�t
\kyakuchutext{A6}{�������傤�ق����B���ꔪ�`����Z�B
�������㖖���̉̐l�B}
\begin{verse}
\kyakuchumark{A7}%
���͂̊։������̉k�邩��ɐl�̐S���Ƃނ�Ȃ肯��
\end{verse}
\kyakuchutext{A7}{�u�R�ƏW�v�B
%�u�V�E��W�v㲗��B
�����ł́A�u���s����v�K�����j�S�󒍁A
�u�k�Њw�p����(��㔪��)�����p�B}%

\vspace{.5\baselineskip}
�݂��̂��ɂɂ܂��肾�肯��ɁA�����̊ւɂĂ�ݎ��肯��
\hfill\kyakuchumark{A8}�\���@�t
\kyakuchutext{A8}{�̂�����ق����B�㔪���`\rensuji{?}�B
�������㒆���̉̐l�B�O�\�Z�̐�̈�l�B}
\begin{verse}
\kyakuchumark{A9}%
�{�����Ή��ƂƂ��ɗ��������ǏH�����ӂ������̊�
\end{verse}
\kyakuchutext{A9}{�u��E��W�v㲗��E�܈ꔪ�ԁB}

\mbox{}\hfill ����ِe�@
\begin{verse}
\kyakuchumark{B1}%
���݂��΂̊F�g�ɂ��肵���Ζ��݂̂Ȃ肯�蔒��̊�
\end{verse}
\kyakuchutext{B1}{�u��ڏW�v�H�̉��E�O�Z�l}

\vspace{.5\baselineskip}
\kyakuchutext{C4}{�u���̘a�̏W�v�H�E��O�Z�ԁB}%
�F���O������b�A���͂ɂČ��s�q�Ƃ��ӎ�����߂�
\hfill �x�͉E��b
\begin{verse}
\kyakuchumark{C4}%
�ւ����l�ɖ�΂�݂��̂��̂������̂܂�ݍg�t���ɂ���
\end{verse}

\mbox{}\hfill\kyakuchumark{B2}������
%%%%%%%%%%%%%%
\kyakuchutext{B2}{�݂Ȃ��Ƃ̂��܂��B
���Z�l��ꔪ�Z�B�]�O�ʗ����B
�������㖖���̕����E�̐l�B
�ی��E�����̗��Ɍ����������B
�̂��A�Ȑm�������Ă�
���ƒǓ�����Ă����s�ꂽ�B
�ƏW�Ɂu���]�O�ʗ������W�v������B}
\kyakuchutext{B3}{�u��ڏW�v�H�̉��E�O�Z��}
%%%%%%%%%%%
\begin{verse}
\kyakuchumark{B3}%
�s�ɂ͂܂��t�ɂČ������ǂ��g�t�U�肵������̊�
\end{verse}

\vspace{.5\baselineskip}
����@���H�a�ɂ��킵�܂����鎞�A���̂��ǂ��̍������肯��ɁA\\
�K�Ԃ���߂� \hfill �����G�ʒ��b
\begin{verse}
\kyakuchumark{C1}%
\kyakuchutext{C1}{�u��ڏW�v�ĉ́E��l��}%
���ĉ߂���l���Ȃ���ΉK�Ԃ̂�����_�˂┒��̊�
\end{verse}

\vspace{.5\baselineskip}
㲒��Ε�Ƃ��ւ�S����߂� \hfill �m�s��
\begin{verse}
\kyakuchumark{C2}%
\kyakuchutext{C2}{�u��ڏW�v㲗��́E�܎l�O}%
���H���N�����ɂ�Ȃ�ʂ�ސ�ӂ�ɂ��锒��̊�
\end{verse}

\mbox{} \hfill ��v�䑾����b�ʌ�
\begin{verse}
\kyakuchumark{C3}%
\kyakuchutext{C3}{�u�v�؏W�v���\��}%
���͂̊ւ̏H�Ƃ͕��������Ǐ���킭��R�ׂ̂̓�
\end{verse}

\vspace{.5\baselineskip}
�m�Ԃ́A���͂̊ւ�K�˂����A���̖̉���O�ɂ��āA
�s�v�c�Ȃ��Ƃɔo����c���Ă��Ȃ��B
��q�̑]�ǂ̋���u���̍ד��v�ɏ������߂Ă���B

\vspace{.5\baselineskip}
\begin{verse}
�K�̉Ԃ��������Ɋւ̐�������
\end{verse}
\end{document}
