[Therion] Colored Lines Based On Attributes

[alastair gott]

HI Everyone,

Follow up on this thread from 17 years ago. https://mailman.speleo.sk/pipermail/therion/2009-September/002633.html

We have tweaked the code, with Andrews help. To make it work

In th2/Lines:
Type u:wall
Options: -clip off -attr color "(0, 0.5, 0)"
Or
-clip off -attr color green

In thconfig:
layout local
code metapost
def l_u_wall (expr P)=
T:=identity;
        if known(ATTR_color):
            pickup PenA;
            draw P withpen PenA withcolor scantokens(ATTR_color);
      fi;   
Enddef;

 initsymbol("l_u_wall");
endcode

endlayout

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.speleo.sk/pipermail/therion/attachments/20260301/da317b25/attachment.htm>