summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-09 00:56:57 +0000
committerKarl Berry <karl@freefriends.org>2006-01-09 00:56:57 +0000
commitf07bb53970ee2ecc53f81a206a3d3a67ef665e4a (patch)
tree6f57a1d62971db79e5ff023bdfd83b22cb971dc9 /Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex
parent007f67a693e4d031fd3d792df8e4d5f43e2cb2e7 (diff)
doc 6
git-svn-id: svn://tug.org/texlive/trunk@85 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex')
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex34
1 files changed, 34 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex b/Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex
new file mode 100644
index 00000000000..645cc4d1ece
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pstricks/voss/bsp29.tex
@@ -0,0 +1,34 @@
+\documentclass[12pt,a4paper]{article} % Herbert Voss 2004-05-05
+\usepackage{pstricks}
+\xdefinecolor{lightred}{rgb}{1.0, 0.8, 0.8}
+\newsavebox\pstBox
+\newlength\pstWidth
+\newlength\pstHeight
+\makeatletter
+\def\psLBox{\@ifnextchar[{\psLBox@i}{\psLBox[]}}
+\def\psLBox@i[#1]#2{%
+ \psset{linearc=0.4,shadow=true,shadowsize=0.2,%
+ fillstyle=solid,fillcolor=white}
+ \ifx#1\empty\else\psset{#1}\fi
+ \sbox\pstBox{#2}
+ \pstWidth=\wd\pstBox
+ \pstHeight=\ht\pstBox
+ \advance\pstHeight by \dp\pstBox
+ \advance\pstHeight by \pslinearc
+ \advance\pstWidth by \pslinearc
+ \begin{pspicture}(\pstWidth,\pstHeight)
+ \psline(\pstWidth,0)(0,0)(0,\pstHeight)(\pstWidth,\pstHeight)%
+ \psline[shadow=false](\pstWidth,\pstHeight)(\pstWidth,0)
+ \rput(0.5\pstWidth,0.5\pstHeight){#2}
+ \end{pspicture}
+}
+\makeatother
+\begin{document}
+
+\psLBox[fillcolor=lightred]{Some text in a box}%
+\psLBox[fillcolor=yellow]{%
+\parbox{3cm}{Some text in a box with line arcs only
+ on the left side}
+}%
+\end{document}
+