[Therion] Survey Names

[Stacho Mudrak]

Quoting Philip Schuchardt <ohc at vt.edu>:
> Is there anyway to make the debug station names smaller?

In the new developement snapshot, this should be possible.

Currently, there is no easy way to do this, but it is possible. You just need to
redefine fonts_setup metapost macro using layout. Just add following code to
your layout:

code metapost
def fonts_setup (expr t,s,m,l,h) =
  write "\def\updown#1#2{\vbox{" &
        "\offinterlineskip" &
        "\setbox100=\hbox{#1}" &
        "\setbox101=\hbox{#2}" &
        "\ifnum\wd100>\wd101\hsize=\wd100\else\hsize=\wd101\fi" &
        "\centerline{\box100}\vskip4pt" &
        "\centerline{\box101}}}" &
        "\def\thlabel{\thnormalsize}" &
        "\def\thremark{\thsmallsize\si}" &
        "\def\thaltitude{\thsmallsize}" &
        "\def\thstationname{\thsmallsize}" &
        "\def\thdate{\thsmallsize}" &
        "\def\thheight{\thsmallsize}" &
        "\def\thheightpos{\thsmallsize+\ignorespaces}" &
        "\def\thheightneg{\thsmallsize-\ignorespaces}" &
        "\def\thframed{\thsmallsize}" &
        "\def\thwallaltitude{\thtinysize}"
  to "mptexpre.tex";
  write "\def\thtinysize{\size[" & decimal max(optical_zoom*t,0) & "]}" &
        "\def\thsmallsize{\size[" & decimal max(optical_zoom*s,0) & "]}" &
        "\def\thnormalsize{\size[" & decimal max(optical_zoom*m,0) & "]}" &
        "\def\thlargesize{\size[" & decimal max(optical_zoom*l,0) & "]}" &
        "\def\thhugesize{\size[" & decimal max(optical_zoom*h,0) & "]}"
  to "mptexpre.tex";
  write "\def\thstationname{\size[4]}" to "mptexpre.tex";
  write EOF to "mptexpre.tex";
enddef;
initialize(Scale);
endcode

It may look crazy at first sight, but it is not so bad. I have just added this
line to the standard code:

  write "\def\thstationname{\size[4]}" to "mptexpre.tex";

And this line tells metapost to use font size 4 for station names. In the near
future, we would like to inspect metapost & tex macros once more and make them
more user friendly and also add more examples to therion book. At least color
labels should be supported soon.

HTH, S.


>
> On Wednesday 05 April 2006 1:58 am, Martin Sluka wrote:
> > On 5.4.2006, at 2:52, Philip Schuchardt wrote:
> > > Is there an easy way to add survey station labels to all the
> > > stations without
> > > going through all the scraps and adding survey name points?
> > >
> > > Philip Schuchardt
> > > _______________________________________________
> >
> > With last versions of therion add to layout section of thconfig file:
> >
> > debug station-names
> >
> >
> > Martin
> > _______________________________________________
> > Therion mailing list
> > Therion at speleo.cz
> > http://www.speleo.cz/mailman/listinfo/therion
> _______________________________________________
> Therion mailing list
> Therion at speleo.cz
> http://www.speleo.cz/mailman/listinfo/therion
>