encoding  utf-8

# This file contains the settings used for the layout that should be common for the
# whole data set.
# The help with each command,comes from the Therion Book issued with v0.3.10
#('M' and 'A' indicate whether the option applies to Map or Atlas output mode respectively)

#input Symbols.th

layout common
copy symbols


scale 1 200
# scale <picture length> <real length> 
# set scale of output map or map atlas (M, A; default: 1 200)
# Note scale determines the dimension of the pdf (bigger scale means that pdf is
# scaled for a larger piece of paper). The map header is scaled also (to be suitable
# to read when PDF is shown at 100% zoom. Scale has no effect on the relative size of
# symbols, text, etc.

base-scale 1 700
# base-scale <picture length> <real length> . if set, Therion will optically scale
#the map by a (scale/base-scale) factor. This has the same effect as if the map
#printed in base-scale would be photoreduced to the scale. (M, A)
#Note base-scale determines the relative size of symbols, text, etc. No effect on
#dimensions of pdf or the header text.

north grid

units metric
# units <metric/imperial> . set output units (M, A; default: metric)



transparency on
# transparency <on/off> . set transparency for the passages (underlying passages are
#also visible) (M, A; default: on)

opacity 60
# opacity <value> . set opacity value (used if transparency is on). Value range is
#0–100. (M, A; default: 70)
#00 = transparent, 100 = block out
#40 = subtle, 60 - 70 = apparent: overwritten text still visible
#80 = good passage definition but overwritten text barely visible
colour preview-below 80 #0 = black 100 =  white
colour preview-above 80 #0 = black 100 =  white
# set grey value for preview of passages that are offset

#surface <top/bottom/off>
# surface-opacity <value> . set the surface bitmap opacity (used if transparency is on). Value range is 0-100. (M, A; default: 70)
 
surface-opacity 25
# surface <top/bottom/off> . set the position of the surface bitmap above/below the map. (M, A; default: off)

grid off
# grid <off/bottom/top> . enable/disable grid (M, A; default: off)

#grid-origin <x> <y> <x> <units>
# grid-origin <x> <y> <x> <units> . set coordinates of grid origin (M, A) [Grid is currently not supported.]

grid-size 100 100 50 metres
# grid-size <x> <y> <z> <units> . set grid size in real units (M, A; default 10 m)

#origin <x> <y> <z> <units>
# origin <x> <y> <z> <units> . set origin of atlas pages (M, A)

#origin-label <x-label> <y-label>
# origin-label <x-label> <y-label> . set label for atlas page which has the lower
#left corner at the given origin coordinates (M, A; default: 0 0)

#page-grid <on/off>
# page-grid <on/off> . show pages key plan (M; default: off)

legend off
# legend <on/off/all> . display list of used map symbols in the map header. If set to
#all, all symbols from the current symbol set are displayed. (M, A; default: off)

#colour-legend <on/off>
# colo[u]r-legend <on/off> . turn on/off colour legend (M, A)

#legend-columns <number>
# legend-columns <number> . adjusts the number of legend columns (M, A; default: 2)

#legend-width <n> <units>
# legend-width <n> <units> . legend width (M, A; default: 14 cm)

map-header 10 90 nw
#map-header <x> <y> <off/n/s/e/w/ne/nw/se/sw/center> . print map header at
#location specified by <x> <y>. Predefined map header contains some basic information
#about cave: name, scale, north arrow, list of surveyors etc. It is fully customizable (see
#the chapter Changing layout for details). <x> is easting (left-right on page). <y> is
#northing (up/down page). Ranges for <x> and <y> are -100{200. Lower-left corner of
#the map is 0 0, upper-right corner is 100 100. The header is aligned with the specified
#corner or side to this anchor point. (M; default: 0 100 nw)

map-header-bg on
# map-header-bg <on/off> . when on, background of map header is filled with background
#colour (e.g. to hide map grid). (M; default: off)

scale-bar 100 metres
# scale-bar <length> <units> . set the length of the scale-bar (M, A)

#Change the scale bar to black and white bar, split into 5 and labelled
code metapost
  def s_scalebar (expr l, units, txt) =
    begingroup
      interim warningcheck:=0;
      tmpl:=l / Scale * cm * units / 2;
      tmpx:=l / Scale * cm * units / 5;
      tmph:=5bp; % bar height
    endgroup;
    pickup PenC;
#Adjusted to make lines not stick out: 0.25*u/10,0 is half thickness of PenC
    draw (-tmpl+0.25*u/10,0)--(tmpl-0.25*u/10,0);
    draw (tmpl-0.25*u/10,-tmph)--(-tmpl+0.25*u/10,-tmph);
    p:=(0,0)--(tmpx,0)--(tmpx,-tmph)--(0,-tmph)--cycle;
    for i:=-2.5 step 2 until 2:
      fill p shifted (i * tmpx,0);

    endfor;
    begingroup
      interim labeloffset:=3.5bp;
      for i:=0 step (l/5) until (l-1):
        tmpx:=tmpl * (i * 2 / l - 1);
        label.top(thTEX(decimal (i)),(tmpx,0));
      endfor;
      label.top(thTEX(decimal (l) & "\thinspace" & txt),(tmpl,0));
#      label.bot(thTEX("Original Scale = 1 : " & decimal (Scale*100)),(0,-tmph));
    endgroup;
  enddef;

endcode

language en_UK
# language <xx[_YY]> . set output language. Available languages are listed on impressum
#page. See the Appendix if you want to add or customize translations. (M,A)


#colour map-gb [ 70 90 70 ]
colour map-bg 90
colour map-fg altitude
# colo[u]r <item> <colour> . customize colour for special map items (map-fg, mapbg,
#preview-above, preview-below). Colour range is 0-100 for grayscale, [0-100 0-100
#0-100] triplet for RGB colours. Special colour specification for map-fg is altitude,
#scrap or map, in which case the map is coloured according to altitude, scraps or maps.
# Set background to be grey or pale blue. 

#Adopt passage slope 'fat triangle arrows' in favour of default skinny arrows
#  symbol-assign line gradient BCRA
#  symbol-assign point gradient BCRA


# code <metapost/tex-map/tex-atlas> . Add/redefine TEX and METAPOST macros
#here. This allows user to configure various things (like user defined symbols, map and
#atlas layout at one place &c.) See the chapter Changing layout for details.

symbol-colour point water-flow [0 0 100]
symbol-colour line water-flow [0 0 100]
symbol-colour line section [100 0 0]

#define rope usertype
  code metapost
    def l_u_rope (expr P) =
      T:=identity;
      pickup pensquare scaled (0.6*u/10);
      if known colour_rope:
        thdraw P withcolor colour_rope;
      else:
        thdraw P withcolor (0.8,0.0,0.8); 
      fi;
      pickup PenD;
    enddef;
  endcode


code metapost

  fonts_setup(3,4,6,10,14) # font sizes
  u:=3.0pt;
# general font sizes

  let p_gradient = p_entrance_UIS;
#replaces the UIS gradient symbol with the entrance symbol that looks like 
#BCRA gradient symbol

#  let l_floorstep = l_border_visible_SKBB;
# bodge to make floor-steps look sensible

 let l_overhang = l_ceilingstep_SKBB;
# bodge to make overhangs look sensible
 


# define dashed line for surface surveys
  def l_survey_surface (expr P) =
    T:=identity;
    pickup PenD scaled 0.2;
    thdraw P withcolor (0.8,0.8,0.8);
  enddef;
  
# define cave centreline to be green  
  def l_survey_cave (expr P) =
    T:=identity;
    pickup PenD scaled 0.2;
    thdraw P dashed dashpattern(on 3 off 10) withcolor (0.0,0.9,0.0);

  enddef;
  
# define user line for conservation tape - red
  def l_u_tape (expr P) =
  T:=identity;  
  pickup PenD scaled 0.2;
  thdraw P dashed evenly withcolor (0.8,0.0,0.0);
  enddef;

# define water to be light blue
  def a_water (expr p) =
    T:=identity;
#nice light blue - but nearly same as level colour - change back when we have control of that
    thfill p withcolor (0.48, 0.84, 1.0);
#    thfill p withcolor (0.0, 0.0, 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;

endcode

doc-author "Wookey"
# doc-author <string> . set document author (M, A)

endlayout