tiny-ps web component
100 100 moveto 200 100 lineto 150 200 lineto closepath
/triangle { moveto 100 0 rlineto -50 100 rlineto closepath } def
0.2 setgray
0 0 moveto
590 0 lineto
590 350 lineto
0 350 lineto
closepath
fill
1 setgray
200 100 triangle
240 140 triangle
280 180 triangle
stroke
showpage
Or write directly