\documentclass{article}
\usepackage{tikz}
\usepackage[graphics, active, tightpage]{preview}
\PreviewEnvironment{tikzpicture}

%!tikz preamble begin
\usetikzlibrary{circuits.ee.IEC}
\usetikzlibrary{shapes.geometric}
\usetikzlibrary{positioning}
%!tikz preamble end


\begin{document}
\begin{tikzpicture}[circuit ee IEC]

\tikzset{
    triangle/.style = {regular polygon, regular polygon sides=3, shape border rotate=180,fill,scale=0.5},
	number/.style={circle,very thin,draw=black, fill=white, inner sep=1pt,minimum size=15pt}
  }
  
%%%Transmitter%%%

\draw [thick] (2,0) to (2,-1.5) to [ground]++(0,-0.2);
\draw [thick] (2,1.5) to [battery] (2,-1);
\draw [thick] (2,1.5) -- (2,2);
\node [thick] [contact] at (2,2){};

\node [thick] [contact] (a) at (3,2){};
\draw [thick] (3,2) -- ++(160:1.7);
\node [triangle]at(1.6,2.7) {};

\draw [thick] (a) -- (4.2,2);
\draw [thick] [dotted] (4.2,2) -- (5.8,2);

\draw [rounded corners] (1,1.2) rectangle (3.5,3.2);
\draw [rounded corners,dashed] (0.5,-0.7) rectangle (4,7);

%%%Receiver%%%

\draw [thick] (5.8,2) -- (7,2);
\node [thick] [contact] (c) at (7,2){};

%%Electromagnet%%

\draw [fill=gray!50] (7.3,-0.3) rectangle (7.4,2.5);
\foreach \x in {0,0.6,...,1.5} {
\draw [thick] (7.2,0.6+\x) arc (90:-90:0.3);
}

\draw [thick] (c) -- (7,1.8) -- (7.2,1.8);
\draw [thick] (7.2,0) -- (7,0);
\node [thick] [contact] (d) at (7,0){};
\draw [thick] (7,0) to (7,-1.5) to [ground]++(0,-0.2);

%%Intendor%%

\node [thick] [contact] (f) at (6.5,2.5){};
\draw [thick] (f) -- ++(10:1.7) node(g){};
\node [triangle,below] at(g){};

\draw [fill] (g)  ++(0,-0.6) node(j){} circle  (0.2);
\draw [thick] (g)  ++(0,-0.4) --  ++(3,0) node(h){};

%%Paper Roll

\draw [line width=0.5mm] (h)  ++(0,2) node(i){} circle  (2);
\foreach \x in {0,45,...,360} {
\draw [line width=0.5mm] (i) -- ++(\x:2);
}
\draw [fill] (i) circle  (0.2);

\draw [thick] (j)  ++(225:0.2) --  ++(135:-2) node(k){};
\draw (k) ++(-135:-0.2) node(l){} circle  (0.2);
\draw (l) ++(0,-0.4) circle  (0.2);
\draw [thick] (l) ++(0,-0.2) arc [radius=1, start angle=90, end angle=30] node(n){};
\draw [thick] (n) arc [radius=-1, start angle=30, end angle=90];

\draw [rounded corners,dashed] (6,-0.7) rectangle (13.7,7);

%%%numbering%%%

\node[number] at (2.25,7) {1};
\node[number] at (9.85,7) {2};
\node[number] at (2.25,3.2) {3};
\draw[number] (2.5,0.25) -- (3,0.25) node[number]{4};
\draw[number] (2.5,-1.6) -- (6.5,-1.6) (5,-1.6) node[number]{5};
\draw[number] (5,2) -- (5,3) node[number]{6};
\draw[number] (7,1) -- (5,1) node[number]{7};
\draw[number] (g) -- ++(0,1) node[number]{8};
\draw[number] (g)  ++(0,2.2) node[number]{9} -- ++(0:1.5);
\draw[number] (j)  ++(-22.5:0.35) -- ++(-22:1) node[number]{10};
\draw[number] (l)  ++(40:0.35) -- ++(40:1) node(m)[number]{11};
\draw[number] (n)  ++(40:1.1) node[number]{12} -- ++(-120:1.05) ;

\end{tikzpicture}
\end{document}