#CODE TO CUSTOMISE PDF MAP OUTPUT #------------------------------ layout LayoutExperimentalHeader #This code is experimental redefinition of map header #Bruce Mutton 25Jun2011 Therion 5.3.8 # date and version temporarily entered manually in thconfig file code tex-map % start bruces addition \newtoks\thversiontitleA \thversiontitleA={Compiled with} \newtoks\thversiontitleB \thversiontitleB={Therion version } \newtoks\datetitle \datetitle{ on } % end bruces addition \legendcontent={% \hsize=\legendwidth \color[0 0 0]\the\legendtextcolor \ifnortharrow\vbox to 0pt{\line{\hfil\northarrow}\vss}\fi \edef\tmp{\the\cavename} \ifx\tmp\empty \else {\the\legendtextheadersize\the\cavename}\vskip1cm \fi \ifscalebar\scalebar\vskip1cm\fi {\rightskip=0pt plus 3em\parskip=3bp \edef\tmp{\the\comment} \ifx\tmp\empty \else {\the\legendtextsize\the\comment} \par\medskip \fi \everypar{\hangindent=2em\hangafter=1} \edef\tmp{\the\cavelength} \ifx\tmp\empty \else {\the\legendtextsize\si\the\cavelengthtitle: \ss\the\cavelength\par} \fi \edef\tmp{\the\cavedepth} \ifx\tmp\empty \else {\the\legendtextsize\si\the\cavedepthtitle: \ss\the\cavedepth\par} \fi \edef\tmp{\the\exploteam} \ifx\tmp\empty \else {\the\legendtextsize\si\the\explotitle: \ss\the\exploteam\quad\si\the\explodate\par} \fi \edef\tmp{\the\topoteam} \ifx\tmp\empty \else {\the\legendtextsize\si\the\topotitle: \ss\the\topoteam\quad\si\the\topodate\par} \fi \edef\tmp{\the\cartoteam} \ifx\tmp\empty \else {\the\legendtextsize\si\the\cartotitle: \ss\the\cartoteam\quad\si\the\cartodate\par} \fi % start bruces addition \edef\tmp{\the\thversion} \ifx\tmp\empty \else {\the\legendtextsize\si\the\thversiontitleA: \ss\the\thversiontitleB \ss\the\thversion} \fi \edef\tmp{\the\today} \ifx\tmp\empty \else {\the\legendtextsize\ss\the\datetitle \ss\the\today\par} \fi % end bruces addition \edef\tmp{\the\copyrights} \ifx\tmp\empty \else {\the\legendtextsize\ss\the\copyrights\par} \fi } \formattedlegend \color[0 0 0] } endcode endlayout LayoutExperimentalHeader #!END