Re: Metapost + metaObjet connector label on arcs

[Maurice Diamantini <Maurice.Diamantini@ensta.fr>]

Le 22 oct. 04, à 14:24, Eckhart Guthöhrlein a écrit :

> You can attach named paths to objects and then labels these. Here is my
> first try, seems to work:

Thank very much Eckhart, I read the metaObj manual, but I
didn't realised showing that one can attached a labelObj
to arbitrary objects (just for Matrix and trees).

Now it works !
It is my first Metapost figure (I am switching
from pstricks).
As graph (in the sens nodes + arcs, not curve functions)
will be frequentjy used (at least by me).

I am thinking about some highlevel  class (using MetaObj)
- class Node for creating node
- class Arc for connecting nodes.
The goal is that the data (coordinate, various labels, ...)
will be as simple as possible.
Also it should be easy to pick the Node and Arc class,
and personnalide them gor its own graph.

For now, I'm trying to anderstand how the label options
works,
A new problem is that the label sep is to big from thes arcs, and
I'm not able to ajust it. The "labshift" option doesn't seem
to work with ncarc, althought it works for the nodes.


P.S.
is one of the Metapost lists still alive?


Here is the full exemple (with only 2 nodes)
I don use the inline context feature because it
doesnt work for me, and I have to work on several
workstation, so I still stay (for now) with the indenpendent
file
I'm sorry for the "latex" line on a context list, but
Metafun is not clean installed (texlive 2003), I wanting
for the next texlive... And I hope context will be install
by default with Metafun
.

Thank you very much.

-- Maurice Diamantini,

verbatimtex   % -*-latex-*-
     %&latex
     \documentclass{article}
     \usepackage[latin1]{inputenc}
     \begin{document}
     \sffamily
etex

input mp-tool ; % some initializations and auxiliary macros
input mp-spec ; % macros that support special features
input metaobj.mp ; % suffixe non indispensable ?

beginfig(1) ;

     % For now node positions will be hardcoded
     numeric u; u=1cm;
     z0=(0u,2u);
     z1=(3u,4u);
     % % verbatimtex \small etex;

     setCurveDefaultOption("arcangle", 25);
     %
     % building nodes of the graph. Nodes are object that arc will be 
able to
     % refere to.
     % Later, I will have to build my own Class "Activity" with some 
other
     % parameters (labels above and under the circle, ...)
     %
     newCircle.n0(btex \large 0 etex) "circmargin(0.1u)";
     ObjLabel.n0(btex b0 etex)  "labshift((0, -.5u))";
     ObjLabel.n0(btex u0 etex)  "labshift((0, .5u))";
     n0.c = z0;

     newCircle.n1(btex  \large 1 etex) "circmargin(0.1u)";
     ObjLabel.n1(btex b1 etex)  "labshift((0, -.5u))";
     ObjLabel.n1(btex u1 etex)  "labshift((0, .5u))";
     n1.c = z1;

     %
     % build some Arcs, with various label or other parameters
     % I'll have to make some vardef fonction for that.
     % For now, all arcs related stuffs are in th esame place
     %
     % - Howto reduce the label separation ? ("labshift" doen't work)

     ncarc.n0(n0)(n1)  "name(n0_n1)";
     ObjLabel.n0(btex $\times$ etex) "labpathname(n0_n1)",
                                     "labpos(0.8)";
     ObjLabel.n0(btex $0\rightarrow 1$ etex)
                             "labpathname(n0_n1)",
                             "labpos(0.8)",
                             "labangle(0)",
                             "labshift((0, -0.5u))",
                             "labdir(bot)" ;


     ncarc.n1(n1)(n0)  "name(n1_n0)";

     ObjLabel.n1(btex $\times$ etex) "labpathname(n1_n0)",
                                     "labpos(0.8)";
     ObjLabel.n1(btex $1\rightarrow 0$ etex)
                             "labpathname(n1_n0)",
                             "labpos(0.8)",
                             "labangle(180)",
                             "labdir(top)" ;

     drawObj(n0, n1);

endfig ;
end .