L'expérience de Franck et Hertz, dessinée avec PSTricks, par Thomas Söll et Gilg Jürgen

L'expérience de Franck et Hertz, joliment dessinée avec PSTricks, par Thomas Söll et Gilg Jürgen :

 Les fichiers (franck-hertz.tex franck-hertz.tex) sont inclus dans l'archive:

Thomas.Soell.zip

ou :

\documentclass{article}
\usepackage{amsmath,amssymb}
\usepackage{pst-circ,pst-grad}
\usepackage[a4paper,margin=2cm]{geometry}
% Expérience de Franck et Hertz
\begin{document}
\psset{unit=0.75}
\definecolor{Glasblau}{rgb}{0.1176,0.5647,1}% Dodger blau
%--------- Definition eines Zylinders mit Gradientenf\"{u}llung -----------------------------
\newcommand{\Zylinder}[9]{%  #1 L\"{a}nge, #2 Radius, #3 gradbegin, #4 gradend, #5 gradmidpoint
\pscustom[dimen=#9,fillstyle=gradient,gradbegin=#3,gradend=#4,gradmidpoint=#5,gradangle=90,linecolor=#6,linewidth=#7,linestyle=#8]{%
\psellipticarc(0,0)(!#2 #2 0.3 mul){180}{360}
\psellipticarcn(0,#1)(!#2 #2 0.3 mul){0}{-180}
\closepath
}
\psellipse[fillstyle=solid,fillcolor=#6,linestyle=none](0,#1)(!#2 #2 0.3 mul)
}
%-----------------------------------------------------------------------------------------
\begin{pspicture}[showgrid=false](-1,0)(16,15)
%----------- Kasten ---------------------------
\pnode(1,1){A}
\pnode(7,1){B}
\pnode(7,12){C}
\pnode(1,12){D}
\pnode(2,2){A1}
\pnode(8,2){B1}
\pnode(8,13){C1}
\pnode(2,13){D1}
\psframe[fillstyle=solid,fillcolor=gray!50,linestyle=none](A1)(C1)
\pspolygon[fillstyle=solid,fillcolor=gray!30,linestyle=none](A)(A1)(D1)(D)
\pspolygon[fillstyle=solid,fillcolor=black!70,linestyle=none,opacity=0.7](B)(B1)(C1)(C)
\pspolygon[fillstyle=solid,fillcolor=gray!50,linestyle=none,opacity=0.4](D)(C)(C1)(D1)
%----------- Thermometer und Anzeige --------------------
\pspolygon[linearc=0.1,dimen=outer,fillstyle=gradient,gradbegin=black,gradend=white,gradmidpoint=0.63,gradangle=45,linestyle=none]%
(4,12.55)(4.4,12.95)(4.4,13.9)(2.48,13.9)(2.,13.45)(2,13)
\psframe[fillstyle=solid,fillcolor=gray!30,framearc=0.2,linecolor=black!50,linewidth=0.6pt](2,12.5)(4,13.5)
\psframe[fillstyle=solid,fillcolor=white,framearc=0.2,linecolor=black!50,linewidth=0.6pt](2.1,12.6)(3.9,13.4)
\psframe[fillstyle=solid,fillcolor=black,framearc=0.05,linestyle=none](2.25,12.75)(3.3,13.25)
\rput(3.6,13){\small $^{\circ}\text{C}$}
%--------------- Digits ------------------------------------------------------
\rput(2.52,13){%
\rput{80}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{-100}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
}
\rput(2.65,13){%
\rput{80}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{-100}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0.025,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0.05,0.16){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0,-0.16){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{-100}(0.22,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
}
\rput(2.98,13){%
\rput{80}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
%\rput{-100}(0,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0.025,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0.05,0.16){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{0}(0,-0.16){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
\rput{-100}(0.22,0){\psline[linewidth=1.0pt,linecolor=orange]{cc-cc}(0.005,0)(0.165,0)}
}
%-----------------------------------------------------------------------------------
\rput{-90}(4.3,13.1){\Zylinder{0.2}{0.1}{red!80}{red!10}{0.3}{red}{1pt}{none}{middle}}
\rput(6.5,11.0){\Zylinder{1.25}{.2}{black!40}{gray!30}{0.3}{black!70}{1pt}{none}{middle}}
\rput(6.5,12.25){\Zylinder{1.25}{.2}{black!80}{gray!10}{0.3}{gray!30}{1pt}{none}{middle}}
\psellipticarcn[linewidth=0.5pt,linecolor=gray!30](6.5,12.25)(!0.202 0.202 0.3 mul){360}{180}
\rput(6.5,13.5){\Zylinder{0.25}{.08}{black!80}{gray!10}{0.3}{gray!30}{1pt}{none}{middle}}
\psbezier[linewidth=1.2pt,linecolor=black!40]{cc-cc}(4.5,13.1)(5.7,13.0)(6.4,14.3)(6.5,13.75)
%----------- Sockel mit unteren Anschl\"{u}ssen -----------
\rput(4.5,2.25){\Zylinder{0.5}{0.2}{black!80}{gray!10}{0.3}{gray!90}{1pt}{none}{middle}}
\rput(4,2.35){\Zylinder{0.5}{0.06}{black!80}{gray!10}{0.3}{gray!90}{1pt}{none}{middle}}
\rput(5,2.35){\Zylinder{0.5}{0.06}{black!80}{gray!10}{0.3}{gray!90}{1pt}{none}{middle}}
\rput(4.5,3){\Zylinder{2}{1.15}{black!80}{gray!10}{0.3}{black!70}{1pt}{solid}{outer}}
%----------- Spitze der R\"{o}hre -------------------
\rput(4.5,10){%
\pscustom[dimen=outer,fillstyle=gradient,gradbegin=Glasblau!20,gradend=Glasblau!60,gradmidpoint=0.2,gradangle=-30,linecolor=gray!10,linewidth=1pt]{%
\psellipticarc(0,0.1)(!1.05 1.05 0.3 mul){185}{355}
\psbezier(1,0.65)(0,0.65)(0,1)
\psbezier(0,0.65)(-1,0.65)(-1,0)
\closepath
}
}
%-------------- R\"{o}hre mit F\"{u}llung -----------------------------
\rput(4.5,5){%
\pscustom[dimen=outer,fillstyle=gradient,gradbegin=Glasblau!50,gradend=white,gradmidpoint=0.75,gradangle=-90,linecolor=gray!10,linewidth=1pt]{%
\psellipticarc(0,0)(!1 1 0.3 mul){180}{360}
\psellipticarcn(0,5.1)(!1.05 1.05 0.3 mul){355}{185}
\closepath
}
}
%---------- Anode, Gitter, Kathode-----------------------
%
%---------- Kathode und Draht + Durchgang ----------------------------------------------
\psellipse[fillstyle=gradient,gradbegin=black!40,gradend=black!30,gradmidpoint=0.75,gradangle=-30,linestyle=none](4.5,5)(!0.94 0.94 0.27 mul)
\psellipse[fillstyle=gradient,gradbegin=Glasblau!60,gradend=Glasblau!20,gradmidpoint=0.75,gradangle=-30,linecolor=Glasblau!80,linewidth=1pt]%
(4.5,5)(!0.4 0.4 0.25 mul)
\psline[linecolor=black!40,linewidth=1pt](4.4,4.92)(4.4,6)
\psline[linecolor=black!40,linewidth=1pt](4.6,4.92)(4.6,6)
\rput(4.5,5.8){\Zylinder{0.3}{0.3}{black!40}{gray!10}{0.3}{gray!60}{1pt}{none}{middle}}
\psline[linecolor=black!40,linewidth=1pt,linearc=0.15](4.25,4.94)(4.25,5.5)(3.65,5.5)(3.65,9.25)
\psline[linecolor=black!40,linewidth=1pt,linearc=0.15](4.75,4.94)(4.75,5.5)(5.25,5.5)(5.25,9)
%-------- Gitter + Anode ------------------------
{\psset{linewidth=0.8pt,linecolor=black!50}
\begin{psclip}{\psellipse[fillstyle=none,linewidth=1pt,linecolor=black!50](4.5,9)(!0.75 0.75 0.25 mul)}
\psline(3.86,9.1)(3.7,8.93)
\psline(3.9,9.11)(3.75,8.91)
\psline(3.94,9.13)(3.8,8.89)
\psline(3.98,9.13)(3.85,8.87)
\psline(4.02,9.15)(3.9,8.86)
\psline(4.06,9.16)(3.95,8.86)
\psline(4.1,9.16)(4.0,8.85)
\psline(4.14,9.17)(4.05,8.83)
\psline(4.18,9.17)(4.1,8.83)
\psline(4.22,9.17)(4.15,8.83)
\psline(4.26,9.17)(4.2,8.83)
\psline(4.3,9.17)(4.25,8.83)
\psline(4.34,9.17)(4.3,8.83)
\psline(4.38,9.17)(4.35,8.83)
\psline(4.42,9.17)(4.4,8.83)
\psline(4.46,9.17)(4.45,8.83)
\psline(4.5,9.17)(4.5,8.83)
\psline(4.54,9.17)(4.55,8.83)
\psline(4.58,9.17)(4.60,8.83)
\psline(4.62,9.17)(4.65,8.83)
\psline(4.66,9.17)(4.7,8.83)
\psline(4.7,9.17)(4.75,8.83)
\psline(4.74,9.17)(4.8,8.83)
\psline(4.78,9.17)(4.85,8.83)
\psline(4.82,9.17)(4.9,8.83)
\psline(4.86,9.16)(4.95,8.85)
\psline(4.9,9.16)(5,8.86)
\psline(4.94,9.15)(5.05,8.86)
\psline(4.98,9.14)(5.1,8.87)
\psline(5.02,9.14)(5.15,8.89)
\psline(5.06,9.12)(5.2,8.91)
\psline(5.1,9.11)(5.25,8.93)
\psline(5.14,9.1)(5.26,8.99)
\end{psclip}
}
\psellipse[fillstyle=gradient,gradbegin=black!50,gradend=black!30,gradmidpoint=1,gradangle=10,linestyle=none](4.5,9.25)(!0.85 0.85 0.25 mul)
\psellipticarcn[linewidth=1pt,linecolor=black!70](4.5,9.25)(!0.85 0.85 0.25 mul){360}{180}
\psline[linewidth=1.2pt,linecolor=black!70]{c-}(4.5,9.25)(4.5,11)
\psline[linewidth=1.2pt,linecolor=black]{c-}(4.5,11.0)(4.5,11.5)
%--------------------------------------------------------------------------------------------------
%-------- Quecksilbertropfen ----------------------
\rput{15}(3.8,5){%
\psellipse[fillstyle=gradient,gradbegin=white,gradend=black!70,GradientPos={(-0.05,0.1)},GradientScale=1.4,GradientCircle=true,linestyle=none](0,0)(0.2,0.13)}
%---------- Heizschlange --------------------------------
\psline[linewidth=1.2pt,linecolor=black,arrowscale=1.5]{o-}(0,1.4)(1,1.4)
\psline[linewidth=1.2pt,linecolor=black,arrowscale=1.5]{o-}(0.4,2)(1,2)
\psline[linewidth=1.2pt,linecolor=black!50,arrowscale=1.5](1,2)(1.8,2)
\rput{-90}(0.75,1.4){\Zylinder{0.45}{0.12}{red!80}{red!10}{0.3}{red}{1pt}{none}{middle}}
\rput{-90}(1.35,2){\Zylinder{0.45}{0.12}{red!40}{red!10}{0.3}{red!50}{1pt}{none}{middle}}
\psline[linewidth=1.4pt,linecolor=red!60,linearc=0.04](1.8,2)(6.6,2)(6.4,1.8)(2.4,1.8)(2.2,1.6)(6.2,1.6)(6,1.4)(1.2,1.4)
\psframe[linewidth=1.2pt,linecolor=black!80,dimen=middle,framearc=0.008](A)(C)
\rput[l](-1,1.8){\small $230\,\text{V}$}
\rput[l](-1,6){\small\shortstack[l]{Goutte\strut\\[-5pt]de\strut\\[-5pt] mercure\strut}}
\psline[linewidth=0.5pt](3.8,5)(2,6)(0.3,6)
\rput[l](-1,7.7){\small Cathode}
\psline[linewidth=0.5pt](4.3,6)(2,7.65)(0.5,7.65)
\rput[l](-1,9){\small Grille}
\psline[linewidth=0.5pt](3.8,9)(0.2,9)
\rput[l](-1,10){\small Anode}
\psline[linewidth=0.5pt](3.7,9.25)(2,10)(0.2,10)
\rput[l](-1,14.5){\small Thermom\`{e}tre}
\psline[linewidth=0.5pt](1.4,14.45)(6.5,14.45)(6.5,14.0)
%------------------ 2d -----------------------------------------------
\rput(10.5,4){%
\pnode(0,9){El1}
\pnode(3.5,9){El2}
\pnode(3.5,5){El3}
\pnode(3.5,-2){El4}
\pnode(0.6,5){El5}
\pscustom[linecolor=black,linewidth=1pt]{%
\psarc(0,5.5){1.5}{0}{180}
\psarc(0,0.5){1.5}{180}{360}
\closepath
}
\psline[linewidth=2pt,linecolor=black!60](-1,0.5)(-1,2.2)
\psline[linewidth=2pt,linecolor=black!60](1,0.5)(1,2.2)
\psline[linewidth=0.7pt,linecolor=black,linearc=0.05](-1,0.5)(-1,0.1)(1,0.1)(1,0.5)
\psline[arrowscale=1.8]{o-}(-0.6,-2.5)(-0.6,1.2)
\psarcn(0,1.2){0.6}{180}{0}
\psline[arrowscale=1.8]{-o}(0.6,1.2)(0.6,-2.5)
\rput(0,1.2){\pnode(0.6;50){M}}
\rput(M){\psline(0,0)(0.2;50)}
\psarc(0,1.2){0.8}{50}{130}
\psline[linestyle=dashed,dash=2pt 2pt,linewidth=0.7pt,linecolor=black](-1,5)(1.5,5)
\psline[linewidth=1pt,linecolor=black](-0.4,5.3)(0.4,5.3)
\psline[linewidth=1pt,linecolor=black](0,5.3)(El1)
\circledipole[labeloffset=0,radius=0.4cm](El1)(El2){\small\textbf{A}}
\battery[labeloffset=-1.15](El3)(El2){\rput{-45}(-0.5,0.4){\psline[arrowinset=0.05]{->}(0,-0.5)(0,0.5)}\small\shortstack[c]{$U_{\text{g}}$\strut\\[-1pt]$0\ldots 2\,\text{V}$\strut}}
\psline[linewidth=1pt,linecolor=black]{-*}(1.5,5)(El3)
\battery[labeloffset=1.15](El3)(El4){\rput{-45}(-0.4,0.35){\psline[arrowinset=0.05]{->}(0,-0.5)(0,0.5)}\small\shortstack[c]{$U_{\text{a}}$\strut\\[-1pt]$0\ldots 40\,\text{V}$\strut}}
\psline{*-*}(0.6,-2)(El4)
}
\end{pspicture}
\end{document}

Chaîne de désintégration du Thorium 232, dessinée par Thomas Söll

La chaîne de désintégration du Thorium 232, dessinée par Thomas Söll, sur le fond transparent les éléments voisins.

Les fichiers (Zerfallsreihe.tex Zerfallsreihe.pdf) sont dans l'archive :

Thomas.Soell

\documentclass[fleqn,a4paper,12pt]{article}
\usepackage{pst-grad,pstricks-add}
\begin{document}
% Chaîne de désintégration du Thorium 232
\newpsstyle{Stabil}{fillstyle=gradient,linewidth=.2pt,gradbegin=black,gradend=black!60,gradmidpoint=0,gradangle=45}
\newpsstyle{BetaM}{fillstyle=solid,framesep=0pt,linestyle=none,fillcolor=blue!70,dimen=middle,opacity=0.5}
\newpsstyle{BetaP}{fillstyle=solid,framesep=0pt,linestyle=none,fillcolor=orange!90!red!90,dimen=middle,opacity=0.5}
\newpsstyle{ElektronenE}{fillstyle=solid,framesep=0pt,linestyle=none,fillcolor=cyan!70!black!50,dimen=middle,opacity=0.5}
\newpsstyle{Alpha}{fillstyle=solid,framesep=0pt,linestyle=none,fillcolor=yellow!90!brown!80,dimen=middle,opacity=0.5}

\newpsstyle{NeutronenZ}{fillstyle=gradient,framesep=0pt,linewidth=.2pt,gradbegin=green!80!black!50,gradend=green!50,gradmidpoint=0,gradangle=45}
\newpsstyle{ProtonenZ}{fillstyle=gradient,framesep=0pt,linewidth=.2pt,gradbegin=red,gradend=red!60,gradmidpoint=0,gradangle=45,dimen=middle}
\newpsstyle{ProtonBeta}{fillstyle=gradient,framesep=0pt,linewidth=.2pt,gradbegin=red,gradend=orange!30,gradmidpoint=0,gradangle=45,dimen=middle}

\definecolor{Alpha}{rgb}{0,0,0}
\definecolor{BetaM}{rgb}{1,1,1}
\definecolor{BetaP}{rgb}{1,1,1}
\definecolor{ElektronenE}{rgb}{0,0,0}
\definecolor{NeutronenZ}{rgb}{1,1,1}
\definecolor{ProtonenZ}{rgb}{1,1,1}
\definecolor{ProtonBeta}{rgb}{1,1,1}


\newcommand{\IsotopZ}[3]
{\def\textfarbe{#3}%
\psscalebox{0.5}{%
\psframe[style=#3](0,0)(2,2)%
\rput(1,1.5){\textcolor{\textfarbe}{\textbf{\scriptsize #1}}}%
\rput(1,0.8){\textcolor{\textfarbe}{\tiny #2}}%
}%
}%
\newcommand{\IsotopSt}[2]%
{%
\psscalebox{0.5}{%
\psframe[fillstyle=gradient,linewidth=.2pt,gradbegin=black,gradend=black!60,gradmidpoint=0,gradangle=45](0,0)(2,2)%
\rput(1,1.5){\textcolor{white}{\textbf{\scriptsize #1}}}%
\rput(1,1){\textcolor{white}{\tiny stabil}}%
\rput(1,0.5){\textcolor{white}{\tiny #2\,\%}}%
}%
}%
\newcommand{\IsotopZZ}[5]%----- Der 3. Parameter um die Gr\"{o}{\ss}e der gef\"{a}rbten Fl\"{a}che anzugeben --> Prozent des jew. kleineren Zerfalls
{\def\textfarbe{#5}%
\psscalebox{0.5}{%
\pspolygon[style=#5,linestyle=none](0,0)(2,0)(2,2)(!#3 2 mul sqrt 0.2 mul 2)(!0 2 #3 2 mul sqrt 0.2 mul sub)%
\pspolygon[style=#4,linestyle=none](!0 2 #3 2 mul sqrt 0.2 mul sub)(0,2)(!#3 2 mul sqrt 0.2 mul 2)%
\psframe[linewidth=.2pt](0,0)(2,2)%
\rput(1,1.5){\textcolor{\textfarbe}{\textbf{\scriptsize #1}}}%
\rput(1,0.8){\textcolor{\textfarbe}{\tiny #2}}%
}%
}%
{\psset{unit=0.75,labelFontSize=\scriptscriptstyle}%
\begin{pspicture}(2,-1)(20,15)%
%---------------------- Americium -------------------------------------------
\rput(17,15){\IsotopZZ{Am 237}{73,0\, min}{5}{Alpha}{ElektronenE}}
\rput(18,15){\IsotopZZ{Am 238}{1,63\, h}{5}{Alpha}{ElektronenE}}
\rput(19,15){\IsotopZZ{Am 239}{11,9\, h}{5}{Alpha}{ElektronenE}}
\rput(20,15){\IsotopZZ{Am 240}{50,8\, h}{5}{Alpha}{ElektronenE}}
\rput(21,15){\IsotopZ{Am 241}{432,2\, a}{Alpha}}
\rput(22,15){\IsotopZZ{Am 242}{141\, a}{12}{ElektronenE}{BetaM}}
%---------------------- Plutonium -------------------------------------------
\rput(15,14){\IsotopZZ{Pu 234}{8,8\, h}{50}{Alpha}{ElektronenE}}
\rput(16,14){\IsotopZZ{Pu 235}{25,3\, min}{5}{Alpha}{ElektronenE}}
\rput(17,14){\IsotopZ{Pu 236}{2,858\, a}{Alpha}}
\rput(18,14){\IsotopZZ{Pu 237}{45,2\, d}{5}{Alpha}{ElektronenE}}
\rput(19,14){\IsotopZ{Pu 238}{87,74\, a}{Alpha}}
\rput(20,14){\IsotopZ{Pu 239}{24110\, a}{Alpha}}
\rput(21,14){\IsotopZ{Pu 240}{6563\, a}{Alpha}}
\rput(22,14){\IsotopZZ{Pu 241}{14,35\, a}{5}{Alpha}{BetaM}}
%---------------------- Neptunium -------------------------------------------
\rput(14,13){\IsotopZ{Np 232}{8,8\, h}{ElektronenE}}
\rput(15,13){\IsotopZZ{Np 233}{36,2\, min}{5}{Alpha}{ElektronenE}}
\rput(16,13){\IsotopZZ{Np 234}{4,4\, d}{50}{BetaP}{ElektronenE}}
\rput(17,13){\IsotopZZ{Np 235}{396,1\, d}{5}{Alpha}{ElektronenE}}
\rput(18,13){\IsotopZZ{Np 236}{1,54\, E\, 6 a}{30}{BetaM}{Alpha}}
\rput(19,13){\IsotopZ{Np 237}{2,144\, E\, 6 a}{Alpha}}
\rput(20,13){\IsotopZ{Np 238}{2,117\, d}{BetaM}}
\rput(21,13){\IsotopZ{Np 239}{2,355\, d}{BetaM}}
\rput(22,13){\IsotopZ{Np 240}{65\, min}{BetaM}}
%---------------------- Uran -------------------------------------------
\rput(11,12){\IsotopZZ{U 228}{48,8\, min}{5}{Alpha}{ElektronenE}}
\rput(12,12){\IsotopZZ{U 229}{58\, min}{50}{Alpha}{ElektronenE}}
\rput(13,12){\IsotopZ{U 230}{20,8\, d}{Alpha}}
\rput(14,12){\IsotopZZ{U 231}{4,2\, d}{5}{Alpha}{ElektronenE}}
\rput(15,12){\IsotopZ{U 232}{68,9\, a}{Alpha}}
\rput(16,12){\IsotopZ{U 233}{1,592\, E\, 5 a}{Alpha}}
\rput(17,12){\IsotopZ{U 234}{2,455\, E\, 6 a}{Alpha}}
\rput(18,12){\IsotopZ{U 235}{7,038\, E\, 8 a}{Alpha}}
\rput(19,12){\IsotopZ{U 236}{2,342\, E\, 7 a}{Alpha}}
\rput(20,12){\IsotopZ{U 237}{6,75\, d}{BetaM}}
\rput(21,12){\IsotopZ{U 238}{4,468\, E\, 9 a}{Alpha}}
\rput(22,12){\IsotopZ{U 239}{23,5\, min}{Alpha}}
%---------------------- Protactinium -------------------------------------------
\rput(9,11){\IsotopZ{Pa 225}{1,8\, s}{Alpha}}
\rput(10,11){\IsotopZZ{Pa 226}{1,8\, min}{50}{Alpha}{ElektronenE}}
\rput(11,11){\IsotopZZ{Pa 227}{38,3\, min}{50}{Alpha}{ElektronenE}}
\rput(12,11){\IsotopZZ{Pa 228}{22\, h}{5}{Alpha}{ElektronenE}}
\rput(13,11){\IsotopZZ{Pa 229}{1,50\, d}{5}{Alpha}{ElektronenE}}
\rput(14,11){\IsotopZZ{Pa 230}{17,4\, d}{50}{ElektronenE}{BetaM}}
\rput(15,11){\IsotopZ{Pa 231}{3,276\, E 4\, a}{Alpha}}
\rput(16,11){\IsotopZ{Pa 232}{1,31\, d}{BetaM}}
\rput(17,11){\IsotopZ{Pa 233}{27,0\, d}{BetaM}}
\rput(18,11){\IsotopZ{Pa 234}{6,7\, h}{BetaM}}
\rput(19,11){\IsotopZ{Pa 235}{24,2\, min}{BetaM}}
\rput(20,11){\IsotopZ{Pa 236}{9,1\, min}{BetaM}}
\rput(21,11){\IsotopZ{Pa 237}{8,7\, min}{BetaM}}
\rput(22,11){\IsotopZ{Pa 238}{2,3\, min}{BetaM}}
%---------------------- Thorium -------------------------------------------
\rput(7,10){\IsotopZ{Th 222}{2,24\, ms}{Alpha}}
\rput(8,10){\IsotopZ{Th 223}{0,66\, s}{Alpha}}
\rput(9,10){\IsotopZ{Th 224}{1,05\, s}{Alpha}}
\rput(10,10){\IsotopZZ{Th 225}{8,72\, min}{50}{Alpha}{ElektronenE}}
\rput(11,10){\IsotopZ{Th 226}{31\, min}{Alpha}}
\rput(12,10){\IsotopZ{Th 227}{18,72\, d}{Alpha}}
\rput(13,10){\IsotopZ{Th 228}{1,913\, a}{Alpha}}
\rput(14,10){\IsotopZ{Th 229}{7932\, a}{Alpha}}
\rput(15,10){\IsotopZ{Th 230}{7,54\, E\, 4 a}{Alpha}}
\rput(16,10){\IsotopZ{Th 231}{25,5\, h}{BetaM}}
\rput(17,10){\IsotopZ{Th 232}{1,4\, E 10 a}{Alpha}}
\rput(18,10){\IsotopZ{Th 233}{22,3\, min}{BetaM}}
\rput(19,10){\IsotopZ{Th 234}{24,10\, d}{BetaM}}
\rput(20,10){\IsotopZ{Th 235}{7,1\, min}{BetaM}}
\rput(21,10){\IsotopZ{Th 236}{37,5\, min}{BetaM}}
%---------------------- Actinium ------------------------------------------
\rput(6,9){\IsotopZ{Ac 220}{26,4\, ms}{Alpha}}
\rput(7,9){\IsotopZ{Ac 221}{52\, ms}{Alpha}}
\rput(8,9){\IsotopZZ{Ac 222}{63\, s}{4}{ElektronenE}{Alpha}}
\rput(9,9){\IsotopZ{Ac 223}{2,10\, min}{Alpha}}
\rput(10,9){\IsotopZZ{Ac 224}{2,78\, h}{50}{Alpha}{ElektronenE}}
\rput(11,9){\IsotopZ{Ac 225}{10,0\, h}{Alpha}}
\rput(12,9){\IsotopZZ{Ac 226}{29\, h}{50}{ElektronenE}{BetaM}}
\rput(13,9){\IsotopZZ{Ac 227}{21,773\, a}{5}{Alpha}{BetaM}}
\rput(14,9){\IsotopZ{Ac 228}{6,13\, h}{BetaM}}
\rput(15,9){\IsotopZ{Ac 229}{62,7\, min}{BetaM}}
\rput(16,9){\IsotopZ{Ac 230}{122\, s}{BetaM}}
\rput(17,9){\IsotopZ{Ac 231}{7,5\, min}{BetaM}}
\rput(18,9){\IsotopZ{Ac 232}{119\, s}{BetaM}}
\rput(19,9){\IsotopZ{Ac 233}{145\, s}{BetaM}}
\rput(20,9){\IsotopZ{Ac 234}{44\, s}{BetaM}}
%---------------------- Radium --------------------------------------------
\rput(5,8){\IsotopZ{Ra 218}{25,6\, E -6 s}{Alpha}}
\rput(6,8){\IsotopZ{Ra 219}{10\, ms}{Alpha}}
\rput(7,8){\IsotopZ{Ra 220}{18\, ms}{Alpha}}
\rput(8,8){\IsotopZ{Ra 221}{28\, s}{Alpha}}
\rput(9,8){\IsotopZ{Ra 222}{38\, s}{Alpha}}
\rput(10,8){\IsotopZ{Ra 223}{11,43\, d}{Alpha}}
\rput(11,8){\IsotopZ{Ra 224}{3,66\, d}{Alpha}}
\rput(12,8){\IsotopZ{Ra 225}{14,8\, d}{BetaM}}
\rput(13,8){\IsotopZ{Ra 226}{1600\, a}{Alpha}}
\rput(14,8){\IsotopZ{Ra 227}{42,2\, min}{BetaM}}
\rput(15,8){\IsotopZ{Ra 228}{5,75\, a}{BetaM}}
\rput(16,8){\IsotopZ{Ra 229}{4,0\, min}{BetaM}}
\rput(17,8){\IsotopZ{Ra 230}{93\, min}{BetaM}}
\rput(18,8){\IsotopZ{Ra 231}{104,1\, s}{BetaM}}
\rput(19,8){\IsotopZ{Ra 232}{4,2\, min}{BetaM}}
\rput(20,8){\IsotopZ{Ra 233}{30\, s}{BetaM}}
%---------------------- Francium ------------------------------------------
\rput(4,7){\IsotopZ{Fr 216}{700\, ns}{Alpha}}
\rput(5,7){\IsotopZ{Fr 217}{16\, E\, -6 s}{Alpha}}
\rput(6,7){\IsotopZ{Fr 218}{22\, ms}{Alpha}}
\rput(7,7){\IsotopZ{Fr 219}{21\, ms}{Alpha}}
\rput(8,7){\IsotopZZ{Fr 220}{27,4\, s}{4}{BetaM}{Alpha}}
\rput(9,7){\IsotopZZ{Fr 221}{4,77\, min}{4}{BetaM}{Alpha}}
\rput(10,7){\IsotopZZ{Fr 222}{14,2\, min}{5}{Alpha}{BetaM}}
\rput(11,7){\IsotopZZ{Fr 223}{21,8\, min}{5}{Alpha}{BetaM}}
\rput(12,7){\IsotopZ{Fr 224}{3,3\, min}{BetaM}}
\rput(13,7){\IsotopZ{Fr 225}{4,0\, min}{BetaM}}
\rput(14,7){\IsotopZ{Fr 226}{48\, s}{BetaM}}
\rput(15,7){\IsotopZ{Fr 227}{2,47\, min}{BetaM}}
\rput(16,7){\IsotopZ{Fr 228}{39\, s}{BetaM}}
\rput(17,7){\IsotopZ{Fr 229}{50,2\, s}{BetaM}}
\rput(18,7){\IsotopZ{Fr 230}{19,1\, s}{BetaM}}
\rput(19,7){\IsotopZ{Fr 231}{17,5\, s}{BetaM}}
%---------------------- Radon ------------------------------------------
\rput(3,6){\IsotopZ{Rn 214}{270\, ns}{Alpha}}
\rput(4,6){\IsotopZ{Rn 215}{2,3\, E\, -6 s}{Alpha}}
\rput(5,6){\IsotopZ{Rn 216}{45\, E\, -6 s}{Alpha}}
\rput(6,6){\IsotopZ{Rn 217}{0,54\, ms}{Alpha}}
\rput(7,6){\IsotopZ{Rn 218}{35\, ms}{Alpha}}
\rput(8,6){\IsotopZ{Rn 219}{3,96\, s}{Alpha}}
\rput(9,6){\IsotopZ{Rn 220}{55,6\, s}{Alpha}}
\rput(10,6){\IsotopZZ{Rn 221}{25\, min}{50}{Alpha}{BetaM}}
\rput(11,6){\IsotopZ{Rn 222}{3,825\, d}{Alpha}}
\rput(12,6){\IsotopZ{Rn 223}{23,2\, min}{BetaM}}
\rput(13,6){\IsotopZ{Rn 224}{1,78\, h}{BetaM}}
\rput(14,6){\IsotopZ{Rn 225}{4,5\, min}{BetaM}}
\rput(15,6){\IsotopZ{Rn 226}{7,4\, min}{BetaM}}
\rput(16,6){\IsotopZ{Rn 227}{22,5\, s}{BetaM}}
\rput(17,6){\IsotopZ{Rn 228}{65\, s}{BetaM}}
\rput(18,6){\IsotopZ{Rn 229}{12\, s}{BetaM}}
%---------------------- Astatin ------------------------------------------
\rput(1,5){\IsotopZZ{At 211}{07,22\, h}{50}{Alpha}{ElektronenE}}
\rput(2,5){\IsotopZ{At 212}{314\, ms}{Alpha}}
\rput(3,5){\IsotopZ{At 213}{110\, ns}{Alpha}}
\rput(4,5){\IsotopZ{At 214}{760\, ns}{Alpha}}
\rput(5,5){\IsotopZ{At 215}{0,1\, ms}{Alpha}}
\rput(6,5){\IsotopZ{At 216}{0,3\, ms}{Alpha}}
\rput(7,5){\IsotopZZ{At 217}{32,3\, ms}{5}{BetaM}{Alpha}}
\rput(8,5){\IsotopZZ{At 218}{2\, s}{5}{BetaM}{Alpha}}
\rput(9,5){\IsotopZZ{At 219}{0,9\, s}{5}{BetaM}{Alpha}}
\rput(10,5){\IsotopZZ{At 220}{3,71\, min}{50}{Alpha}{BetaM}}
\rput(11,5){\IsotopZ{At 221}{2,3\, min}{BetaM}}
\rput(12,5){\IsotopZ{At 222}{54\, s}{BetaM}}
\rput(13,5){\IsotopZ{At 223}{50\, s}{BetaM}}
\rput(14,5){\IsotopZ{At 224}{76\, s}{BetaM}}
\rput(15,5){\IsotopZ{At 225}{160\, ns}{BetaM}}
\rput(16,5){\IsotopZ{At 226}{160\, ns}{BetaM}}
\rput(17,5){\IsotopZ{At 227}{160\, ns}{BetaM}}
\rput(18,5){\IsotopZ{At 228}{160\, ns}{BetaM}}
%---------------------- Polonium ------------------------------------------
\rput(-1,4){\IsotopZZ{Po 208}{2,898\, a}{5}{ElektronenE}{Alpha}}
\rput(0,4){\IsotopZZ{Po 209}{102\, a}{5}{ElektronenE}{Alpha}}
\rput(1,4){\IsotopZ{Po 210}{138,38\, d}{Alpha}}
\rput(2,4){\IsotopZ{Po 211}{25,2\, s}{Alpha}}
\rput(3,4){\IsotopZ{Po 212}{45,1\, s}{Alpha}}
\rput(4,4){\IsotopZ{Po 213}{4,2\, E -6 s}{Alpha}}
\rput(5,4){\IsotopZ{Po 214}{164\, E -6 s}{Alpha}}
\rput(6,4){\IsotopZZ{Po 215}{1,78\, ms}{5}{BetaM}{Alpha}}
\rput(7,4){\IsotopZ{Po 216}{0,15\, s}{Alpha}}
\rput(8,4){\IsotopZZ{Po 217}{1,53\, s}{5}{BetaM}{Alpha}}
\rput(9,4){\IsotopZZ{Po 218}{3,05\, min}{5}{BetaM}{Alpha}}
\rput(10,4){\IsotopZ{Po 219}{300\, ns}{BetaM}}
\rput(11,4){\IsotopZ{Po 220}{300\, ns}{BetaM}}
\rput(12,4){\IsotopZ{Po 221}{112\, s}{BetaM}}
\rput(13,4){\IsotopZ{Po 222}{145\, s}{BetaM}}
\rput(14,4){\IsotopZ{Po 223}{160\, ns}{BetaM}}
\rput(15,4){\IsotopZ{Po 224}{160\, ns}{BetaM}}
\rput(16,4){\IsotopZ{Po 225}{160\, ns}{BetaM}}
\rput(17,4){\IsotopZ{Po 226}{160\, ns}{BetaM}}
\rput(18,4){\IsotopZ{Po 227}{160\, ns}{BetaM}}
%---------------------- Bismut --------------------------------------------
\rput(-2,3){\IsotopZ{Bi 206}{6,24\, d}{BetaP}}
\rput(-1,3){\IsotopZ{Bi 207}{31,55\, a}{BetaP}}
\rput(0,3){\IsotopZ{Bi 208}{3,68\, E\, 6 a}{BetaP}}
\rput(1,3){\IsotopZ{Bi 209}{1,9\, E\, 19 a}{Alpha}}
\rput(2,3){\IsotopZZ{Bi 210}{3,0\, E\, 6 a}{5}{Alpha}{BetaM}}
\rput(3,3){\IsotopZZ{Bi 211}{2,17\, min}{5}{BetaM}{Alpha}}
\rput(4,3){\IsotopZZ{Bi 212}{9\, min /60,6\, min}{45}{BetaM}{Alpha}}
\rput(5,3){\IsotopZZ{Bi 213}{45,59\, min}{5}{Alpha}{BetaM}}
\rput(6,3){\IsotopZZ{Bi 214}{19,9\, min}{5}{Alpha}{BetaM}}
\rput(7,3){\IsotopZ{Bi 215}{7,7\, min}{BetaM}}
\rput(8,3){\IsotopZ{Bi 216}{3,6\, min}{BetaM}}
\rput(9,3){\IsotopZ{Bi 217}{98,5\, s}{BetaM}}
\rput(10,3){\IsotopZ{Bi 218}{33\, s}{BetaM}}
\rput(11,3){\IsotopZ{Bi 219}{160\, ns}{BetaM}}
\rput(12,3){\IsotopZ{Bi 220}{160\, ns}{BetaM}}
\rput(13,3){\IsotopZ{Bi 221}{160\, ns}{BetaM}}
\rput(14,3){\IsotopZ{Bi 222}{160\, ns}{BetaM}}
\rput(15,3){\IsotopZ{Bi 223}{160\, ns}{BetaM}}
\rput(16,3){\IsotopZ{Bi 224}{160\, ns}{BetaM}}
%---------------------- Blei ------------------------------------------
\rput(-2,2){\IsotopZ{Pb 205}{1,5\, E\, 7 a}{ElektronenE}}
\rput(-1,2){\IsotopSt{Pb 206}{24,1}}
\rput(0,2){\IsotopSt{Pb 207}{22,1}}
\rput(1,2){\IsotopSt{Pb 208}{52,4}}
\rput(2,2){\IsotopZ{Pb 209}{3,253\, h}{BetaM}}
\rput(3,2){\IsotopZZ{Pb 2010}{22,3\, a}{5}{Alpha}{BetaM}}
\rput(4,2){\IsotopZ{Pb 211}{36,1\, min}{BetaM}}
\rput(5,2){\IsotopZ{Pb 212}{10,64\, h}{BetaM}}
\rput(6,2){\IsotopZ{Pb 213}{10,2\, min}{BetaM}}
\rput(7,2){\IsotopZ{Pb 214}{26,8\, min}{BetaM}}
\rput(8,2){\IsotopZ{Pb 215}{160\, ns}{BetaM}}
\rput(9,2){\IsotopZ{Pb 216}{160\, ns}{BetaM}}
\rput(10,2){\IsotopZ{Pb 217}{160\, ns}{BetaM}}
\rput(11,2){\IsotopZ{Pb 218}{160\, ns}{BetaM}}
\rput(12,2){\IsotopZ{Pb 219}{160\, ns}{BetaM}}
\rput(13,2){\IsotopZ{Pb 220}{160\, ns}{BetaM}}
%---------------------- Thallium ------------------------------------------
\rput(-2,1){\IsotopZZ{Tl 204}{3,78\, a}{5}{ElektronenE}{BetaM}}
\rput(-1,1){\IsotopSt{Tl 205}{70,48}}
\rput(0,1){\IsotopZ{Tl 206}{4,20\, min}{BetaM}}
\rput(1,1){\IsotopZ{Tl 207}{4,77\, min}{BetaM}}
\rput(2,1){\IsotopZ{Tl 208}{3,054\, min}{BetaM}}
\rput(3,1){\IsotopZ{Tl 209}{2,16\, min}{BetaM}}
\rput(4,1){\IsotopZ{Tl 210}{1,30\, min}{BetaM}}
\rput(5,1){\IsotopZ{Tl 211}{300\, ns}{BetaM}}
\rput(6,1){\IsotopZ{Tl 212}{300\, ns}{BetaM}}
\rput(7,1){\IsotopZ{Tl 213}{101\, s}{BetaM}}
\rput(8,1){\IsotopZ{Tl 214}{160\, ns}{BetaM}}
\rput(9,1){\IsotopZ{Tl 215}{160\, ns}{BetaM}}
\rput(10,1){\IsotopZ{Tl 216}{160\, ns}{BetaM}}
\rput(11,1){\IsotopZ{Tl 217}{160\, ns}{BetaM}}
%---------------------- Quecksilber ------------------------------------------
\rput(-2,0){\IsotopZ{Hg 203}{46,59\, d}{BetaM}}
\rput(-1,0){\IsotopSt{Hg 204}{6,87}}
\rput(0,0){\IsotopZ{Hg 205}{5,2\, min}{BetaM}}
\rput(1,0){\IsotopZ{Hg 206}{8,15\, min}{BetaM}}
\rput(2,0){\IsotopZ{Hg 207}{2,9\, min}{BetaM}}
\rput(3,0){\IsotopZ{Hg 208}{42\, min}{BetaM}}
\rput(4,0){\IsotopZ{Hg 209}{35\, s}{BetaM}}
\rput(5,0){\IsotopZ{Hg 210}{300\, ns}{BetaM}}
\rput(6,0){\IsotopZ{Hg 211}{160\, ns}{BetaM}}
\rput(7,0){\IsotopZ{Hg 212}{160\, ns}{BetaM}}
\rput(8,0){\IsotopZ{Hg 213}{160\, ns}{BetaM}}
\rput(9,0){\IsotopZ{Hg 214}{160\, ns}{BetaM}}
\rput(10,0){\IsotopZ{Hg 215}{160\, ns}{BetaM}}
\rput(11,0){\IsotopZ{Hg 216}{160\, ns}{BetaM}}
%------------------------------------------------------------------------------------
%------------------------------------------------------------------------------------
%\ifNoSolutions{\psframe[linestyle=none,fillstyle=solid,fillcolor=white,opacity=1](-2,0)(19,13)}{%
\psframe[linestyle=none,fillstyle=solid,fillcolor=white,opacity=0.8](-2,0)(23,16)%}
\psgrid[subgriddiv=0,gridlabels=0,gridwidth=0.4pt,gridcolor=black!80,subgridwidth=0.4pt,subgridcolor=gray!50](-2,0)(23,16)
\psaxes[yticksize=0 0,ticklinestyle=dashed,ylabelOffset=-0.5,xlabelOffset=-0.5,Oy=79,Ox=122,xticksize=0 0,showorigin=false, arrowscale=1.4,arrowinset=0.05,arrowlength=2.0]{->}(-2,0)(24,17)
\uput[-90](23.8,0){\scriptsize $N$} \uput[180](-2,16.8){\scriptsize $Z$}
%------------------------------------------------------------------------------------
%\ifNoSolutions{}{%
%------------------------------------------------------------------------------------
%---------------------- Thorium ------------------------------------------
\rput(13,10){\IsotopZ{Th 228}{1,913\, a}{Alpha}}
\rput(17,10){\IsotopZ{Th 232}{1,4\, E 10 a}{Alpha}}
%---------------------- Actinium ------------------------------------------
\rput(14,9){\IsotopZZ{Ac 228}{6,13\, a}{4.27}{Alpha}{BetaM}}
%---------------------- Radium ------------------------------------------
\rput(11,8){\IsotopZ{Ra 224}{3,66\, d}{Alpha}}
\rput(15,8){\IsotopZ{Ra 228}{5,75\, a}{BetaM}}
%---------------------- Radon ------------------------------------------
\rput(9,6){\IsotopZ{Rn 220}{55,6\, s}{Alpha}}
%---------------------- Polonium ------------------------------------------
\rput(3,4){\IsotopZ{Po 212}{45,1\, s}{Alpha}}
\rput(7,4){\IsotopZ{Po 216}{0,15\, s}{Alpha}}
%---------------------- Bismut --------------------------------------------
\rput(4,3){\IsotopZZ{Bi 212}{9\, min /60,6\, min}{45}{BetaM}{Alpha}}
%---------------------- Blei ------------------------------------------
\rput(1,2){\IsotopSt{Pb 208}{52,4}}
\rput(5,2){\IsotopZ{Pb 212}{10,64\, h}{BetaM}}
%---------------------- Thallium ------------------------------------------
\rput(2,1){\IsotopZ{Tl 208}{3,054\, min}{BetaM}}
%------------------------------------------------------------------------------------
%------------------------------------------------------------------------------------
{\psset{linewidth=1.0pt,linecolor=red,arrowscale=1.1,arrowinset=0.05,arrowlength=1.4}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(17,10)(16,9)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=1.1]{->}(15,9)(14,10)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\beta^{-}$}}
\pcline[nodesepA=-0.2,nodesepB=1.1]{->}(14,10)(13,11)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\beta^{-}$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(13,10)(12,9)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(11,8)(10,7)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(9,6)(8,5)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(7,4)(6,3)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=1.1]{->}(5,3)(4,4)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\beta^{-}$}}
\pcline[nodesepA=-0.2,nodesepB=1.1]{->}(4,4)(3,5)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\beta^{-}$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(4,3)(3,2)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=-0.2]{->}(3,4)(2,3)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\alpha$}}
\pcline[nodesepA=-0.2,nodesepB=1.1]{->}(2,2)(1,3)
\nbput[labelsep=1pt]{\scriptsize\textcolor{red}{$\beta^{-}$}}
}%}
\end{pspicture}
}
\end{document}

Un camion benne dessiné par Thomas Söll

Un camion benne dessiné par Thomas Söll, sur le chantier d'une future centrale thermique à charbon de l'Allemagne ?

Les fichiers (LKW.pdf LKW.tex) sont dans le répertoire :

Thomas.Soell

\documentclass{article}
\usepackage{pst-node}
\begin{document}
\definecolor{TSLA}{rgb}{0.4,0.4,0.5}% gdunkel-raublau
\definecolor{TSLB}{rgb}{0.6,0.7,0.6}% gr\"{u}n
\definecolor{TSLC}{rgb}{0.3,0.3,0.3}% dunkelgrau
\definecolor{TSLD}{rgb}{0.7,0.75,0.75}% grau-blau
\definecolor{TSLE}{rgb}{0.3,0.4,0.7}% blau
\definecolor{TSLF}{rgb}{0.94,0.9,0.9}% helles beige
%
\begin{pspicture}[showgrid=true](0,0)(9,4.5)
% Camion-benne
\psframe[fillstyle=solid,fillcolor=TSLB,linewidth=3pt,linecolor=TSLC,framearc=0.3](0.25,0.75)(5.6,1.25)
\psline[linecolor=TSLC,linewidth=3pt](0.6,0.75)(0.6,1.25)
\pspolygon[fillcolor=TSLC,fillstyle=solid,linestyle=none](1,1)(0.65,1.65)(5.6,1.65)(5.6,1)
%------- Fahrerhaus ----------------------------------------
\pspolygon[fillcolor=TSLB,fillstyle=solid,linecolor=TSLC,linewidth=3pt,linearc=0.1](5.6,1)(5.6,3.75)(7.6,3.75)(8.1,2.25)(8,1)
\psframe[fillstyle=solid,fillcolor=TSLB,linewidth=3pt,linecolor=TSLC,framearc=0.3](4.4,0.6)(5.6,1.25)
\psline[linecolor=TSLC,linewidth=3pt](4.7,0.6)(4.7,1.25)
\psline[linecolor=TSLC,linewidth=3pt](5.3,0.6)(5.3,1.25)
\psframe[fillstyle=solid,fillcolor=TSLB,linewidth=3pt,linecolor=TSLC,framearc=0.3](7.6,0.7)(8.2,1.2)
\psline[linecolor=TSLC,linewidth=3pt](7.9,0.7)(7.9,1.2)

\pspolygon[fillstyle=solid,fillcolor=TSLC,linestyle=none,framearc=0.05](6.4,2.4)(6.4,3.55)(7.7,3.55)(8.05,2.25)(7.4,2.4)
\psframe[fillstyle=solid,fillcolor=white,linestyle=none](6.8,2.5)(7.35,3.4)
\pspolygon[fillstyle=solid,fillcolor=white,linestyle=none](7.45,2.5)(7.45,3.4)(7.65,3.4)(8,2.37)
\psline[linecolor=TSLF,linewidth=3pt]{-c}(5.66,2.15)(7.2,2.15)
\psline[linecolor=TSLC,linewidth=3pt]{-c}(5.95,3.7)(5.95,2.65)
%----- Radkasten -------------------------------------------
\begin{psclip}%
{\psframe[linestyle=none](5.6,1)(8.1,2.25)}%
\pscircle[linestyle=none,fillstyle=solid,fillcolor=TSLC](6.6,0.8){0.9}
\end{psclip}
%
\def\Rad{%
\pscircle[linecolor=TSLC,linewidth=3pt,fillstyle=solid,fillcolor=TSLB](0,0){0.8}
\pscircle[linecolor=TSLC,linewidth=3pt,fillstyle=solid,fillcolor=TSLF](0,0){0.4}
\pscircle[linestyle=none,fillstyle=solid,fillcolor=TSLB](0.1,0.1){0.33}
\pscircle[linecolor=TSLC,linewidth=3pt](0,0){0.4}
}
\rput{0}(6.6,0.8){\Rad}
\rput{0}(3.3,0.8){\Rad}
\rput{0}(1.7,0.8){\Rad}
%
\rput(2.3,2.9){%
\psscalebox{0.6}{%
\pscustom[fillstyle=solid,fillcolor=TSLD,linestyle=none]{%
\psellipticarcn(-0.62,0.67)(2,1){174}{90}%
\psellipticarcn(1.23,1)(2.5,1){160}{10}%
\psellipticarcn(3.15,0.44)(1.5,1){70}{17}%
\closepath%
}}
}
%--------- Kipper ----------------------
\pspolygon[fillcolor=TSLB,fillstyle=solid,linecolor=TSLC,linewidth=3pt,linearc=0.1](0.1,1.65)(0.5,3.45)(5.3,3.45)(5.3,3.1)(5,3.1)(4.667,1.65)
\pcline[offset=-3pt,linecolor=TSLF,linewidth=3pt](0.5,3.45)(5.3,3.45)
\pspolygon[linecolor=TSLC,linewidth=3pt,linearc=0.1](0.1,1.65)(0.5,3.45)(5.3,3.45)(5.3,3.1)(5,3.1)(4.667,1.65)
\pcline[offset=-1.2cm,linecolor=TSLF,linewidth=3pt,nodesepB=0.1cm,nodesepA=0.6cm]{c-}(0.1,1.65)(0.5,3.45)
\pcline[offset=-1.5cm,linecolor=TSLC,linewidth=3pt,nodesepB=0.05cm,nodesepA=0.3cm](0.1,1.65)(0.5,3.45)
\pcline[offset=-2.7cm,linecolor=TSLF,linewidth=3pt,nodesepB=-0.28cm,nodesepA=0.935cm]{c-}(0.1,1.65)(0.5,3.45)
\pcline[offset=-3cm,linecolor=TSLC,linewidth=3pt,nodesepB=-0.3cm,nodesepA=0.6cm](0.1,1.65)(0.5,3.45)
\psline[linecolor=TSLC,linewidth=3pt](5.02,3.1)(0.47,3.1)
\psline[linecolor=TSLC,linewidth=5pt](0,-0.1)(8.5,-0.1)
\end{pspicture}
\end{document}

Péniche transportant du charbon, dessinée par Thomas Söll

C'est une péniche transportant du charbon et se dirigeant vers une centrale thermique, comme celle que dessina, il y a quelques mois, Thomas ? :
http://pstricks.blogspot.fr/2012/01/centrale-thermique-flammes-schematisee_07.html

Les fichiers (Kohle-Schiff.pdf Kohle-Schiff.tex) sont dans le répertoire :

Thomas.Soell

\documentclass{article}
\usepackage{pstricks-add}
\begin{document}
\definecolor{TSA}{rgb}{0.4,0.4,0.5}% gdunkel-raublau
\definecolor{TSB}{rgb}{0.6,0.7,0.6}% gr\"{u}n
\definecolor{TSC}{rgb}{0.1,0.1,0.1}% dunkelgrau
\definecolor{TSD}{rgb}{0.8,0.85,0.85}% grau-blau
\definecolor{TSE}{rgb}{0.3,0.4,0.7}% blau
\definecolor{TSF}{rgb}{0.94,0.9,0.9}% helles beige
%
\begin{pspicture}[showgrid=false](-8,-2)(5,11)
\pspolygon[fillcolor=TSC,fillstyle=solid,linestyle=none](-0.6,8.8)(-0.5,10.6)(0.5,10.6)(0.6,8.8)
\pspolygon[fillcolor=TSB,fillstyle=solid,linestyle=none](-0.38,9.7)(-0.34,10.45)(0.34,10.45)(0.38,9.7)
\psline[linecolor=TSF,linewidth=3pt](-0.38,9.67)(0.38,9.67)
\pscustom[dimen=middle,linewidth=3pt,fillstyle=solid,fillcolor=TSD,linecolor=TSC]{%
\psline(-2.1,7.3)(-2.1,8.1)(-2.3,8.1)
\psarcn(-2.3,8.45){0.35}{-90}{90}
\psarcn(2.3,8.45){0.35}{90}{-90}
\psline(2.3,8.1)(2.1,8.1)(2.1,7.3)
\closepath%
}
\pscustom[dimen=middle,linewidth=2pt,fillstyle=solid,fillcolor=TSA,linecolor=TSC]{%
\psarc(-2.3,8.1){0.45}{90}{132}
\psarcn(-2.3,8.45){0.33}{190}{90}
\psarcn(2.3,8.45){0.33}{90}{-10}
\psarc(2.3,8.1){0.45}{48}{90}
\closepath%
}
\psframe[fillstyle=solid,fillcolor=TSC,linestyle=none](-1.6,7.3)(-.95,8.1)
\psframe[fillstyle=solid,fillcolor=white,linestyle=none](-1.5,7.3)(-1.15,7.9)
\psframe[fillstyle=solid,fillcolor=TSC,linestyle=none](.95,7.3)(1.6,8.1)
\psframe[fillstyle=solid,fillcolor=white,linestyle=none](1.05,7.3)(1.4,7.9)
\psframe[dimen=inner,fillstyle=solid,fillcolor=TSB,linewidth=3pt,linecolor=TSC](-2.7,6.6)(2.7,7.3)
\pspolygon[fillstyle=solid,fillcolor=TSB,linewidth=3pt,linecolor=TSC](-4,5.4)(-3.5,6.6)(3.5,6.6)(4,5.4)
%------- Kohle -----------------------
\rput(-0.5,5.5){%
\psscalebox{0.8}{%
\psRandom[dotsize=8pt,dotstyle=o,fillcolor=black!90,randomPoints=1500,linecolor=gray,linewidth=0.1pt](-4,0)(5.4,2){%
%\psframe[linestyle=none](-4.2,-0.2)(4.2,3.2)}
\pscustom[fillstyle=solid,fillcolor=black!90,linestyle=none]{%
\psellipticarcn(-2.5,0)(1.5,1){180}{90}%
\psellipticarcn(-0.62,0.67)(2,1){170}{90}%
\psellipticarcn(1.23,1)(2.5,1){160}{10}%
\psellipticarcn(3.15,0.44)(1.5,1){70}{10}%
\psellipticarcn(3.87,-0.17)(1.5,1){50}{6.6}%
\closepath%
}}
}
}
\pscustom[dimen=middle,fillstyle=solid,fillcolor=TSA,linewidth=3pt,linecolor=TSC]{%
\psline(-4,3.9)(-4.3,5.3)
\pscurve(-2,6)(-1,6.2)(0,6.3)(1,6.2)(2,6)
\psline(4.3,5.3)(4,3.9)
\psarcn(0,5){4.15}{344}{196}
\closepath%
}
\pscustom[dimen=middle,fillstyle=solid,fillcolor=TSD,linewidth=2pt,linecolor=TSC]{%
\pscurve(-4.3,5.3)(-2,6)(-1,6.2)(0,6.3)(1,6.2)(2,6)(4.3,5.3)
\psline(4.3,5.3)(4.2,4.83)
\pscurve(4.2,4.83)(4,4.9)(2,5.53)(1,5.73)(0,5.83)(-1,5.73)(-2,5.53)(-4,4.9)(-4.2,4.83)
\closepath%
}
\pscurve[linewidth=1.8pt,linecolor=TSC](-0.1,5.8)(0,4.5)(-0.1,3.2)(-0.2,2.5)(-0.2,2)
\pscustom[dimen=middle,fillstyle=solid,fillcolor=TSE,linestyle=none,opacity=0.9]{%
\psarc(-1.5,5){6.7}{200}{340}
\closepath%
}
\psline[linewidth=2pt,linecolor=TSC]{c-c}(-5.5,2.3)(4,2.3)
\psline[linewidth=2pt,linecolor=TSC]{c-c}(-3.0,2.0)(3,2.0)
\psline[linewidth=1.2pt,linecolor=TSC]{c-c}(-4.5,1.7)(1.3,1.7)
\psline[linewidth=1.2pt,linecolor=TSC]{c-c}(-1.5,1.4)(2.8,1.4)
\psline[linewidth=1.0pt,linecolor=TSC]{c-c}(-2.5,1.1)(2.0,1.1)
\end{pspicture}
\end{document}

Schémas d’un tube à rayons X et d'un détecteur à scintillations par Thomas Söll et Gilg Jürgen

Encore deux magnifiques réalisations de Thomas Söll et Gilg Jürgen : les schémas de principe d’un tube à rayons X et d'un détecteur à scintillations(d'autres réalisations paraîtront prochainement).

\documentclass[12pt,fleqn,dvipsnames]{article}
\usepackage{pst-grad,pst-slpe,pst-node}
\usepackage{pst-coil,pst-plot}
\usepackage{amsmath,amssymb}
\begin{document}
% Schéma d’un tube à rayons X.
% Thomas Schöll
\begin{pspicture}[showgrid=false](-4.5,-2.5)(4.5,4)
\definecolor{RandFarbe}{rgb}{0.1176,0.5647,1}%{0,0.75,1}% DeepSkyBlue
%%R\"{o}hre
\pscustom[fillstyle=gradient,gradbegin=white,gradend=cyan!5,gradmidpoint=0.5,gradangle=0]{%
\pscurve(-3,0.5)(-2.95,0.5)(-2,0.6)(0,1.5)(2,0.6)(2.95,0.5)(3,0.5)
\psarcn(3,0){0.5}{90}{-90}
%\psbezier(3,-0.5)(1,-0.5)(1.25,-1.5)(0,-1.5)
%\psbezier(0,-1.5)(-1.25,-1.5)(-1,-0.5)(-3,-0.5)
\pscurve(3,-0.5)(2.95,-0.5)(2,-0.6)(0,-1.5)(-2,-0.6)(-2.95,-0.5)(-3,-0.5)
\psarcn(-3,0){0.5}{-90}{90}
\closepath%
}
%%Heiz
\pscoil[coilarm=0.075cm,coilwidth=3mm,coilheight=0.3,linewidth=0.5pt,linecolor=orange](-2.5,-0.3)(-2.5,0.3)
\psline[arrowscale=1]{-o}(-2.5,0.3)(-4,0.3)(-4,0.1)
\psline[arrowscale=1]{-o}(-2.5,-0.3)(-4,-0.3)(-4,-0.1)
\uput[180](-4,0){$U_\text{H}$}
%%Strahlenb\"{u}ndel
\def\x-Ray{%
\psplot[linecolor=BrickRed,linewidth=1.0pt,plotpoints=1200]%
     {0}{2.555}{x 2880 mul 3.141592654 div sin 0.05 mul}
  \psline[linecolor=BrickRed,linewidth=1.0pt,arrowsize=0.25,arrowinset=0.07]{c->}(2.554,0)(3,0)
}
\rput(0.75,0){\psset{linecolor=BrickRed}%
%\psline[arrowinset=0.06,arrowscale=0.4,arrowlength=1.2,arrowsize=0.25]{->}(0,0)(3;80)
%\psline[arrowinset=0.06,arrowscale=0.4,arrowlength=1.2,arrowsize=0.25]{->}(0,0)(3;90)
%\psline[arrowinset=0.06,arrowscale=0.4,arrowlength=1.2,arrowsize=0.25]{->}(0,0)(3;100)
\rput{80}(0.15;45){\x-Ray}
\rput{90}(0,0){\x-Ray}
\rput{100}(0.2;-135){\x-Ray}
}
\uput[u](0.7,3){\small rayons X}
%%Anode
\psframe[fillstyle=gradient,gradangle=0,gradbegin=black!90,gradend=gray!10,gradmidpoint=0.7,linewidth=0.15pt,linecolor=RandFarbe,framearc=0.007](2.5,-0.3)(3,0.3)
\pspolygon[fillstyle=gradient,gradangle=0,gradbegin=brown,gradend=gray!10,gradmidpoint=0.7,linewidth=0.15pt,linecolor=RandFarbe,linearc=0.005](0.5,-0.27)(1,0.27)(2.5,0.27)(2.5,-0.27)
\pcline[linewidth=0.3pt,linecolor=RandFarbe,offset=0.15pt](2.5,-0.27)(2.5,0.27)
\rput(3,1){\small Anode}
\pcline[nodesepB=0.3](2,0.2)(3,1)
%% Fliegende Elektronen
\newpsstyle{Elektron}{linecolor=black!30,slopebegin=BrickRed!30,sloperadius=0.07,linestyle=none,slopecenter=0.65 0.65}
\def\elek{
\psline[linewidth=0.7pt,arrowinset=0.06,arrowscale=0.4,arrowlength=1.2,arrowsize=0.25]{->}(0,0)(0.3,0)
\psBall[style=Elektron](0,0){BrickRed!90}{.1}
\rput[c]{0}(0,0){\psline[linewidth=0.4pt,linecolor=white](-0.04,0)(0.04,0)}
}
\rput(-1,0.2){\elek}
\rput(-1.3,-0.2){\elek}
\rput(-0.2,0.1){\elek}
\rput(-0.6,-0.1){\elek}
\rput(-1.6,0){\elek}
%%Zuleitungen Anode
\psline(3,0)(4.25,0)(4.25,-2)(0.1,-2)
\rput(0,-2){%
\psline[linewidth=0.8pt](0.1,-0.25)(0.1,0.25)
\psline[linewidth=1pt](-0.1,-0.12)(-0.1,0.12)
}
\uput[-90](0,-2){$U_\text{A}$}
\psline[arrowscale=1]{-*}(-0.1,-2)(-3.75,-2)(-3.75,-0.3)
\end{pspicture}
\end{document}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\documentclass[dvipsnames,a4paper]{article}
\usepackage{pst-node}
\usepackage{pst-plot}
\usepackage{amsmath,amssymb}
\begin{document}
% Schéma de principe d'un détecteur à scintillations
\begin{center}
\begin{pspicture}(-10,-5)(6,3)
\psframe[fillstyle=solid,fillcolor=lightgray](-7,-2)(-5,2)
\psframe[fillstyle=solid,fillcolor=white,linewidth=0.5pt](-5.1,-2.5)(2,2.5)
\rput(-6,0){%
\psset{linecolor=yellow}
\psline{->}(0,0)(1.25;30)
\psline{->}(0,0)(1.25;0)
\psline{->}(0,0)(1.25;-30)
}
\rput(-9.75,0){%
\rput(1.5,1.4){\textcolor{NavyBlue}{$\gamma$-Quant}}
\psplot[linecolor=NavyBlue,linewidth=1.0pt,plotpoints=1200]%
     {-0.065}{3.1}{x 180 mul 3.141592654 div sin x 15 mul 180 mul 3.141592654 div cos mul}
  \psline[linecolor=NavyBlue,linewidth=1.0pt,arrowsize=0.25,arrowinset=0.07]{->}(3.08,-0.036)(3.5,-0.036)
}
%%Rote Linien
\psline[linecolor=red](-4.5,0)(-3.5,-2.1)
\psline[linecolor=red](-3.5,-2.1)(-2.8,2.2)
\psline[linecolor=red](-3.5,-2.1)(-2.2,2.2)
\psline[linecolor=red](-2.8,2.2)(-1.8,-2.3)
\psline[linecolor=red](-2.6,2.2)(-1.6,-2.15)
\psline[linecolor=red](-2.4,2.2)(-1.4,-2.1)
\psline[linecolor=red](-2.2,2.2)(-1.2,-1.9)
\pscustom[fillstyle=solid,opacity=0.2,linecolor=red,fillcolor=red]{%
\psline(-1.8,-2.25)(-1.2,-1.9)
\psline(-1.2,-1.9)(0,2.17)
\psline(0,2.17)(-1,2.17)
\psline(-1,2.2)(-1.8,-2.25)
}
\pscustom[fillstyle=solid,opacity=0.2,linecolor=red,fillcolor=red]{%
\psline(0,2.17)(-1,2.17)
\psline(-1,2.17)(0.05,-2.25)
\psline(0.05,-2.35)(0.9,-1.8)
\psline(0.9,-1.8)(0,2.17)
}
\pscustom[fillstyle=solid,opacity=0.2,linecolor=red,fillcolor=red]{%
\psline(0.9,-1.8)(1.3,-1)
\psarc(-1.5,0){3}{-20}{20}
\psline(1.3,1)(0.05,-2.35)
\psline(0.05,-2.35)(0.9,-1.8)
}
%%Dynodenanschl\"{u}sse
\psline[linecolor=blue](-4.9,-1.5)(-4.9,-3)
\psline[linecolor=blue](-3.5,-2.1)(-3.5,-3)
\psline[linecolor=blue](-2.5,2.2)(-2.5,-3)
\psline[linecolor=blue](-1.5,-2.1)(-1.5,-3)
\psline[linecolor=blue](-0.5,2.2)(-0.5,-3)
\psline[linecolor=blue](0.5,-2.1)(0.5,-3)

%%Dynoden
{\psset{linewidth=2pt}
\psarc(-7.5,0){3}{-30}{30}
\psarc(-5,0.5){3}{-70}{-50}
\psarc(-3,0.5){3}{-70}{-50}
\psarc(-1,0.5){3}{-70}{-50}
\psarc(-2.5,-0.8){3}{80}{100}
\psarc(-0.5,-0.8){3}{80}{100}
\psarc(-1.5,0){3}{-20}{20}
}
\def\wider{%
\psframe[fillstyle=solid,fillcolor=white](-0.3,-0.1)(0.3,0.1)
}
%%Schaltung
\psline(-5.5,-3)(3,-3)(3,-4.1)
\psline(3,-4)(-2.4,-4)
\psline(-2.6,-4)(-5.5,-4)(-5.5,-3)
\rput(0,-4){%
\psline(-2.4,-0.2)(-2.4,0.2)
\psline(-2.6,-0.1)(-2.6,0.1)
}
\psline(2.8,-4.1)(3.2,-4.1)
\psline(2.9,-4.2)(3.1,-4.2)
\psline(2.95,-4.3)(3.05,-4.3)
\multido{\iA=-4+1}{6}{
\rput(\iA,-3){\wider}
}
%Schaltung Anode
\psline(1.5,0)(3,0)(3,-1)
\psframe(2.8,-1)(3.2,-2)
\psline(3,-2)(3,-3)
\psline[linecolor=blue]{->}(3,-0.5)(5.5,-0.5)
\psdot[linecolor=blue](3,-0.5)
\psline[linecolor=blue]{->}(3,-3)(5.5,-3)
\psdot[linecolor=blue](3,-3)
\uput[90](4.2,-2){\parbox{2cm}{\centering\small \textcolor{blue}{vers le pr\'{e}amplificateur}}}
% Vers le pr\`{e}amplificateur
\rput(-6,1.5){\parbox{2cm}{\centering\small cristal\\ NaI}}
\end{pspicture}
\end{center}
\end{document}

Vous trouverez d'autres schémas réalisés par Thomas sur le site officiel de PSTricks :
http://tug.org/PSTricks/main.cgi?file=Examples/Physics/physics

Ainsi que sur :
http://melusine.eu.org/syracuse/pstricks/ts/

Comparaison de dimensions : un très beau schéma de Jürgen Gilg et Thomas Söll

Ce très beau schéma permettant de comparer les dimensions d'un atome et d'un édifice, dessiné avec PSTricks, a été réalisé par Thomas Söll et Jürgen Gilg, il m'a été envoyé par Jürgen. Sur Wikipedia, j'ai noté que la cathédrale Notre-Dame de Rouen avec 151 mètres est aujourd'hui plus haute cathédrale de France.

Les fichiers (atome-eglise.pdf atome-eglise.tex) sont inclus dans :

Thomas.Soell

Pignon-crémaillère : application 1

C’est un exemple d’utilisation du package pst-rackpinion : illustration d’un support double crémaillère, utilisé dans les laboratoires de physique et chimie, qui est distribué par les établissements Jeulin.
La macro \StandWithTwoPinionsRack{value1}{value2} est construite en utilisant deux fois la macro \psRackPinion. Les explications sur l'utilisation de la macro sont données dans le fichier support_experience.pdf du sous répertoire rackpinion/pst-rackpinion_package/ :

engrenages

engrenages