% ^^A -*- japanese-latex -*-
% \CheckSum{167}
% \iffalse
%
%   okuverb.dtx
%   verb/verbatim $B4X78%^%/%m(B ($B<Q$F$b>F$$$F$b$+$^$$$^$;$s(B)
%   okumura@matsusaka-u.ac.jp
%   http://www.matsusaka-u.ac.jp/~okumura/
%
%  [2002-12-19] $B$$$m$$$m$J$b$N$K<}O?$7$F$$$?$@$/:]$K%i%$%;%s%9$rL@3N$K$9$k(B
%  $BI,MW$,@8$8$F$-$^$7$?!#%"%9%-!<$N$b$N$,:G6a$O(Bmodified BSD$B%i%$%;%s%9$K$J$C(B
%  $B$F$$$^$9$N$G!$;d$N$b$N$b$=$l$K=`$8$F(Bmodified BSD$B$H$9$k$3$H$K$7$^$9!#(B
%
%<okuverb>\NeedsTeXFormat{pLaTeX2e}
%<okuverb>\ProvidesFile{okuverb.sty}[2003/09/03 okumura]
%<*driver>
\documentclass{jsarticle}
\usepackage{doc}
\usepackage{okumacro}
\usepackage{okuverb}
\addtolength{\textwidth}{-1in}
\addtolength{\evensidemargin}{1in}
\addtolength{\oddsidemargin}{1in}
\addtolength{\marginparwidth}{1in}
\setlength\marginparsep{5pt}
\setlength\marginparpush{0pt}
% \OnlyDescription
\DisableCrossrefs
\setcounter{StandardModuleDepth}{1}
\GetFileInfo{okuverb.sty}
\begin{document}
  \DocInput{okuverb.dtx}
\end{document}
%</driver>
%
% \fi
%
% \title{\pLaTeXe $BMQ(B \texttt{verb...} $B4X78%^%/%m(B}
% \author{$B1|B<@2I'(B}
% \date{\filedate}
% \maketitle
%
% \StopEventually{}
%
% \MakeShortVerb{\|}
%
% $B$^$:%*%W%7%g%s$N@k8@$G$9!#(B
% \begin{macro}{\if@yen}
% |\verb|$B!$(B|verbatim| $BEy$G(B |\| $B$r1_0u$K$9$k$+$I$&$+$N%9%$%C%A$G$9!#(B
% $B$3$l$O%G%U%)!<%k%H$G56$G$9$,!$(B|yen| $B%*%W%7%g%s$G??$K$J$j$^$9!#(B
%    \begin{macrocode}
%<*okuverb>
\newif\if@yen \@yenfalse
\DeclareOption{yen}{\@yentrue}
\ProcessOptions\relax
%    \end{macrocode}
% \end{macro}
%
% |\verb|, |verbatim| $B$NJQ99$G$9!#(B
% |ltmiscen.dtx| $B$r$4;2>H$/$@$5$$!#(B
%
% \begin{macro}{\yen}
% \begin{macro}{\ttyen}
%
% $B1_5-9f$NDj5A$G$9!#(B
%
%    \begin{macrocode}
\DeclareRobustCommand{\yen}{{\ooalign{Y\crcr\hss=\hss}}}
\def\y@n{Y\llap=}
\def\ttyen{{\ttfamily\y@n}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\ttbslash}
%
% $B%?%$%W%i%$%?%U%)%s%H$N%P%C%/%9%i%C%7%e$G$9!#(B
%
%    \begin{macrocode}
\def\ttbslash{{\ttfamily\char`\\}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\BS}
%
% $B%?%$%W%i%$%?%U%)%s%H$N1_5-9f$+%P%C%/%9%i%C%7%e$N$I$A$i$+$K$J$j$^$9!#(B
%
%    \begin{macrocode}
\if@yen
  \let\BS=\ttyen
\else
  \let\BS=\ttbslash
\fi
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\verbh@@k}
%
% |\verb|$B!$(B|verbatim| $BEy$G;H$&%U%C%/$G$9!#(B
%
%    \begin{macrocode}
\if@yen
  \begingroup
    \catcode`\|=0  \catcode`\\=13
    |gdef|verbh@@k{|catcode`|\=13 |let\=|y@n}
  |endgroup
\else
  \let\verbh@@k=\relax
\fi
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\verbatim@font}
%
% $B$3$l$O(B |latex.ltx| $B$K(B |\normalfont\ttfamily|
% $B$HDj5A$5$l$F$$$^$9$,!$(B|\bfseries\verb...| $B$H$$$C$?;H$$J}$b$7$?$$$N$G!$(B
% |\normalfont| $B$O:o=|$7$F$7$^$$$^$7$?!#(B
%
%    \begin{macrocode}
\def\verbatim@font{\ttfamily}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\verb}
%
% $B85$O?t<0%b!<%I$@$1$G(B |\hbox| $B$KF~$l$k$h$&$K$J$C$F$$$^$7$?$,!$(B
% |\noautoxspacing| $B$N8z2L$rF@$k$?$a!$(B|\hbox| $B$KF~$l$k$h$&$K$7$^$7$?!#(B
%
%    \begin{macrocode}
\def\verb{%
  \leavevmode\hbox % $BJQ99(B
  \bgroup
    \verb@eol@error \let\do\@makeother \dospecials
    \verbatim@font\@noligs
    \noautoxspacing % $BDI2C(B
    \verbh@@k % $BDI2C(B
    \@ifstar\@sverb\@verb}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@xverbatim}
% \begin{macro}{\@sxverbatim}
%
% |\| $B$N(B |\catcode| $B$r(B12$B$+$i(B13$B$KJQ$($^$7$?!#(B
%
%    \begin{macrocode}
\if@yen
\begingroup \catcode `|=0 \catcode `[= 1
\catcode`]=2 \catcode `\{=12 \catcode `\}=12
\catcode`\\=13 |gdef|@xverbatim#1\end{verbatim}[#1|end[verbatim]]
|gdef|@sxverbatim#1\end{verbatim*}[#1|end[verbatim*]]
|endgroup
\fi
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\verbatimleftmargin}
%
% |verbatim| $B4D6-$NM>J,$J:8%^!<%8%s$G$9!#(B
%
%    \begin{macrocode}
\newdimen\verbatimleftmargin
\verbatimleftmargin=2zw
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\verbatimsize}
%
% |verbatim| $B4D6-$N%U%)%s%H%5%$%:$G$9!#(B
%
%    \begin{macrocode}
% \def\verbatimsize{\small\narrowbaselines}
\def\verbatimsize{\fontsize{9}{11pt}\selectfont}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@verbatim}
%
% |verbatim| $B4D6-$G;H$&%U%)%s%H$N9TAw$j$H%5%$%:!J(B|\f@size|$B!K$,(B
% $BK\J8$H0c$&$H!$A08e$N4V3V$,0c$C$F$7$^$$$^$9!#$=$l$rJd@5$7$^$9!#(B
%
%    \begin{macrocode}
\def\@verbatim{%
  \trivlist \item\relax
  \if@minipage
%   $BDI2C$O$8$a(B
    \verbatimsize
%   $BDI2C$*$o$j(B
  \else
%   $BDI2C$O$8$a(B
    \vskip\baselineskip
    \vskip-\f@size pt
    \verbatimsize
    \vskip-\baselineskip
    \vskip\f@size pt
%   $BDI2C$*$o$j(B
    \vskip\parskip
  \fi
  \leftskip\@totalleftmargin
% $BDI2C$O$8$a(B
  \if@minipage \else
    \advance \leftskip \verbatimleftmargin
  \fi
% $BDI2C$*$o$j(B
  \rightskip\z@skip
  \parindent\z@
  \parfillskip\@flushglue
  \parskip\z@skip
  \@@par
  \@tempswafalse
  \def\par{%
    \if@tempswa
      \leavevmode \null \@@par\penalty\interlinepenalty
    \else
      \@tempswatrue
      \ifhmode\@@par\penalty\interlinepenalty\fi
    \fi}%
  \let\do\@makeother \dospecials
  \obeylines \verbatim@font
% $BDI2C$O$8$a(B
  \noautoxspacing \verbh@@k
% $BDI2C$*$o$j(B
  \@noligs
  \hyphenchar\font\m@ne
  \everypar \expandafter{\the\everypar \unpenalty}%
}
%    \end{macrocode}
% \end{macro}
%
% $B0J>e$G=*$o$j$G$9!#(B
%
%    \begin{macrocode}
%</okuverb>
\endinput
%    \end{macrocode}
%
%% \CharacterTable
%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%%   Digits        \0\1\2\3\4\5\6\7\8\9
%%   Exclamation   \!     Double quote  \"     Hash (number) \#
%%   Dollar        \$     Percent       \%     Ampersand     \&
%%   Acute accent  \'     Left paren    \(     Right paren   \)
%%   Asterisk      \*     Plus          \+     Comma         \,
%%   Minus         \-     Point         \.     Solidus       \/
%%   Colon         \:     Semicolon     \;     Less than     \<
%%   Equals        \=     Greater than  \>     Question mark \?
%%   Commercial at \@     Left bracket  \[     Backslash     \\
%%   Right bracket \]     Circumflex    \^     Underscore    \_
%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%%   Right brace   \}     Tilde         \~}
%%
% \Finale
