newpath
200 200 moveto
100 0 rlineto
-50 87 rlineto
closepath
1 0 0 setrgbcolor
1 setlinejoin
15 setlinewidth
stroke                                        % itt rajzolom ki a fehér alapú piros háromszöget
newpath
250 215 moveto
0 0.1 rlineto
10 setlinewidth
1 setlinecap
0 setgray
stroke                                        % itt rajzolom ki a felkiáltó jel "pontját"
newpath
250 230 moveto
0 25 rlineto
10 setlinewidth
1 setlinecap
0 setgray
stroke                                         % itt pedig a felkiáltó jel törzsét
showpage