newpath
200 200 moveto
140 350 260 350 200 200 curveto
2 setlinewidth
1 0 0 setrgbcolor                               % piros
fill                                                      % festés
showpage