encoding  utf-8

source Oldelevationwinnats.th

#export map -proj extended -layout local -o Winnatselevation.pdf
export model -fmt survex -o winold.3d

layout local
###to change the symbols###
symbol-set BCRA
symbol-hide group cave-centreline
symbol-assign line gradient BCRA
symbol-assign area sand AUT
symbol-hide line border
symbol-colour point water-flow [0 0 100]

###to change the colour###
colour map-fg [80 80 80]
#color map-fg altitude
#colour map-bg [50 50 50]

  code metapost
### define water to be light blue
  def a_water (expr p) =
    T:=identity;
    thfill p withcolor (0.48, 0.84, 1.0);
    enddef;
 
### define sump to be dark blue
  def a_sump (expr p) =
    T:=identity;
    thfill p withcolor (0.05, 0.0, 0.7);
  enddef;

def p_continuation(expr pos,theta,sc,al) =
      % draw default continuation symbol ie ?
      p_continuation_UIS(pos,theta,sc,al);
      % if text attribute is set
      if known(ATTR__text) and picture(ATTR__text):
      % set labeling color to light orange
      push_label_fill_color(0.8, 0.8, 0.0);
      % draw filled label with text next to symbol ?
      p_label.urt(ATTR__text,(.5u,-.25u) transformed T,0.0,8);
      % restore original labeling color
      pop_label_fill_color;
      fi;
    enddef;
  endcode
  endlayout