Psmap fill patterns

From GRASS-Wiki
Jump to navigation Jump to search

Find instructions to create custom fill patterns here.

# Example of different vareas fill patterns using the Spearfish dataset
g.region vect=fields

ps.map -r out=fillpatterns.ps << EOF
paper a4
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/brick.eps
  where label ~ 'Tandy'
  fcolor red
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/cross_diag.eps
  where label = 'C. Krenshaw#1'
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/cross_diag5.eps
  where label ~ 'Liston#3'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/cross_normal.eps
  where label ~ 'Cartwright#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/cross_normal5.eps
  where label ~ 'Biggam#2'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_down.eps
  where label ~ 'Biggam#6'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_down6.eps
  where label ~ 'McCandles#6'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_up.eps
  where label ~ 'Seagall#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_up6.eps
  where label ~ 'Portillo#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_up_dash.eps
  where label ~ 'Krenshaw#8'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/diag_down_dash.eps
  where label ~ 'Donavan#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/horiz_line.eps
  where label ~ 'Mitchell#5'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/horiz_line6.eps
  where label ~ 'Natl. Forest'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/horiz_line_dash.eps
  where label ~ 'Krenshaw#4'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/polka_dot.eps
  where label ~ 'Wales#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/vert_line.eps
  where label ~ 'Mitchell#4'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/vert_line6.eps
  where label ~ 'Reed#1'
  fcolor black
  end
vareas fields
  pat $GISBASE/etc/paint/patterns/vert_line_dash.eps
  where label ~ 'Mitchell#1'
  fcolor black
  end
end
EOF