\documentclass[openany, 12pt]{book} 
\usepackage{listings}
\usepackage{color}
\usepackage{xcolor}

\usepackage{xepersian}


\definecolor{backcolour}{rgb}{0.95,0.95,0.92}
 
\lstdefinestyle{mystyle}{
	backgroundcolor=\color{backcolour},
	basicstyle=\small\ttfamily,
	commentstyle=\footnotesize\ttfamily,
	stringstyle=\bfseries\ttfamily,
	captionpos=b,
	frame=trBL,
	showstringspaces=false
}
\setlatinmonofont[ExternalLocation,BoldFont={cmuntb},ItalicFont={cmunti},BoldItalicFont={cmuntx}]{cmuntt} 
\setlatinmonofont[ExternalLocation,BoldFont={pcrb8a},ItalicFont={pcri8a},BoldItalicFont={pcrbi8a}]{pcrr8a}
\def\lstlistingname{برنامه}
\lstset{style=mystyle}


\settextfont[Scale=1.2]{XB Yas}


\begin{document}


\begin{LTR}
\lstset{language=JAVA, inputencoding={utf8}}
\begin{lstlisting}[texcl]
// \rl{حرف آ و حرف م باعث فاصله بین خطوط میشه}
// \rl{ راهی هست که بدون تغییر سایز فونت ها و تغییر کامنت استایل این فاصله رو از بین برد }
some code...
// \rl{حرف آ و حرف م باعث فاصله بین خطوط میشه}
// \rl{ راهی هست که بدون تغییر سایز فونت ها و تغییر کامنت استایل این فاصله رو از بین برد }
some code...
\end{lstlisting}
\end{LTR}




\end{document}