\begin{tikzpicture}[scale=2.54]%
% dpic version 2024.01.01 option -g for TikZ and PGF 1.01
\ifx\dpiclw\undefined\newdimen\dpiclw\fi
\global\def\dpicdraw{\draw[line width=\dpiclw]}
\global\def\dpicstop{;}
\dpiclw=0.8bp
\dpiclw=0.8bp
\dpicdraw[fill=red,draw=blue](1.375,1.5) ellipse (0.147638in and 0.098425in)\dpicstop
\fill[fill=blue,line width=0bp](2.25,1)
 ..controls (2.525892,1) and (2.75,1.224108)
 ..(2.75,1.5)
 ..controls (2.75,1.775892) and (2.525892,2)
 ..(2.25,2)
 ..controls (1.974108,2) and (1.75,1.775892)
 ..(1.75,1.5)
 ..controls (1.75,1.224108) and (1.974108,1)
 ..(2.25,1) --cycle\dpicstop
\dpicdraw[draw=red](2.25,1)
 ..controls (2.525892,1) and (2.75,1.224108)
 ..(2.75,1.5)
 ..controls (2.75,1.775892) and (2.525892,2)
 ..(2.25,2)
 ..controls (1.974108,2) and (1.75,1.775892)
 ..(1.75,1.5)
 ..controls (1.75,1.224108) and (1.974108,1)
 ..(2.25,1)\dpicstop
\fill[fill=white!90!black,line width=0bp](3.245465,1.323223)
 ..controls (3.391779,1.469537) and (3.431396,1.667622)
 ..(3.333854,1.765165)
 ..controls (3.236311,1.862708) and (3.038226,1.823091)
 ..(2.891912,1.676777)
 ..controls (2.745598,1.530463) and (2.705981,1.332378)
 ..(2.803524,1.234835)
 ..controls (2.901066,1.137292) and (3.099152,1.176909)
 ..(3.245465,1.323223) --cycle\dpicstop
\dpicdraw[dotted](3.245465,1.323223)
 ..controls (3.391779,1.469537) and (3.431396,1.667622)
 ..(3.333854,1.765165)
 ..controls (3.236311,1.862708) and (3.038226,1.823091)
 ..(2.891912,1.676777)
 ..controls (2.745598,1.530463) and (2.705981,1.332378)
 ..(2.803524,1.234835)
 ..controls (2.901066,1.137292) and (3.099152,1.176909)
 ..(3.245465,1.323223)\dpicstop
\dpicdraw[draw=red](3.245465,1.960601)
 ..controls (3.391779,2.106915) and (3.431396,2.305)
 ..(3.333854,2.402542)
 ..controls (3.236311,2.500085) and (3.038226,2.460468)
 ..(2.891912,2.314154)
 ..controls (2.745598,2.16784) and (2.705981,1.969755)
 ..(2.803524,1.872212)
 ..controls (2.901066,1.77467) and (3.099152,1.814287)
 ..(3.245465,1.960601)\dpicstop
\dpiclw=0.4bp
\dpicdraw (1.75,1) rectangle (2.75,2)\dpicstop
\dpicdraw (2.75,1.181311) rectangle (3.387377,1.818689)\dpicstop
\dpicdraw (2.75,1.818689) rectangle (3.387377,2.456066)\dpicstop
\dpiclw=0.8bp
\end{tikzpicture}%