diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/sttools/floatpag.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/sttools/floatpag.sty | 163 |
1 files changed, 84 insertions, 79 deletions
diff --git a/Master/texmf-dist/tex/latex/sttools/floatpag.sty b/Master/texmf-dist/tex/latex/sttools/floatpag.sty index 9dbc540c484..98b32de3206 100644 --- a/Master/texmf-dist/tex/latex/sttools/floatpag.sty +++ b/Master/texmf-dist/tex/latex/sttools/floatpag.sty @@ -1,56 +1,50 @@ -%% floatpag.sty -%% Copyright 1999 V. Statulevi\v cius +%% +%% This is file `floatpag.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% floatpag.dtx (with options: `package') +%% +%% Copyright (C) 1999-2012 by Vytas Statulevi\v{c}ius <vytas@vtex.lt> %% VTeX Ltd., Akademijos 4, Vilnius, Lithuania -%% e-mail vytas@vtex.lt %% http://www.vtex.lt/tex/download/macros/ +%% -------------------------------------------------------------------------- +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% The latest version of this license is in +%% http://www.latex-project.org/lppl.txt +%% and version 1.3 or later is part of all distributions of LaTeX +%% version 2005/12/01 or later. +%% +%% The macros, developed by Sigitas Tolu\v{s}is <sigitas@vtex.lt>, +%% were used in this package. %% -% This program can redistributed and/or modified under the terms -% of the LaTeX Project Public License Distributed from CTAN -% archives in directory macros/latex/base/lppl.txt; either -% version 1 of the License, or (at your option) any later version. -% -% PURPOSE: provides commands to apply different pagestyles -% to the full page floats. -% -% USAGE: -% \floatpagestyle{foo} will apply pagestyle 'foo' to all pages -% occupied by full page floats. -% -% \rotfloatpagestyle{foo} will apply pagestyle 'foo' to all pages -% occupied by sideways figures and tables -% produced with the help of 'rotating.sty' -% package (Sebastian Rahtz and Leonor Barroca) -% -% \thisfloatpagestyle{foo} will apply pagestyle 'foo' to a page where -% this command was used inside figure or table -% environment -% -% DEFAULT: -% \floatpagestyle{headings} -% \rotfloatpagestyle{plain} -% -% The macros, developed by Sigitas Tolusis <sigitas@vtex.lt>, -% were used in this package. -% -% The following commands from the LaTeX2e kernel were redefined: -% \@xfloat, \@vtryfc -% The following command from the rotating.sty was redefined: -% \@xrotfloat -% +%% The Current Maintainer of this work is Sigitas Tolu\v{s}is. +%% +%% PURPOSE: provides commands to apply different pagestyles +%% to the full page floats. +%% +\NeedsTeXFormat{LaTeX2e}[1999/12/01] +\ProvidesPackage{floatpag} + [2012/05/29 v1.1 Different pagestyles on float pages] \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{floatpag} [1999/04/29 FLOAT PAGESTYLE] \def\floatpagestyle#1{\gdef\at@float@page{\thispagestyle{#1}}} -\def\rotfloatpagestyle#1{\gdef\@r@f@pagestyle{#1}\gdef\at@rotfloat@page{\thispagestyle{#1}}} +\def\rotfloatpagestyle#1{% + \gdef\@r@f@pagestyle{#1}% + \gdef\at@rotfloat@page{\thispagestyle{#1}}% + } \floatpagestyle{headings} \rotfloatpagestyle{plain} -% \def\thisfloatpagestyle#1{% - \expandafter\expandafter\expandafter\gdef\expandafter - \csname\number\@currbox @float\endcsname{\thispagestyle{#1}}\relax} -% -% Perrabibreziame \x@float - paprasti float'ai + \expandafter\expandafter\expandafter\gdef\expandafter + \csname\number\@currbox @float\endcsname{\thispagestyle{#1}}\relax + } +%% Modify |\x@float| - ordinary floats \def\@xfloat #1[#2]{% \@nodocument \def \@captype {#1}% @@ -106,7 +100,7 @@ \advance \@tempcnta \@tempcntb \global \count\@currbox \@tempcnta \expandafter\expandafter\expandafter\gdef\expandafter - \csname\number\@currbox @float\endcsname{\at@float@page}\relax + \csname\number\@currbox @float\endcsname{\at@float@page}\relax }% \@fltovf \fi @@ -117,47 +111,55 @@ \hsize\columnwidth \@parboxrestore \@floatboxreset -}% -% -% 2e rotating.sty v. 2.10: + } +%% 2e rotating.sty v. 2.10: \def\e@xrotfloat#1[#2]{% \@float{#1}[#2]% \thisfloatpagestyle{\@r@f@pagestyle}% \begin{lrbox}\rot@float@box \begin{minipage}\textheight - } - -% 2.09 rotating.sty v. 1.6 -\def\n@xrotfloat#1[#2]{\ifhmode \@bsphack\@floatpenalty -\@Mii\else - \@floatpenalty-\@Miii\fi\def\@captype{#1}\ifinner - \@parmoderr\@floatpenalty\z@ - \else\@next\@currbox\@freelist{\@tempcnta\csname ftype@#1\endcsname - \multiply\@tempcnta\@xxxii\advance\@tempcnta\sixt@@n - \@tfor \@tempa :=#2\do - {\if\@tempa h\advance\@tempcnta \@ne\fi - \if\@tempa t\advance\@tempcnta \tw@\fi - \if\@tempa b\advance\@tempcnta 4\relax\fi - \if\@tempa p\advance\@tempcnta 8\relax\fi - }\global\count\@currbox\@tempcnta}\@fltovf\fi - \expandafter\expandafter\expandafter\gdef\expandafter\csname\number\@currbox - @float\endcsname{\at@rotfloat@page}\relax - \global\setbox\@currbox\vbox\bgroup - \hsize\textheight \@parboxrestore -}% -% -% Tikrinam, kokia rotating versija: 2e ar 209: -% 1999.02.08 Tikriname dokumento pradzioje, t.y. neaisku -% kada rotating stilius buvo pakrautas: + } +%% 2.09 rotating.sty v. 1.6 +\def\n@xrotfloat#1[#2]{% + \ifhmode + \@bsphack + \@floatpenalty -\@Mii + \else + \@floatpenalty-\@Miii + \fi + \def\@captype{#1}% + \ifinner + \@parmoderr\@floatpenalty\z@ + \else + \@next\@currbox\@freelist{\@tempcnta\csname ftype@#1\endcsname + \multiply\@tempcnta\@xxxii\advance\@tempcnta\sixt@@n + \@tfor \@tempa :=#2\do{% + \if\@tempa h\advance\@tempcnta \@ne\fi + \if\@tempa t\advance\@tempcnta \tw@\fi + \if\@tempa b\advance\@tempcnta 4\relax\fi + \if\@tempa p\advance\@tempcnta 8\relax\fi + }% + \global\count\@currbox\@tempcnta + }% + \@fltovf + \fi + \expandafter\expandafter\expandafter\gdef\expandafter + \csname\number\@currbox @float\endcsname{\at@rotfloat@page}\relax + \global\setbox\@currbox\vbox\bgroup + \hsize\textheight + \@parboxrestore + } +%% Check for |rotating| version: 2e ar 209: +%% 1999.02.08 To be sure check at begin document. \AtBeginDocument{% \@ifpackageloaded{rotating}% {\let\@xrotfloat\e@xrotfloat\let\n@xrotfloat\relax}% {\let\@xrotfloat\n@xrotfloat\let\e@xrotfloat\relax}}% -% -%% "Kablys" output proceduroje ivykdantis komanda -\def\spec@float #1{\expandafter\csname\number#1@float\endcsname - \expandafter\expandafter\expandafter\gdef\expandafter\csname\number#1@float\endcsname{}} - -\def\@vtryfc #1{% +%% "Hook" in the output procedure. +\def\spec@float#1{\expandafter\csname\number#1@float\endcsname + \expandafter\expandafter\expandafter\gdef\expandafter\csname\number#1@float\endcsname{}% + } +\def\@vtryfc#1{% \global\setbox\@outputbox\vbox{}% \let\@elt\@wtryfc \@flsucceed @@ -167,9 +169,12 @@ \vskip \@fptop \vskip -\@fpsep \unvbox \@outputbox - \vskip \@fpbot}% + \vskip \@fpbot + }% \let\@elt\relax - \xdef #1{\@failedlist\@flfail}% - \xdef\@freelist{\@freelist\@flsucceed}} - + \xdef#1{\@failedlist\@flfail}% + \xdef\@freelist{\@freelist\@flsucceed}% + } \endinput +%% +%% End of file `floatpag.sty'. |