%jur-schm.sty - Style-Datei f"ur juristische Schemata - Peter Felix Schuster
\ProvidesPackage{jur-schm}[2006/03/03 v0.05 Paket f"ur juristische Schemata]

%Vorbereitungen f"ur die schema-Umgebung (nach Kofler, Linux)
\RequirePackage{color}%[dvips,dvipsnames,monochrome]
\RequirePackage{colordvi}

\RequirePackage{jur-aufz}

\definecolor{g1}{gray}{0.92}%Helles Grau
\definecolor{g2}{gray}{0.25}%Dunkleres Grau (alt: 0.5)
\definecolor{b1}{rgb}{0.75,0.75,1}%Helles Blau
\definecolor{b2}{rgb}{0.1,0.1,0.25}%Dunkleres Blau (alt: 0.5)

\newcommand{\@schemaname}{Schema}
\newcommand{\schemaname}[1]{\renewcommand{\@schemaname}{#1}}

\newcounter{schema}%Z"ahler schema (f"ur Schema-Nummer)
\setcounter{schema}{0}%Anfangs auf 0 setzen
\newcommand{\newschema}{\refstepcounter{schema}}%Makro, das den Z"ahler erh"oht
\renewcommand{\theschema}{\roman{schema}}%In gr. Gro"sbuchstaben nummerieren.
\renewcommand{\p@schema}{\@schemaname\,}%Was soll vor \theschema bei Verweisen ausgegeben werden

\fboxsep1.36mm% Freiraum zwischen Schemabox und Text
\newsavebox{\schemabox}
%Grau unterlegter Kasten f"ur Pr"ufungsschemata. 
%Aufruf: \begin{schema}[<titel>] <text> \end{schema}
\newenvironment{schema}[1][\@schemaname]%\ausgschema\ 
{\noindent\newschema\oberebene{\@schemaname\,\theschema,\,}%Schon hier muss der Z"ahler erh"oht werden, sonst klappt das mit \ref nicht
\begin{lrbox}{\schemabox}%
\begin{minipage}{0.97\linewidth}%
\noindent\fcolorbox{b2}{b2}{\parbox{0.97\linewidth}{\textbf{\textcolor{white}{\sffamily\theschema. #1}}}}%
\noindent{}}%bis hierhin Anfangsbefehl f"ur Umgebung
{\end{minipage}%ab hier Endbefehle f"ur Umgebung
\end{lrbox}%
{\fcolorbox{b1}{b1}{\parbox{0.97\linewidth}{\usebox{\schemabox}\hfill\hbox{}}}%
}\vskip 1mm}

%\definecolor{g1}{gray}{0.92}%Helles Grau
%\definecolor{g2}{gray}{0.5}%Dunkleres Grau
%\newcommand{\ueberschrift}[1]{\noindent\colorbox{g2}{\parbox[t]{0.97\linewidth}{#1\hfill}}}
%\newenvironment{schema}[1][Pr"ufungsschema]%
%{\vspace{0.1ex}\noindent \begin{lrbox}\begin{minipage}{0.97\linewidth}}%
%{\end{minipage}\end{lrbox}}

\endinput