maxrjones
/
gmt-fork
mirror of https://github.com/meghanrjones/gmt.git


  
1

	
2

	
3

	
4

	
5

	
6

	
7

	
8

	
9

	
10

	
11

	
12

	
13

	
14

	
15

	
16

	
17

	
18

	
19

	
20

	
            #!/usr/bin/env bash
# Test rectangular EPS symbol in psxy
ps=gallo.ps

# Get the height of EPS file symbol relative to width
epsfile=`gmt which -Gl @gallo.eps`

scale=`grep "%%HiResBoundingBox" $epsfile | awk '{print ($5-$3)/($4-$2)}'`
cat << EOF > chicks.txt
-23 34 4c
-35 15 5c
-10 10 1i
-15 55 3i
-40 65 2i
EOF
gmt psxy -Skgallo -R-45/0/0/70 -JX15c/0 -B5 -BWSen -P -K chicks.txt -Xc > $ps
awk '{printf "%s %s %s %g%s\n", $1, $2, $3, substr($3,1,1)*'"$scale"', substr($3,2,1)}' chicks.txt > r.txt
gmt psxy -R -J -O -K r.txt -Sr -Wfaint,blue >> $ps
gmt psxy -R -J -O -K chicks.txt -S+4i -Wfaint,red >> $ps
gmt psxy -R -J -O chicks.txt -Sc0.1i -Gyellow -Wthin >> $ps