Dear Therion-Community

I try to change some symbols on my layout. This works with most symbols. With two symbols I can not go any further.

1. With the symbol "Absatz Lehm" I can not transfer the color to the whole symbol. The symbol is similar to the line floorstep (Fig .: Legend_Linecolor). The base line takes the color brown, with the right-angled lines I have no idea that works:

code metapost
 def l_u_absatz_lehm (expr P) =
  T:=identity;
  cas := 0;
  dlzka := arclength P;
  mojkrok:=adjust_step(dlzka, .5u); % Schraffurabstand eingeben
  pickup PenD;
  draw p withcolor (0.75,0.2,0.12); % not works!!!
  forever:
   t := arctime cas of P;
   mark_ (P,t,0.9u);
   cas := cas + mojkrok;
  exitif cas > dlzka + (mojkrok /3); % for rounding errors
  endfor;
  pickup PenC;
  thdraw P withcolor (0.75,0.2,0.12); % works
 enddef;

initsymbol("l_u_absatz_lehm")

def l_u_absatz_lehm_legend =
 l_u_absatz_lehm(((-.3,0.5) .. (.3,.3) .. (.7,.7) .. (1.3,.5)) inscale)
 enddef;
endcode

text de "line u:absatz_lehm" "Absatz Lehm"


2. The second symbol “phreatische Fliessrichtung” is only one line. However, I would like to place the symbol with the outline in the legend box. Compare with the figure Legend_Color_Pen. The outside lines should be gray and slightly thicker than the line in the middle.

code metapost
 def l_u_phreatisch (expr P) =
  T:=identity;
  pickup PenC;
  thdraw P;
enddef;

 initsymbol("l_u_phreatisch")

 def l_u_phreatisch_legend =
  l_u_phreatisch(((.25,.5){dir 300} .. (.65,.5)) inscale);
  l_u_phreatisch(((.4,1.0) .. (.2,.5){dir 270} .. (.1,0.0)) inscale) % must be grey (0.86, 0.86, 0.86) and PenA
  l_u_phreatisch(((.8,1.0) .. (.7,.5){dir 270} .. (.6,0.0)) inscale) % must be grey (0.86, 0.86, 0.86) and PenA
 enddef;
endcode

text de "line u:phreatisch" "phreatische Fliessrichtung"

Does anyone know a solution?

Thank you and best regards
Thomas