LaTeX Forum

    \documentclass{book}
    \usepackage{listings}

    \lstnewenvironment{code}[1]
      {%
        \lstset{
          float,caption=#1,
          basicstyle=\ttfamily,
          numbers=left,
          numberstyle=\footnotesize
        }%
      }
      {}

    \begin{document}

    \lstlistoflistings

    \begin{code}{Caption}
     Some Code
    \end{code}

    \begin{code}{Some Other Caption}
     more code
     on two lines
    \end{code}

    \end{document}

\documentclass{book}
\usepackage{listings}
\lstset{captionpos=b}
\renewcommand*\lstlistlistingname{Codelist}
\renewcommand*\lstlistingname{Code}
\begin{document}
\chapter{foo}
\begin{lstlisting}[caption=Caption]
Some Code
\end{lstlisting}
\lstlistoflistings
\end{document}

    \documentclass{book}
    \usepackage{xparse,tocloft,listings}


    \newcommand{\codelist}{Codelist}
    \newlistof{code}{cod}{\codelist}
    \NewDocumentEnvironment{code}{m}
    {
            \begin{lstlisting}
            \refstepcounter{code}
            \addcontentsline{cod}{code}
            {\protect\numberline{\thechapter.\thecode}#1}\par
    }
    {\caption{#1}\end{lstlisting}}

    \begin{document}
    \begin{code}{Caption}
    Some Code
    \end{code}
    \listofcode

    \end{document}