دستورات زیر را :
\makeatletter
\def\@harfi#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 م\or ن\or ه\or و\or ی\else\@ctrerr\fi}
\makeatother
قبل از
\begin{document}