From 873660d1a83ece926fe7206288dda9c36b349c1b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:46:03 +0000 Subject: generic 1 git-svn-id: svn://tug.org/texlive/trunk@613 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/generic/pst-blur/pst-blur.tex | 107 +++++++++++++++++++++ 1 file changed, 107 insertions(+) create mode 100644 Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex (limited to 'Master/texmf-dist/tex/generic/pst-blur') diff --git a/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex b/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex new file mode 100644 index 00000000000..a3f37982805 --- /dev/null +++ b/Master/texmf-dist/tex/generic/pst-blur/pst-blur.tex @@ -0,0 +1,107 @@ +%% +%% This is file `pst-blur.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% pst-blur.dtx (with options: `texfile') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from pst-blur.tex. +%% +%% For distribution of the original source see the terms +%% for copying and modification in the file pst-blur.dtx. +%% +%% This generated file may be distributed as long as the +%% original source files, as listed above, are part of the +%% same distribution. (The sources need not necessarily be +%% in the same archive or directory.) +\csname PstBlurLoaded\endcsname +\let\PstBlurLoaded\endinput +\ifx\PSTricksLoaded\endinput\else + \def\next{\input pstricks.tex }\expandafter\next +\fi +\ifx\PSTXKeyLoaded\endinput\else\input pst-xkey \fi +%% +\def\fileversion{2.0} +\def\filedate{2005/09/08} +\message{ v\fileversion, \filedate} +\edef\TheAtCode{\the\catcode`\@} +\catcode`\@=11 +\pst@addfams{pst-blur} +\pstheader{pst-blur.pro} +\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} +\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}} +\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}} +\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 +\endinput +%% +%% End of file `pst-blur.tex'. -- cgit v1.2.3