تغییر فونت خروجی در حروف چینی کد با بسته listings

Question

کدهای متلب در خود این نرم افزار، به طور پیشفرض با فونت Courier New ظاهر می شوند. هنگام درج کد متلب با استفاده از بسته listings چگونه می توان در خروجی لاتک نیز کدها را با فونت Courier New ظاهر کرد؟ همانطور که در اینجا مشخص است، خروجی فونت Courier New نیست.
در ضمن فواصل مربع شکلی هم به جای space در برخی از جاهای خروجی دیده میشود!

‎\documentclass[a4paper,11pt]{book}‎
‎\usepackage{listings}
‎‎\usepackage[Kashida]{xepersian}‎‏
‎\settextfont{HM XYas}‎
‎\setlatintextfont{PGaramond}‎
‎\setdigitfont{HM ‎XYas‎}

‎\begin{document}‎‎
‎‏این یک کد آزمایشی است:
‎‎\begin{latin}‎‎‎
\begin{lstlisting}[language=Matlab, basicstyle=\footnotesize\ttfamily]
if nargin<1,
    [fileName,pathName]=uigetfile('*.fis','Read FIS');
    if isequal(fileName,0) || isequal(pathName,0)
        % If fileName is zero, "cancel" was hit, or there was an error.
        errorStr='No file was loaded';
        if nargout<2,
            error(errorStr);
        end
        return
    end
\end{lstlisting}
\end{latin}
خروجی فوق را مشاهده می‌کنید.
‎\end{document}‎

Answer 1

اول با دستور \deflatinfont فونت موردنظر رو با یه اسم دلخواه تعریف کنید. بعدش در گزینه basicstyle ازش استفاده کنید:

\documentclass[a4paper,11pt]{book}
\usepackage{listings}
\usepackage[Kashida]{xepersian}
\settextfont{Yas}
\setlatintextfont{PGaramond}
\setdigitfont{Yas}
\deflatinfont\mycofont{Courier New}

\begin{document}
این یک کد آزمایشی است:
\begin{latin}
\begin{lstlisting}[language=Matlab, basicstyle=\footnotesize\ttfamily\mycofont]
if nargin<1,
    [fileName,pathName]=uigetfile('*.fis','Read FIS');
    if isequal(fileName,0) || isequal(pathName,0)
        % If fileName is zero, "cancel" was hit, or there was an error.
        errorStr='No file was loaded';
        if nargout<2,
            error(errorStr);
        end
        return
    end
\end{lstlisting}
\end{latin}
خروجی فوق را مشاهده می‌کنید.
\end{document}

برای سوال دوم یک پرسش جدید ایجاد کنید تا جواب بدم.