Alphonse Capriani a écrit:C'est parfait : je suis impatient de voire ce que ca va donner...
J'ai transmis le nouveau fichier à Joffrey pour qu'il puisse le tester et mettre la doc à jour. Il y a en plus:
1) Des options pour les sommets:
- circleColor = black; {couleur du cercle , option de sommet}
- labelColor = black; {couleur du label , option de sommet}
- backColor = white; {couleur du disque , option de sommet}
2) Des options pour les arêtes:
- auto := 0/1, permet de dessiner une arête par défaut (1) ou bien une courbe de Bézier (auto:=0), valeur par défaut: 1.
- dist := distance, distance des sommets au point de contrôle qui suit (ou précède). Nil par défaut
- distA := distance, distance du sommet A au point de contrôle qui suit, 1 par défaut. Si dist<>Nil alors distA prend la même valeur que dist.
- distB := distance, distance du sommet B au point de contrôle qui précède, 1 par défaut. Si dist<>Nil alors distB prend la même valeur que dist.
- angleA := angle en degrés, angle que fait la tangente à la courbe au sommet A par rapport à l'horizontal (90 par défaut).
- angleB := angle en degrés, angle que fait la tangente à la courbe au sommet B par rapport à l'horizontal (90 par défaut).
Exemple:
- Code: Tout sélectionner
[
Fenetre(-3.25+3*i, 3.75-3*i, 1+i), Marges(0,0,0,0),
DefMatrice(
[1,"&"], [1,"&"],
[1,"$1-p$&"], [1,"$p$&"]),
PosSommets:=[-2,2],
DefLabels("$X$", "", "\no $2$", ""),
DefOptionsSommets(1,"[backColor:=pink]"),
DefOptionsAretes(
[1,1], "[bouclescale:=0.75]&",
[1,2], "[LineStyle:=dashed, auto:=0, angleA:=45, angleB:=-135, dist:=2]&",
[2,1], "[Color:=firebrick,labelpos:=top,auto:=0, angleA:=-90, angleB:=-90]&",
[2,2], "[bouclestyle:=circle, bouclescale:=1.25]&"),
Dgraphe([typeGraphe:=oriente, linesep:=1])
]
- graphe4.png (6.81 Kio) Consulté 14103 fois