%% $Id: pascap.sty,v 1.1 2005/09/18 19:08:22 kosir Exp $
%% $Source: /home/cvs/cvs/www.pingo.org/knjiga/tex-public-0/pascap.sty,v $
%%
%% Prirejen sidecap.sty za plovke založbe Pasadena.
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{pascap}
         [2000/09/09 v1.0 PasCap Package (RM)]

\typeout{Package: PasCap v1.0 <2000/09/09> (RM)}

\RequirePackage{ifthen}

% Slika 1-1 namesto Slika 1.1.
\renewcommand \thefigure
     {\ifnum \c@chapter>\z@ \thechapter-\fi \@arabic\c@figure}
\renewcommand \thetable
     {\ifnum \c@chapter>\z@ \thechapter-\fi \@arabic\c@table}

\renewcommand{\@makecaption}[2]{% #1 je npr "Slika 1.1", #2 je besedilo
{~\hfill{\sffamily\fontseries{bc}\large\selectfont #1}}:\par\small #2}


\newlength{\SC@BOXWD} \newlength{\SC@CAPWD}
\newcounter{SC@C}
\newsavebox{\SC@BOX}
\newcommand\SC@FLOAT[3]{{#2}\hspace{\columnsep}{#3}}
\newcommand\SC@LABEL{SC@LABEL:\number\value{SC@C}}

\ExecuteOptions{outercaption} \ProcessOptions

\newenvironment{SCfigure}{\SC@float[t]{figure}}{\endSC@float}
\newenvironment{SCfigure*}{\SC@dblfloat[t]{figure}}{\endSC@dblfloat}

\newenvironment{SCtable}{\SC@float[t]{table}}{\endSC@float}
\newenvironment{SCtable*}{\SC@dblfloat[t]{table}}{\endSC@dblfloat}

\def\SC@float{\@ifnextchar[\SC@xfloat{\SC@xfloat[c]}}
\def\SC@xfloat[#1]#2{\@ifnextchar[%
  {\SC@yfloat{#1}{#2}}%
  {\SC@zfloat{#1}{#2}{1.0}[\@nameuse{fps@#2}]}}
\def\SC@yfloat#1#2[#3]{\@ifnextchar[%
  {\SC@zfloat{#1}{#2}{#3}}%
  {\SC@zfloat{#1}{#2}{#3}[\@nameuse{fps@#2}]}}
\def\SC@zfloat#1#2#3[#4]{%
  \def\SC@pos{#1}%
  \expandafter\edef\csname fps@#2\endcsname{#4}%
  \def\SC@captype{#2}%
  \ifx#3\@empty\def\SC@fraction{1}\else\def\SC@fraction{#3}\fi%
  \let\SC@caption\caption \let\SC@label\label%
  \let\SC@CAPtext\@empty \let\SC@OPTCAPtext\@empty \let\SC@LABtext\@empty%
  \renewcommand\caption[2][]{\gdef\SC@OPTCAPtext{##1}\gdef\SC@CAPtext{\raggedleft ##2}}%
  \renewcommand\label[1]{\gdef\SC@LABtext{##1}}%
  \@namedef{fnum@#2}{\mbox{\@nameuse{#2name}~\@nameuse{the#2}}}%
  \begin{lrbox}{\SC@BOX}%
}%

\def\endSC@float{%
  \end{lrbox}%
    \def\@FLOAT{\@float}\def\end@FLOAT{\end@float}\endSC@FLOAT{\columnwidth}}%
\def\endSC@FLOAT#1{%
  \settowidth\SC@BOXWD{\usebox\SC@BOX}%
  \setlength\SC@CAPWD{\SC@fraction\SC@BOXWD}%
  \setlength\@tempdima{\SC@BOXWD}%
  \addtolength\@tempdima{\SC@CAPWD}%
  \addtolength\@tempdima{\columnsep}%
  \ifthenelse{\lengthtest{\@tempdima>#1}}%
    {\addtolength\SC@CAPWD{-\@tempdima}%
     \addtolength\SC@CAPWD{#1}}{}%

  \@FLOAT{\SC@captype}%
   \addtolength{\leftmargin}{-5cm}
    \abovecaptionskip\z@skip
    \belowcaptionskip\z@skip
    \stepcounter{SC@C}\SC@label{\SC@LABEL}%
     \hspace*{-1cm}%
     \begin{minipage}[b]{#1}%
      \centering%
      \SC@FLOAT{\SC@LABEL}%
        {\begin{minipage}[\SC@pos]{0.25\textwidth}%
           \ifthenelse{\equal{\SC@OPTCAPtext}{\@empty}}%
             {\SC@caption{\expandafter\protect\SC@CAPtext}}%
             {\SC@caption[\expandafter\protect\SC@OPTCAPtext]%
                            {\expandafter\protect\SC@CAPtext}}%
           \unskip%
           \ifthenelse{\equal{\SC@LABtext}{\@empty}}%
             {}{\SC@label{\expandafter\protect\SC@LABtext}}%
         \end{minipage}}%
        {\begin{minipage}[\SC@pos]{0.70\textwidth}%
           \offinterlineskip%
           \kern0pt\relax
           \usebox{\SC@BOX}%
         \end{minipage}}%
    \end{minipage}%
  \end@FLOAT%
}
\endinput
%%
%% End of file `pascap.sty'.

%% $Log: pascap.sty,v $
%% Revision 1.1  2005/09/18 19:08:22  kosir
%% Dodana knjiga: Namestimo Linux
%%
%% Revision 1.1  2000/09/22 20:51:27  ales
%% Datoteko pascap.sty sem prenesel iz imenika knjiga/tex. Vzdrzujmo to razlicico.
%% Datoteko namestimo-linux.tex sem malo otrebil. (Ales)
%%
%% Revision 1.10  2000/09/18 21:06:39  peterlin
%% (pp) Labele pri slikah vseeno za stopnjo manjše.
%%
%% Revision 1.9  2000/09/18 17:13:20  peterlin
%% (pp) Labela pri sliki Nimbus Sans Bold Condensed \Large, besedilo
%% podpisa k sliki \small.
%%
%% Revision 1.8  2000/09/18 17:01:59  roman
%% "Slika 1-1" polkrepko
%%
%% Revision 1.7  2000/09/18 11:06:48  roman
%% "Slika 1-1" namesto "Slika 1.1".
%%
%% Revision 1.6  2000/09/17 21:49:30  roman
%% Oznaka slike napisana v posebni vrstici in drugi pisavi.
%%
%%