summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx')
-rw-r--r--Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx52
1 files changed, 52 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx b/Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx
new file mode 100644
index 00000000000..cd988e015fc
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/latex-graphics-companion/4-7-4.ltx
@@ -0,0 +1,52 @@
+\documentclass{ppex}
+\nonstopmode
+\usepackage {pstcol,calc}
+\pagestyle{empty}
+
+\begin{document}
+\ResetPreambleCommands
+\ReadyForTheFray
+\usepackage {pstcol,calc}
+\newcounter{lastval}
+\newcounter{thishalf}
+\newcounter{thisval}
+\definecolor{wheat}{rgb}{.96, .87, .7}
+\definecolor{lightblue}{rgb}{.68, .85, .9}
+\definecolor{brown}{rgb}{.65, .16, .16}
+\definecolor{pink}{rgb}{1, .75, .8}
+\definecolor{palegreen}{rgb}{.6, .98, .6}
+\definecolor{white}{rgb}{1, 1, 1 }
+\newcommand\lang[4]{% name, value, percentage, color
+ \setcounter{thisval}{\value{lastval}}
+ \addtocounter{thisval}{#3}
+ \pswedge[fillcolor=#4]{1}{\thelastval}{\thethisval}%
+ \setcounter{thishalf}{((\value{thisval}-\value{lastval})/2)+\value{lastval}}
+ %\typeout{#1: \thethishalf}%
+ \ifnum#3>200\rput(1.3;\thethishalf){#1}\fi
+ \setcounter{lastval}{\value{thisval}}
+}
+\bgroup\psset{unit=3}
+\centerline{\begin{pspicture}(-1.3,-1.3)(1.3,1.3)
+\psset{fillstyle=solid}
+\degrees[10000]
+\SpecialCoor
+\setcounter{lastval}{0}
+\lang{Romanian}{1}{3}{green}
+\lang{Czech}{2}{6}{blue}
+\lang{Bulgarian}{4}{11}{green}
+\lang{Japanese}{4}{11}{palegreen}
+\lang{Dutch}{7}{20}{black}
+\lang{Norwegian}{20}{56}{cyan}
+\lang{Greek}{26}{73}{magenta}
+\lang{Swedish}{34}{95}{lightgray}
+\lang{Danish}{46}{129}{white}
+\lang{French}{83}{232}{pink}
+\lang{Latin}{146}{409}{wheat}
+\lang{Russian}{243}{680}{white}
+\lang{Italian}{391}{1093}{gray}
+\lang{German}{508}{1421}{lightblue}
+\lang{unknown}{599}{1676}{red}
+\lang{English}{1462}{4085}{yellow}
+\end{pspicture}}
+\egroup
+\end{document}