\documentclass{minimal}
\usepackage{xepersian}
\settextfont{XB Zar}
\setlatintextfont{Linux Libertine}
\setdigitfont{XB Zar}
\newenvironment{numbered}{\begingroup\parskip0pt \count255=0
 \everypar={\advance \count255 by 1 \hbox to 2.5em{(\the\count255)\hfil}}}{ \endgroup}
\newenvironment{unnumbered}{\begingroup \everypar={\hbox to 2.5em{\hfil}}}{ \endgroup}
\begin{document}
\begin{unnumbered}
این خط اول است که شماره ندارد.\par
این خط دوم است که شماره ندارد.\par
این خط سوم است که شماره ندارد\par
\begin{numbered}
این خط چهارم است که شماره دارد\par
\end{numbered}
این خط پنجم است که شماره ندارد\par
\end{unnumbered}
\bigskip
این هم سرانجام متن معمولی است که اینجا می‌نویسیم.
\end{document}