From 9df8e72263907fe42ce8d203e82a6e251da3252c Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 15 Jan 2007 01:16:15 +0000 Subject: pst-blur update git-svn-id: svn://tug.org/texlive/trunk@3494 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/generic/pst-blur/Changes | 5 + Master/texmf-dist/doc/generic/pst-blur/README | 2 +- .../texmf-dist/doc/generic/pst-blur/pst-blur.pdf | Bin 98001 -> 98264 bytes Master/texmf-dist/dvips/pst-blur/pst-blur.pro | 11 + Master/texmf-dist/source/generic/pst-blur/Makefile | 46 ++ .../source/generic/pst-blur/pst-blur.dtx | 487 ++++++++++++++++++++ .../source/generic/pst-blur/pst-blur.ins | 25 ++ .../texmf-dist/source/latex/pst-blur/pst-blur.dtx | 497 --------------------- .../texmf-dist/source/latex/pst-blur/pst-blur.ins | 25 -- .../texmf-dist/tex/generic/pst-blur/pst-blur.tex | 11 + Master/texmf-dist/tex/latex/pst-blur/pst-blur.sty | 11 + Master/texmf-dist/tpm/pst-blur.tpm | 13 +- Master/texmf/lists/pst-blur | 5 +- 13 files changed, 607 insertions(+), 531 deletions(-) create mode 100644 Master/texmf-dist/source/generic/pst-blur/Makefile create mode 100644 Master/texmf-dist/source/generic/pst-blur/pst-blur.dtx create mode 100644 Master/texmf-dist/source/generic/pst-blur/pst-blur.ins delete mode 100644 Master/texmf-dist/source/latex/pst-blur/pst-blur.dtx delete mode 100644 Master/texmf-dist/source/latex/pst-blur/pst-blur.ins diff --git a/Master/texmf-dist/doc/generic/pst-blur/Changes b/Master/texmf-dist/doc/generic/pst-blur/Changes index 691c22c29d5..92f1e1e601a 100644 --- a/Master/texmf-dist/doc/generic/pst-blur/Changes +++ b/Master/texmf-dist/doc/generic/pst-blur/Changes @@ -4,3 +4,8 @@ pst-blur.pro -------- pst-blur.tex -------- 2.00 2005-09-08 - switch to pst-xkey (hv) - new pst-blur.sty (hv) + + +pst-blur.dtx -------- +2007-01-12 - small changes to the documentation (hv) + - new email of Martin (hv) \ No newline at end of file diff --git a/Master/texmf-dist/doc/generic/pst-blur/README b/Master/texmf-dist/doc/generic/pst-blur/README index 87f8c206438..ae97e1d3bd4 100644 --- a/Master/texmf-dist/doc/generic/pst-blur/README +++ b/Master/texmf-dist/doc/generic/pst-blur/README @@ -15,4 +15,4 @@ directories * Run "latex" on pst-blur.dtx to generate the documentation -- -For Martin Giese and Herbert Voss (updated September 08, 2005) +For Martin Giese and Herbert Voss (updated September 09, 2005) diff --git a/Master/texmf-dist/doc/generic/pst-blur/pst-blur.pdf b/Master/texmf-dist/doc/generic/pst-blur/pst-blur.pdf index d94d6d18e37..6f425558591 100644 Binary files a/Master/texmf-dist/doc/generic/pst-blur/pst-blur.pdf and b/Master/texmf-dist/doc/generic/pst-blur/pst-blur.pdf differ diff --git a/Master/texmf-dist/dvips/pst-blur/pst-blur.pro b/Master/texmf-dist/dvips/pst-blur/pst-blur.pro index f480366f328..0aaa4e3f2ea 100644 --- a/Master/texmf-dist/dvips/pst-blur/pst-blur.pro +++ b/Master/texmf-dist/dvips/pst-blur/pst-blur.pro @@ -20,6 +20,17 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +%% $Id: pst-blur.dtx,v 2.0 2005/09/08 09:48:33 giese Exp $ +%% +%% Copyright 1998-2007 Martin Giese, mgiese@risc.uni-linz.ac.at +%% Herbert Voss, voss@pstricks.de +%% +%% This file is under the LaTeX Project Public License +%% See CTAN archives in directory macros/latex/base/lppl.txt. +%% +%% DESCRIPTION: +%% `pst-blur' is a PSTricks package for blurred shadows +%% /tx@PstBlurDict 60 dict def tx@PstBlurDict begin /Iterate { diff --git a/Master/texmf-dist/source/generic/pst-blur/Makefile b/Master/texmf-dist/source/generic/pst-blur/Makefile new file mode 100644 index 00000000000..9a5fb256b1d --- /dev/null +++ b/Master/texmf-dist/source/generic/pst-blur/Makefile @@ -0,0 +1,46 @@ + +# `Makefile' for `pst-fill.pdf', RN, 2005/10/07 + +.SUFFIXES : .tex .ltx .dvi .ps .pdf .eps + +PACKAGE = pst-blur + +LATEX = latex + +ARCHNAME = $(PACKAGE)-$(shell date +%y%m%d) + +ARCHFILES = $(PACKAGE).dtx $(PACKAGE).ins Makefile + +all : sty doc +sty : + tex $(PACKAGE).ins + +doc : $(PACKAGE).pdf + +$(PACKAGE).pdf : $(PACKAGE).ps + GS_OPTIONS=-dAutoRotatePages=/None ps2pdf $< + +$(PACKAGE).ps : $(PACKAGE).dvi + dvips $< + +$(PACKAGE).dvi : $(PACKAGE).dtx + $(LATEX) $< + if ! test -f $(basename $<).glo ; then touch $(basename $<).glo; fi + if ! test -f $(basename $<).idx ; then touch $(basename $<).idx; fi + makeindex -s gglo.ist -t $(basename $<).glg -o $(basename $<).gls \ + $(basename $<).glo + makeindex -s gind.ist -t $(basename $<).ilg -o $(basename $<).ind \ + $(basename $<).idx + $(LATEX) $< + +clean : + $(RM) $(addprefix $(PACKAGE), .log .aux .glg .glo .gls .ilg .idx .ind) + $(RM) $(addprefix $(PACKAGE), .dvi .ps) + +veryclean : clean + $(RM) $(PACKAGE).pdf + +arch : + zip $(ARCHNAME).zip $(ARCHFILES) + +# EOF diff --git a/Master/texmf-dist/source/generic/pst-blur/pst-blur.dtx b/Master/texmf-dist/source/generic/pst-blur/pst-blur.dtx new file mode 100644 index 00000000000..427b2b8e25e --- /dev/null +++ b/Master/texmf-dist/source/generic/pst-blur/pst-blur.dtx @@ -0,0 +1,487 @@ +%\iffalse -*-mode:Latex;tex-command:"latex *;dvips -D600 pst-blur -o"-*- \fi +%\iffalse +%% $Id: pst-blur.dtx,v 2.0 2005/09/08 09:48:33 giese Exp $ +%% +%% Copyright 1998-2007 Martin Giese, mgiese@risc.uni-linz.ac.at +%% Herbert Voss, voss@pstricks.de +%% +%% This file is under the LaTeX Project Public License +%% See CTAN archives in directory macros/latex/base/lppl.txt. +%% +%% DESCRIPTION: +%% `pst-blur' is a PSTricks package for blurred shadows +%% +% +%\fi +%\iffalse +%<*driver> +\NeedsTeXFormat{LaTeX2e} +\documentclass{ltxdoc} +\usepackage{pst-node} +\usepackage{pst-text} +\usepackage{pst-blur} +\usepackage{url} +\AtBeginDocument{ +% \OnlyDescription % comment out for implementation details + \EnableCrossrefs + \RecordChanges + \CodelineIndex} +\AtEndDocument{ + \PrintChanges + \PrintIndex} +\hbadness=7000 % Over and under full box warnings +\hfuzz=3pt +\MakeShortVerb{\|} +\newcommand\file[1]{\texttt{#1}} +\begin{document} +\DocInput{pst-blur.dtx} +\end{document} +% +%\fi +% +% \CharacterTable +% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +% Digits \0\1\2\3\4\5\6\7\8\9 +% Exclamation \! Double quote \" Hash (number) \# +% Dollar \$ Percent \% Ampersand \& +% Acute accent \' Left paren \( Right paren \) +% Asterisk \* Plus \+ Comma \, +% Minus \- Point \. Solidus \/ +% Colon \: Semicolon \; Less than \< +% Equals \= Greater than \> Question mark \? +% Commercial at \@ Left bracket \[ Backslash \\ +% Right bracket \] Circumflex \^ Underscore \_ +% Grave accent \` Left brace \{ Vertical bar \| +% Right brace \} Tilde \~} +% \CheckSum{152} +% +% +% \changes{v2.00}{2005/09/08}{% +% using the extended pst-xkey instead of the old pst-key package; +% creating a dtx file; +% new \LaTeX\ wrapper file (hv)} +% \changes{v1.80}{2001/02/16}{First public release. (mg)} +% +% \DoNotIndex{\!,\",\#,\$,\%,\&,\',\(,\+,\*,\,,\-,\.,\/,\:,\;,\<,\=,\>,\?} +% \DoNotIndex{\@,\@B,\@K,\@cTq,\@f,\@fPl,\@ifnextchar,\@nameuse,\@oVk} +% \DoNotIndex{\[,\\,\],\^,\_,\ } +% \DoNotIndex{\^,\\^,\\\^,$\^$,$\\^$,$\\^$} +% \DoNotIndex{\0,\2,\4,\5,\6,\7,\8,} +% \DoNotIndex{\A,\a} +% \DoNotIndex{\B,\b,\Bc,\begin,\Bq,\Bqc} +% \DoNotIndex{\C,\c,\catcode,\cJA,\CodelineIndex,\csname} +% \DoNotIndex{\D,\def,\define@key,\Df,\divide,\DocInput,\documentclass,\pst@addfams} +% \DoNotIndex{\eCN,\edef,\else,\eHd,\eMcj,\EnableCrossrefs,\end,\endcsname} +% \DoNotIndex{\endCenterExample,\endExample,\endinput,\endpsclip} +% \DoNotIndex{\PrintIndex,\PrintChanges,\ProvidesFile} +% \DoNotIndex{\endpspicture,\endSideBySideExample,\Example} +% \DoNotIndex{\F,\f,\FdUrr,\fi,\filedate,\fileversion,\FV@Environment} +% \DoNotIndex{\FV@UseKeyValues,\FV@XRightMargin,\FVB@Example,\fvset} +% \DoNotIndex{\G,\g,\GetFileInfo,\gr,\GradientLoaded,\gsFKrbK@o,\gsj,\gsOX} +% \DoNotIndex{\hbadness,\hfuzz,\HLEmphasize,\HLMacro,\HLMacro@i} +% \DoNotIndex{\HLReverse,\HLReverse@i,\hqcu,\HqY} +% \DoNotIndex{\I,\i,\ifx,\input,\Ir,\IU} +% \DoNotIndex{\j,\jl,\JT,\JVodH} +% \DoNotIndex{\K,\k,\kfSlL} +% \DoNotIndex{\L,\let} +% \DoNotIndex{\message,\mHNa,\mIU} +% \DoNotIndex{\N,\nB,\newcmykcolor,\newdimen,\newif,\nW} +% \DoNotIndex{\O,\oCDJDo,\ocQhVI,\OnlyDescription,\oRKJ} +% \DoNotIndex{\P,\p,\ProvidesPackage,\psframe,\pslinewidth,\psset} +% \DoNotIndex{\PstAtCode,\PSTricksLoaded} +% \DoNotIndex{\q,\Qr,\qssRXq,\qu,\qXjFQp,\qYL} +% \DoNotIndex{\R,\r,\RecordChanges,\relax,\RlaYI,\rN,\Rp,\rp,\RPDXNn,\rput} +% \DoNotIndex{\S,\scalebox,\SgY,\SideBySide@Example,\SideBySideExample} +% \DoNotIndex{\SgY,\sk,\Sp,\space,\sZb} +% \DoNotIndex{\T,\the,\tw@} +% \DoNotIndex{\u,\UiSWGEf@,\uJi,\usepackage,\uVQdMM,\UYj} +% \DoNotIndex{\VerbatimEnvironment,\VerbatimInput,\VrC@} +% \DoNotIndex{\WhZ,\WjKCYb,\WNs} +% \DoNotIndex{\XkN,\XW} +% \DoNotIndex{\Z,\ZCM,\Ze} +% \DoNotIndex{\addtocounter,\advance,\alph,\arabic,\AtBeginDocument,\AtEndDocument} +% \DoNotIndex{\AtEndOfPackage,\begingroup,\bfseries,\bgroup,\box,\csname} +% \DoNotIndex{\else,\endcsname,\endgroup,\endinput,\expandafter,\fi} +% \DoNotIndex{\TeX,\z@,\p@,\@one,\xdef,\thr@@,\string,\sixt@@n,\reset,\or,\multiply,\repeat,\RequirePackage} +% \DoNotIndex{\@cclvi,\@ne,\@ehpa,\@nil,\copy,\dp,\global,\hbox,\hss,\ht,\ifodd,\ifdim,\ifcase,\kern} +% \DoNotIndex{\chardef,\loop,\leavevmode,\ifnum,\lower,\next,\wd,\setbox} +% \setcounter{IndexColumns}{2} +% +% \title{\textsf{pst-blur} package \\ version \fileversion} +% \author{Martin Giese\thanks{\protect\url{Martin.Giese@oeaw.ac.at}}} +% \date{\filedate} +% \maketitle +% +%\section{Introduction} +% The ability to paint shadows on arbitrary shapes is a standard +% feature of PSTricks. However, these shadows are always `hard':\\ +%{\psset{unit=0.6cm,linewidth=0.5pt} +% \begin{pspicture}(-5,0)(10,4) +% \psset{shadow=true,shadowcolor=gray,shadowsize=0.15cm} +% \psframe(1,1)(3,3) +% \pscircle(6,2){1} +% \rput(9,2){\pscharpath{\fontfamily{ptm}\fontsize{40}{40}\selectfont A}} +% \end{pspicture} +%}\\ +% The |pst-blur| package provides blurred shadows +% for closed shapes drawn with PSTricks:\\ +%{\psset{unit=0.6cm,linewidth=0.5pt,blur=true,blurradius=0.07cm} +% \begin{pspicture}(-5,0)(10,4) +% \psset{shadow=true,shadowcolor=gray,shadowsize=0.15cm} +% \psframe(1,1)(3,3) +% \pscircle(6,2){1} +% \rput(9,2){\pscharpath{\fontfamily{ptm}\fontsize{40}{40}\selectfont A}} +% \end{pspicture} +%}\\ +% It also provides a new +% box command |\psblurbox|, which is similar to |\psshadowbox|, +% but gives the box a blurred shadow. +% \medskip +% +%The new graphics parameters and macros provided by the package +% are described in +%section 2 of this document. Section 3, if present, documents the +%implementation consisting of a generic \TeX\ file and a PostScript +%header for the |dvi|-to-PostScript converter. You can get section 3 +%by calling \LaTeX\ as follows on most relevant systems: +%\begin{verbatim} +%latex '\AtBeginDocument{\AlsoImplementation}\input{pst-blur.dtx}' +%\end{verbatim} +% +%\section{Package Usage} +% To use |pst-blur|, you have to say +% \begin{verbatim} +% \usepackage{pst-blur} +% \end{verbatim} +% in the document prologue for \LaTeX, and +% \begin{verbatim} +% \input pst-blur.tex +% \end{verbatim} +% in ``plain'' \TeX. +% +% \DescribeMacro{blur} +% To paint shapes with blurred shadows, +% set the graphics parameters |shadow| and |blur| to |true|, eg +% \pscircle[shadow=true,blur=true](8,-0.5){0.5} +% \begin{verbatim} +% \psset{unit=1cm} +% \pscircle[shadow=true,blur=true](0,0){0.5} +% \end{verbatim} +% \psset{unit=1cm} +% for a circle with a blurred shadow. +% The parameter |blur| has no influence if |shadow| is |false|. +% \medskip +% +% \DescribeMacro{shadowsize} +% \DescribeMacro{shadowangle} +% \DescribeMacro{blurradius} +% The rendering of blurred shadows is controlled by a number of +% additional graphics parameters. The offset of the shadow is controlled +% by the parameters |shadowsize| and |shadowangle|, which are the same +% as for ordinary shadows.\footnote{In particular, |shadowangle| has +% to be negative for the usual placement of shadows below and to the +% right of shapes.} The size of the blurring effect is +% controlled by the parameter |blurradius|, see Fig~\ref{fig:params}. +% The default value for |blurradius| is 1.5pt, which fits nicely with +% the default |shadowsize| of 3pt. +% \medskip +% +% \begin{figure}\caption{Parameters for blurred shadows} +% \label{fig:params} +% \vskip1cm +% \qquad\qquad\begin{pspicture*}(0,0)(10,6) +% \psframe[linewidth=4pt,fillcolor=lightgray,fillstyle=crosshatch, +% shadow=true,blur=true,shadowsize=2cm,shadowangle=-35, +% blurradius=1cm,shadowcolor=lightgray](-5,3)(5,10) +% \pnode(5,3){A} +% \pnode(5.3,2.9){A1} +% \pnode(6.64,1.85){B} +% \pnode(7.51,2.35){C} +% \pscircle(6.64,1.85){1} +% \ncline{|-|}{A}{B} +% \bput(0.2){|shadowsize|} +% \ncline{->}{B}{C} +% \bput(1.5){|blurradius|} +% \psline(5,3)(6,3) +% \psarcn{->}(5,3){0.5}{0}{-35} +% \rput(7,3.7){\rnode{D}{$-|shadowangle|$}} +% \nccurve[linewidth=0.5pt,angleA=-90,angleB=70]{->}{D}{A1} +% \rput[l](6,5.6){|shadowcolor|} +% \rput[l](8,5){|blurbg|} +% {\psset{linestyle=dotted} +% \psline(0,0.85)(6.64,0.85) +% \psline(7.64,1.85)(7.64,6) +% \psset{linestyle=dashed} +% \psline(0,2.85)(5.64,2.85) +% \psline(5.64,2.85)(5.64,6)} +% {\psset{linewidth=0.5pt} +% \psline{*-}(5.64,5.3)(6,5.4) +% \psline{*-}(7.64,4.75)(8,4.85) +% \ncline{F}{F1} +% } +% \end{pspicture*} +% \end{figure} +% +% \DescribeMacro{shadowcolor} +% \DescribeMacro{blurbg} +% The inner, usually darkest part of the shadow is painted in the +% colour defined by |shadowcolor|. In the range defined by |blurradius|, +% the colour gradually fades to the background colour set by |blurbg|. +% The default value for |blurbg| is white. You should change this parameter +% when you want to paint shapes over a coloured background, ie\\ +% \begin{minipage}{\textwidth} +% \begin{verbatim} +% \psframe[fillstyle=solid,fillcolor=yellow](-.7,-.7)(.7,.7) +% \pscircle[shadow=true,blur=true,blurbg=yellow](0,0){0.4} +% \end{verbatim} +% \rput(11.7,1.4){ +% \psframe[fillstyle=solid,fillcolor=yellow](-.7,-.7)(.7,.7) +% \pscircle[shadow=true,blur=true,blurbg=yellow](0,0){0.4}} +% \end{minipage} +% +% \DescribeMacro{blursteps} +% The number of distinct colour steps painted between |shadowcolor| +% and |blurbg| is controlled by the parameter |blursteps|. The default +% value for |blursteps| is 20, which is usually more than sufficient. +% Note, that higher values for |blursteps| result in proportionally slower +% rendering. This can be very tiresome with complex shapes. +% \medskip +% +% \DescribeMacro{\psblurbox} +% Using a +% \psframebox[shadow=true,blur=true,blurradius=2.5pt,shadowcolor=gray]% +% {|\ttfamily\symbol{92}psframebox|} +% with a blurred +% shadow in the middle of some text produces poor results, because \TeX\ +% does not know about the extra space taken by the shadow. For normal +% shadows, this problem is solved by the |\psshadowbox| macro, which +% adds the extra space around the box for the shadow. For blurred shadows, +% this is not sufficient: an extra |\blurradius| has to be added. This +% is done by the macro \psblurbox{\ttfamily\symbol{92}psblurbox}, which is otherwise +% identical to |\psshadowbox|. Note, that |\psblurbox| shares a +% deficiency of |\psshadowbox|: It only works correctly +% with $|shadowangle|=-45$, because \TeX\ does not provide trigonometric +% operations. +% +% \StopEventually{} +% +% \section{The Code} +% +% \subsection{The \file{pst-blur.sty} file} +% The \file{pst-blur.sty} file is very simple. It just loads +% the generic \file{pst-blur.tex} file. +% \begin{macrocode} +%<*stylefile> +\RequirePackage{pstricks} +\ProvidesPackage{pst-blur}[2005/09/08 package wrapper for + pst-blur.tex (hv)] +\input{pst-blur.tex} +\ProvidesFile{pst-blur.tex} + [\filedate\space v\fileversion\space `PST-blur' (hv)] +% +% \end{macrocode} +% +% \subsection{The \file{pst-blur.tex} file} +% \file{pst-blur.tex} contains the \TeX-side of things. We begin +% by identifying ourselves and setting things up, the same as in +% other PSTricks packages. +% \begin{macrocode} +%<*texfile> +\csname PstBlurLoaded\endcsname +\let\PstBlurLoaded\endinput +\ifx\PSTricksLoaded\endinput\else + \def\next{\input pstricks.tex }\expandafter\next +\fi +% \end{macrocode} +% \verb+pst-blur+ uses the extended version of the keyvalue interface. +% \begin{macrocode} +\ifx\PSTXKeyLoaded\endinput\else\input pst-xkey \fi +% \end{macrocode} +%% +% \begin{macrocode} +\def\fileversion{2.0} +\def\filedate{2005/09/08} +\message{ v\fileversion, \filedate} +\edef\TheAtCode{\the\catcode`\@} +\catcode`\@=11 +% \end{macrocode} +% Add the package name to the list of family names of the keyvalue list. +% \begin{macrocode} +\pst@addfams{pst-blur} +\pstheader{pst-blur.pro} +% \end{macrocode} +% +% \subsubsection{New graphics parameters} +% \begin{macro}{blur} +% \begin{macro}{blurradius} +% \begin{macro}{blursteps} +% \begin{macro}{blurbg} +% The definitions of the new graphics parameters follow the definitions +% for parameters of the same types found in |pstricks.tex|. +% \begin{macrocode} +\newif\ifpsblur +\define@key[psset]{pst-blur}{blur}[true]{\@nameuse{psblur#1}\pst@setrepeatarrowsflag} +\psset{blur=false} +%% +\define@key[psset]{pst-blur}{blurradius}{\pst@getlength{#1}\psx@blurradius} +\psset{blurradius=1.5pt} +%% +\define@key[psset]{pst-blur}{blursteps}{\pst@getint{#1}\psx@blursteps} +\psset{blursteps=20} +%% +\define@key[psset]{pst-blur}{blurbg}{\pst@getcolor{#1}\psx@blurbg} +\psset{blurbg=white} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% \subsection{Hooking into the PSTricks shadow macros} +% \begin{macro}{\pst@closedshadow} +% The macro |\pst@closedshadow| is usually called internally by +% PSTricks to paint a shadow in the shape of the current path. +% This macro has been renamed |\pst@sharpclosedshadow|. The +% new |\pst@closedshadow| jumps to either of |\pst@sharpclosedshadow| +% or |\pst@blurclosedshadow|, depending on |\ifpsblur|, which is +% directly related to the graphics parameter |blur|. +% \begin{macrocode} +\def\pst@closedshadow{% +\ifpsblur\pst@blurclosedshadow\else\pst@sharpclosedshadow\fi +} +\def\pst@sharpclosedshadow{% + \addto@pscode{% + gsave + \psk@shadowsize \psk@shadowangle \tx@PtoC + \tx@Shadow + \pst@usecolor\psshadowcolor + gsave fill grestore + stroke + grestore + gsave + \pst@usecolor\psfillcolor + gsave fill grestore + stroke + grestore}} +% \end{macrocode} +% \end{macro} +% \begin{macro}{\pst@blurclosedshadow} +% The PostScript code for blurred shadows is produced by the following +% macro. It pushes the diverse parameters (|\tx@PtoC| does polar to +% cartesian coordinate transformation for the shadow offset) and calls +% |BlurShadow|. Afterwards, it fills and strokes the current path, +% same as the original |\pst@closedshadow|. +% \begin{macrocode} +\def\pst@blurclosedshadow{% + \addto@pscode{% + gsave + gsave \pst@usecolor\psshadowcolor currentrgbcolor grestore + gsave \pst@usecolor\psx@blurbg currentrgbcolor grestore + \psx@blurradius\space + \psx@blursteps\space + \psk@shadowsize \psk@shadowangle \tx@PtoC + tx@PstBlurDict begin BlurShadow end + grestore + gsave + \pst@usecolor\psfillcolor + gsave fill grestore + stroke + grestore}} +% \end{macrocode} +% \end{macro} +% \begin{macro}{\pst@blurclosedshadow} +% This one looks very impressing. In fact, it is a verbatim copy +% of |\psshadowbox|, with only the line +% |\advance\pst@dimh\psx@blurradius\p@| added! +% \begin{macrocode} +\def\psblurbox{% +\def\pst@par{}\pst@object{psblurbox}} +\def\psblurbox@i{\pst@makebox\psblurbox@ii} +\def\psblurbox@ii{% + \begingroup + \pst@useboxpar + \psblurtrue + \psshadowtrue + \psboxseptrue + \setbox\pst@hbox=\hbox{\psframebox@ii}% + \pst@dimh=\psk@shadowsize\p@ + \pst@dimh=.7071\pst@dimh + \advance\pst@dimh\psx@blurradius\p@ + \pst@dimg=\dp\pst@hbox + \advance\pst@dimg\pst@dimh + \dp\pst@hbox=\pst@dimg + \pst@dimg=\wd\pst@hbox + \advance\pst@dimg\pst@dimh + \wd\pst@hbox=\pst@dimg + \leavevmode + \box\pst@hbox +\endgroup} +%% +\catcode`\@=\TheAtCode\relax +% +% \end{macrocode} +% \end{macro} +% +% \subsection{The \file{pst-blur.pro} file} +% The file \file{pst-blur.pro} contains PostScript definitions +% to be included in the PostScript output by the +% |dvi|-to-PostScript converter, eg |dvips|. +% This is all rather similar to +% \file{pst-slpe.pro}, and I just don't feel like explaining it, +% so you'll have to work through it yourself, if you want to +% know what happens. The trick is basically to draw the outline +% repeatedly with varying line widths. The procedure |Shadow| +% called in |BlurShadow| is defined in \file{pstricks.pro} and +% translates the current path based on an $x$- and $y$-displacement +% taken from the stack. +% \begin{macrocode} +%<*prolog> +/tx@PstBlurDict 60 dict def +tx@PstBlurDict begin +/Iterate { + /SegLines ED + /ThisB ED /ThisG ED /ThisR ED + /NextB ED /NextG ED /NextR ED + /W 2.0 BlurRadius mul def + /WDec W SegLines div def + /RInc NextR ThisR sub SegLines div def + /GInc NextG ThisG sub SegLines div def + /BInc NextB ThisB sub SegLines div def + /R ThisR def + /G ThisG def + /B ThisB def + SegLines { + R G B + sqrt 3 1 roll sqrt 3 1 roll sqrt 3 1 roll + setrgbcolor + gsave W setlinewidth + stroke grestore + /W W WDec sub def + /R R RInc add def + /G G GInc add def + /B B BInc add def + } bind repeat +} def +/BlurShadow { + Shadow + /BlurSteps ED + /BlurRadius ED + dup mul /BEnd ED dup mul /GEnd ED dup mul /REnd ED + dup mul /BBeg ED dup mul /GBeg ED dup mul /RBeg ED + RBeg REnd add 0.5 mul /RMid ED + GBeg GEnd add 0.5 mul /GMid ED + BBeg BEnd add 0.5 mul /BMid ED + /OuterSteps BlurSteps 2 div cvi def + /InnerSteps BlurSteps OuterSteps sub def + 1 setlinejoin + RMid GMid BMid REnd GEnd BEnd OuterSteps Iterate + gsave RBeg sqrt GBeg sqrt BBeg sqrt setrgbcolor fill grestore + clip + 0 setlinejoin + RMid GMid BMid RBeg GBeg BBeg InnerSteps Iterate +} def +end +% +% \end{macrocode} +% \Finale +% diff --git a/Master/texmf-dist/source/generic/pst-blur/pst-blur.ins b/Master/texmf-dist/source/generic/pst-blur/pst-blur.ins new file mode 100644 index 00000000000..6f8935d1c1a --- /dev/null +++ b/Master/texmf-dist/source/generic/pst-blur/pst-blur.ins @@ -0,0 +1,25 @@ +\def\batchfile{pst-blur.ins} + +\input docstrip.tex + +\keepsilent + +\askforoverwritefalse + +\generate{\file{pst-blur.sty}{\from{pst-blur.dtx}{stylefile}}% + \file{pst-blur.tex}{\from{pst-blur.dtx}{texfile}}% + \usepostamble\empty% + \file{pst-blur.pro}{\from{pst-blur.dtx}{prolog}}% +} + +\Msg{************************************************************} +\Msg{ } +\Msg{ To finish the installation you have to move the files} +\Msg{ `pst-blur.sty' and `pst-blur.tex' into a directory} +\Msg{ searched by TeX and the file `pst-blur.pro'} +\Msg{ to a directory searched by dvips.} +\Msg{ } +\Msg{ To type-set the documentation, including instructions,} +\Msg{ run the file `pst-blur.dtx' through LaTeX.} +\Msg{ } +\Msg{***********************************************************} diff --git a/Master/texmf-dist/source/latex/pst-blur/pst-blur.dtx b/Master/texmf-dist/source/latex/pst-blur/pst-blur.dtx deleted file mode 100644 index c2722d598b9..00000000000 --- a/Master/texmf-dist/source/latex/pst-blur/pst-blur.dtx +++ /dev/null @@ -1,497 +0,0 @@ -%\iffalse -*-mode:Latex;tex-command:"latex *;dvips -D600 pst-blur -o"-*- \fi -%\iffalse -% $Id: pst-blur.dtx,v 2.0 2005/09/08 09:48:33 giese Exp $ -% -% Copyright 1998 Martin Giese, giese@ira.uka.de -% 2005 Herbert Voss, voss@pstricks.de -% -% This file is distributed in the hope that it will be useful, -% but WITHOUT ANY WARRANTY; without even the implied warranty of -% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. -% -% IMPORTANT COPYRIGHT NOTICE: -% -% Permission is granted to copy this file to another file with a clearly -% different name and to customize the declarations in that copy to serve -% the needs of your installation, provided that you comply with -% the conditions in the file legal.txt from the LaTeX2e distribution. -% -% However, NO PERMISSION is granted to produce or to distribute a -% modified version of this file under its original name. -% -% You are NOT ALLOWED to change this file. -% -%\fi -%\iffalse -%<*driver> -\NeedsTeXFormat{LaTeX2e} -\documentclass{ltxdoc} -\usepackage{pst-char} -\usepackage{pst-node} -\usepackage{url} -\usepackage{pst-blur} -\AtBeginDocument{ -% \OnlyDescription % comment out for implementation details - \EnableCrossrefs - \RecordChanges - \CodelineIndex} -\AtEndDocument{ - \PrintChanges - \PrintIndex} -\hbadness=7000 % Over and under full box warnings -\hfuzz=3pt -\MakeShortVerb{\|} -\newcommand\file[1]{\texttt{#1}} -\begin{document} -\DocInput{pst-blur.dtx} -\end{document} -% -%\fi -% -% \CharacterTable -% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z -% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z -% Digits \0\1\2\3\4\5\6\7\8\9 -% Exclamation \! Double quote \" Hash (number) \# -% Dollar \$ Percent \% Ampersand \& -% Acute accent \' Left paren \( Right paren \) -% Asterisk \* Plus \+ Comma \, -% Minus \- Point \. Solidus \/ -% Colon \: Semicolon \; Less than \< -% Equals \= Greater than \> Question mark \? -% Commercial at \@ Left bracket \[ Backslash \\ -% Right bracket \] Circumflex \^ Underscore \_ -% Grave accent \` Left brace \{ Vertical bar \| -% Right brace \} Tilde \~} -% \CheckSum{152} -% -% -% \changes{v2.00}{2005/09/08}{% -% using the extended pst-xkey instead of the old pst-key package; -% creating a dtx file; -% new \LaTeX\ wrapper file (hv)} -% \changes{v1.80}{2001/02/16}{First public release. (mg)} -% -% \DoNotIndex{\!,\",\#,\$,\%,\&,\',\(,\+,\*,\,,\-,\.,\/,\:,\;,\<,\=,\>,\?} -% \DoNotIndex{\@,\@B,\@K,\@cTq,\@f,\@fPl,\@ifnextchar,\@nameuse,\@oVk} -% \DoNotIndex{\[,\\,\],\^,\_,\ } -% \DoNotIndex{\^,\\^,\\\^,$\^$,$\\^$,$\\^$} -% \DoNotIndex{\0,\2,\4,\5,\6,\7,\8,} -% \DoNotIndex{\A,\a} -% \DoNotIndex{\B,\b,\Bc,\begin,\Bq,\Bqc} -% \DoNotIndex{\C,\c,\catcode,\cJA,\CodelineIndex,\csname} -% \DoNotIndex{\D,\def,\define@key,\Df,\divide,\DocInput,\documentclass,\pst@addfams} -% \DoNotIndex{\eCN,\edef,\else,\eHd,\eMcj,\EnableCrossrefs,\end,\endcsname} -% \DoNotIndex{\endCenterExample,\endExample,\endinput,\endpsclip} -% \DoNotIndex{\PrintIndex,\PrintChanges,\ProvidesFile} -% \DoNotIndex{\endpspicture,\endSideBySideExample,\Example} -% \DoNotIndex{\F,\f,\FdUrr,\fi,\filedate,\fileversion,\FV@Environment} -% \DoNotIndex{\FV@UseKeyValues,\FV@XRightMargin,\FVB@Example,\fvset} -% \DoNotIndex{\G,\g,\GetFileInfo,\gr,\GradientLoaded,\gsFKrbK@o,\gsj,\gsOX} -% \DoNotIndex{\hbadness,\hfuzz,\HLEmphasize,\HLMacro,\HLMacro@i} -% \DoNotIndex{\HLReverse,\HLReverse@i,\hqcu,\HqY} -% \DoNotIndex{\I,\i,\ifx,\input,\Ir,\IU} -% \DoNotIndex{\j,\jl,\JT,\JVodH} -% \DoNotIndex{\K,\k,\kfSlL} -% \DoNotIndex{\L,\let} -% \DoNotIndex{\message,\mHNa,\mIU} -% \DoNotIndex{\N,\nB,\newcmykcolor,\newdimen,\newif,\nW} -% \DoNotIndex{\O,\oCDJDo,\ocQhVI,\OnlyDescription,\oRKJ} -% \DoNotIndex{\P,\p,\ProvidesPackage,\psframe,\pslinewidth,\psset} -% \DoNotIndex{\PstAtCode,\PSTricksLoaded} -% \DoNotIndex{\q,\Qr,\qssRXq,\qu,\qXjFQp,\qYL} -% \DoNotIndex{\R,\r,\RecordChanges,\relax,\RlaYI,\rN,\Rp,\rp,\RPDXNn,\rput} -% \DoNotIndex{\S,\scalebox,\SgY,\SideBySide@Example,\SideBySideExample} -% \DoNotIndex{\SgY,\sk,\Sp,\space,\sZb} -% \DoNotIndex{\T,\the,\tw@} -% \DoNotIndex{\u,\UiSWGEf@,\uJi,\usepackage,\uVQdMM,\UYj} -% \DoNotIndex{\VerbatimEnvironment,\VerbatimInput,\VrC@} -% \DoNotIndex{\WhZ,\WjKCYb,\WNs} -% \DoNotIndex{\XkN,\XW} -% \DoNotIndex{\Z,\ZCM,\Ze} -% \DoNotIndex{\addtocounter,\advance,\alph,\arabic,\AtBeginDocument,\AtEndDocument} -% \DoNotIndex{\AtEndOfPackage,\begingroup,\bfseries,\bgroup,\box,\csname} -% \DoNotIndex{\else,\endcsname,\endgroup,\endinput,\expandafter,\fi} -% \DoNotIndex{\TeX,\z@,\p@,\@one,\xdef,\thr@@,\string,\sixt@@n,\reset,\or,\multiply,\repeat,\RequirePackage} -% \DoNotIndex{\@cclvi,\@ne,\@ehpa,\@nil,\copy,\dp,\global,\hbox,\hss,\ht,\ifodd,\ifdim,\ifcase,\kern} -% \DoNotIndex{\chardef,\loop,\leavevmode,\ifnum,\lower,\next,\wd,\setbox} -% \setcounter{IndexColumns}{2} -% -% \title{\textsf{pst-blur} package \\ version \fileversion} -% \author{Martin Giese\thanks{\protect\url{giese@ira.uka.de}} and -% Herbert Voss\thanks{\protect\url{voss@pstricks.de}}} -% \date{\filedate} -% \maketitle -% -%\section{Introduction} -% The ability to paint shadows on arbitrary shapes is a standard -% feature of PSTricks. However, these shadows are always `hard':\\ -%{\psset{unit=0.6cm,linewidth=0.5pt} -% \begin{pspicture}(-5,0)(10,4) -% \psset{shadow=true,shadowcolor=gray,shadowsize=0.15cm} -% \psframe(1,1)(3,3) -% \pscircle(6,2){1} -% \rput(9,2){\pscharpath{\fontfamily{ptm}\fontsize{40}{40}\selectfont A}} -% \end{pspicture} -%}\\ -% The |pst-blur| package provides blurred shadows -% for closed shapes drawn with PSTricks:\\ -%{\psset{unit=0.6cm,linewidth=0.5pt,blur=true,blurradius=0.07cm} -% \begin{pspicture}(-5,0)(10,4) -% \psset{shadow=true,shadowcolor=gray,shadowsize=0.15cm} -% \psframe(1,1)(3,3) -% \pscircle(6,2){1} -% \rput(9,2){\pscharpath{\fontfamily{ptm}\fontsize{40}{40}\selectfont A}} -% \end{pspicture} -%}\\ -% It also provides a new -% box command |\psblurbox|, which is similar to |\psshadowbox|, -% but gives the box a blurred shadow. -% \medskip -% -%The new graphics parameters and macros provided by the package -% are described in -%section 2 of this document. Section 3, if present, documents the -%implementation consisting of a generic \TeX\ file and a PostScript -%header for the |dvi|-to-PostScript converter. You can get section 3 -%by calling \LaTeX\ as follows on most relevant systems: -%\begin{verbatim} -%latex '\AtBeginDocument{\AlsoImplementation}\input{pst-blur.dtx}' -%\end{verbatim} -% -%\section{Package Usage} -% To use |pst-blur|, you have to say -% \begin{verbatim} -% \usepackage{pst-blur} -% \end{verbatim} -% in the document prologue for \LaTeX, and -% \begin{verbatim} -% \input pst-blur.tex -% \end{verbatim} -% in ``plain'' \TeX. -% -% \DescribeMacro{blur} -% To paint shapes with blurred shadows, -% set the graphics parameters |shadow| and |blur| to |true|, eg -% \pscircle[shadow=true,blur=true](8,-0.5){0.5} -% \begin{verbatim} -% \psset{unit=1cm} -% \pscircle[shadow=true,blur=true](0,0){0.5} -% \end{verbatim} -% \psset{unit=1cm} -% for a circle with a blurred shadow. -% The parameter |blur| has no influence if |shadow| is |false|. -% \medskip -% -% \DescribeMacro{shadowsize} -% \DescribeMacro{shadowangle} -% \DescribeMacro{blurradius} -% The rendering of blurred shadows is controlled by a number of -% additional graphics parameters. The offset of the shadow is controlled -% by the parameters |shadowsize| and |shadowangle|, which are the same -% as for ordinary shadows.\footnote{In particular, |shadowangle| has -% to be negative for the usual placement of shadows below and to the -% right of shapes.} The size of the blurring effect is -% controlled by the parameter |blurradius|, see Fig~\ref{fig:params}. -% The default value for |blurradius| is 1.5pt, which fits nicely with -% the default |shadowsize| of 3pt. -% \medskip -% -% \begin{figure}\caption{Parameters for blurred shadows} -% \label{fig:params} -% \vskip1cm -% \qquad\qquad\begin{pspicture*}(0,0)(10,6) -% \psframe[linewidth=4pt,fillcolor=lightgray,fillstyle=crosshatch, -% shadow=true,blur=true,shadowsize=2cm,shadowangle=-35, -% blurradius=1cm,shadowcolor=lightgray](-5,3)(5,10) -% \pnode(5,3){A} -% \pnode(5.3,2.9){A1} -% \pnode(6.64,1.85){B} -% \pnode(7.51,2.35){C} -% \pscircle(6.64,1.85){1} -% \ncline{|-|}{A}{B} -% \bput(0.2){|shadowsize|} -% \ncline{->}{B}{C} -% \bput(1.5){|blurradius|} -% \psline(5,3)(6,3) -% \psarcn{->}(5,3){0.5}{0}{-35} -% \rput(7,3.7){\rnode{D}{$-|shadowangle|$}} -% \nccurve[linewidth=0.5pt,angleA=-90,angleB=70]{->}{D}{A1} -% \rput[l](6,5.6){|shadowcolor|} -% \rput[l](8,5){|blurbg|} -% {\psset{linestyle=dotted} -% \psline(0,0.85)(6.64,0.85) -% \psline(7.64,1.85)(7.64,6) -% \psset{linestyle=dashed} -% \psline(0,2.85)(5.64,2.85) -% \psline(5.64,2.85)(5.64,6)} -% {\psset{linewidth=0.5pt} -% \psline{*-}(5.64,5.3)(6,5.4) -% \psline{*-}(7.64,4.75)(8,4.85) -% \ncline{F}{F1} -% } -% \end{pspicture*} -% \end{figure} -% -% \DescribeMacro{shadowcolor} -% \DescribeMacro{blurbg} -% The inner, usually darkest part of the shadow is painted in the -% colour defined by |shadowcolor|. In the range defined by |blurradius|, -% the colour gradually fades to the background colour set by |blurbg|. -% The default value for |blurbg| is white. You should change this parameter -% when you want to paint shapes over a coloured background, ie\\ -% \begin{minipage}{\textwidth} -% \begin{verbatim} -% \psframe[fillstyle=solid,fillcolor=yellow](-.7,-.7)(.7,.7) -% \pscircle[shadow=true,blur=true,blurbg=yellow](0,0){0.4} -% \end{verbatim} -% \rput(11.7,1.4){ -% \psframe[fillstyle=solid,fillcolor=yellow](-.7,-.7)(.7,.7) -% \pscircle[shadow=true,blur=true,blurbg=yellow](0,0){0.4}} -% \end{minipage} -% -% \DescribeMacro{blursteps} -% The number of distinct colour steps painted between |shadowcolor| -% and |blurbg| is controlled by the parameter |blursteps|. The default -% value for |blursteps| is 20, which is usually more than sufficient. -% Note, that higher values for |blursteps| result in proportionally slower -% rendering. This can be very tiresome with complex shapes. -% \medskip -% -% \DescribeMacro{\psblurbox} -% Using a -% \psframebox[shadow=true,blur=true,blurradius=2.5pt,shadowcolor=gray]% -% {|\ttfamily\symbol{92}psframebox|} -% with a blurred -% shadow in the middle of some text produces poor results, because \TeX\ -% does not know about the extra space taken by the shadow. For normal -% shadows, this problem is solved by the |\psshadowbox| macro, which -% adds the extra space around the box for the shadow. For blurred shadows, -% this is not sufficient: an extra |\blurradius| has to be added. This -% is done by the macro \psblurbox{\ttfamily\symbol{92}psblurbox}, which is otherwise -% identical to |\psshadowbox|. Note, that |\psblurbox| shares a -% deficiency of |\psshadowbox|: It only works correctly -% with $|shadowangle|=-45$, because \TeX\ does not provide trigonometric -% operations. -% -% \StopEventually{} -% -% \section{The Code} -% -% \subsection{The \file{pst-blur.sty} file} -% The \file{pst-blur.sty} file is very simple. It just loads -% the generic \file{pst-blur.tex} file. -% \begin{macrocode} -%<*stylefile> -\RequirePackage{pstricks} -\ProvidesPackage{pst-blur}[2005/09/08 package wrapper for - pst-blur.tex (hv)] -\input{pst-blur.tex} -\ProvidesFile{pst-blur.tex} - [\filedate\space v\fileversion\space `PST-blur' (hv)] -% -% \end{macrocode} -% -% \subsection{The \file{pst-blur.tex} file} -% \file{pst-blur.tex} contains the \TeX-side of things. We begin -% by identifying ourselves and setting things up, the same as in -% other PSTricks packages. -% \begin{macrocode} -%<*texfile> -\csname PstBlurLoaded\endcsname -\let\PstBlurLoaded\endinput -\ifx\PSTricksLoaded\endinput\else - \def\next{\input pstricks.tex }\expandafter\next -\fi -% \end{macrocode} -% \verb+pst-blur+ uses the extended version of the keyvalue interface. -% \begin{macrocode} -\ifx\PSTXKeyLoaded\endinput\else\input pst-xkey \fi -% \end{macrocode} -%% -% \begin{macrocode} -\def\fileversion{2.0} -\def\filedate{2005/09/08} -\message{ v\fileversion, \filedate} -\edef\TheAtCode{\the\catcode`\@} -\catcode`\@=11 -% \end{macrocode} -% Add the package name to the list of family names of the keyvalue list. -% \begin{macrocode} -\pst@addfams{pst-blur} -\pstheader{pst-blur.pro} -% \end{macrocode} -% -% \subsubsection{New graphics parameters} -% \begin{macro}{blur} -% \begin{macro}{blurradius} -% \begin{macro}{blursteps} -% \begin{macro}{blurbg} -% The definitions of the new graphics parameters follow the definitions -% for parameters of the same types found in |pstricks.tex|. -% \begin{macrocode} -\newif\ifpsblur -\define@key[psset]{pst-blur}{blur}[true]{\@nameuse{psblur#1}\pst@setrepeatarrowsflag} -\psset{blur=false} -%% -\define@key[psset]{pst-blur}{blurradius}{\pst@getlength{#1}\psx@blurradius} -\psset{blurradius=1.5pt} -%% -\define@key[psset]{pst-blur}{blursteps}{\pst@getint{#1}\psx@blursteps} -\psset{blursteps=20} -%% -\define@key[psset]{pst-blur}{blurbg}{\pst@getcolor{#1}\psx@blurbg} -\psset{blurbg=white} -% \end{macrocode} -% \end{macro} -% \end{macro} -% \end{macro} -% \end{macro} -% \subsection{Hooking into the PSTricks shadow macros} -% \begin{macro}{\pst@closedshadow} -% The macro |\pst@closedshadow| is usually called internally by -% PSTricks to paint a shadow in the shape of the current path. -% This macro has been renamed |\pst@sharpclosedshadow|. The -% new |\pst@closedshadow| jumps to either of |\pst@sharpclosedshadow| -% or |\pst@blurclosedshadow|, depending on |\ifpsblur|, which is -% directly related to the graphics parameter |blur|. -% \begin{macrocode} -\def\pst@closedshadow{% -\ifpsblur\pst@blurclosedshadow\else\pst@sharpclosedshadow\fi -} -\def\pst@sharpclosedshadow{% - \addto@pscode{% - gsave - \psk@shadowsize \psk@shadowangle \tx@PtoC - \tx@Shadow - \pst@usecolor\psshadowcolor - gsave fill grestore - stroke - grestore - gsave - \pst@usecolor\psfillcolor - gsave fill grestore - stroke - grestore}} -% \end{macrocode} -% \end{macro} -% \begin{macro}{\pst@blurclosedshadow} -% The PostScript code for blurred shadows is produced by the following -% macro. It pushes the diverse parameters (|\tx@PtoC| does polar to -% cartesian coordinate transformation for the shadow offset) and calls -% |BlurShadow|. Afterwards, it fills and strokes the current path, -% same as the original |\pst@closedshadow|. -% \begin{macrocode} -\def\pst@blurclosedshadow{% - \addto@pscode{% - gsave - gsave \pst@usecolor\psshadowcolor currentrgbcolor grestore - gsave \pst@usecolor\psx@blurbg currentrgbcolor grestore - \psx@blurradius\space - \psx@blursteps\space - \psk@shadowsize \psk@shadowangle \tx@PtoC - tx@PstBlurDict begin BlurShadow end - grestore - gsave - \pst@usecolor\psfillcolor - gsave fill grestore - stroke - grestore}} -% \end{macrocode} -% \end{macro} -% \begin{macro}{\pst@blurclosedshadow} -% This one looks very impressing. In fact, it is a verbatim copy -% of |\psshadowbox|, with only the line -% |\advance\pst@dimh\psx@blurradius\p@| added! -% \begin{macrocode} -\def\psblurbox{% -\def\pst@par{}\pst@object{psblurbox}} -\def\psblurbox@i{\pst@makebox\psblurbox@ii} -\def\psblurbox@ii{% - \begingroup - \pst@useboxpar - \psblurtrue - \psshadowtrue - \psboxseptrue - \setbox\pst@hbox=\hbox{\psframebox@ii}% - \pst@dimh=\psk@shadowsize\p@ - \pst@dimh=.7071\pst@dimh - \advance\pst@dimh\psx@blurradius\p@ - \pst@dimg=\dp\pst@hbox - \advance\pst@dimg\pst@dimh - \dp\pst@hbox=\pst@dimg - \pst@dimg=\wd\pst@hbox - \advance\pst@dimg\pst@dimh - \wd\pst@hbox=\pst@dimg - \leavevmode - \box\pst@hbox -\endgroup} -%% -\catcode`\@=\TheAtCode\relax -% -% \end{macrocode} -% \end{macro} -% -% \subsection{The \file{pst-blur.pro} file} -% The file \file{pst-blur.pro} contains PostScript definitions -% to be included in the PostScript output by the -% |dvi|-to-PostScript converter, eg |dvips|. -% This is all rather similar to -% \file{pst-slpe.pro}, and I just don't feel like explaining it, -% so you'll have to work through it yourself, if you want to -% know what happens. The trick is basically to draw the outline -% repeatedly with varying line widths. The procedure |Shadow| -% called in |BlurShadow| is defined in \file{pstricks.pro} and -% translates the current path based on an $x$- and $y$-displacement -% taken from the stack. -% \begin{macrocode} -%<*prolog> -/tx@PstBlurDict 60 dict def -tx@PstBlurDict begin -/Iterate { - /SegLines ED - /ThisB ED /ThisG ED /ThisR ED - /NextB ED /NextG ED /NextR ED - /W 2.0 BlurRadius mul def - /WDec W SegLines div def - /RInc NextR ThisR sub SegLines div def - /GInc NextG ThisG sub SegLines div def - /BInc NextB ThisB sub SegLines div def - /R ThisR def - /G ThisG def - /B ThisB def - SegLines { - R G B - sqrt 3 1 roll sqrt 3 1 roll sqrt 3 1 roll - setrgbcolor - gsave W setlinewidth - stroke grestore - /W W WDec sub def - /R R RInc add def - /G G GInc add def - /B B BInc add def - } bind repeat -} def -/BlurShadow { - Shadow - /BlurSteps ED - /BlurRadius ED - dup mul /BEnd ED dup mul /GEnd ED dup mul /REnd ED - dup mul /BBeg ED dup mul /GBeg ED dup mul /RBeg ED - RBeg REnd add 0.5 mul /RMid ED - GBeg GEnd add 0.5 mul /GMid ED - BBeg BEnd add 0.5 mul /BMid ED - /OuterSteps BlurSteps 2 div cvi def - /InnerSteps BlurSteps OuterSteps sub def - 1 setlinejoin - RMid GMid BMid REnd GEnd BEnd OuterSteps Iterate - gsave RBeg sqrt GBeg sqrt BBeg sqrt setrgbcolor fill grestore - clip - 0 setlinejoin - RMid GMid BMid RBeg GBeg BBeg InnerSteps Iterate -} def -end -% -% \end{macrocode} -% \Finale -% diff --git a/Master/texmf-dist/source/latex/pst-blur/pst-blur.ins b/Master/texmf-dist/source/latex/pst-blur/pst-blur.ins deleted file mode 100644 index 6f8935d1c1a..00000000000 --- a/Master/texmf-dist/source/latex/pst-blur/pst-blur.ins +++ /dev/null @@ -1,25 +0,0 @@ -\def\batchfile{pst-blur.ins} - -\input docstrip.tex - -\keepsilent - -\askforoverwritefalse - -\generate{\file{pst-blur.sty}{\from{pst-blur.dtx}{stylefile}}% - \file{pst-blur.tex}{\from{pst-blur.dtx}{texfile}}% - \usepostamble\empty% - \file{pst-blur.pro}{\from{pst-blur.dtx}{prolog}}% -} - -\Msg{************************************************************} -\Msg{ } -\Msg{ To finish the installation you have to move the files} -\Msg{ `pst-blur.sty' and `pst-blur.tex' into a directory} -\Msg{ searched by TeX and the file `pst-blur.pro'} -\Msg{ to a directory searched by dvips.} -\Msg{ } -\Msg{ To type-set the documentation, including instructions,} -\Msg{ run the file `pst-blur.dtx' through LaTeX.} -\Msg{ } -\Msg{***********************************************************} diff --git a/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex b/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex index a3f37982805..900ab6a7796 100644 --- a/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex +++ b/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex @@ -20,6 +20,17 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +%% $Id: pst-blur.dtx,v 2.0 2005/09/08 09:48:33 giese Exp $ +%% +%% Copyright 1998-2007 Martin Giese, mgiese@risc.uni-linz.ac.at +%% Herbert Voss, voss@pstricks.de +%% +%% This file is under the LaTeX Project Public License +%% See CTAN archives in directory macros/latex/base/lppl.txt. +%% +%% DESCRIPTION: +%% `pst-blur' is a PSTricks package for blurred shadows +%% \csname PstBlurLoaded\endcsname \let\PstBlurLoaded\endinput \ifx\PSTricksLoaded\endinput\else diff --git a/Master/texmf-dist/tex/latex/pst-blur/pst-blur.sty b/Master/texmf-dist/tex/latex/pst-blur/pst-blur.sty index c7100850cb8..fbe2ee9b440 100644 --- a/Master/texmf-dist/tex/latex/pst-blur/pst-blur.sty +++ b/Master/texmf-dist/tex/latex/pst-blur/pst-blur.sty @@ -20,6 +20,17 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +%% $Id: pst-blur.dtx,v 2.0 2005/09/08 09:48:33 giese Exp $ +%% +%% Copyright 1998-2007 Martin Giese, mgiese@risc.uni-linz.ac.at +%% Herbert Voss, voss@pstricks.de +%% +%% This file is under the LaTeX Project Public License +%% See CTAN archives in directory macros/latex/base/lppl.txt. +%% +%% DESCRIPTION: +%% `pst-blur' is a PSTricks package for blurred shadows +%% \RequirePackage{pstricks} \ProvidesPackage{pst-blur}[2005/09/08 package wrapper for pst-blur.tex (hv)] diff --git a/Master/texmf-dist/tpm/pst-blur.tpm b/Master/texmf-dist/tpm/pst-blur.tpm index d0ff79aa0fe..cd98ff1d783 100644 --- a/Master/texmf-dist/tpm/pst-blur.tpm +++ b/Master/texmf-dist/tpm/pst-blur.tpm @@ -3,7 +3,7 @@ pst-blur Package - 2006/01/11 23:56:35 + 2007/01/13 12:01:46 1.0 rahtz @@ -19,20 +19,21 @@ apply blurring to the normal shadow function of pstricks. 124532 - + texmf-dist/dvips/pst-blur/pst-blur.pro texmf-dist/tex/generic/pst-blur/pst-blur.tex texmf-dist/tex/latex/pst-blur/pst-blur.sty texmf-dist/tpm/pst-blur.tpm - + texmf-dist/doc/generic/pst-blur/Changes texmf-dist/doc/generic/pst-blur/README texmf-dist/doc/generic/pst-blur/pst-blur.pdf - -texmf-dist/source/latex/pst-blur/pst-blur.dtx -texmf-dist/source/latex/pst-blur/pst-blur.ins + +texmf-dist/source/generic/pst-blur/Makefile +texmf-dist/source/generic/pst-blur/pst-blur.dtx +texmf-dist/source/generic/pst-blur/pst-blur.ins Package/pst-blur diff --git a/Master/texmf/lists/pst-blur b/Master/texmf/lists/pst-blur index 7c3909a92b1..9700894485f 100644 --- a/Master/texmf/lists/pst-blur +++ b/Master/texmf/lists/pst-blur @@ -1,8 +1,9 @@ texmf-dist/doc/generic/pst-blur/Changes texmf-dist/doc/generic/pst-blur/README texmf-dist/doc/generic/pst-blur/pst-blur.pdf -texmf-dist/source/latex/pst-blur/pst-blur.dtx -texmf-dist/source/latex/pst-blur/pst-blur.ins +texmf-dist/source/generic/pst-blur/Makefile +texmf-dist/source/generic/pst-blur/pst-blur.dtx +texmf-dist/source/generic/pst-blur/pst-blur.ins texmf-dist/dvips/pst-blur/pst-blur.pro texmf-dist/tex/generic/pst-blur/pst-blur.tex texmf-dist/tex/latex/pst-blur/pst-blur.sty -- cgit v1.2.3