Re: 機種依存文字を印刷したい

名前: lee
日時: 2003-08-07 20:50:33
IPアドレス: 211.10.60.*

>>20759
お試し板のエディターでPS-Fileに落すと、
/Ryumin-Light-90ms-RKSJ-H や /GothicBBB-Medium-90ms-RKSJ-H が
使われますね。

> /Ryumin-Light-90ms-RKSJ-H　　にすれば出るらしいことが分かりました。

以下のコードで、本当に出力されるか確認してみて下さい。
----------
%!PS-Adobe-3.0
%%BoundingBox: 0 400 595 700
%%EndComment
/Ryumin-Light-90ms-RKSJ-H 10 selectfont
%/GothicBBB-Medium-90ms-RKSJ-H 10 selectfont
100 620 moveto (\212\333\225\266\216\232\202\314\203e\203X\203g)show
100 600 moveto (\207@\207A\207B\207C\207D\207E\207F\207G\207H\207I)show
100 580 moveto (\207J\207K\207L\207M\207N\207O\207P\207Q\207R\207S)show
100 560 moveto (\207T\207U\207V\207W\207X\207Y\207Z\207[\207\\\207])show
showpage
%%EOF
---------

＃ dvips の \special でこれらの文字に直接アクセスする
＃ マクロを書いてみました。お試し下さい。

\documentclass{jarticle}%　
%<*maru>: dvips限定
\makeatletter
\def\toOct#1#2{{%
  \xdef\@ostr{\expandafter\@gobble\string\\}%
  \@tempcnta=\number#2\relax
  \count@=64\relax
  \loop\ifnum\count@>0\relax
    \@tempcntb=\@tempcnta\divide\@tempcntb\count@
    \xdef\@ostr{\@ostr\number\@tempcntb}%
    \multiply\@tempcntb\count@\advance\@tempcnta-\@tempcntb
    \divide\count@8\relax
  \repeat}\edef#1{\@ostr}}
\def\maru#1{\edef\gt@family{gt}\@tempcnta=`?\relax
  \advance\@tempcnta\number#1\toOct\oct@lower\@tempcnta
  \leavevmode\hbox to1zw{\dimen@=1zw\special{"
    \ifx\k@family\gt@family
      /GothicBBB-Medium-90ms-RKSJ-H
    \else
      /Ryumin-Light-90ms-RKSJ-H 
    \fi
    \space\number\dimen@\space 65781 div selectfont
    0 0 moveto (\string\207\oct@lower)show}\hfil}}
\def\marucnt#1{\maru{\csname c@#1\endcsname}}% #1: latex-counter
\makeatother
%</maru>

\begin{document}
setbox1\hbox{\verb@{@}\def\lpar{\copy1\relax}
\setbox3\hbox{\verb@}@}\def\rpar{\copy3\relax}
\count255=0\loop\ifnum\count255<20\advance\count255by1
\maru{\count255}：{\tt\string\maru\lpar{\number\count255}\rpar}\par
\repeat
\verb@==============@
\renewcommand{\theenumi}{\marucnt{enumi}}
\renewcommand{\labelenumi}{\theenumi}%
\begin{enumerate}
\Large\gtfamily
\item あああああ
\item いいいいい
\item ううううう
\end{enumerate}
\end{document}

この書き込みへの返事：