<html>
  <head>
    <meta content="text/html; charset=ISO-8859-1"
      http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    here are a few ideas for other new symbols.<br>
    <br>
    I am extensively using a few additional symbols while drawing
    projections: dashed contours for contours thare are on the back-side
    of the projection, dashed areas for the connection of two galleries
    or for a void / gallery orthogonal to the projection.<br>
    <br>
    I am also using an additional line symbol (which should be actually
    clipped off automatically) for the direction of fractures visible on
    the walls, and I am often missing a point symbol "dip" for the
    inclination  of the strata <br>
    <br>
    Xavier<br>
    <br>
    <br>
    <br>
    <br>
    ## To draw contours which are on the back-side of the projection<br>
      def l_u_backcontour (expr Path) =<br>
        T:=identity;<br>
        pickup PenD;<br>
        draw Path dashed evenly scaled (0.25 * optical_zoom);<br>
      enddef;<br>
    <br>
    ## Area of connection of two galleries, orthogonal to the projection
    and on the front-size<br>
    def a_u_connection(expr Path) =<br>
      #% density <br>
      numeric  dx; dx := 0.25u;<br>
      T:=identity;<br>
      path q; q := bbox Path;<br>
      numeric lq; lq :=   xpart urcorner q - xpart llcorner q;<br>
      numeric hq; hq :=   ypart urcorner q - ypart llcorner q;<br>
      numeric dq;  dq :=  lq+hq;<br>
      picture tmp_pic; <br>
      tmp_pic := image(<br>
        for i = xpart llcorner q - hq step dx until  xpart urcorner q:<br>
          numeric j; j := ypart llcorner q;<br>
          thdraw (i,j)--(i+hq,j+hq) withpen pensquare scaled (0.01u);<br>
        endfor;<br>
      );<br>
      clip tmp_pic to Path;<br>
      clip tmp_pic to Path shifted (-dq/40,-dq/40);<br>
      draw tmp_pic;<br>
    enddef;<br>
    # initsymbol("a_u_connection");<br>
    <br>
    <br>
    ## same for connections on the back-side of the projection<br>
    def a_u_backconnection(expr Path) =<br>
      #% density <br>
      numeric  dx; dx := 0.25u;<br>
      T:=identity;<br>
      path q; q := bbox Path;<br>
      numeric lq; lq :=   xpart urcorner q - xpart llcorner q;<br>
      numeric hq; hq :=   ypart urcorner q - ypart llcorner q;<br>
      numeric dq;  dq :=  lq+hq;<br>
      picture tmp_pic; <br>
      tmp_pic := image(<br>
        for i = xpart llcorner q - hq step dx until  xpart urcorner q:<br>
          numeric j; j := ypart llcorner q;<br>
          draw (i,j)--(i+hq,j+hq) dashed evenly scaled (0.5 *
    optical_zoom) ;<br>
        endfor;<br>
      );<br>
      clip tmp_pic to Path;<br>
      clip tmp_pic to Path shifted (-dq/40,-dq/40);<br>
      draw tmp_pic;<br>
    enddef;<br>
      endcode<br>
    <br>
    <br>
    <br>
      def l_u_fracture (expr P) =<br>
        T:=identity;<br>
        cas := 0;<br>
        dlzka := arclength P;<br>
        mojkrok:=adjust_step(dlzka, 0.8u);<br>
        pickup PenC;<br>
        k := 90;<br>
        forever:<br>
          t1 := arctime (cas + mojkrok*1/5) of P;<br>
          t  := arctime (cas + mojkrok/2) of P;<br>
          t2 := arctime (cas + mojkrok*4/5) of P;<br>
          thdraw (subpath (t1,t2) of P);<br>
          mark_alt (P,t,0.2u, k);<br>
          cas := cas + mojkrok;<br>
          k := (k + 180) mod 360;<br>
          exitif cas > dlzka - (2*mojkrok/3); % for rounding errors<br>
        endfor;<br>
      enddef;<br>
      initsymbol("l_fracture_XAV");<br>
      <br>
    <br>
    <br>
    Le 11/11/2011 20:48, Stacho Mudrak a écrit :
    <blockquote
cite="mid:CAP35+gFnu8a0sMZONHONoZ4=AGJQDdFCyg9X7wqFSXhEr0HJjw@mail.gmail.com"
      type="cite"><span class="Apple-style-span" style="color: rgb(34,
        34, 34); font-family: arial, sans-serif; font-size: 13px;
        background-color: rgba(255, 255, 255, 0.917969); ">Hello
        everybody, 
        <div><br>
        </div>
        <div>after drawing a complex map of one show cave, I would like
          to add new standard symbols to therion. These should include:</div>
        <div><br>
        </div>
        <div>line edge - should be used to draw other then rock edges,
          e.g. wall structures in elevation. There is already
          rock-border -- rock-edge pair, there is general border symbol
          but no general edge symbol.</div>
        <div><br>
        </div>
        <div>line rope - already discussed here, just line point option
          anchor on|off should work also</div>
        <div><br>
        </div>
        <div>line handrail - this symbol already exists in some cave
          symbol sets. A line with dots in plan, in elevation some
          standard 1m tall handrail would be drawn.</div>
        <div>
          <div><br>
          </div>
          <div>point handrail - used to draw handrail in cross-sections</div>
          <div><br>
          </div>
          <div>line steps - should be used in both, plan / elevation
            projections. In plan, this line would surround steps area
            and steps would be drawn parallel to the first line segment.
            In elevation, 20cm steps would be drawn.</div>
        </div>
        <div><br>
        </div>
        <div>
          <div>line path - used to draw concrete or other path in caves,
            where it was built. If it will be closed curve, it will be
            filled with "area path". See below.</div>
        </div>
        <div><br>
        </div>
        <div>
          area path - fill for path areas. It would be automatically
          applied for closed line steps/path in plan projection.</div>
        <div><br>
        </div>
        <div>Also should be added:</div>
        <div>line rope-ladder</div>
        <div>line fixed-ladder</div>
        <div>line via-ferrata</div>
        <div>point via-ferrata</div>
        <div><br>
        </div>
        <div>Do these symbols make sense? Any comments? Any other
          symbols, that should exist in the standard therion library?</div>
        <div><br>
        </div>
        <div>Thanks a lot for the feedback, S.</div>
      </span>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <br>
      <pre wrap="">_______________________________________________
Therion mailing list
<a class="moz-txt-link-abbreviated" href="mailto:Therion@speleo.sk">Therion@speleo.sk</a>
<a class="moz-txt-link-freetext" href="http://mailman.speleo.sk/mailman/listinfo/therion">http://mailman.speleo.sk/mailman/listinfo/therion</a>
</pre>
    </blockquote>
    <br>
    <pre class="moz-signature" cols="72">-- 
> -------------------------
> Xavier Pennec
> Senior Research Scientist / Directeur de recherche
> Asclepios project-team, INRIA Sophia-Antipolis
> 2004 Route des Lucioles, BP93
> F-06902 Sophia-Antipolis Cedex, France
> +33 4 92 38 76 64
> +33 6 78 35 16 90
> <a class="moz-txt-link-freetext" href="http://www-sop.inria.fr/asclepios/">http://www-sop.inria.fr/asclepios/</a>
> -------------------------------
</pre>
  </body>
</html>