[Therion] new symbol for therion : a hammer

[Gilbert Fernandes (mailinglist)]

hello,

I would like to add a new symbol in my survey. A hammer. In France we 
use it to show place where we dig.
I've wrote the Meta Post code, but I've not test it yet (I must first 
find the doc I have read on therion building to add a new symbol).
Could you add it in the next therion release if my code is correct ?
Thanks,



code metapost
     def p_entrance_MY (expr P,R,S,A)=
       T:=identity aligned A rotated R scaled S shifted P;
       thfill 
(u,-.9u)--(-.1u,.3u)--(.2u,.6u)--(-.2u,u)--(.2u,-u)--(.6u,-.2u)--(.1u,-.3u)--(-.9u,-u)--cycle;
     enddef;
     initsymbol("p_hammer");
     let p_hammer = p_hammer;
   endcode


PS : I sent an drawing of the symbol as a join image
-------------- next part --------------
A non-text attachment was scrubbed...
Name: hammer.gif
Type: image/gif
Size: 704 bytes
Desc: not available
URL: <http://mailman.speleo.sk/pipermail/therion/attachments/20080404/ff4f2800/attachment.gif>