Quellcode darstellen

[STaRDoGGCHaMP]

Hallo,

Ist villeicht diesmal etwas viel verlangt, aber weiß jemand zufällig, wie ich eine derartige Formatierung (oder zumindest etwas ähnliches :D) in LaTeX hinkriege?http://img194.imageshack.us/img194/3518/klopapierq.png

[v_neises]

Dazu kannst du z.B. das Paket "listings" verwenden.

[STaRDoGGCHaMP]

Hallo v_neises,

Vielen Dank für deine Antwort, ich werd mir das Paket mal anschauen. Bin auf meiner Suche gerade noch auf die Verbatim Umgebung gestoßen. Sieht bis auf einen anderen Font auch sehr schön aus und die Einzüge werden 1 zu 1 übernommen.

[EDIT]
Will mir villeicht jemand sagen um was für einen Schriftfamilie es sich bei meinem Beispiel handelt, sodass ich das bei listings einstellen kann? :D

Mit freundlichen Grüßen,

STaRDoGGCHaMP

[Sepp99]

Hier ein MB:


\documentclass{scrartcl}
\usepackage[ansinew]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[ngerman]{babel}
\usepackage{xcolor}
\usepackage{lmodern}
\usepackage{listings}
\lstset{%
%language=Pascal,% So kann die Sprache eingestellt werden
basicstyle=\ttfamily\small, % Hier die Schrift
}

\usepackage{blindtext}

\begin{document}

\blindtext

\begin{lstlisting}
for i:=maxint to 0 do
begin
{ do nothing }
end;
Write(Case insensitive );
WritE(Pascal keywords);
\end{lstlisting}

\blindtext

\end{document}


Für weitere Informationen siehe Paket-Doku
ftp://dante.ctan.org/tex-archive/macros/latex/contrib/listings/listings.pdf

Gruß, Sepp.-

[STaRDoGGCHaMP]

Hallo Sepp,
Vielen Dank für die Antwort. Allerdings ist mir schon klar, wie ich die Schrift in der listings umgebung variieren kann. Ich krieg es nur nicht hin die Schrift, welche ich im ersten Post als Beispiel angegeben hab, darzustellen. Ich hab schon so ziemlich jede Schriftfamilie durchprobiert und dein Minimalbeispiel ist ja der ganz normale \tt font, den beispielsweise auch die Verbatim Umgebung benutzt.

Also weiß jemand um was für eine Schrift es sich bei meinem Beispiel handelt? Ich vermute ja sowas wie Lucida Typewriter (ich glaub dann hab ich ein kleines Problem :D)

Mit freundlichen Grüßen,

STaRDoGGCHaMP

[voss]

Also weiß jemand um was für eine Schrift es sich bei meinem Beispiel handelt? Ich vermute ja sowas wie Lucida Typewriter (ich glaub dann hab ich ein kleines Problem :D)


wieso hast du bei der Lucida ein Problem? Aber nebenbei, sie ist es nicht.
Sieht eher wie
\usepackage[scaled]{beramono} aus

Herbert

[STaRDoGGCHaMP]

Hallo Herbert,

Danke für die schnelle Antwort. Hab deinen vorgeschlagenen Font gerade mal ausprobiert und muss sagen, dass da doch noch ein relativ großer Unterschied zu meinem Beispiel ist. Meine Lucida-Vermutung wird übrigens auch vom PDF Reader gestützt :D
http://img155.imageshack.us/img155/4425/lucida.png
Stellt sich nur noch die Frage, wie ich Lucida verwenden kann.

Viele Grüße,

STaRDoGGCHaMP

[Sepp99]

Schau doch einmal die Typewriter-Schriften unter
http://www.tug.dk/FontCatalogue/
an. Vielleicht findest Du da das Richtige.

Sepp.-

[STaRDoGGCHaMP]

Heißt das jetz Lucida ist gestorben, da nicht frei erwerbbar für LaTex?

[voss]

Heißt das jetz Lucida ist gestorben, da nicht frei erwerbbar für LaTex?

die Lucida gibt es umsonst mit jedem alten StarOffice, nur der Matheteil ist kommerziell. Angehängt dein Beispiel mit der Lucida

Herbert

[Sepp99]

Also mit der BERA-Schrift komm ich auch dahin:


\listfiles
\documentclass{scrartcl}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[ngerman]{babel}

\usepackage[scaled]{beramono}
%\usepackage{textcomp}
%\usepackage{lucidabr}

\usepackage{listings}
\lstset{%
%language=Pascal,% So kann die Sprache eingestellt werden
basicstyle=\tt, % Hier die Schrift
}

\usepackage{blindtext}

\begin{document}
%$\Rightarrow$
\blindtext

\begin{lstlisting}
fun union' nil ys = ys
| union' xs nil xs
| union' (x::xr) (y::yr) =
case compareTree(x,y) of LESS -> x::union' xr (y::yr)
| EQUAL -> x:: union' xr yr
| GREATER -> y::union' (x::xr) yr
fun union (T ts) (T ts') = T(union' ts ts')
\end{lstlisting}

\blindtext

\end{document}


@Herbert
Das Beispiel ist übrigens von mir, da wieder einmal kein MB gemacht wurde. Mit der LUCIDA hab ich allerdings auch Probleme.

Gruß, Sepp.-

[STaRDoGGCHaMP]

Hallo erneut,

Zum fehlenden MB: Als ich den Thread erstellt habe, hatte ich keine Ahnung von der listings Umgebung oder auch nur annährend eine Idee, wie ich das Gesuchte darstellen sollte.

Ich werd dann mal versuchen irgendwie die Lucida Fonts zu installieren. Wünscht mir Glück :D

Viele Grüße,

STaRDoGGCHaMP

[STaRDoGGCHaMP]

Mein Gott war das umständlich, aber hat funktioniert.
\documentclass{scrartcl}

\usepackage{ucs}
\usepackage[ngerman]{babel}
\usepackage[utf8x]{inputenc}
\usepackage[T1]{fontenc}
\usepackage{lucidabr}
\usepackage{listings}

\lstset{basicstyle=\ttfamily}

\begin{document}
\begin{lstlisting}
fun union' nil ys = ys
| union' xs nil = xs
| union' (x::xr)(y::yr) =
case compareTree(x,y) of LESS => x::union' xr (y::yr)
| EQUAL => x::union' xr yr
| GREATER => y::union' (x::xr) yr
fun union (T ts)(T ts') = T(union' ts ts')
\end{lstlisting}
\end{document}
(Im Anhang kompiliert)

Ist meiner Meinung nach 1 zu 1 das Gesuchte. Vielen Dank Herbert und Sepp für die Hilfe.

Viele Grüße,

STaRDoGGCHaMP