April 2009 - Therion

DistoX and PocketTopo with Therion
by Bruce Mutton 13 Apr '10

13 Apr '10

Hi there I have a Disto arriving hopefully in a few days, and looking ahead I've been tentatively trialling PocketTopo on my PC. I suspect therein lies my first problem. Perhaps it only has limited functionality on PC's? I can manually enter data, but I can not seem to draw passage outline. The Export Therion format does not seem to produce data in a format similar to what Therion normally accepts - after the data it produces some form of co-ords separated into plan and elevation partitions. Most of the survey stations are converted to 10 digit numbers and all of the keywords are in capitals. Much of the file content could be made Therion compatible relatively easily using a text editor, but surely this is not what is intended? Obviously there is something significant here that I am missing. Have searched about but have not found the solution yet. Does anyone have a small dataset that demonstrates the interaction between PocketTopo and Therion? Bruce

10 23

New snapshot of therion
by Martin Sluka 27 Apr '09

27 Apr '09

Unstable version is 5.2.8, released on Apr 23, 2009. Contains bug fixes, new features (mostly undocumented and subject to change until new stable version is released) and occasionaly introduces new bugs. m.s.

3 4

Ponit Label Alignment
by Bruce Mutton 25 Apr '09

25 Apr '09

Hi I have had a long standing (at least since version 0.5.1) difficulty with point label text alignment. (Currently using 5.2.7) It seems that if rotate = 0 and the alignment of the scrap in the map editor matches (more or less) the alignment of the scrap in pdf outputs, then commands such as -align right or -align tl are honoured. If however rotate = 70 (for example) or the scrap alignment in the map editor is significantly different to the alignment of the scrap in the pdf outputs then the -align parameters are incorrectly (in my view) applied. The effect of this is to require the user to align scraps and xvi files to match the finished pdf drawing output if text alignment is to be readily controllable. It also makes it nearly impossible to produce a scrap that generates nice labels where it is desired to produce sets of pdf outputs with various orientations. In the attachment I have put together a dataset that starts to demonstrate characteristics of the problem. I have superposed survey station points and point labels so that the alignment can be observed - a clear pattern is observable. You can see that the alignment is based on the orientation in the map editor, not the pdf output. I have added some text that has orientation and applied some distortion to the scrap by misaligning the survey stations, so you can see (another reason) why 'orientation' of point labels is not a good idea - scrap distortions misalign the text a little. While it may seem trivial in this example, on a real map with labels (perhaps at the end of arrows) it tends to make a real mess that can only be resolved by iteration and can not usually be resolved if two or more distinct 'rotations' are required without changing all the point labels positions. Not a feasible proposition. Has anyone else noticed or had difficulty with this behaviour? Is it likely that it can be altered? Regards Bruce

1 0

3D sample
by mara 17 Apr '09

17 Apr '09

Hi everybody, I am no Therion expert but would like to try some 3d modeling; honestly speaking I am having some difficulties. To get a better understanding could some of you send me a sample file with both config and th files so that I can run it and understand little more? Tried to find more info on wiki and therionbook but without success. Thanks for yr help best Mara Arriva Tiscali Mobile! Acquista la tua SIM Tiscali a soli €5 e scopri la semplicità e la convenienza del nuovo servizio per il tuo cellulare. Passa a Tiscali Mobile http://abbonati.tiscali.it/promo/tiscalimobile/

2 1

custumizing lines wall subtype blocks
by Gilbert Fernandes (mailinglist) 10 Apr '09

10 Apr '09

Hello, I tried to custumise the line drawing for Wall subtype blocks but I did not succeed. I try to use the same technique (and syntaxe) used for others kinds of lines but here, it's not a line but a SUBTYPE of line Is it possible ? and what is the syntaxe ? Thanks, Here my code, written in the layout bloc code metapost def l_wall_blocks_PINEE (expr P) = % pickup PenD; % draw P withcolor red; T:=identity; cas := 0; dlzka := arclength P; if dlzka > 0: mojkrok:=adjust_step(dlzka, 1.5u); pickup PenA; forever: t1 := arctime (cas + mojkrok*1/10) of P; t2 := arctime (cas + mojkrok*9/10) of P; q := ((point t1 of P) + .4u * unitvector(thdir(P,t1) rotated -90)) -- (subpath (t1,t2) of P) -- ((point t2 of P) + .4u * unitvector(thdir(P,t2) rotated -90)); thdraw q randomized (u/6); cas := cas + mojkrok; exitif cas > dlzka - (2*mojkrok/3); % for rounding errors endfor; fi; enddef; initsymbol("l_wall_blocks_PINEE"); #symbol-assign line wall_blocks PINEE # let l_wall_blocks = l_wall_blocks_PINEE endcode The symbol-assign command did not work, and the "let l_wall_blocks = l_wall_blocks_PINEE" generate an error on compiling An extract of the logs ####################### metapost log file ######################## This is MetaPost, Version 0.641 (Web2c 7.5.2) (mem=mpost 2004.3.2) 9 APR 2009 10:25 **data.mp (data.mp [4001] [4002] [4003] [4004] [4005] [4006] [4007] ! Extra tokens will be flushed. <to be read again> string mapsymbol->string .s,stype,lname,ID;stype=substring(0,1)of(EXPR0);lname=(EXPR... l.3748 mapsymbol("a_bedrock","UIS",false) ; I've just read as much of that statement as I could fathom, so a semicolon should have been next. It's very puzzling... but I'll try to get myself back together, by ignoring everything up to the next `;'. Please insert a semicolon now in front of anything that you don't want me to delete. (See Chapter 27 of The METAFONTbook for an example.) > > stype > > "a" ! Equation cannot be performed (numeric=string). <to be read again> ; mapsymbol->...me,ID;stype=substring(0,1)of(EXPR0); lname=(EXPR0)&"_"&(EXPR1);... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm sorry, but I don't know how to make such things equal. (See the two expressions just above the error message.) > > lname > > "a_bedrock_UIS" ! Equation cannot be performed (numeric=string). <to be read again> ; mapsymbol->...of(EXPR0);lname=(EXPR0)&"_"&(EXPR1); ID:="ID_"&lname;if(known.s... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm sorry, but I don't know how to make such things equal. (See the two expressions just above the error message.) > > "ID_" > > lname ! Not implemented: (string)&(unknown numeric). <to be read again> ; mapsymbol->...(EXPR0)&"_"&(EXPR1);ID:="ID_"&lname; if(known.scantokens.ID):if... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm afraid I don't know how to apply that operation to that combination of types. Continue, and I'll return the second argument (see above) as the result of the operation. > > lname ! Not a string. <to be read again> ) mapsymbol->...="ID_"&lname;if(known.scantokens.ID) :if.stype="a":s="def "&(EX... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm going to flush this expression, since scantokens should be followed by a known string. ! A primary expression can't begin with `:'. <inserted text> 0 <to be read again> : mapsymbol->..."ID_"&lname;if(known.scantokens.ID): if.stype="a":s="def "&(EXP... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm afraid I need some sort of value in order to continue, so I've tentatively inserted `0'. You may want to delete this zero and insert something else; see Chapter 27 of The METAFONTbook for an example. ! Missing `)' has been inserted. <to be read again> : mapsymbol->..."ID_"&lname;if(known.scantokens.ID): if.stype="a":s="def "&(EXP... l.3748 mapsymbol("a_bedrock","UIS",false) ; I found no right delimiter to match a left one. So I've put one in, behind the scenes; this may fix the problem. > > stype > > "a" ! Not implemented: (unknown numeric)=(string). <to be read again> : mapsymbol->...f(known.scantokens.ID):if.stype="a": s="def "&(EXPR0)&" = scant... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm afraid I don't know how to apply that operation to that combination of types. Continue, and I'll return the second argument (see above) as the result of the operation. > > "a" ! Undefined condition will be treated as `false'. <to be read again> : mapsymbol->...f(known.scantokens.ID):if.stype="a": s="def "&(EXPR0)&" = scant... l.3748 mapsymbol("a_bedrock","UIS",false) ; The expression shown above should have had a definite true-or-false value. I'm changing it to `false'. > > "let a_bedrock = " > > lname ! Not implemented: (string)&(unknown numeric). <to be read again> & mapsymbol->...";else:s="let "&(EXPR0)&" = "&lname& ";";fi;scantokens.s;elseif... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm afraid I don't know how to apply that operation to that combination of types. Continue, and I'll return the second argument (see above) as the result of the operation. > > lname > > ";" ! Not implemented: (unknown numeric)&(string). <to be read again> ; mapsymbol->...se:s="let "&(EXPR0)&" = "&lname&";"; fi;scantokens.s;elseif(EXP... l.3748 mapsymbol("a_bedrock","UIS",false) ; I'm afraid I don't know how to apply that operation to that combination of types. Continue, and I'll return the second argument (see above) as the result of the operation. ! Inconsistent equation. <to be read again> ; mapsymbol->...se:s="let "&(EXPR0)&" = "&lname&";"; fi;scantokens.s;elseif(EXP... l.3748 mapsymbol("a_bedrock","UIS",false) ; The equation I just read contradicts what was said before. But don't worry; continue and I'll just ignore it. ! Redundant equation. <to be read again> ; mapsymbol->...R0)&" = "&lname&";";fi;scantokens.s; elseif(EXPR2):message("[Wa... l.3748 mapsymbol("a_bedrock","UIS",false) ; I already knew that this equation was true. But perhaps no harm has been done; let's continue.

2 1

symbol?
by Guido Verhoeven 02 Apr '09

02 Apr '09

Hallo Is there a method to represent an area of water that is temporary? I mean: in winter (or when it is very wet) there is water in a part of the cave, in summer there is no water. The water is not streaming. Thank you Verhoeven Guido _________________________________________________________________ Lentekriebels? Speel samen met je vrienden de spelletjes die Windows Live je aanbiedt! http://www.messengerbillboard.be/nl/play

3 2