July 2016 - Therion

"\legendbox" "\loadpicture" and absolute paths
by rowena 14 Mar '21

14 Mar '21

Hello, I am using the "\loadpicture" capability in "\legendbox" constructs to include map sections, elevations, etc. It all works nicely on my PC where I am using relative paths to the pdf files. My club has a desire to archive the map data for posterity - ie if my pc dies or I go walkabout, the map data should still be available so that others can add to the maps as they are extended. I would prefer to have the images included using relative pathnames, rather than absolute pathnames, so that future explorers can download the map data and extend it, without having to duplicate my file hierarchy. How can I include relative paths in the \loadpicture functionality? Thanks, Rowena

4 5

Import a scrap into another scrap (or th2-file)
by torstein finnesand 11 Oct '17

11 Oct '17

Hi fellows, Sometimes I realize that two scraps should have been one (for instance scrap A in A.th2 should have been a part of scrap B in B.th2), in particular when it's difficult to join them. It's easy to insert the xvi file into the scrap B file. But I have to draw it again. Is there any workaround here? Torstein Finnesand Norway

8 14

Simple Android map software with export to Therion
by Martin Sluka 27 Aug '16

27 Aug '16

7 8

Re: [Therion] Therion Digest, Vol 127, Issue 11
by Graham Mullan 21 Jul '16

21 Jul '16

Martin Sluka said > 19. 7. 2016 v 12:12, Graham Mullan <graham.mullan(a)coly.org.uk>: > > The one thing to remember is that its output is a Compass data file which means that whatever you think you did when using it, it will automatically convert all lengths to decimal feet. It looks that last version I have is able to use meters too. It'll take input in metres, but I think you'll find the output is still in feet. I'm pretty sure that he has no intention of rewriting Compass to that extent. Graham

1 0

Map to Data
by Graham Mullan 21 Jul '16

21 Jul '16

Bruce wrote: "Also notice you have added a link to an executable for converting maps to data. Is there a page or some information about what it is and how it works? Some might be nervous about downloading an executable directly without any explanation about what it is and how it works (in case it is malware)" Bruce That program is part of Larry Fish's "Compass" suite. It is perfectly safe to use. The one thing to remember is that its output is a Compass data file which means that whatever you think you did when using it, it will automatically convert all lengths to decimal feet. This is not an issue just as long as you remember it. I've used it a number of times, but only on small caves or mines, so I've had little problem editing the output into a therion or survex file by hand - and remembering to add the line "tape units feet" to it. Graham

3 2

Adjust opacity value in transparent color
by Robert Staven 20 Jul '16

20 Jul '16

Hi, I'm using Therion to map waterfilled caves, and some systems have 'air-locks' (air chambers), so it's necessary to distinguish between air filled cave, waterfilled cave and water surfaces. But the waterfilled area should show details (be transparent) in same way as dry cave. Is there any way to adjust the opacity value (in meta code?) when setting a transparent color? I have made a test to show my issues: The files can be found on http://www.staven.no/cavetest/ The cave (ca 100m long) plan: -> http://www.staven.no/cavetest/testcave_plan.pdf elevation: -> http://www.staven.no/cavetest/testcave_elevation.pdf This doesn't work to well draw underwater maps. *** Changing the water color: layout test code metapost def a_water (expr p) = T:=identity; thfill p withcolor (0.8, 0.8, 1.0); enddef; endcode endlayout -> http://www.staven.no/cavetest/testcave_elevation_2.pdf Looks better but the cave and line 'behind' doesn't show thru the water. *** Try with transparent water color: def_transparent_rgb(tr_lblue, 0.80, 0.80, 1.00); def a_water (expr p) = T:=identity; thfill p withtransparentcolor tr_lblue; enddef; -> http://www.staven.no/cavetest/testcave_elevation_3.pdf *** Almost perfect, but I like to adjust the opacity value so it looks like this: def a_water (expr p) = T:=identity; enddef; # no drawing of water color map-fg [80 80 100] -> http://www.staven.no/cavetest/testcave_elevation_4.pdf (NB You won't see the difference in Adobe Reader, but it shows up in SumatraPDF) Is there any way to adjust the opacity value when setting a transparent color? Or should I do this another way?

3 3

New Therion tips on wiki
by Bruce 18 Jul '16

18 Jul '16

Martin S I like your tip on straightening out zig-zig survey legs in passages in order to make extended elevations more realistic. https://therion.speleo.sk/wiki/doku.php/tips?s[]=zig <https://therion.speleo.sk/wiki/doku.php/tips?s%5b%5d=zig&s%5b%5d=zag> &s[]=zag I am sure I will use that. Also notice you have added a link to an executable for converting maps to data. Is there a page or some information about what it is and how it works? Some might be nervous about downloading an executable directly without any explanation about what it is and how it works (in case it is malware) Bruce PS New look wiki looks good.

1 0

new server
by Martin Budaj 18 Jul '16

18 Jul '16

Hi all, we have finished migration of web pages and mailing lists to a new server. We have also merged mailing list archives from various sources. Please let us know, if there is something broken. Big thanks to Marty and Ladislav for hosting therion website and mailing lists for more than 10 years! Martin

1 0

Cavedepth
by Torsten Schnitter 08 Jul '16

08 Jul '16

Hi I have a question about "cavedepth" and propbably need some help as I can't figure out the problem. My complete survey is about underwater cave passages. Therfore I have an option inside every survey and centerline which is "calibrate depth 0 -1". All survey are with "data diving station depth left right up down newline tape compass". And every depth is with positive numbers like 5.3 then which means -5.3m of waterdepth. Lowest number all over all surveys is 0.0. Biggest number is 24.1. Every scrap contains all the survey stations within this part of the cave as a "point station". So in the end I have every surveyed station inside the scraps. When I print the map as a pdf file (with all the scraps) I don't get the right number for Depth. With numbers as above I would expect a cave depth of 24m but I get 22m. Of course I can do an override with "\cavedepth{24\thinspace{}m}". But this is not what I want to. So can anyone explain please why I don't get the correct number for cavedepth in the map header? Thanks! cheers, Torsten

2 1

North Grid and Mag
by Bruce 03 Jul '16

03 Jul '16

Dirk I have posted this on the wiki, but not tested. http://therion.speleo.sk/wiki/doku.php/metapost#special_symbol_examples Bruce _____ From: Dirk Peinelt [mailto:dirk.peinelt@t-online.de] Sent: Thursday, 9 June 2016 7:35 a.m. To: 'Martin Sluka'; Bruce Mutton Subject: AW: [Therion] Therion Digest, Vol 126, Issue 7 Hi Martin, Bruce, the definition may be published to the wiki. I'dont know if the code is effective. (I've not used the A-D Pens.) I combine this compass rose with a creation date in the map-header (/currentdate). A date variable is not present in metapost. If the CS is not set, the declination is Zero. Also if the declination is Zero, the northarrow is a Nmag arrow: North grid/true rotate the whole plan with the north arrow. (merid. Conv.?) A small change. (I hope i am not mistaken.) def s_northarrow (expr rot) = valscal=1.2; % scale your north arrow here decl:=MagDecl; T:=identity; picture tmp_pic; tmp_pic = image ( pickup pencircle scaled .3; thfill fullcircle scaled 4cm withcolor 1white; thdraw fullcircle scaled 3.1cm; thdraw fullcircle scaled 4.05cm; pickup pencircle scaled .1; thdraw fullcircle scaled 3cm; thdraw fullcircle scaled 4cm; pickup pencircle scaled .2; thdraw (dir(45)*2.025cm)--(dir(45)*3.7cm); thdraw (dir(135)*2.025cm)--(dir(135)*3.7cm); thdraw (dir(225)*2.025cm)--(dir(225)*3.7cm); thdraw (dir(315)*2.025cm)--(dir(315)*3.7cm); pickup pencircle scaled .1; for whereto=0 step 15 until 345: thdraw dir(whereto)*.65cm--dir(whereto)*.9cm; thdraw dir(whereto)*1.4cm--dir(whereto)*1.5cm; endfor; for whereto=0 step 5 until 355: thdraw dir(whereto)*.65cm--dir(whereto)*.8cm; thdraw dir(whereto)*1.45cm--dir(whereto)*1.5cm; endfor; for whereto=0 step 1 until 359: thdraw dir(whereto)*1.94cm--dir(whereto)*2cm; endfor; pickup pencircle scaled 1; thdraw fullcircle scaled 1cm; thdraw fullcircle scaled 1.1cm; thdraw fullcircle scaled 1.3cm withpen pencircle scaled .3; vald=90-decl; texrot=0-decl; drawarrow(dir(vald)*-2cm--dir(vald)*2cm) withpen pencircle scaled .2; if (MagDecl <> 0): thdraw image(label.top(btex $mg$ etex, (0,0)) scaled .5 rotated texrot;) shifted (dir(vald)*2.04cm); fi; thfill (1.06cm,1.06cm)--(0,.2cm)--(-1.06cm,1.06cm)--(-.2cm,0)--(-1.06cm,-1.06cm)--( 0,-.2cm)--(1.06cm,-1.06cm)--(.2cm,0)--cycle; thfill (-.2cm,.2cm)--(0,2cm)--(0,0)--cycle; thfill (.2cm,-.2cm)--(0,-2cm)--(0,0)--cycle; thfill (.2cm,.2cm)--(2cm,0)--(0,0)--cycle; thfill (-.2cm,-.2cm)--(-2cm,0)--(0,0)--cycle; thfill (.2cm,.2cm)--(-0,2cm)--(0,0)--cycle withcolor 1white; thfill (.2cm,-.2cm)--(2cm,0)--(0,0)--cycle withcolor 1white; thfill (-.2cm,-.2cm)--(0,-2cm)--(0,0)--cycle withcolor 1white; thfill (-.2cm,.2cm)--(-2cm,0)--(0,0)--cycle withcolor 1white; pickup pencircle scaled .2; thdraw (-.2cm,.2cm)--(0,2cm)--(.2cm,.2cm)--(2cm,0cm)--(.2cm,-.2cm)--(0,-2cm)--(-.2c m,-.2cm)--(-2cm,0)--cycle; thfill fullcircle scaled .56cm withcolor 1white; pickup pencircle scaled .1; thdraw (.28cm,0)..(0,.28cm)..(-.28cm,0)..(0,-.28cm)..cycle; pickup pencircle scaled .4; thdraw (.2cm,0)..(0,.2cm)..(-.2cm,0)..(0,-.2cm)..cycle; if (MagDecl = 0): label.bot(btex $Nmag$ etex, (0,2.6cm)); else: label.bot(btex $N$ etex, (0,2.6cm)); fi; label.lft(btex $E$ etex, (2.6cm,0)); label.rt(btex $W$ etex, (-2.6cm,0)); label.top(btex $S$ etex, (0,-2.6cm)); ); thdraw tmp_pic scaled valscal rotatedaround(origin, -rot); enddef; //dirk

2 3