Files
50ohm-contents-dl/contents/drawings/886.tex
T

40 lines
1.4 KiB
TeX

% Author: Malte, DE7LMS and Prof. Dr. Matthias Jung
% Year: 2021/2024
% Colored version of 194
\begin{tikzpicture}[
thick,
>={Triangle},
samples=100,
x={(1 * \getDarcImageFactor cm, 0.2 * \getDarcImageFactor cm)},
y={(0, 1 * \getDarcImageFactor cm)},
z={(0.6 * \getDarcImageFactor cm, -0.2 * \getDarcImageFactor cm)}
]
\fill[lightgray] (0,-2.1,-2) -- (2.2*pi,-2.1,-2) -- (2.2*pi,-2.1,2) -- (0,-2.1,2) -- cycle;
\node[left] at (2,-2.1,0) {Erde};
\draw[draw=black, ->] (0,0,0) -- (2.2*pi,0,0) node[right] {S};
%
\foreach \i in {1,2,3,4,5} {
\draw[->, DARCorange!50] (\i*pi/6,0,0) -- (\i*pi/6,0,{-2*sin(\i*pi/6 r)});
}
\draw[domain=0:1*pi, DARCorange] plot (\x, 0, {-2*sin(\x r)});
%
\foreach \i in {1,2,3,4,5} {
\draw[->, DARCgreen!50] (\i*pi/6,0,0) -- (\i*pi/6,{2*sin(\i*pi/6 r)},0);
}
\draw[domain=0:1*pi, DARCgreen] plot (\x,{2*sin(\x r)}, 0);
%
\foreach \i in {7,8,9,10,11} {
\draw[->, DARCgreen!50] (\i*pi/6,0,0) -- (\i*pi/6,{2*sin(\i*pi/6 r)},0);
}
\draw[domain=1*pi:2*pi, DARCgreen] plot (\x,{2*sin(\x r)}, 0);
%
\foreach \i in {7,8,9,10,11} {
\draw[->, DARCorange!50] (\i*pi/6,0,0) -- (\i*pi/6,0,{-2*sin(\i*pi/6 r)});
}
\draw[domain=1*pi:2*pi, DARCorange] plot (\x, 0, {-2*sin(\x r)});
%
\path (pi/2, {2*sin(pi/2 r)}, 0) node[above] {H};
\path (pi/3, 0, {-2*sin(pi/3 r)}) node[above left] {E};
\end{tikzpicture}