Put colored text inside a lstlisting

Question

So I've been looking for a way to color text inside a lstlisting. There are already several questions answere. E.g. here: How can I highlight some lines from source code?

All solutions I've found have the same approach. Just use an escape character and colour the text. However, if I do this my font is not monospace anymore. Is there a way to fix this? Neither setting font to \ttfamily or using \verb/\texttt did work.

Here is an example of what's going wrong:

\documentclass{article}
\usepackage{listings,xcolor}

\begin{document}

\begin{lstlisting}[escapeinside={(*@}{@*)}, basicstyle=\tiny\ttfamily]
this is monospace
as you can see here
(*@\color{orange}not monospace anymore@*) 
\end{lstlisting}

\end{document}

Cheers
Pascal

Answer 1

You can get around the problem with \aftergroup.

\documentclass{article}
\usepackage{listings,xcolor}

\def\speciallstcolor{\begingroup\color{orange}}
\def\endspeciallstcolor{\endgroup}

\begin{document}

\begin{lstlisting}[escapeinside={(*@}{@*)}, basicstyle=\tiny\ttfamily]
this is monospace
as you can see here
(*@\aftergroup\speciallstcolor@*)not monospace anymore(*@\aftergroup\endspeciallstcolor@*)
(that was a lie)
\end{lstlisting}

\end{document}