encoding  utf-8
# 2024.08.22 created by TopoDroid v 6.2.44

source "CH_uppermost.th"

###tweak legend
  ###Removing from legend
  text en "line rock-border" "rocks"
  

layout local
  symbol-set BCRA
  legend off
  symbol-hide group centerline
  symbol-hide point station
  debug off

###prepping for custom symbols
 symbol-assign area blocks TEST

code metapost 
### custom symbol definition
  initsymbol ("a_blocks_TEST"); 
  initsymbol ("a_flowstone_TEST");

  beginpattern(pattern_flowstone_TEST);
    pickup PenC;​
    p:=(-.25u,0){dir -60} .. {dir 60}(0.25u,0);​
    draw p;​
    draw p shifted (0.35u,0.4u);​
    patternxstep(0.9u);​
    patternystep(0.30u);​
  endpattern;

  def a_flowstone_TEST (expr Path) =
    T:=identity;​
    thclean Path;​
    thfill Path withpattern pattern_flowstone_TEST;​
  enddef;
  
  def a_blocks_TEST (expr p) = T:=identity; 
  symbol_distance:=0.7; scale_factor:= 0.001; 
  pickup PenC; path q, qq; q = bbox p; 
  pair outside; outside:= ulcorner q + up; picture tmp_pic; 
  uu := max(u, (xpart urcorner q - xpart llcorner q)/100, (ypart urcorner q - ypart llcorner q)/100); 
  tmp_pic := image( for i = xpart llcorner q step symbol_distance*uu until xpart urcorner q: for j = ypart llcorner q step symbol_distance*uu until ypart urcorner q: qq := punked (((-.5uu,-.5uu)--(.5uu,-.5uu)--(1.05uu,0.05uu)--(.5uu,.5uu)--(-.5uu,.5uu)--cycle) randomized (uu/2)) scaled (uniformdeviate(0.7)+scale_factor ) rotated uniformdeviate(360) shifted ((i,j) randomized 0.75uu); 
  if xpart (p intersectiontimes qq) < 0: if pointinside((i,j),p,outside): thclean qq; thdraw qq; 
  fi; else: qq:= qq scaled (uniformdeviate(.2)+.5 ) if xpart (p intersectiontimes qq) < 0: if pointinside((i,j),p,outside): thclean qq; 
  thdraw qq; fi; fi; fi; endfor; endfor; ); 
  clip tmp_pic to p; drawoptions(); draw tmp_pic; 
  enddef;
  
endcode

endlayout

layout colour_plan
  colour map-fg altitude #[97 93 43]
  #scale 1 100
  map-header -8 30 sw
  map-comment "BCRA Grade 5d<br>Drawn by Michael Holliday"
endlayout

layout colour_elevation
  colour map-fg altitude #[97 93 43]
  #scale 1 100
  map-header 43 46 sw  
  map-comment "BCRA Grade 5d<br>Drawn by Michael Holliday"
endlayout


layout plan200
  scale 1 200
  colour map-fg altitude #[97 93 43]
  base-scale 1 140
endlayout

layout plan500
  scale 1 500
  min-symbol-scale s
  base-scale 1 170
endlayout

layout elevation200
  colour map-fg altitude #[97 93 43]
  scale 1 200
endlayout

layout elevation500
  scale 1 500
  min-symbol-scale s

endlayout

#exports
export map -layout local -layout plan200 -o Cowshead_03_4_draft_p200.pdf -proj plan 
export map -layout local -layout plan500 -o Cowshead_03_4_draft_p500.pdf -proj plan 
export map -layout local -layout elevation200 -o Cowshead_03_4_draft_e200.pdf -proj extended
export map -layout local -layout elevation500 -o Cowshead_03_4_draft_e500.pdf -proj extended