\newif\ifdr \drtrue %%% %%% アイウエオカウンタ %%% \makeatletter \def\@kkana#1{% \ifcase#1\or ア\or イ\or ウ\or エ\or オ\or カ\or キ\or ク\or ケ\or コ\or サ\or シ\or ス\or セ\or ソ\or タ\or チ\or ツ\or テ\or ト\or ナ\or ニ\or ヌ\or ネ\or …