[Therion] Output map Scale

[Stacho Mudrak]

All you need to do is to redefine legend metapost macro. Example - derived from
basic scalebar definiton (just add it to your layout):

code metapost
def s_scalebar (expr l, units, txt) =
 begingroup
  interim warningcheck:=0;
  tmpl:=l / Scale * cm * units / 2;
 endgroup;
 pickup PenC;
 draw (-tmpl,0)--(tmpl,0);
 draw (-tmpl,0)--(-tmpl,2bp);
 draw (tmpl,0)--(tmpl,2bp);
 begingroup
  interim labeloffset:=2bp;
  label.top(thTEX(decimal (l) & "\thinspace" & txt),origin);
  label.top(thTEX("1\thinspace:\thinspace" & decimal (Scale) & "00"), origin +
(0,12bp));
 endgroup
enddef;    
endcode

Regards, S.

Quoting Bruce Mutton <bruce.mutton at paradise.net.nz>:

> Can Therion output the scale of the map as drawn, in text?  (I'd like to
> display this as say 1:1000, as well as the scalebar)
> 
> Thanks
> 
> Bruce
> 
>  
> 
>