%!

 
    25 25 scale
    8 30 translate
    0.01 setlinewidth

    newpath
    -5 0 moveto
    -5 -3 lineto
    5 -3 lineto
    5 0 lineto
    -5 0 lineto
    closepath
    0.5 0.5 1 setrgbcolor
    fill
    
   newpath
   0 10 10 240 300 arc
   0.5 0.5 1 setrgbcolor
   fill


        
    stroke