From 42f89fe0308ff57a4da6e50ba21cc283cfda7ea2 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Mon, 25 Mar 2013 23:29:11 +0000
Subject: tikzsymbols (24mar13)

git-svn-id: svn://tug.org/texlive/trunk@29500 c570f23f-e606-0410-a88d-b1316a301751
---
 .../source/latex/tikzsymbols/tikzsymbols.dtx       | 832 +++++++++++++--------
 1 file changed, 508 insertions(+), 324 deletions(-)

(limited to 'Master/texmf-dist/source')

diff --git a/Master/texmf-dist/source/latex/tikzsymbols/tikzsymbols.dtx b/Master/texmf-dist/source/latex/tikzsymbols/tikzsymbols.dtx
index a9009216442..dcdf305b934 100644
--- a/Master/texmf-dist/source/latex/tikzsymbols/tikzsymbols.dtx
+++ b/Master/texmf-dist/source/latex/tikzsymbols/tikzsymbols.dtx
@@ -22,6 +22,7 @@
 \usepackage[english]{babel}
 \usepackage[T1]{fontenc}
 \usepackage{array} 
+\usepackage{lmodern} 
 \usepackage{microtype}
 \usepackage{longtable}
 \usepackage[colorlinks=true]{hyperref} 
@@ -48,7 +49,6 @@
 \end{tikzpicture}%
 }}
 \makeatother
-\newcommand{\mysec}[1]{\noindent\bfseries\large #1 \par}
 
 \begin{document}
 \DocInput{tikzsymbols.dtx} 
@@ -85,6 +85,7 @@
 %\changes {v1.65} {2013/02/17} {Improved BasicTree; New symbols ``Schaler/peeler'', Laughey, Walley, Ninja; but didn't improve the source-description}
 %\changes {v1.7} {2013/02/28} {New symbols, etc.}
 %\changes {v2.0} {2013/03/07} {Fixed Bugs, improved BasicTree, new option ``marvosym'', new symbol}
+%\changes {v2.2} {2013/03/23} {Now you can use negative scaling. Include ifpackageloaded. Did something else, I can't remember}
 %
 %
 %
@@ -196,8 +197,7 @@
 % The first column shows the Command (at first the german at second the english).
 % The second are the optional keys. 
 %
-%<scale> can be a number between 0 and (not exactly) $1400$\footnote{Well, you can also use a number between 0 and $-1400$ which will lead to something like this: \Laughey[-1], \Chair[-1], \Person[-1]. Note: Some symbols like 
-%``Kochtopf/pot'' can't be scaled in such a way. Furthermore the symbols are not designed for negative numbers and will have a bad line width.}
+%<scale> can be a number between  (not exactly) -1400 and (also not exactly) $1400$\footnote{Since version 2.2 you can use negative numbers as well (see examples)}
 %, default is $1$.
 % The optional parameter(s) are for both, the german and the english commands the same. 
 %
@@ -231,7 +231,7 @@
 %
 % First column shows the commands, the second the optional paramter(s), the third the default-output.
 %
-% <scale> can be a number between 0 and {not exactly} $2000$\footnote{Do you even need  so large symbols?}, default is $1$.
+% <scale> can be a number between (not exactly) -2000 and  (not exactly)  $2000$\footnote{Do you even need  so large symbols?}, default is $1$.
 %
 % <color> can be every defined color. 
 %
@@ -246,6 +246,7 @@
 % \verb|\Neutrey|		& \oarg{scale}\oarg{color} 	& \Neutrey \\
 % \verb|\Winkey|		& \oarg{scale}\oarg{color} 	& \Winkey \\
 % \verb|\Sey|		& \oarg{scale}\oarg{color} 	& \Sey \\
+% \verb|\Xey|		& \oarg{scale}\oarg{color} 	& \Xey \\
 % \verb|\Innocey|	& \oarg{scale}\oarg{color}\oarg{halo color} & \Innocey \\
 % \verb|\wInnocey|		& \oarg{scale} 			& \wInnocey \\
 % \verb|\Cooley|		& \oarg{scale}\oarg{color} 	& \Cooley \\
@@ -260,7 +261,7 @@
 %
 %\end{longtable}
 %
-%Examples: \verb|\Sadey[][red]|\Sadey[][red] \quad\verb|\Cooley[3][cyan]|\Cooley[3][cyan]
+%Examples: \verb|\Sadey[][red]|\Sadey[][red] \quad\verb|\Cooley[-3][cyan]|\Cooley[-3][cyan]
 %
 %\verb|\Vomey[1.5][green!80!black][olive]|\Vomey[1.5][green!80!black][olive].
 %
@@ -268,14 +269,14 @@
 %
 %\verb|\Ninja[1.3][][violet][red]|\Ninja[1.3][][violet][red].
 %
-% \verb|\colorbox{yellow}{\Winkey \Annoey \Neutrey}|\colorbox{yellow}{\Winkey \Annoey \Neutrey} 
+% \verb|\colorbox{yellow}{\Winkey \Annoey[-1] \Neutrey}|\colorbox{yellow}{\Winkey \Annoey [-1]\Neutrey} 
 %
 %\verb|{\color{blue}\Sey}| {\color{blue}\Sey}
 %
-%\subsubsection{``3D'' Emoticons \texorpdfstring{\dSmiley}{dSmiley}}
-% First column shows the commands (note: the ``3D'' Emoticons begin with \verb|\d...|), the second the optional paramter(s), the third the default-output.
+%\subsubsection{``3D'' Emoticons \texorpdfstring{\dSmiley\dSadey[-1]}{dSmiley dSadey}}
+% First column shows the commands (note: the ``3D'' Emoticons begin with \verb|\d...|), the second shows the optional paramter(s), the third shows the default-output.
 %
-% <scale> can be a number between 0 and  a large number\footnote{over 500 for sure}, default is $1$.
+% <scale> can be a number between a small number\footnote{under 500 for sure} and  a large number\footnote{over 500 for sure}, default is $1$.
 % <color> can be every defined color (see examples below). 
 %
 %
@@ -289,6 +290,7 @@
 % \verb|\dNeutrey|		& \oarg{scale}\oarg{color} 	& \dNeutrey \\
 % \verb|\dWinkey|		& \oarg{scale}\oarg{color} 	& \dWinkey \\
 % \verb|\dSey|		& \oarg{scale}\oarg{color} 	& \dSey \\
+% \verb|\dXey|		& \oarg{scale}\oarg{color} 	& \dXey \\
 % \verb|\dInnocey|	& \oarg{scale}\oarg{color}\oarg{halo color} 	& \dInnocey \\
 % \verb|\dCooley|		& \oarg{scale}\oarg{color} 	& \dCooley \\
 % \verb|\dTongey|	& \oarg{scale}\oarg{color}\oarg{tongue color} & \dTongey \\
@@ -300,7 +302,7 @@
 %\end{longtable}
 %
 % Examples: 
-%\verb|\dSadey[][red]|\dSadey[][red]\quad\verb|\dCooley[3][cyan]|\dCooley[3][cyan]
+%\verb|\dSadey[][red]|\dSadey[][red]\quad\verb|\dCooley[-3][cyan]|\dCooley[-3][cyan]
 %
 %\verb|\dVomey[1.5][green!70!black][olive]|\dVomey[1.5][green!80!black][olive].
 %
@@ -313,21 +315,24 @@
 %
 % \begin{longtable}{lcc}
 %  Commands  & Optional parameter(s)  & Output (default) \\\hline\vspace{-1.5ex}\endhead
-%\verb|\Person| & \oarg{scale} & \Person \\
+%\verb|\Person| & \oarg{scale}\oarg{left arm}\oarg{right arm}\oarg{left leg}\oarg{right arm}    & \Person\\
 %\verb|\Candle| & \oarg{scale} & \Candle\\
 %\verb|\Fire| & \oarg{scale} & \Fire\\
 %\verb|\Coffeecup| & \oarg{scale} & \Coffeecup\\
 %\verb|\Chair| & \oarg{scale} & \Chair\\
 %\verb|\Bed| & \oarg{scale} & \Bed\\
 %\verb|\Moai| & \oarg{scale} & \Moai\\
-%\verb|\Tribar| & \oarg{scale} & \Tribar
+%\verb|\Tribar| &\oarg{scale}\oarg{color 1}\oarg{color 2}\oarg{color 3} & \Tribar\\
+%\verb|\Snowman| &\oarg{scale} & \Snowman\\
 %\end{longtable}
- 
+%
+% \Tribar[-10][blue][red][green]\verb| \Tribar[-10][blue][red][green]|
+% \Tribar[2.1][blue][blue!50][blue!20] \verb|\Tribar[2.1][blue][blue!50][blue!20]|
 %
 %\subsection{Trees \texorpdfstring{\BasicTree{blue!60!black}{red}{green}{leaf}}{BasicTree}}\label{Trees}
 % ``Hey, these trees look exactly like the ones in the tikzmanual'' -- ``NO! Not ``exatcly'', they look pretty a like\dots{} Well I changed them a bit\dots{} \dots{} Hey! The best ideas are stolen \dots''
 %
-% <scale> can be a number between 0 and $128$\footnote{if it is larger it uses too much of \LaTeX{} memory and an error message appears. Of course there are also negative numbers allowed, but a number smaller than $-2$ doesn't look good anymore.}, default is $1$.
+% <scale> can be a number between $-128$ and $128$\footnote{if it is larger (or less) it uses too much of \LaTeX{} memory and an error message appears.}, default is $1$.
 %
 % <color> can be every defined color. 
 %
@@ -355,20 +360,22 @@
 %
 % \verb|\BasicTree[5]{orange!95!black}{orange!80!black}{orange!70!black}{leaf}|\BasicTree[5]{orange!95!black}{orange!80!black}{orange!70!black}{leaf}
 % 
-% \verb|\BasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{leaf}|\BasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{}
+% \verb|\BasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{}|\BasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{}
 %
+% \verb|\BasicTree[-1.54]{green!90!black}{green!95!black}{green!99!black}{leaf}|\BasicTree[-1.54]{green!90!black}{green!95!black}{green!99!black}{leaf}
 %
 % \verb|\colorbox{black}{\BasicTree[3.75]{gray!80}{gray!50}{gray!40}{leaf}}|\colorbox{black}{\BasicTree[3.75]{gray!80}{gray!50}{gray!40}{leaf}}
 %\\[5ex]
-% \verb|\colorbox{green}{\BasicTree{red}{orange}{yellow}{leaf}}|\colorbox{green}{\definedBasicTree{red}{orange}{yellow}{leaf}}
+% \indent\verb|\colorbox{green}{\BasicTree{red}{orange}{yellow}{leaf}}|\colorbox{green}{\definedBasicTree{red}{orange}{yellow}{leaf}}
 %
 %
-% \verb|\BasicTree{red}{orange}{yellow}{leaf}|\definedBasicTree{red}{orange}{yellow}{leaf}
 %
 % \verb|\BasicTree[5]{orange!95!black}{orange!80!black}{orange!70!black}{leaf}|\definedBasicTree[5]{orange!95!black}{orange!80!black}{orange!70!black}{leaf}
 %
 % \verb|\BasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{}|\definedBasicTree[2]{blue!65!white}{cyan!50!white}{cyan!50!white}{}
 %
+%\verb|\BasicTree[-1.54]{green!90!black}{green!95!black}{green!99!black}{leaf}|\definedBasicTree[-1.54]{green!90!black}{green!95!black}{green!99!black}{leaf}
+%
 % \verb|\colorbox{black}{\BasicTree[3.75]{gray!80}{gray!50}{gray!40}{leaf}}|\colorbox{black}{\definedBasicTree[3.75]{gray!80}{gray!50}{gray!40}{leaf}}
 %\\[1ex]
 % I think it's best if you define your own tree using \verb|\newcommand| and \verb|\BasicTree| (don't forget \verb|\xspace|):
@@ -378,6 +385,7 @@
 %\end{verbatim}
 %
 %
+%
 % \subsection{Something to redefine}
 %
 % At the end of the code I am using the command:\\
@@ -423,7 +431,7 @@
 %
 % If you load ``marvosym'' \emph{after} ``tikzsymbols'', \LaTeX{} generates an errormessage because ``Smiley'' has already been defined.
 %
-% If you load ``marvosym'' \emph{before} ``tikzsymbols'', ``tikzsymbols'' will overwrite marvosym's Smiley and no errormessage is generated (if you liek the ``Simley'' from marvosym more, use the tikzsymbols option \verb|marvosym|).
+% If you load ``marvosym'' \emph{before} ``tikzsymbols'', ``tikzsymbols'' will overwrite marvosym's Smiley and no errormessage is generated (if you like the ``Simley'' from marvosym more, use the tikzsymbols option \verb|marvosym|).
 %
 % \section{Nobody is perfect}
 % If you are sure that you found a bug, please send me a mail involving a \emph{minimal example} of the code which shows the bug.
@@ -442,11 +450,12 @@
 %    \begin{macrocode} 
 \NeedsTeXFormat{LaTeX2e}[2011/06/27] 
 \ProvidesPackage{tikzsymbols} 
-[2013/03/07 v2.0 Some symbols  created using tikz.] 
-\RequirePackage{tikz}
-\RequirePackage{xargs}
-\RequirePackage{xcolor}
-\RequirePackage{xspace}
+[2013/03/23 v2.2 Some symbols  created using tikz.] 
+\@ifpackageloaded{tikz}{}{\RequirePackage{tikz}}
+\@ifpackageloaded{xargs}{}{\RequirePackage{xargs}}
+\@ifpackageloaded{xcolor}{}{\RequirePackage{xcolor}}
+\@ifpackageloaded{xspace}{}{\RequirePackage{xspace}}
+\@ifpackageloaded{xkeyval}{}{\RequirePackage{xkeyval}}
 %    \end{macrocode} 
 % Furthermore we need to load some libraries from tikz:
 
@@ -463,13 +472,6 @@
 %\end{macro}
 
 
-%\begin{macro}{marvosym}
-% I define the option ``marvosym'': you should use it, if you load the package ``marvosym'' 
-%    \begin{macrocode}
-\newif\if@tikzsymbols@marvosym
-\DeclareOptionX{marvosym}{\@tikzsymbols@marvosymtrue}
-%    \end{macrocode}
-%\end{macro}
 
 %\begin{macro}{\@leaf@is@leaf}
 % We need this command for creating an errormessage if the last paramter of BasicTree is neither ``leaf'' nor empty.
@@ -478,12 +480,34 @@
 %    \end{macrocode}
 %\end{macro}
 
+%\begin{macro}{\tkzsymblsscl}
+% .
+%    \begin{macrocode}
+\newlength{\tkzsymblsscl}
+\def\set@tkzsymblsscl#1{\setlength{\tkzsymblsscl}{#1pt}}
+%    \end{macrocode}
+%\end{macro}
+
 
 %\begin{macro}{\if@draft \if@final}
-% We need them for some package warnings.
+%\begin{macro}{\if@tkzssmbls@neg}
+%\begin{macro}{\if@tikzsymbols@marvosym}
+% We need draft and final  for some package warnings.
+% ``marvosym'' for the option ``marvosym'' and ``neg'' (negative) if something is negativ.
 %    \begin{macrocode}
 \newif\if@tikzsymbols@draft
 \newif\if@tikzsymbols@final
+\newif\if@tkzssmbls@neg
+\newif\if@tikzsymbols@marvosym
+%    \end{macrocode}
+%\end{macro}
+%\end{macro}
+%\end{macro}
+
+%\begin{macro}{marvosym}
+% I define the option ``marvosym'': you should use it, if you load the package ``marvosym'' 
+%    \begin{macrocode}
+\DeclareOptionX{marvosym}{\@tikzsymbols@marvosymtrue}
 %    \end{macrocode}
 %\end{macro}
 
@@ -492,7 +516,7 @@
 %\begin{macro}{\@Tree@SetUp}
 % First we define our \verb|\@Tree@SetUp| (how the trees will look like) (I used the code from the ``tikz'' manual and changed it a little bit):
 %    \begin{macrocode}
-\DeclareRobustCommand{\@Tree@SetUp}[1][1]{\tikzset{%
+\def\@Tree@SetUp{\tikzset{%
 ld/.style={level distance=##1ex},lw/.style={line width=##1ex},%
 level 1/.style={ld=0.60, 	trunk,			lw=0.1 ,sibling angle=60},%
 level 2/.style={ld=0.20,	trunk!80!leaf a,	lw=.073,sibling angle=70},%
@@ -508,8 +532,9 @@ level 6/.style={ld=0.08,	leaf a,			lw=.021,sibling angle=60},%
 %  Now we define our \verb|\Basic@Tree|. We will need it later for our package option (basic code is also from ``tikz'' manual).
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Basic@Tree}[5][1=1, usedefault]{{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt \@tkzssmbls@negtrue\fi%
 \def\leaf@or@not@leaf{#5}%
-\@Tree@SetUp[#1]%
+\@Tree@SetUp%
 \pgfarrowsdeclare{leaf}{leaf}%
 {\pgfarrowsleftextend{-.1ex} \pgfarrowsrightextend{-0.05ex}}%
 {%
@@ -520,13 +545,21 @@ level 6/.style={ld=0.08,	leaf a,			lw=.021,sibling angle=60},%
 }%
 \colorlet{trunk}{#2}%
 \colorlet{leaf a}{#3}%
-\colorlet{leaf b}{#4}\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex]%
+\colorlet{leaf b}{#4}%
+\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex]%
 \ifx\leaf@or@not@leaf\@leaf@is@leaf%
-\draw[opacity=0,scale=#1+0.1*#1] (-0.82-0.1* #1/100,0) rectangle (0.82+0.1*#1/100, 1.4+0.01*#1/100);
+   \if@tkzssmbls@neg%
+   \draw[opacity=0,scale=#1+0.1*#1] (-0.82+0.1*#1/100,0) rectangle
+   (0.82-0.1*#1/100, 1.4-0.01*#1/100);
+   \else
+   \draw[opacity=0,scale=#1+0.1*#1] (-0.82-0.1*#1/100,0) rectangle
+   (0.82+0.1*#1/100, 1.4+0.01*#1/100);
+   \fi%
 \else
-\draw[opacity=0,scale=#1+0.1*#1] (-0.75,-0.01) rectangle (0.75,1.3);
+ \draw[opacity=0,scale=#1+0.1*#1] (-0.75,-0.01) rectangle (0.75,1.3);
 \fi
-\pgflowlevel{\pgftransformscale{#1+0.02ex}}{\coordinate (root) [grow cyclic,rotate=90] child {
+\pgflowlevel{\pgftransformscale{#1+0.02ex}}{%
+\coordinate (root) [grow cyclic,rotate=90] child {
 child [line cap=round] foreach \a in {0,1, 2} { child foreach \b in {0,1} {
 child foreach \c in {0,1,2} { child foreach \d in {0,1} {
 child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor,-#5] }
@@ -579,15 +612,16 @@ final with package option tree=on/off;
 %Furthermore, we check if the last parameter is ``leaf'':
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Basic@Tree@off}[5][1=1, usedefault]{{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt \set@tkzsymblsscl{-#1}\fi%
 \def\leaf@or@not@leaf{#5}%
-\def\@y@@x@y@x{0.095*#1/100}%
-\begin{tikzpicture}[scale=#1+0.01*#1,x=1.35ex,y=1.3ex, line width=0.07ex*#1]
+\def\Tree@Off@line{0.095*#1/100}%
+\begin{tikzpicture}[scale=#1+0.01*#1,x=1.35ex,y=1.3ex, line width=0.07ex*\tkzsymblsscl]
 \ifx\leaf@or@not@leaf\@leaf@is@leaf%
-\draw[#2] (0-\@y@@x@y@x,0) -- (0-\@y@@x@y@x,1.08+0.05*#1/100);
-\draw[#3] (0-\@y@@x@y@x,1.08+0.05*#1/100) -- (1.2+\@y@@x@y@x,1.08+0.05*#1/100);
-\draw[#4] (1.2+\@y@@x@y@x,1.08+0.05*#1/100) -- (1.2+\@y@@x@y@x,0);
-\draw[#3] (1.2+\@y@@x@y@x,0) -- (0.5,0);
-\draw[#4] (0.5+0.4*#1/100,0) -- (0-\@y@@x@y@x,0);
+\draw[#2] (0-\Tree@Off@line,0) -- (0-\Tree@Off@line,1.08+0.05*#1/100);
+\draw[#3] (0-\Tree@Off@line,1.08+0.05*#1/100) -- (1.2+\Tree@Off@line,1.08+0.05*#1/100);
+\draw[#4] (1.2+\Tree@Off@line,1.08+0.05*#1/100) -- (1.2+\Tree@Off@line,0);
+\draw[#3] (1.2+\Tree@Off@line,0) -- (0.5,0);
+\draw[#4] (0.5+0.4*#1/100,0) -- (0-\Tree@Off@line,0);
 \else
 \draw[#2] (0,0) -- (0,1);
 \draw[#3] (0,1) -- (1.15,1);
@@ -602,8 +636,9 @@ final with package option tree=on/off;
 % We define \verb|\Basic@Tree@on|; it will be shown if \verb|tree=on|:
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Basic@Tree@on}[5][1=1, usedefault]{{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt \@tkzssmbls@negtrue\fi%
 \def\leaf@or@not@leaf{#5}%
-\@Tree@SetUp[#1]%
+\@Tree@SetUp%
 \pgfarrowsdeclare{leaf}{leaf}%
 {\pgfarrowsleftextend{-.1ex} \pgfarrowsrightextend{-0.05ex}}%
 {%
@@ -614,13 +649,21 @@ final with package option tree=on/off;
 }%
 \colorlet{trunk}{#2}%
 \colorlet{leaf a}{#3}%
-\colorlet{leaf b}{#4}\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex]%
+\colorlet{leaf b}{#4}%
+\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex]%
 \ifx\leaf@or@not@leaf\@leaf@is@leaf%
-\draw[opacity=0,scale=#1+0.1*#1] (-0.82-0.1* #1/100,0) rectangle (0.82+0.1*#1/100, 1.4+0.01*#1/100);
+   \if@tkzssmbls@neg%
+   \draw[opacity=0,scale=#1+0.1*#1] (-0.82+0.1*#1/100,0) rectangle
+   (0.82-0.1*#1/100, 1.4-0.01*#1/100);
+   \else
+   \draw[opacity=0,scale=#1+0.1*#1] (-0.82-0.1*#1/100,0) rectangle
+   (0.82+0.1*#1/100, 1.4+0.01*#1/100);
+   \fi%
 \else
-\draw[opacity=0,scale=#1+0.1*#1] (-0.75,-0.01) rectangle (0.75,1.3);
+ \draw[opacity=0,scale=#1+0.1*#1] (-0.75,-0.01) rectangle (0.75,1.3);
 \fi
-\pgflowlevel{\pgftransformscale{#1+0.02ex}}{\coordinate (root) [grow cyclic,rotate=90] child {
+\pgflowlevel{\pgftransformscale{#1+0.02ex}}{%
+\coordinate (root) [grow cyclic,rotate=90] child {
 child [line cap=round] foreach \a in {0,1, 2} { child foreach \b in {0,1} {
 child foreach \c in {0,1,2} { child foreach \d in {0,1} {
 child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor,-#5] }
@@ -647,13 +690,15 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % You can either use the german commands or the english ones:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Kochtopf}[1][1]{%
-\begin{tikzpicture}[x=2ex,y=2.2ex, line width=0.07ex*#1,scale=#1]
-\draw[rounded corners=0.2ex*#1] (0,0.5) -- (0,0) -- (1,0) -- (1,0.5);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2ex,y=2.2ex, line width=0.07ex*\tkzsymblsscl,scale=#1]
+\draw[rounded corners=0.2ex*\tkzsymblsscl] (0,0.5) -- (0,0) -- (1,0) -- (1,0.5);
 \draw(0,0.4) arc (90:270:0.1);
 \draw(1,0.4) arc (90:-90:0.1);
 \draw (0,0.5) -- (1,0.5) .. controls (1,0.6) and (0,0.6) .. (0,0.5);
 \draw (0.6,0.585) arc (0:180:0.1);
-\draw[decorate,decoration={snake,amplitude=.12ex*#1,segment length=0.93ex*#1}] 
+\draw[decorate,
+decoration={snake,amplitude=.12ex*\tkzsymblsscl,segment length=0.93ex*\tkzsymblsscl}] 
 (0,0.35) -- (1,0.35);
 \draw (0.1,0.25) circle (0.04);
 \draw (0.3,0.2) circle (0.04);
@@ -678,22 +723,21 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % To prevent too thin lines due to scaling I am multiplying  the line width and the corners etc. so that they look the same, no matter how you scale it.
 %    \begin{macrocode}
 \DeclareRobustCommand{\Bratpfanne}[1][1]{%
-\begin{tikzpicture}[x=0.7ex,y=1.4ex, line width=0.07ex*#1, scale=#1]
-\draw[rounded corners=0.07ex*#1] (-1,0) -- (1,0) -- (1.5,0.4) -- (-1.5,0.4) -- cycle;
-\draw[ line width=0.037ex*#1, rounded corners=0.023ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.7ex,y=1.4ex, line width=0.07ex*\tkzsymblsscl, scale=#1,
+decoration={snake,amplitude=.05ex*\tkzsymblsscl,segment length=0.408ex*\tkzsymblsscl}]
+\draw[rounded corners=0.07ex*\tkzsymblsscl] 
+(-1,0) -- (1,0) -- (1.5,0.4) -- (-1.5,0.4) -- cycle;
+\draw[ line width=0.037ex*\tkzsymblsscl, rounded corners=0.023ex*\tkzsymblsscl] 
 (-1.4,0.3) -- (-3.5,0.3) -- (-3.5,0.25) -- (-1.3,0.25);
-\draw[line width=0.023ex*#1] (-1.1,0.1) -- (1.1,0.1);
-\draw[line width=0.035ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}] 
+\draw[line width=0.023ex*\tkzsymblsscl] (-1.1,0.1) -- (1.1,0.1);
+\draw[line width=0.035ex*\tkzsymblsscl, decorate] 
 (-0.3,0.5) -- (-0.3,1);
-\draw[line width=0.035ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}] 
+\draw[line width=0.035ex*\tkzsymblsscl, decorate] 
    (0.3,0.5) -- (0.3,1);
-\draw[line width=0.035ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}] 
+\draw[line width=0.035ex*\tkzsymblsscl, decorate] 
 (-1,0.5) -- (-1,1);
-\draw[line width=0.035ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}] 
+\draw[line width=0.035ex*\tkzsymblsscl, decorate] 
    (1,0.5) -- (1,1);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -707,26 +751,27 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % The next one:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Schneebesen}[1][1]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
 \begin{tikzpicture}[y=2.1ex,x=1.4ex, scale=#1]
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (0.2,0.0) and  (0.2,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (-0.2,0.0) and  (-0.2,0.2) .. 	(0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (-0.1,0.0) and  (-0.1,0.2) .. 	(0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (0.1,0.0) and  (0.1,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (-0.15,0.0) and  (-0.15,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (0.15,0.0) and  (0.15,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (-0.05,0.0) and  (-0.05,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) .. controls (0.05,0.0) and  (0.05,0.2) ..  (0,0.4);
-\draw[line width=0.01ex*(#1-.#1*3)] 
+\draw[line width=0.01ex*(\tkzsymblsscl-\tkzsymblsscl/100*3)] 
    (0,0) --(0,0.4);
-\fill[line width=0.05ex*#1, rounded corners=0.07ex*#1] 
+\fill[line width=0.05ex*\tkzsymblsscl, rounded corners=0.07ex*\tkzsymblsscl] 
    (-0.05,0.37) -- (0.05,0.37) -- (0.05,0.75) -- (-0.05,0.75) -- cycle;
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -741,8 +786,9 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % Now a long one;
 %    \begin{macrocode}
 \DeclareRobustCommand{\Sieb}[1][1]{%
-\begin{tikzpicture}[x=2.8ex, y=2.8ex,line width=0.02ex*#1 ,scale=#1]
-\draw[line width=0.09ex*#1] (-0.2,0) -- (1.01,0);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.8ex, y=2.8ex,line width=0.02ex*\tkzsymblsscl ,scale=#1]
+\draw[line width=0.09ex*\tkzsymblsscl] (-0.2,0) -- (1.01,0);
 \draw (0.2,0) arc (180:360:0.4);
 \draw(0.25,0) arc (180:360:0.35);
 \draw (0.3,0) arc (180:360:0.3);
@@ -786,9 +832,10 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % This symbol is far from perfect. And I know that the correct translation of ``P\"urierstab'' would be ``immersion blender'', but I am just using ``blender'':
 %    \begin{macrocode}
 \DeclareRobustCommand{\Purierstab}[1][1]{%
-\begin{tikzpicture}[x=2.3ex, y=2.2ex, line width=0.07ex*#1,scale=#1]
-\draw[rounded corners=0.07ex*#1] (0,0) -- (0.3,0) --  (0.15,0.1) --cycle;
-\fill[rounded corners=0.07ex*#1]  (0.15,0.3) -- (0.24,0.4) -- (0.24,0.7) -- 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.3ex, y=2.2ex, line width=0.07ex*\tkzsymblsscl,scale=#1]
+\draw[rounded corners=0.07ex*\tkzsymblsscl] (0,0) -- (0.3,0) --  (0.15,0.1) --cycle;
+\fill[rounded corners=0.07ex*\tkzsymblsscl] (0.15,0.3) -- (0.24,0.4) -- (0.24,0.7) -- 
    (0.06,0.7) -- (0.06,0.4) -- cycle;
 \draw (0.15,0.4) -- (0.15,0.1);
 \end{tikzpicture}%
@@ -803,12 +850,13 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % Important for cooking:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Dreizack}[1][1]{%
-\begin{tikzpicture}[x=2.3ex, y=2.2ex, line width=0.035ex*#1,scale=#1]
-\fill[rounded corners=0.07ex*(#1-.#1)] (0,0) -- (0,0.4)  -- (0.1,0.4) 
-   -- (0.1,0.0) -- cycle;
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.3ex, y=2.2ex, line width=0.035ex*\tkzsymblsscl,scale=#1]
+\fill[rounded corners=0.07ex*(\tkzsymblsscl-\tkzsymblsscl/100)] 
+(0,0) -- (0,0.4)  -- (0.1,0.4) -- (0.1,0.0) -- cycle;
 \draw (0.05,0) -- (0.05,0.7);
-\draw[rounded corners=0.07ex*(#1-.#1*#1*2] (0,0.7) -- (0,0.55) 
-   -- (0.05,0.55) -- (0.1,0.55) --  (0.1,0.7);
+\draw[rounded corners=0.07ex*(\tkzsymblsscl-\tkzsymblsscl/100*\tkzsymblsscl*2] 
+(0,0.7) -- (0,0.55)  -- (0.05,0.55) -- (0.1,0.55) --  (0.1,0.7);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -821,11 +869,12 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % I may have too many strange words:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Backblech}[1][1]{%
-\begin{tikzpicture}[x=6.53ex,y=5.ex, line width=0.07ex*#1,scale=#1]
-\filldraw[rounded corners=0.09ex*#1] (0,0) rectangle (0.3,0.3);
-\draw[rounded corners=0.07ex*#1, line width=0.03ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=6.53ex,y=5.ex, line width=0.07ex*\tkzsymblsscl,scale=#1]
+\filldraw[rounded corners=0.09ex*\tkzsymblsscl] (0,0) rectangle (0.3,0.3);
+\draw[rounded corners=0.07ex*\tkzsymblsscl, line width=0.03ex*\tkzsymblsscl] 
    (0.1,0) -- (-0.025,0) -- (-0.025,0.3) -- (0.1,0.3);
-\draw[rounded corners=0.07ex*#1, line width=0.03ex*#1] 
+\draw[rounded corners=0.07ex*\tkzsymblsscl, line width=0.03ex*\tkzsymblsscl] 
    (0.2,0) -- (.325,0) -- (.325,0.3) -- (0.2,0.3);
 \foreach \@BackblechlochX in {0.007,0.293}
 \foreach \@BackblechlochY in {0.007,0.293}
@@ -843,13 +892,14 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % I may have again too many strange words:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Ofen}[1][1]{%
-\begin{tikzpicture}[x=0.50ex,y=.5ex, line width=0.07ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.50ex,y=.5ex, line width=0.07ex*\tkzsymblsscl,scale=#1]
 \draw (0,0) rectangle (4,3);
 \draw (0.25,0.25) rectangle (3.75,2);
 \foreach \@Ofenschalter in {0.5,1.1,2.9,3.5}
 \fill (\@Ofenschalter,2.5) circle (0.22);
 \draw (1.5,2.28) rectangle  (2.5,2.72);
-\draw[line width=0.05ex*#1] (1,1.75) -- (3,1.75);
+\draw[line width=0.05ex*\tkzsymblsscl] (1,1.75) -- (3,1.75);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -862,12 +912,15 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % I can't think of a better word \dots:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Pfanne}[1][1]{%
-\begin{tikzpicture}[x=2.3ex,y=2.3ex, line width=0.09ex*#1,scale=#1]
-\draw [rounded corners=0.023ex*#1](0,0) -- (0.9,0) -- (1,0.3) -- (-0.1,0.3) -- cycle;
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.3ex,y=2.3ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\draw [rounded corners=0.023ex*\tkzsymblsscl]
+   (0,0) -- (0.9,0) -- (1,0.3) -- (-0.1,0.3) -- cycle;
 \draw (-0.2,0.22) -- (-0.08,0.22);
 \draw (0.97,0.22) -- (1.08,0.22);
-\draw[decorate,decoration={snake,amplitude=.046ex*#1,
-   segment length=0.82ex*#1},line width=0.05ex*#1] (-0.05,0.1) -- (0.95,0.1);
+\draw[decorate,decoration={snake,amplitude=.046ex*\tkzsymblsscl,
+   segment length=0.82ex*\tkzsymblsscl},line width=0.05ex*\tkzsymblsscl] 
+   (-0.05,0.1) -- (0.95,0.1);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -880,8 +933,9 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % I hope it' the right translation:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Herd}[1][1]{%
-\begin{tikzpicture}[x=1ex,y=1ex,line width=0.04ex*#1,scale=#1]
-\draw[line width=0.08ex*#1] (0,0) rectangle (2,1.5);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex,y=1ex,line width=0.04ex*\tkzsymblsscl,scale=#1]
+\draw[line width=0.08ex*\tkzsymblsscl] (0,0) rectangle (2,1.5);
 \draw (0.5,0.45) circle (0.35);
 \draw (0.5,0.45) circle (0.2);
 \draw (1.45,0.45) circle (0.3);
@@ -900,14 +954,18 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % It's an old squeezer:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Saftpresse}[1][1]{%
-\begin{tikzpicture}[x=1.2ex,y=1ex,line width=0.07ex*#1,scale=#1]
-\draw[rounded corners=0.1ex*#1] (0,0.85) -- (0,0) -- (1.5,0) -- (1.5,0.85) -- cycle;
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1.2ex,y=1ex,line width=0.07ex*\tkzsymblsscl,scale=#1]
+\draw[rounded corners=0.1ex*\tkzsymblsscl] 
+   (0,0.85) -- (0,0) -- (1.5,0) -- (1.5,0.85) -- cycle;
 \draw (0,0.7) -- (1.5,0.7);
-\draw[rounded corners=0.1ex*#1] (0.3,0.7) -- (0.75,1.55) -- (1.2,0.7);
-\draw[rounded corners=0.1ex*#1] (0.45,0.7) -- (0.75,1.55) -- (1.05,0.7);
-\draw[rounded corners=0.1ex*#1] (0.65,0.7) -- (0.75,1.55) -- (0.85,0.7);
-\draw[line width=0.05ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.48ex*#1}]  (0,0.3) -- (1.5,0.3);
+\draw[rounded corners=0.1ex*\tkzsymblsscl] (0.3,0.7) -- (0.75,1.55) -- (1.2,0.7);
+\draw[rounded corners=0.1ex*\tkzsymblsscl] (0.45,0.7) -- (0.75,1.55) -- (1.05,0.7);
+\draw[rounded corners=0.1ex*\tkzsymblsscl] 
+   (0.65,0.7) -- (0.75,1.55) -- (0.85,0.7);
+\draw[line width=0.05ex*\tkzsymblsscl, decorate,
+   decoration={snake,amplitude=.05ex*\tkzsymblsscl,
+   segment length=0.48ex*\tkzsymblsscl}]  (0,0.3) -- (1.5,0.3);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -921,8 +979,9 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % Wieder dasselbe mit den Umlauten: \"u=u.
 %    \begin{macrocode}
 \DeclareRobustCommand{\Schussel}[1][1]{%
-\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex*#1, scale=#1]
-\draw[rounded corners=0.5ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex,y=1ex,line width=0.07ex*\tkzsymblsscl, scale=#1]
+\draw[rounded corners=0.5ex*\tkzsymblsscl] 
    (-0.02,1.4) -- (0,1.4) -- (0,0.05) -- (1.5,0.05) -- (1.5,1.4) -- (1.52,1.4);
 \draw (0.35,0) -- (1.15,0);
 \end{tikzpicture}
@@ -939,12 +998,14 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % Jedenfalls wieder \"a=a:
 %    \begin{macrocode}
 \DeclareRobustCommand{\Schaler}[1][1]{%
-\begin{tikzpicture}[x=2.7ex,y=2.3ex, line width=0.07ex*#1,scale=#1]
-\draw[rounded corners=0.07ex*#1] (0,0.4) -- (0,0.1) arc (0:180:-0.1) -- (0.2,0.4) 
--- (0.3,0.5) -- (0.3,0.65) -- (0.2,0.65) -- (0.2,0.5) -- (0,0.5) -- (0,0.65) -- 
-(-0.1,0.65) -- (-0.1,0.5)  -- cycle;
-\draw[line width=0.03ex*#1] (0,0.6) -- (0.2,0.6);
-\draw[line width=0.03ex*#1] (0,0.58) -- (0.2,0.58);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.7ex,y=2.3ex, line width=0.07ex*\tkzsymblsscl,scale=#1]
+\draw[rounded corners=0.07ex*\tkzsymblsscl]
+   (0,0.4) -- (0,0.1) arc (0:180:-0.1) -- (0.2,0.4) 
+   -- (0.3,0.5) -- (0.3,0.65) -- (0.2,0.65) -- (0.2,0.5) -- (0,0.5) -- (0,0.65) -- 
+   (-0.1,0.65) -- (-0.1,0.5)  -- cycle;
+\draw[line width=0.03ex*\tkzsymblsscl] (0,0.6) -- (0.2,0.6);
+\draw[line width=0.03ex*\tkzsymblsscl] (0,0.58) -- (0.2,0.58);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -966,21 +1027,23 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % The ``default color'' of the 2D Emoticons is \verb|opacity=0|, it's useful for \verb|\colorbox{yellow}{\Sadey}| which leads to  \colorbox{yellow}{\Sadey} instead of \colorbox{yellow}{\Sadey[][white]} (with default=white).
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Sadey}[2][1=1, 2={opacity=0}, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[#2, line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2, line width=0.1ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \fill (0.1,0.1) circle (0.05);
 \fill (-0.1,0.1) circle (0.05);
-\draw (-0.2,-0.11) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.11);
+\draw (-0.2,-0.15) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.15);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dSadey}[2][1=1,2=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
-\draw[black] (-0.2,-0.11) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.11);
+\draw[black] (-0.2,-0.15) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.15);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -995,9 +1058,10 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % An annoyed Smiley -\_-
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Annoey}[2][1=1,2={opacity=0},usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[#2, line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2, line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \draw (0.08,0.1) -- (0.22,0.1);
 \draw (-0.08,0.1) -- (-0.22,0.1);
 \draw (-0.2,-0.1) -- (0.2,-0.1);
@@ -1005,7 +1069,8 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dAnnoey}[2][1=1,2=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \draw[black] (0.08,0.1) -- (0.22,0.1);
 \draw[black] (-0.08,0.1) -- (-0.22,0.1);
@@ -1022,10 +1087,11 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % A normal Smiley
 %    \begin{macrocode}
 \if@tikzsymbols@marvosym\relax\else%
-\DeclareRobustCommandx{\Smiley}[2][1=1,2={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+ \DeclareRobustCommandx{\Smiley}[2][1=1,2={opacity=0} ,usedefault]{%
+ \set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#2] (0,0) circle (0.33);
+\draw (0,0) circle (0.33);
 \fill (-0.1,0.1) circle (0.05);
 \fill (0.1,0.1) circle (0.05);
 \draw (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
@@ -1034,7 +1100,8 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 }%
 \fi
 \DeclareRobustCommandx{\dSmiley}[3][1=1,2=yellow,3=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
+ \set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+ \begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.1ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
@@ -1050,24 +1117,26 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % A laughing Smiley
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Laughey}[3][1=1,2={opacity=0},3={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2,line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \draw (-0.09,0.06) .. controls (-0.11,0.16) and (-0.17,0.16) .. +(-0.1,0);
 \draw (0.09,0.06) .. controls (0.11,0.16) and (0.17,0.16) .. +(0.1,0);
-\fill[#3,rounded corners=0.1ex*#1, yshift=-0.5] 
+\fill[#3,rounded corners=0.1ex*\tkzsymblsscl, yshift=-0.5] 
 (-0.22,-0.0) .. controls (-0.13,-0.23) and (0.13,-0.23) .. (0.22,-0.0) -- cycle;
-\draw[rounded corners=0.1ex*#1, yshift=-0.5] 
+\draw[rounded corners=0.1ex*\tkzsymblsscl, yshift=-0.5] 
 (-0.22,-0.0) .. controls (-0.13,-0.23) and (0.13,-0.23) .. (0.22,-0.0) -- cycle;
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dLaughey}[3][1=1,2=yellow, 3=red ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[ball color=#2,line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[ball color=#2,line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \draw (-0.09,0.06) .. controls (-0.11,0.16) and (-0.17,0.16) .. +(-0.1,0);
 \draw (0.09,0.06) .. controls (0.11,0.16) and (0.17,0.16) .. +(0.1,0);
-\shade[ball color=#3, rounded corners=0.1ex*#1, yshift=-0.3]
+\shade[ball color=#3, rounded corners=0.1ex*\tkzsymblsscl, yshift=-0.3]
  (-0.25,-0.0) .. controls (-0.13,-0.26) and (0.13,-0.26) .. (0.25,-0.0) -- cycle;
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -1082,9 +1151,10 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % neutral Smiley \verb+:|+
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Neutrey}[2][1=1, 2={opacity=0}, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+ \set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2,line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \fill (0.1,0.1) circle (0.05);
 \fill (-0.1,0.1) circle (0.05);
 \draw (-0.2,-0.1) -- (0.2,-0.1);
@@ -1092,7 +1162,8 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dNeutrey}[2][1=1,2=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
+ \set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
@@ -1110,9 +1181,10 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % ;)
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Winkey}[2][1=1,2={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
-\fill[#2, line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#2] (0,0) circle (0.33);
+\draw(0,0) circle (0.33);
 \draw(0.17,0.1) -- (0.05,0.1);
 \fill (-0.1,0.1) circle (0.05);
 \draw (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.15,-0.2) .. (0.2,0);
@@ -1120,7 +1192,8 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dWinkey}[2][1=1,2=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \draw(0.17,0.1) -- (0.05,0.1);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
@@ -1139,9 +1212,10 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % I can't think of a better name \verb|:S|
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Sey}[2][1=1,2={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
-\fill[#2, line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2, line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
 \fill (0.1,0.1) circle (0.05);
 \fill (-0.1,0.1) circle (0.05);
 \draw (-0.2,-0.08) .. controls (-0.0,-0.2) and (0.0,0) .. (0.2,-0.12);
@@ -1149,7 +1223,8 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dSey}[2][1=1,2=yellow ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
@@ -1161,33 +1236,68 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 %\end{macro}
 %
 
+%\begin{macro}{\Xey \dXey}
+% I can't think of a better name again.
+%    \begin{macrocode}
+\DeclareRobustCommandx{\Xey}[2][1=1, 2={opacity=0}, usedefault]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2, line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw[line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw (0.05,0.05) -- ++ (0.1,0.1);
+\draw (0.15,0.05) -- ++ (-0.1,0.1);
+\draw (-0.05,0.05) -- ++ (-0.1,0.1);
+\draw (-0.15,0.05) -- ++ (0.1,0.1);
+\draw (-0.2,-0.15) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.15);
+\end{tikzpicture}%
+\tikzsymbolsaftersymbolinput%
+}
+\DeclareRobustCommandx{\dXey}[2][1=1, 2={yellow}, usedefault]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[ball color=#2, line width=0.12ex*\tkzsymblsscl] (0,0) circle (0.33);
+\draw (0.05,0.05) -- ++ (0.1,0.1);
+\draw (0.15,0.05) -- ++ (-0.1,0.1);
+\draw (-0.05,0.05) -- ++ (-0.1,0.1);
+\draw (-0.15,0.05) -- ++ (0.1,0.1);
+\draw (-0.2,-0.15) .. controls (-0.1,-0.06) and (0.1,-0.06) .. (0.2,-0.15);
+\end{tikzpicture}%
+\tikzsymbolsaftersymbolinput%
+}
+%    \end{macrocode}
+%\end{macro}
+%
+
 
 %\begin{macro}{\Innocey \dInnocey}
 % An innocent Smiley
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Innocey}[3][1=1,2={opacity=0},3=yellow ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#2] (0,0) circle (0.33);
+\draw (0,0) circle (0.33);
 \fill (-0.1,0.1) circle (0.05);
 \fill (0.1,0.1) circle (0.05);
 \draw (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
-\draw[#3, line width=0.095ex*#1] (0.32,0.31) arc (0:360:0.32 and 0.1);
-\draw[line width=0.05ex*#1] (0.3,0.31) arc (0:360:0.3 and 0.07);
-\draw[line width=0.05ex*#1] (0.35,0.31) arc (0:360:0.35 and 0.12);
+\draw[#3, line width=0.095ex*\tkzsymblsscl] (0.32,0.31) arc (0:360:0.32 and 0.1);
+\draw[line width=0.05ex*\tkzsymblsscl] (0.3,0.31) arc (0:360:0.3 and 0.07);
+\draw[line width=0.05ex*\tkzsymblsscl] (0.35,0.31) arc (0:360:0.35 and 0.12);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommand{\wInnocey}[1][1]{\Innocey[#1][opacity=0][white]}
 \DeclareRobustCommandx{\dInnocey}[3][1=1,2=yellow,3=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
 \draw[black] (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
-\draw[color=#3!97!black, line width=0.09ex*#1] (0.32,0.31) arc (0:360:0.32 and 0.1);
-\draw[line width=0.05ex*#1] (0.3,0.31) arc (0:360:0.3 and 0.07);
-\draw[line width=0.05ex*#1] (0.35,0.31) arc (0:360:0.35 and 0.12);
+\draw[color=#3!97!black, line width=0.09ex*\tkzsymblsscl] 
+   (0.32,0.31) arc (0:360:0.32 and 0.1);
+\draw[line width=0.05ex*\tkzsymblsscl] (0.3,0.31) arc (0:360:0.3 and 0.07);
+\draw[line width=0.05ex*\tkzsymblsscl] (0.35,0.31) arc (0:360:0.35 and 0.12);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
@@ -1201,12 +1311,13 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 %  Don't know what I shall write here.
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Cooley}[2][1=1,2={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
-\fill[rounded corners=0.1ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#2] (0,0) circle (0.33);
+\draw (0,0) circle (0.33);
+\fill[rounded corners=0.1ex*\tkzsymblsscl] 
    (0.24,0.15) -- (0.01,0.15) -- (0.01,0) -- (0.24,0) -- cycle;
-\fill[rounded corners=0.1ex*#1] 
+\fill[rounded corners=0.1ex*\tkzsymblsscl] 
    (-0.24,0.15) -- (-0.01,0.15) -- (-0.01,0) -- (-0.24,0) -- cycle;
 \draw (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
 \draw (0.02,0.1) -- (-0.02,0.1);
@@ -1216,14 +1327,15 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dCooley}[2][1=1,2=yellow,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \draw[black] (0.02,0.1) -- (-0.02,0.1);
 \draw[black] (-0.2,0.1) -- (-0.295,0.146);
 \draw[black] (0.2,0.1) -- (0.295,0.146);
-\shade[ball color=black,rounded corners=0.1ex*#1] 
+\shade[ball color=black,rounded corners=0.1ex*\tkzsymblsscl] 
    (0.24,0.15) -- (0.01,0.15) -- (0.01,0) -- (0.24,0) -- cycle;
-\shade[ball color=black,rounded corners=0.1ex*#1] 
+\shade[ball color=black,rounded corners=0.1ex*\tkzsymblsscl] 
    (-0.24,0.15) -- (-0.01,0.15) -- (-0.01,0) -- (-0.24,0) -- cycle;
 \draw[black] (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
 \end{tikzpicture}%
@@ -1238,30 +1350,32 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % :P
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Tongey}[3][1=1,2={opacity=0},3={opacity=0} ,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.33);
-\draw[line width=0.12ex*#1] (0,0) circle (0.33);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#2] (0,0) circle (0.33);
+\draw (0,0) circle (0.33);
 \fill (-0.1,0.1) circle (0.05);
 \fill (0.1,0.1) circle (0.05);
-\fill[#3,line width=0.058ex*#1, rounded corners=0.12ex*#1] 
+\fill[#3,line width=0.058ex*\tkzsymblsscl, rounded corners=0.12ex*\tkzsymblsscl] 
    (0,-0.09) -- (0.05,-0.2) -- (0.16,-0.23) -- (0.2,-0.15) -- (0.19,-0.03);
-\draw[line width=0.07ex*#1, yshift=0.21ex] 
+\draw[line width=0.07ex*\tkzsymblsscl, yshift=0.21ex] 
    (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
-\draw[line width=0.058ex*#1, rounded corners=0.11ex*#1] 
+\draw[line width=0.058ex*\tkzsymblsscl, rounded corners=0.12ex*\tkzsymblsscl] 
    (0,-0.09) -- (0.05,-0.2) -- (0.16,-0.23) -- (0.2,-0.15) -- (0.19,-0.03);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dTongey}[3][1=1,2=yellow,3=red,usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.33);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
-\shade[ball color=#3,line width=0.058ex*#1, rounded corners=0.12ex*#1] 
+\shade[ball color=#3,line width=0.058ex*\tkzsymblsscl, rounded corners=0.12ex*\tkzsymblsscl] 
    (0,-0.09) -- (0.05,-0.2) -- (0.16,-0.23) -- (0.2,-0.15) -- (0.19,-0.03);
-\draw[black, line width=0.058ex*#1, rounded corners=0.12ex*#1] 
+\draw[black, line width=0.058ex*\tkzsymblsscl, rounded corners=0.12ex*\tkzsymblsscl] 
    (0,-0.09) -- (0.05,-0.2) -- (0.16,-0.23) -- (0.2,-0.15) -- (0.19,-0.03);
-\draw[black, line width=0.07ex*#1, yshift=0.21ex] 
+\draw[black, line width=0.07ex*\tkzsymblsscl, yshift=0.21ex] 
    (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -1275,34 +1389,36 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % a Nurse (the cross has nothing to do with religion).
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Nursey}[4][1=1,2={opacity=0},3={opacity=0},4=black,usedefault]{%
-\begin{tikzpicture}[x=2.3ex, y=2.3ex, line width=0.12ex*#1,scale=#1]
-\fill[#3,rounded corners=.023ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.3ex, y=2.3ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
+\fill[#3,rounded corners=.023ex*\tkzsymblsscl] 
    (-0.3,0) -- (-0.3,0.3) -- (0,0.6) -- (0.3,0.3) -- (0.3,0);
-\fill[#2,line width=0.12ex*#1] (0,0) circle (0.3);
-\draw[line width=0.12ex*#1] (0,0) circle (0.3);
+\fill[#2] (0,0) circle (0.3);
+\draw (0,0) circle (0.3);
 \fill (-0.1,0.1) circle (0.05);
 \fill (0.1,0.1) circle (0.05);
-\draw[line width=0.09ex*#1, yshift=0.07ex] 
+\draw[line width=0.09ex*\tkzsymblsscl, yshift=0.07ex] 
    (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
-\draw[rounded corners=.023ex*#1] 
+\draw[rounded corners=.023ex*\tkzsymblsscl] 
    (-0.3,0) -- (-0.3,0.3) -- (0,0.6) -- (0.3,0.3) -- (0.3,0);
-\draw[#4,line width=.046ex*#1] (0,0.35) -- (0,0.5);
-\draw[#4,line width=.046ex*#1] (-0.05,0.45) -- (0.05,0.45);
+\draw[#4,line width=.046ex*\tkzsymblsscl] (0,0.35) -- (0,0.5);
+\draw[#4,line width=.046ex*\tkzsymblsscl] (-0.05,0.45) -- (0.05,0.45);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dNursey}[4][1=1,2=yellow,3=white,4=red,usedefault]{%
-\begin{tikzpicture}[x=2.3ex, y=2.3ex, line width=0.12ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.3ex, y=2.3ex, line width=0.12ex*\tkzsymblsscl,scale=#1]
 \shade[ball color=#2] (0,0) circle (0.3);
 \shade[ball color=black] (-0.1,0.1) circle (0.05);
 \shade[ball color=black] (0.1,0.1) circle (0.05);
-\draw[black, line width=0.09ex*#1, yshift=0.07ex] 
+\draw[black, line width=0.09ex*\tkzsymblsscl, yshift=0.07ex] 
    (-0.2,-0.1) .. controls (-0.1,-0.2) and (0.1,-0.2) .. (0.2,-0.1);
-\shade[ball color=#3, rounded corners=.023ex*#1,yshift=-0.09ex] 
-   (-0.3,0) -- (-0.3,0.3) -- (0,0.6) -- (0.3,0.3) -- (0.3,0) arc(0:180:0.3);
-\shade[ball color=#4,line width=.046ex*#1] 
+\shade[ball color=#3, rounded corners=.023ex*\tkzsymblsscl,yshift=-0.09ex] 
+   (-0.3,0) -- (-0.3,0.3) -- (0,0.6) -- (0.3,0.3) -- (0.3,0) arc (0:180:0.3);
+\shade[ball color=#4,line width=.046ex*\tkzsymblsscl] 
    (-0.01,0.31) -- (-0.01,0.46) -- (0.01,0.46) -- (0.01,0.31)--cycle;
-\shade[ball color=#4,line width=.046ex*#1] 
+\shade[ball color=#4,line width=.046ex*\tkzsymblsscl] 
    (-0.05,0.4) -- (0.05,0.4) -- (0.05,0.42)--(-0.05,0.42) -- cycle;
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -1317,10 +1433,11 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % *Bl\"a\"argh*
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Vomey}[3][1=1,2={opacity=0},3={opacity=0},usedefault]{%
-\begin{tikzpicture}[x=0.58ex,y=0.58ex, line width=0.09ex*#1,scale=#1]
-\fill[#2,rounded corners=0.05ex*#1]  (0,0)  arc (15:330:1) -- (-0.6,-0.3) -- cycle;
-\draw[rounded corners=0.05ex*#1]  (0,0)  arc (15:330:1) -- (-0.6,-0.3) -- cycle;
-\draw[line width=0.05ex*#1] (-0.5,0.3) -- (-0.3,0.1);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.58ex,y=0.58ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\fill[#2,rounded corners=0.05ex*\tkzsymblsscl]  (0,0)  arc (15:330:1) -- (-0.6,-0.3) -- cycle;
+\draw[rounded corners=0.05ex*\tkzsymblsscl]  (0,0)  arc (15:330:1) -- (-0.6,-0.3) -- cycle;
+\draw[line width=0.05ex*\tkzsymblsscl] (-0.5,0.3) -- (-0.3,0.1);
 \fill (-0.45,0.27) arc (100:350:0.1);
 \fill[#3] (1.8,-0.5)  .. controls (2.5,-0.3) and (2.8,-0.7) .. (2.5,-1) .. 
    controls (3,-1) and (3,-1.7) .. (2,-1.5) .. controls (1.7,-2) and (1,-2) .. (1,-1.5) ..
@@ -1337,10 +1454,11 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dVomey}[3][1=1,2=yellow,3={brown!10!olive},usedefault]{%
-\begin{tikzpicture}[x=0.58ex,y=0.58ex, line width=0.09ex*#1,scale=#1]
-\shade[ball color=#2!90!brown,rounded corners=0.03ex*#1]  
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.58ex,y=0.58ex, line width=0.09ex*\tkzsymblsscl,scale=#1]
+\shade[ball color=#2!90!brown,rounded corners=0.03ex*\tkzsymblsscl]  
    (0,0)  arc (15:330:1) -- (-0.6,-0.3) -- cycle;
-\draw[black, line width=0.05ex*#1] (-0.5,0.3) -- (-0.3,0.1);
+\draw[black, line width=0.05ex*\tkzsymblsscl] (-0.5,0.3) -- (-0.3,0.1);
 \shade[ball color=black] (-0.45,0.27) arc (100:350:0.1);
 \shade[ball color=#3] (1.8,-0.5)  .. controls (2.5,-0.3) and (2.8,-0.7) .. (2.5,-1) ..
  controls (3,-1) and (3,-1.7) .. (2,-1.5) .. controls (1.7,-2) and (1,-2) .. (1,-1.5) .. 
@@ -1358,17 +1476,21 @@ child foreach \leafcolor in {leaf a,leaf b} { edge from parent [color=\leafcolor
 % Well \dots{} this Emoticon should be the visualization of the german saying ``Gegen eine Wand rennen'', which means something like: Not being able to solve a problem.  
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Walley}[3][1=1, 2={opacity=0},3={opacity=0}, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
-\fill[#2, line width=0.08ex*#1] (0,0) circle (0.28);
-\draw[line width=0.08ex*#1] (0,0) circle (0.28);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.15ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
+\fill[#2, line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.28);
+\draw[line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.28);
 \fill[#3] (0.28,-0.33) rectangle (0.66,0.33);
 \draw (0.28,-0.33) rectangle (0.66,0.33);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.05,0.07) --++(0.03,0.02) --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.05,0.07) --++(0.03,0.02) --+
 +(0.03,-0.02) --++(0.03,0.1) --++(0.03,0.02) -- (0.5,0.25);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.06,-0.02) --++(0.04,0.06) --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.06,-0.02) --++(0.04,0.06) --+
 +(0.0,-0.08) --++(0.08,0.06) --++(0.03,-0.02) --+(0.08,0.02) -- (0.6,0.0);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.03,-0.02)  --++(0.03,-0.07)  --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.03,-0.02)  --++(0.03,-0.07)  --+
 +(0.03,-0.01)  --++(0.01,-0.07)  --++(0.06,0.01)  --++(0.03,-0.08)   -- 
 (0.5,0.-0.25);
 \draw[rotate=-20] (0.12,0.1) -- (0.2,0.05);
@@ -1377,44 +1499,50 @@ decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\rWalley}[3][1=1, 2={opacity=0},3={opacity=0}, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
-\fill[#2, line width=0.08ex*#1] (0,0) circle (0.28);
-\draw[line width=0.08ex*#1] (0,0) circle (0.28);
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.15ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
+\fill[#2, line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.28);
+\draw[line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.28);
 \fill[#3] (0.28,-0.33) rectangle (0.66,0.33);
 \draw (0.28,-0.33) rectangle (0.66,0.33);
-\draw[decorate, line width=0.06ex*#1] (0.28,0) -- (0.5,0.25);
-\draw[decorate,line width=0.06ex*#1] (0.28,0) -- (0.6,0.0);
-\draw[decorate,line width=0.06ex*#1] (0.28,0) -- (0.5,-0.25);
+\draw[decorate, line width=0.06ex*\tkzsymblsscl] (0.28,0) -- (0.5,0.25);
+\draw[decorate,line width=0.06ex*\tkzsymblsscl] (0.28,0) -- (0.6,0.0);
+\draw[decorate,line width=0.06ex*\tkzsymblsscl] (0.28,0) -- (0.5,-0.25);
 \draw[rotate=-20] (0.12,0.1) -- (0.2,0.05);
 \draw[rotate=-20] (0.27,-0.1) .. controls (0.2,-0.072) and (0.1,-0.06) .. (0.,-0.1);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dWalley}[2][1=1, 2=yellow, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.15ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
 \shade[ball color=orange!80!black] (0.298,-0.33) rectangle (0.692,0.337);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.05,0.07) --++(0.03,0.02) --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.05,0.07) --++(0.03,0.02) --+
 +(0.03,-0.02) --++(0.03,0.1) --++(0.03,0.02) -- (0.5,0.25);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.06,-0.02) --++(0.04,0.06) --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.06,-0.02) --++(0.04,0.06) --+
 +(0.0,-0.08) --++(0.08,0.06) --++(0.03,-0.02) --+(0.08,0.02) -- (0.6,0.0);
-\draw[line width=0.06ex*#1] (0.28,0) --++(0.03,-0.02)  --++(0.03,-0.07)  --+
+\draw[line width=0.06ex*\tkzsymblsscl] 
+(0.28,0) --++(0.03,-0.02)  --++(0.03,-0.07)  --+
 +(0.03,-0.01)  --++(0.01,-0.07)  --++(0.06,0.01)  --++(0.03,-0.08)   -- (0.5,0.-0.25);
-\shade[ball color=#2, line width=0.08ex*#1] (-0.01,0) circle (0.31);
+\shade[ball color=#2, line width=0.08ex*\tkzsymblsscl] (-0.01,0) circle (0.31);
 \draw[rotate=-20] (0.12,0.1) -- (0.2,0.05);
 \draw[rotate=-20] (0.283,-0.1) .. controls (0.2,-0.072) and (0.1,-0.06) .. (0.,-0.1);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\drWalley}[2][1=1, 2=yellow, usedefault]{%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.15ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
 \shade[ball color=orange!80!black] (0.298,-0.33) rectangle (0.692,0.337);
-\draw[decorate, line width=0.06ex*#1] (0.298,0) -- (0.5,0.25);
-\draw[decorate,line width=0.06ex*#1] (0.298,0) -- (0.6,0.0);
-\draw[decorate,line width=0.06ex*#1] (0.298,0) -- (0.5,-0.25);
-\shade[ball color=#2, line width=0.08ex*#1] (-0.01,0) circle (0.31);
+\draw[decorate, line width=0.06ex*\tkzsymblsscl] (0.298,0) -- (0.5,0.25);
+\draw[decorate,line width=0.06ex*\tkzsymblsscl] (0.298,0) -- (0.6,0.0);
+\draw[decorate,line width=0.06ex*\tkzsymblsscl] (0.298,0) -- (0.5,-0.25);
+\shade[ball color=#2, line width=0.08ex*\tkzsymblsscl] (-0.01,0) circle (0.31);
 \draw[rotate=-20] (0.12,0.1) -- (0.2,0.05);
 \draw[rotate=-20] (0.283,-0.1) .. controls (0.2,-0.072) and (0.1,-0.06) .. (0.,-0.1);
 \end{tikzpicture}%
@@ -1429,27 +1557,30 @@ decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
 % *Miau*
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Cat}[1][1=1,usedefault]{%
-\begin{tikzpicture}[x=2.33ex,y=2.33ex, line width=0.093ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=2.33ex,y=2.33ex, line width=0.093ex*\tkzsymblsscl,scale=#1]
 \draw (0,0) circle (0.3);
-\draw[rounded corners=0.163ex*#1] (-0.3,0) -- (-0.35,0.5) -- (0,0.3);
-\draw[rounded corners=0.163ex*#1] (0,0.3) -- (0.35,0.5) -- (0.3,0);
+\draw[rounded corners=0.163ex*\tkzsymblsscl] (-0.3,0) -- (-0.35,0.5) -- (0,0.3);
+\draw[rounded corners=0.163ex*\tkzsymblsscl] (0,0.3) -- (0.35,0.5) -- (0.3,0);
 \fill (-0.15,.15) circle (0.05);
 \fill (0.15,.15) circle (0.05);
-\draw[rounded corners=0.175ex*#1,yshift=-0.12ex] 
+\draw[rounded corners=0.175ex*\tkzsymblsscl,yshift=-0.12ex] 
    (0,0) -- (0,-0.1) -- (-0.1,-0.095);
-\draw[rounded corners=0.175ex*#1,yshift=-0.12ex] 
+\draw[rounded corners=0.175ex*\tkzsymblsscl,yshift=-0.12ex] 
    (0,0) -- (0,-0.1) -- (0.1,-0.095);
-\draw[rounded corners=.12ex*#1,yshift=-.15ex, line width=0.03em*(#1-.#1)] 
+\draw[rounded corners=.12ex*\tkzsymblsscl,yshift=-.15ex, line width=0.03em*(#1-.#1)] 
 (-0.1,0.1) -- (0,0) -- (0.1,0.1) -- cycle ;
-\draw[line width=0.035ex*#1](-0.1,-0.05)..controls(-0.25,0)and(-0.35,0).. (-0.4,-0.05);
-\draw[line width=0.035ex*#1, ](-0.1,-0.05)..
+\draw[line width=0.035ex*\tkzsymblsscl]
+   (-0.1,-0.05)..controls(-0.25,0)and(-0.35,0).. (-0.4,-0.05);
+\draw[line width=0.035ex*\tkzsymblsscl](-0.1,-0.05)..
    controls(-0.25,-0.01)and(-0.35,-0.09).. (-0.4,-0.14);
-\draw[line width=0.035ex*#1, ](-0.1,-0.05)..
+\draw[line width=0.035ex*\tkzsymblsscl](-0.1,-0.05)..
    controls(-0.25,-0.045)and(-0.35,-0.13).. (-0.4,-0.23);
-\draw[line width=0.035ex*#1](0.1,-0.05)..controls(0.25,0)and(0.35,0).. (0.4,-0.05);
-\draw[line width=0.035ex*#1 ]
+\draw[line width=0.035ex*\tkzsymblsscl]
+   (0.1,-0.05)..controls(0.25,0)and(0.35,0).. (0.4,-0.05);
+\draw[line width=0.035ex*\tkzsymblsscl]
    (0.1,-0.05)..controls(0.25,-0.01)and(0.35,-0.09).. (0.4,-0.14);
-\draw[line width=0.035ex*#1]
+\draw[line width=0.035ex*\tkzsymblsscl]
    (0.1,-0.05)..controls(0.25,-0.045)and(0.35,-0.13).. (0.4,-0.23);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -1462,16 +1593,18 @@ decoration={random steps,segment length=0.15ex*#1, amplitude=0.1ex*#1}]
 % A Ninja.
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Ninja}[4][1=1, 2=black, 3=red, 4=white, usedefault]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
 \def\Black@is@Black{black}%
 \def\Black@or@not@Black{#2}%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.1ex*#1, amplitude=0.1ex*#1}]
-\fill[#2, line width=0.08ex*#1] (0,0) circle (0.33);
-\draw (-0.2,-0.125) -- ++(0.4,0);
-\fill[decoration={random steps,segment length=0.1ex*#1, amplitude=0.01ex*#1}, decorate,#3] 
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.1ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
+\fill[#2, line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.33);
+%\draw (-0.2,-0.125) -- ++(0.4,0);
+\fill[decoration={random steps,segment length=0.1ex*\tkzsymblsscl,
+  amplitude=0.01ex*\tkzsymblsscl}, decorate,#3] 
 (-0.33,0) -- (0.33,0)  -- (0.23,0.23) -- (-0.23,0.23) -- cycle;
 \ifx\Black@or@not@Black\Black@is@Black 
-   \draw[line width=0.08ex*#1] (0,0) circle (0.33);\fi
+   \draw[line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.33);\fi
 \fill[#3] (0,0.1) -- (-0.33,0) -- (-0.26,0.23);
 \fill[#3] (0.3465,0) arc (0:42:0.34 and 0.345)  -- 
   (0.2,0.23)-- (0.31,0.0) -- cycle;
@@ -1479,29 +1612,35 @@ decoration={random steps,segment length=0.1ex*#1, amplitude=0.1ex*#1}]
    (-0.2,0.23)-- (-0.31,0.0) -- cycle;
 \fill[#4] (0.129,0.1425) arc (55:-180:.05);
 \fill[#4] (-0.129,0.1425) arc (-55:180:-.05);
-\draw[ decorate,decoration={snake,amplitude=.1ex*#1,segment length=0.55ex*#1},decorate, #3] 
+\draw[decorate,decoration={snake,amplitude=.1ex*\tkzsymblsscl,
+ segment length=0.55ex*\tkzsymblsscl}, #3] 
   (0.26,0.21) -- (0.5,0.35);
-\draw[ decorate,decoration={snake,amplitude=.1ex*#1,segment length=0.5ex*#1},decorate, #3] 
+\draw[decorate,decoration={snake,amplitude=.1ex*\tkzsymblsscl,
+ segment length=0.55ex*\tkzsymblsscl}, #3] 
   (0.26,0.21) -- (0.53,0.1);
 \ifx\Black@or@not@Black\Black@is@Black
-\else\draw[line width=0.08ex*#1] (0,0) circle (0.33);\fi
+\else\draw[line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.33);\fi
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
 }
 \DeclareRobustCommandx{\dNinja}[4][1=1, 2=black, 3=red, 4=white, usedefault]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
 \def\Black@is@Black{black}%
 \def\Black@or@not@Black{#2}%
-\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*#1,scale=#1,
-decoration={random steps,segment length=0.1ex*#1, amplitude=0.1ex*#1}]
-\draw[ decorate,decoration={snake,amplitude=.1ex*#1,
-segment length=0.55ex*#1},decorate, #3!50!black] (0.26,0.21) -- (0.5,0.35);
-\draw[ decorate,decoration={snake,amplitude=.1ex*#1,
-segment length=0.5ex*#1},decorate, #3!50!black] (0.26,0.21) -- (0.53,0.1);
-\shade[ball color=#2, line width=0.08ex*#1] (0,0) circle (0.347);
-\draw (-0.2,-0.125) -- ++(0.4,0);
+\begin{tikzpicture}[x=2.4ex, y=2.4ex, line width=0.09ex*\tkzsymblsscl,scale=#1,
+decoration={random steps,segment length=0.1ex*\tkzsymblsscl, amplitude=0.1ex*\tkzsymblsscl}]
+\draw[ decorate,decoration={snake,amplitude=.1ex*\tkzsymblsscl,
+segment length=0.55ex*\tkzsymblsscl},decorate, #3!50!black] 
+   (0.26,0.21) -- (0.5,0.35);
+\draw[ decorate,decoration={snake,amplitude=.1ex*\tkzsymblsscl,
+segment length=0.5ex*\tkzsymblsscl},decorate, #3!50!black] 
+   (0.26,0.21) -- (0.53,0.1);
+\shade[ball color=#2, line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.347);
+%\draw (-0.2,-0.125) -- ++(0.4,0);
 \ifx\Black@or@not@Black\Black@is@Black
-   \draw[line width=0.08ex*#1] (0,0) circle (0.33);\fi
-\fill[decoration={random steps,segment length=0.1ex*#1, amplitude=0.01ex*#1},ball color=#3] 
+   \draw[line width=0.08ex*\tkzsymblsscl] (0,0) circle (0.33);\fi
+\fill[decoration={random steps,segment length=0.1ex*\tkzsymblsscl,
+ amplitude=0.01ex*\tkzsymblsscl},ball color=#3] 
 decorate  {(-0.33,0) -- (0.3465,0)  }
   	     {arc (0:42:0.34 and 0.345)}
 decorate  {-- (-0.25,0.24)}
@@ -1524,18 +1663,19 @@ decorate  {-- (-0.25,0.24)}
 % But it's better than nothing
 %    \begin{macrocode}
 \DeclareRobustCommandx{\NiceReapey}[1][1=1,usedefault]{%
-\begin{tikzpicture}[x=0.11em,y=0.11em, line width=0.07ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.11em,y=0.11em, line width=0.07ex*\tkzsymblsscl,scale=#1]
 \draw (1.7,-1) arc (360:180:1.7 and 2)
    arc (260:110:1.5 and 2) .. controls (-1,3.3) and (1,3.3) .. (1.9,2.97)  
    arc (260:100:-1.3 and -2) -- cycle;
 \fill[black!20!white] (3,3) .. controls (5,3) and (6,2) .. (7,1.5) -- (3,1.5) -- cycle;
 \draw (3,-3) -- (3,3) .. controls (5,3) and (6,2) .. (7,1.5) -- (3,1.5);
 \draw (0,-1.5) circle (1 and 0.5);
-\draw[line width=0.04ex*#1] (-0.2,-1) -- (-0.2,-2);
-\draw[line width=0.04ex*#1] (0.2,-1) -- (0.2,-2);
-\draw[line width=0.04ex*#1] (0.6,-1) -- (0.6,-2);
-\draw[line width=0.04ex*#1] (-0.6,-1) -- (-0.6,-2);
-\draw[line width=0.04ex*#1] (-1,-1.5) -- (1,-1.5);
+\draw[line width=0.04ex*\tkzsymblsscl] (-0.2,-1) -- (-0.2,-2);
+\draw[line width=0.04ex*\tkzsymblsscl] (0.2,-1) -- (0.2,-2);
+\draw[line width=0.04ex*\tkzsymblsscl] (0.6,-1) -- (0.6,-2);
+\draw[line width=0.04ex*\tkzsymblsscl] (-0.6,-1) -- (-0.6,-2);
+\draw[line width=0.04ex*\tkzsymblsscl] (-1,-1.5) -- (1,-1.5);
 \fill (1.25,1.25) circle ( 0.5 and 0.75);
 \fill (-1.25,1.25) circle ( 0.5 and 0.75);
 \end{tikzpicture}%
@@ -1551,12 +1691,14 @@ decorate  {-- (-0.25,0.24)}
 % My first symbol: a person.
 % In german it would be called ``Strichmaxerl''.
 %    \begin{macrocode}
-\DeclareRobustCommand{\Person}[1][1]{%
- \begin{tikzpicture}[line width=0.12ex*#1,scale=#1,x=1.35ex,y=1.35ex]%
- \draw (0,-0.1) -- (0.15,0.2) -- (0.3,-0.1);
+\DeclareRobustCommandx{\Person}[5][1=1,2=-22,3=22,4=27,5=-27,usedefault]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+ \begin{tikzpicture}[line width=0.12ex*\tkzsymblsscl, scale=#1, x=1.35ex, y=1.35ex]
+ \draw[rotate around={#5:(0.15,0.2)}]  (0.15,0.2) -- (0.15,-0.14);
+ \draw[rotate around={#4:(0.15,0.2)}]  (0.15,0.2) -- (0.15,-0.14);
  \draw (.15,.2) -- (.15,.4);
- \draw (.15,.4) -- (.4,.5);
- \draw (.15,.4) -- (-0.1,.5);
+ \draw[rotate around={#3:(.15,.4)}] (.15,.4) -- (.42,.4);
+ \draw[rotate around={#2:(.15,.4)}] (.15,.4) -- (-0.12,.4);
  \draw (.15, .4) -- (.15, .53);
  \draw (.15,.8) circle (0.18);
 \end{tikzpicture}%
@@ -1569,12 +1711,13 @@ decorate  {-- (-0.25,0.24)}
 % A burning candle
 %    \begin{macrocode}
 \DeclareRobustCommand{\Candle}[1][1]{%
-\begin{tikzpicture}[x=1ex, y=1ex, scale=#1, line width=0.07ex*#1]
-\draw[rounded corners=0.04ex*#1] (0,0) -- (0.2,0) -- +(0,1) -- (0,1) -- cycle;
-\draw[line width=0.05ex*#1] (0.1,1) -- (0.1,1.2);
-\draw[xshift=0.95, yshift=2.2, line width=0.04ex*#1] 
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex, y=1ex, scale=#1, line width=0.07ex*\tkzsymblsscl]
+\draw[rounded corners=0.04ex*\tkzsymblsscl] (0,0) -- (0.2,0) -- +(0,1) -- (0,1) -- cycle;
+\draw[line width=0.05ex*\tkzsymblsscl] (0.1,1) -- (0.1,1.2);
+\draw[xshift=0.95, yshift=2.2, line width=0.04ex*\tkzsymblsscl] 
    (-0.1,0.6) .. controls (-0.4,0.8) and (-0.1,1) ..  (-0.1,1.2);
-\draw [xshift=0.95, yshift=2.2, line width=0.04ex*#1] 
+\draw [xshift=0.95, yshift=2.2, line width=0.04ex*\tkzsymblsscl] 
    (-0.1,0.6) .. controls (0.2,0.8) and (-0.1,1) ..  (-0.1,1.2);
 \end{tikzpicture}%
 \tikzsymbolsaftersymbolinput%
@@ -1587,7 +1730,8 @@ decorate  {-- (-0.25,0.24)}
 % Just a fire.
 %    \begin{macrocode}
 \DeclareRobustCommand{\Fire}[1][1]{%
-\begin{tikzpicture}[x=1ex,y=1ex,  line width=0.07ex*#1,rotate=45, scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex,y=1ex,  line width=0.07ex*\tkzsymblsscl,rotate=45, scale=#1]
 \fill (-0.05,0) -- (0.05,0) -- (0.05,0.95) -- (-0.05,0.95) -- cycle;
 \fill (-0.74,0.7) -- (0.19,0.7) -- (0.19,0.8) -- (-0.74,0.8) -- cycle;
 \fill[rotate=-20, xshift=-1.3, yshift=-0.1] 
@@ -1596,9 +1740,9 @@ decorate  {-- (-0.25,0.24)}
   (-0.05,0.07) -- (0.05,0.07) -- (0.05,0.9) -- (-0.05,0.9) -- cycle;
 \fill[rotate=135, xshift=2.5, yshift=-3.8] 
   (-0.05,0.07) -- (0.05,0.07) -- (0.05,0.9) -- (-0.05,0.9) -- cycle;
-\draw[rotate=-45, xshift=-2.6, yshift=1.5,line width=0.04ex*#1, x=0.5ex, y=0.5ex] 
+\draw[rotate=-45, xshift=-2.6, yshift=1.5,line width=0.04ex*\tkzsymblsscl, x=0.5ex, y=0.5ex] 
 (-0.1,0.29) .. controls (-0.7,0.6) and (0,1.2) ..  (0.05,1.7);
-\draw[rotate=-45, xshift=-2.1,yshift=1.5,line width=0.04ex*#1, x=0.5ex, y=0.5ex] 
+\draw[rotate=-45, xshift=-2.1,yshift=1.5,line width=0.04ex*\tkzsymblsscl, x=0.5ex, y=0.5ex] 
 (-0.1,0.29) .. controls (0.7,0.6) and (-0.1,1.2) ..  (-0.15,1.7);
 \draw[rotate=-45, xshift=-2.5] (-0.1,0.29) .. controls (-0.7,0.6) and (0,1.2) ..  (0,1.5);
 \draw[rotate=-45, xshift=-2] (-0.1,0.29) .. controls (0.7,0.6) and (-0.1,1.2) ..  (-0.1,1.5);
@@ -1614,17 +1758,16 @@ decorate  {-- (-0.25,0.24)}
 %    \begin{macrocode}
 \if@tikzsymbols@marvosym\relax\else%
 \DeclareRobustCommand{\Coffeecup}[1][1]{%
-\begin{tikzpicture}[x=0.7ex,y=0.7ex, scale=#1, line width=0.07ex*#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.7ex,y=0.7ex, scale=#1, line width=0.07ex*\tkzsymblsscl,
+decoration={snake,amplitude=.05ex*\tkzsymblsscl,segment length=0.408ex*\tkzsymblsscl}]
 \draw (0,0) arc (180:269:0.8 and 1) -- ++(0.5,0) arc (269:360:0.8 and 1) -- cycle;
 \draw (2.1,-0.15) -- (2.2,-0.15) arc (90:-90:0.3) -- (1.8, -0.75);
-\draw[line width=0.05ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}]
+\draw[line width=0.05ex*\tkzsymblsscl, decorate]
    (0.4,0.3) -- +(0,1);
-\draw[line width=0.05ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}]
+\draw[line width=0.05ex*#1, decorate]
    (1,0.3) -- +(0,1);
-\draw[line width=0.05ex*#1, decorate,
-   decoration={snake,amplitude=.05ex*#1,segment length=0.408ex*#1}]
+\draw[line width=0.05ex*#1, decorate]
    (1.6,0.3) -- +(0,1);
 \draw (0,-1.05) -- (2.1,-1.05);
 \end{tikzpicture}%
@@ -1638,10 +1781,12 @@ decorate  {-- (-0.25,0.24)}
 % A chair.
 %    \begin{macrocode}
 \DeclareRobustCommand{\Chair}[1][1]{%
-\begin{tikzpicture}[x=0.9ex,y=0.9ex, scale=#1, line width=0.07ex*#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1} \@tkzssmbls@negtrue\fi%
+\begin{tikzpicture}[x=0.9ex,y=0.9ex, scale=#1, line width=0.07ex*\tkzsymblsscl]
 \draw (0,-0.5) -- (0,0.7) -- (0.5,1) -- (0.5,0.25);
-\draw[line width=0.06ex*#1] (0,0.4) -- (0.5,0.7);
+\draw[line width=0.06ex*\tkzsymblsscl] (0,0.4) -- (0.5,0.7);
 \draw (0,0) -- (0.5,0.3) -- (1,0) --(1,-0.5);
+\if@tkzssmbls@neg\draw (0.5,0.3) -- +(0,-0.5);\fi
 \draw (0.5,-0.3) -- (0.5,-0.8);
 \draw (1,0) -- (0.5,-0.3) -- (0,0);
 \end{tikzpicture}%
@@ -1654,7 +1799,8 @@ decorate  {-- (-0.25,0.24)}
 % A chair.
 %    \begin{macrocode}
 \DeclareRobustCommand{\Bed}[1][1]{%
-\begin{tikzpicture}[x=1ex,y=1ex, scale=#1, line width=0.08ex*#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex,y=1ex, scale=#1, line width=0.08ex*\tkzsymblsscl]
 \draw (0,0) -- (0,1.6);
 \draw (3,0) -- (3,1.2);
 \draw (0,0.5) -- (3,0.5);
@@ -1667,13 +1813,21 @@ decorate  {-- (-0.25,0.24)}
 %    \end{macrocode}
 %\end{macro}
 
-%\begin{macro}{\Bed}
+%\begin{macro}{\Tribar}
 % Also called Penrose-Triangle
 %    \begin{macrocode}
-\DeclareRobustCommand{\Tribar}[1][1]{%
-\begin{tikzpicture}[x=0.65ex,y=0.65ex,scale=#1,rounded corners=0.03ex*#1, line width=0.06ex*#1]
+\DeclareRobustCommandx{\Tribar}[4][1=1,2={opacity=0},3={opacity=0},4={opacity=0},usedefault]
+{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.65ex,y=0.65ex,scale=#1,
+   rounded corners=0.03ex*\tkzsymblsscl, line width=0.06ex*\tkzsymblsscl]
+\fill[#2] (0.15,0.3) -- (-0.15,-0.3) -- (1.75,-0.3) -- ++ (-0.15,-0.3) 
+   -- (-0.65,-0.6) -- (0.35,1.3) -- +(0.15,-0.3);
+\fill[#3] (0,0) -- (1.3,0) -- (0.35,1.9) -- (0.65,1.9) -- (1.75,-0.3) -- (-0.1,-0.3);
+\fill[#4]  (1,0) -- (0.35,1.3) --  (-0.65,-0.6) -- ++ (-0.15,0.3) -- (0.35,1.9) -- (1.3,0);
 \draw (0,0) -- (1,0) -- (0.5,1) -- cycle;
-\draw (0.15,0.3) -- (-0.15,-0.3) -- (1.75,-0.3) -- ++ (-0.15,-0.3) -- (-0.65,-0.6) -- (0.35,1.3) -- (0.8,.4);
+\draw (0.15,0.3) -- (-0.15,-0.3) -- (1.75,-0.3) -- ++ (-0.15,-0.3) 
+   -- (-0.65,-0.6) -- (0.35,1.3) -- (0.8,.4);
 \draw (0.9,0) -- (1.3,0) -- (0.35,1.9) -- (0.65,1.9) -- (1.75,-0.3) -- +(-.05,-0.1);
 \draw (-0.6,-0.6) -- (-0.65,-0.6) -- ++ (-0.15,0.3) -- (0.35,1.9) -- (0.4,1.9);
 \end{tikzpicture}%
@@ -1682,56 +1836,37 @@ decorate  {-- (-0.25,0.24)}
 %    \end{macrocode}
 %\end{macro}
 
-%
-%\begin{macro}{\tikzsymbolsMoaiscale}
-%\begin{macro}{\tikzsymbolsMoaithickness}
-%\begin{macro}{\tikzsymbolsMoaiCheckI}
-%\begin{macro}{\tikzsymbolsMoaiCheckII}
-% *sight* \verb|\ifnum| cannot compare decimals and to make it possible to scale Moai with decimals (e.g. 0.6, 2.6, 9.345234) I had to define lengths, because \LaTeX{} can compare decimals in lenghts.
-%
-% At first we define the length \verb|\tikzsymbolsMoaiscale|: it will contain the scaling number.
-%
-% At second \verb|\tikzsymbolsMoaithickness|: the line width of the Moai; depends on \verb|\tikzsymbolsMoaiscale|.
-%
-% \verb|\tikzsymbolsMoaiCheckI| and \verb|\tikzsymbolsMoaiCheckII|: to be able to ``check'' if \verb|\tikzsymbolsMoaiscale| is greater than 2 or 5 or not.
-%    \begin{macrocode}
-\newlength{\tikzsymbolsMoaiscale}
-\newlength{\tikzsymbolsMoaithickness}
-\newlength{\tikzsymbolsMoaiCheckI}\setlength{\tikzsymbolsMoaiCheckI}{2ex}
-\newlength{\tikzsymbolsMoaiCheckII}\setlength{\tikzsymbolsMoaiCheckII}{5ex}
-%    \end{macrocode}
-%\end{macro}
-%\end{macro}
-%\end{macro}
-%\end{macro}
 
 %
 %\begin{macro}{\Moai}
 % From the Easter Island: a Moai.
 %    \begin{macrocode}
 \DeclareRobustCommandx{\Moai}[1][1=1,usedefault]{%
-\setlength{\tikzsymbolsMoaiscale}{#1ex}%
-\ifnum \tikzsymbolsMoaiscale<\tikzsymbolsMoaiCheckI%
-\setlength{\tikzsymbolsMoaithickness}{0.05ex}%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\ifdim \tkzsymblsscl<2pt%
+\def\tikzsymbolsMoaithickness{0.05ex}%
 \else%
-\ifnum \tikzsymbolsMoaiscale<\tikzsymbolsMoaiCheckII%
-\setlength{\tikzsymbolsMoaithickness}{0.035ex}%
+\ifdim \tkzsymblsscl<5pt%
+\def\tikzsymbolsMoaithickness{0.035ex}%
 \else%
-\setlength{\tikzsymbolsMoaithickness}{0.03ex}%
+\def\tikzsymbolsMoaithickness{0.03ex}%
 \fi\fi%
-\begin{tikzpicture}[x=.13ex, y=.13ex, rounded corners=0.01ex,scale=#1, 
-    line width=\tikzsymbolsMoaithickness*#1]
+\begin{tikzpicture}[x=.13ex, y=.13ex, rounded corners=0.01ex*\tkzsymblsscl, scale=#1, 
+    line width=\tikzsymbolsMoaithickness*\tkzsymblsscl]
 \draw  (-2.6,-4.25) --  (-2.5,-5.8) 
 ..controls (-2,-6.8) and (1.5,-6.8) ..  (2.2,-5.8) -- (2.4,-3.95);
 \draw(-2.5,2.5) .. controls (-2.9,4.6) and (2,5) .. (3.3,2.5) -- (2.9,-3.4)
 .. controls (2,-5) and (-4,-5) .. (-3.1,-3) -- cycle;
 \draw (-2.5,3) -- (-2,5) .. controls (0,6) and (2,5.8) .. (3.1,4.7) -- (3.3,2.5);
-\draw[line width=0.02ex*#1] (-2.2,-1.8) .. controls (-1,-1.3) and (0,-1.7) .. (1,-2);
-\draw[line width=0.02ex*#1] (-2.2,-1.8) .. controls (-1,-1) and (0,-1.4) .. (1,-2);
-\draw[line width=0.02ex*#1] (-2.2,-1.8) .. controls (-1,-2) and (0,-2) .. (1,-2);
+\draw[line width=0.02ex*\tkzsymblsscl] 
+   (-2.2,-1.8) .. controls (-1,-1.3) and (0,-1.7) .. (1,-2);
+\draw[line width=0.02ex*\tkzsymblsscl] 
+   (-2.2,-1.8) .. controls (-1,-1) and (0,-1.4) .. (1,-2);
+\draw[line width=0.02ex*\tkzsymblsscl] 
+   (-2.2,-1.8) .. controls (-1,-2) and (0,-2) .. (1,-2);
 \draw (-0.8,4) .. controls (-0.8,3) and (-0.8,2) ..  (-1.6,0.5) -- (-1.8,-0.4)
-.. controls (-1,0.2) and (0,0.2) ..  (0.6,-0.4) -- (0.7,0.4)
-.. controls (0,1) and (0,2) .. (0.8,4);
+   .. controls (-1,0.2) and (0,0.2) ..  (0.6,-0.4) -- (0.7,0.4)
+   .. controls (0,1) and (0,2) .. (0.8,4);
 \draw (-1.8,-0.4) .. controls (-0.5,-0.5) and (0,-0.5) .. (0.6,-0.4);
 \draw (3.2,3.5) -- (3.7,3.5) .. controls (3.5,2) and (3.5,2) .. (3.6,-1.5) -- (3,-1.9);
 \draw (-2.5,3) .. controls (-2.7,2) and (-3,1) .. (-2.88,-1);
@@ -1743,6 +1878,52 @@ decorate  {-- (-0.25,0.24)}
 %    \end{macrocode}
 %\end{macro}
 
+%\begin{macro}{\Snowman}
+% A snowman. I think his smile is scary.
+%    \begin{macrocode}
+\DeclareRobustCommand{\Snowman}[1][1]{%
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=0.9ex,y=0.9ex,line width=0.07ex*\tkzsymblsscl, scale=#1]
+\draw (0,0) circle (0.4 and 0.35);
+\draw[line width=0.06ex*\tkzsymblsscl] (0,0.64) circle (0.3 and 0.28);
+\draw[line width=0.05ex*\tkzsymblsscl] (0,1.14) circle (0.2 and 0.2);
+\draw[rounded corners=0.1ex*\tkzsymblsscl,line width=0.05ex*\tkzsymblsscl,
+   rotate around={-30:(0,1.14)}] 
+   (-0.2,1.15) -- ++(0,0.35) -- +(0.4,0) -- (0.2,1.14);
+\draw[rounded corners=0.07ex*\tkzsymblsscl,line width=0.05ex*\tkzsymblsscl,
+    rotate around={-30:(0,1.14)}]
+    (-0.2,1.19) arc (270:90:0.1);
+\fill (0,0.78) circle (0.04);
+\fill (0,0.63) circle (0.04);
+\fill (0,0.48) circle (0.04);
+\fill (0,0.2) circle (0.05);
+\fill (0,0) circle (0.05);
+\fill (0,-0.2) circle (0.05);
+\fill (-0.06,1.18) circle (0.045);
+\fill (0.06,1.18) circle (0.045);
+\fill (0.1,1.08) circle (0.015);
+\fill (-0.1,1.08) circle (0.015);
+\fill (0.06,1.055) circle (0.015);
+\fill (-0.06,1.055) circle (0.015);
+\fill (0.02,1.039) circle (0.015);
+\fill (-0.02,1.039) circle (0.015);
+\draw (-0.3,0.7) -- (-0.6,0.8); 
+\draw (-0.6,0.8) -- (-0.75,0.7);
+\draw (-0.6,0.8) -- (-0.55,1);
+\draw (-0.6,0.8) -- (-0.8,0.9);
+\draw[line width=0.06ex*\tkzsymblsscl] (-0.65,0) -- (-0.65,1);
+\foreach\x in {-0.85, -0.75,-0.65,-0.55,-0.45}
+\draw[line width=0.05ex*\tkzsymblsscl] (-0.65,1) -- (\x,1.3);
+\draw (0.3,0.7) -- (0.6,0.8); 
+\draw (0.6,0.8) -- (0.75,0.7);
+\draw (0.6,0.8) -- (0.6,1);
+\draw (0.6,0.8) -- (0.8,0.9);
+\end{tikzpicture}%
+\tikzsymbolsaftersymbolinput%
+}
+%    \end{macrocode}
+%\end{macro}
+
 
 %
 % \subsection{Trees}
@@ -1762,7 +1943,7 @@ decorate  {-- (-0.25,0.24)}
 \ifx\\#5\\%
 \Basic@Tree[#1]{#2}{#3}{#4}{#5}\tikzsymbolsaftersymbolinput%
 \else%
-\PackageError{tikzsymbols}{The last parameter has either to be \MessageBreak 
+\PackageError{tikzsymbols}{The last\MessageBreak parameter has either to be \MessageBreak 
 `leaf` or has to be empty}{See the tikzsymbols documentation. Section ``Trees''.}%
 \fi\fi%
 }
@@ -1774,7 +1955,8 @@ decorate  {-- (-0.25,0.24)}
 % An extremly bad Tree. It's really worst.
 %    \begin{macrocode}
 \DeclareRobustCommand{\WorstTree}[1][1]{%
-\begin{tikzpicture}[x=1ex,y=1ex, line width=0.04ex*#1,scale=#1]
+\set@tkzsymblsscl{#1}\ifdim\tkzsymblsscl<0pt\set@tkzsymblsscl{-#1}\fi%
+\begin{tikzpicture}[x=1ex,y=1ex, line width=0.04ex*\tkzsymblsscl,scale=#1]
 \fill[brown] (-0.3,0) .. controls (0.2,0.3) and (0.2,0.7) .. (0.2,1) -- (0.5,1) .. 
    controls (0.5,0.7) and (0.5,0.3) .. (1,0);
 \draw (-0.3,0) .. controls (0.2,0.3) and (0.2,0.7) .. (0.2,1) -- (0.5,1) .. 
@@ -1828,8 +2010,10 @@ decorate  {-- (-0.25,0.24)}
 \AtBeginDocument{
 \if@tikzsymbols@marvosym
 \@ifpackageloaded{marvosym}{}{%
-\PackageError{tikzsymbols}{Use option 'marvosym' only if you load package 'marvosym'}
-{Either load package 'marvosym' or delete the tikzsymbols option 'marvosym'}}
+\PackageError{tikzsymbols}{Use option 'marvosym' only\MessageBreak 
+if you load package 'marvosym'}
+{Either load package 'marvosym' or\MessageBreak 
+delete the tikzsymbols option 'marvosym'}}
 \fi
 }
 %    \end{macrocode}
-- 
cgit v1.2.3