\documentclass[11pt]{article}
\input fig4tex.tex
\begin{document}

% 1. Definition of characteristic points

\figinit{.8cm,orthogonal}

%Axes.
\figpt 1:(0,0,0)
\figpt 2:(2,0,0)
\figpt 3:(0,2,0)
\figpt 4:(0,0,2)
\figvectC 0 (0,6,0)
\figpttra 1:=1 /1, 0/
\figpttra 2:$x$=2 /1, 0/
\figpttra 3:$y$=3 /1, 0/
\figpttra 4:$z$=4 /1, 0/

%Antenne.
\def\ray{2}
\def\hau{3}

\figpt 5:(0,-\ray,-\hau)
\figpt 6:(0,0,-\hau)
\figpt 7:(0,\ray,-\hau)
\figpt 8:(\ray,0,-\hau)
\figpt 9:(-\ray,0,-\hau)

\figpt 10:(0,-\ray,\hau)
\figpt 11:(0,0,\hau)
\figpt 12:(0,\ray,\hau)
\figpt 13:(\ray,0,\hau)
\figpt 14:(-\ray,0,\hau)

\figptbary 15:[5,10;1,1]
\figptbary 16:[7,12;1,1]

% 2. Creation of the graphical file

\figsetview(10)
\psbeginfig{}

%Axes.
\psarrow[1,2]
\psarrow[1,3]
\psarrow[1,4]

%Anneau du bas.
\psarccircP 6;\ray[5,8,8]
\pssetdash{7}
\psarccircP 6;\ray[5,9,9]
\pssetdash{1}

%Anneau du haut.
\psarccircP 11;\ray[12,13,13]
\psarccircP 11;\ray[12,14,14]

%Brins verticaux.
\psline[5,10]
\psline[7,12]

%Courant.
\pssetarrowheadfill{yes}
\psarrowcirc 6,7,8 ; \ray (0,90)
\pssetdash{7}
\psarrowcirc 6,7,9 ; \ray (0,90)
\pssetdash{1}

\pssetarrowheadfill{yes}
\psarrowcirc 11,10,13 ; \ray (0,90)
\psarrowcirc 11,10,14 ; \ray (0,90)

\psarrow[5,15]
\psarrow[12,16]

\psendfig

% 3. Writing text on the figure

\def\dist{3pt}
\figvisu{\figBoxA}{{\sc Fig. 6}\ --\ L'antenne élémentaire pour $k$ impair}{%
\figwritew 2:(\dist)
\figwritene 3:(\dist)
\figwriten 4:(\dist)
\figwritew 10:$A$(\dist)
\figwritee 12:$B$(\dist)
\figwriten 8:$I/2$(\dist)
\figwriten 9:$I/2$(\dist)
\figwriten 13:$I/2$(\dist)
\figwriten 14:$I/2$(\dist)
\figwritew 15:$I$(\dist)
\figwritee 16:$I$(\dist)
}
\box\figBoxA
\end{document}