%!
72 72 scale
0.05 setlinewidth
2 2 translate

newpath
0 0 moveto
4 0 lineto
0.2 0.2 0.2 setrgbcolor
0.05 setlinewidth
closepath
stroke

newpath
0 0 moveto
4 0.8 lineto
0.2 0.2 0.2  setrgbcolor
0.05 setlinewidth
closepath
stroke

newpath
1 0.2 moveto
1 0 lineto
1 0.5 0.5 setrgbcolor
closepath
stroke

newpath
2 0.4 moveto
2 0 lineto
1 0.5 0.5 setrgbcolor
closepath
stroke

newpath
3 0.6 moveto
3 0 lineto
1 0.5 0.5 setrgbcolor
closepath
stroke

newpath
1.95 0.2 moveto
2.05 0.2 lineto
0.2 0.2 0.2 setrgbcolor
closepath
stroke

newpath
2.95 0.2 moveto
3.05 0.2 lineto
0.2 0.2 0.2 setrgbcolor
closepath
stroke

newpath
2.95 0.4 moveto
3.05 0.4 lineto
0.2 0.2 0.2 setrgbcolor
closepath
stroke

showpage