cat << EOT > _test0.txt
0 0 5 0
0 0 0 3
0 0 3 3
EOT
cat << EOT > _test1.txt
0 0 3 0
1 1 4 1
2 2 5 2
0 0 2 2
1 0 3 2
2 0 4 2
3 0 5 2
EOT
cat << EOT > _text.txt
5.3 0.0 10p,Helvetica 0 MC X
0.0 3.3 10p,Helvetica 0 MC Z
3.2 3.2 10p,Helvetica 0 MC Y
EOT
fig=fig_grid_1.eps
gmt psxy _test0.txt -R-1/6/-1/4 -JX7/5 -Sv0.2+s -W0.5 -P -K > $fig
gmt psxy _test1.txt -R -JX -Sv0.2+s -W2 -K -O >> $fig
gmt pstext _text.txt -R -J -F+f+a+j -N -K -O >> $fig
echo '0 0' | gmt psxy -R -J -Sp -O >> $fig


fig=fig_grid_2.eps
gmt psxy -R-1/5/-1/2 -JX6/3 -W0.5 -P -K << EOT > $fig
>
0.0 0.0
4.5 0.0
>
0.0 0.0
0.0 1.5
EOT
gmt psxy -R -JX -G#cccccc -W1 -K -O << EOT >> $fig
0 -0.1
0  0.1
3  0.1
3 -0.1
EOT
awk 'BEGIN{pi=3.141592654;for(i=90;i<=270;i++){print 0.5*cos(i/180*pi)-0.5,0.5*sin(i/180*pi)}}' | gmt psxy -R -J -W2 -K -O >> $fig
awk 'BEGIN{pi=3.141592654;for(i=-90;i<=90;i++){print 0.5*cos(i/180*pi)+3.5,0.5*sin(i/180*pi)}}' | gmt psxy -R -J -W2 -K -O >> $fig
gmt set MAP_VECTOR_SHAPE 0
gmt psxy -R -J -Sv0.2+s+e+a45  -G0 -W1.5 -O -K << EOT >> $fig
 0.0  0.0  0.0  1.0
 3.0  0.0  3.0  1.0
-0.5  0.5 -0.3  0.5
 3.5 -0.5  3.3 -0.5
-0.7  0.0  0.0  0.0
-0.7  0.0 -0.2  0.0
 3.0  0.0  3.7  0.0
 3.0  0.0  3.5  0.0
EOT
gmt pstext -R -J -F+f+a+j -N -K -O << EOT >> $fig
 4.7  0.0 10p,Helvetica 0 MC x
 0.0  1.8 10p,Helvetica 0 MC z
 0.3  1.0 10p,Helvetica 0 MC w@-i@-
 2.7  1.0 10p,Helvetica 0 MC w@-j@-
-1.1  0.5 10p,Helvetica 0 MC @~q@~@-i@-
 4.1 -0.5 10p,Helvetica 0 MC @~q@~@-j@-
-0.2 -0.3 10p,Helvetica 0 MC @~f@~@-i@-
 3.3  0.4 10p,Helvetica 0 MC @~f@~@-j@-
EOT
echo '0 0' | gmt psxy -R -J -Sp -O >> $fig