\documentclass{book}
\usepackage{geometry}
%\usepackage[textheight=21cm,left=7cm, right=1.5cm,headheight=7mm,
%headsep=7mm,footskip=1cm,marginparsep=5mm,marginparwidth=5cm,
%]{geometry}


%\usepackage[]{geometry}
\geometry{textheight=21cm,left=7cm, right=1.5cm,headheight=7mm,headsep=7mm,footskip=1cm,marginparsep=5mm,
marginparwidth=5cm,includehead=true}

\input{cmdtop}


\settextfont[Scale=1.2]{XB Niloofar}
\defpersianfont\zar[Scale=.7]{XB Niloofar}
\setdigitfont[Scale=1.1]{XB Zar}
\setlatintextfont{Junicode}
\defpersianfont\nastaliq[Scale=1.2]{IranNastaliq}

%

\begin{document}
  قضیه زیر با متن  شروع  شده است
\bte
 متن 
\be 
\item 
مثال 
\item 
\ee 
\ete
 قضیه زیر بدون متن   شروع شده است
\bte
\be 
\item 
مثال 
\item 
\ee 
\ete
\end{document}