Salut Alphonse,
Je l'ai dit mais je ne l'avais pas encore fait! Donc je mets en ligne le fichier en question:
gradients.mac, toujours à l'essai. Les deux macros essentielles sont:
1)
gradFill( <commande graphique>, [options]) options:
colorA, colorB: couleurs
gradtype := radial/vertical/horizontal
radialcenter := xc+i*yc avec xc et yc dans [0;1]
frenchBabel := 0/1 (1 par défaut)
Cette macro exécute la commande graphique ( c'est à dire le dessin) et effectue un remplissage de celui-ci avec un gradient de 2 couleurs: de la couleur A vers la couleur B. Il y a trois types de gradient: horizontal (gauche vers droite), vertical (haut vers bas) et radial (centre vers extérieur). Les exports prévus sont: tikz, pgf, pstricks, eps et svg (et donc pdf, pdfc).
L'option frenchBabel sert uniquement aux exports tikz et pgf (une incompatiblité avec l'option french de Babel oblige à désactiver les caractères actifs, puis à les réactiver ensuite).
L'export pstricks exige le package
pst-slpe.
2)
gradLine( <commande graphique>, [options]) options:
colorA, colorB: couleur début et fin
close: 0/1 (0 par défaut)
Excécute la commande graphique et trace les traits avec un gradient de 2 couleurs.
Exemple:
- Code: Tout sélectionner
[
view(-5,4.5,-2.5,5), Marges(0,0,0,0), size(10,1),
plan:=[M(0,0,-3),vecK],
LineStyle:=noline,
gradFill( Path([Xmin+i*Ymin,Xmax+i*Ymin,Xmax+i*Ymax,Xmin+i*Ymax,line]),
[colorA:=white, colorB:=red, gradtype:=vertical]),
LineStyle:=solid,
gradFill( Ligne([-5+i,-2+i,-2+5*i],1), [radialcenter:=0.75+i*0.25, colorA:=white, colorB:=steelblue, gradtype:=radial]),
tMin:=-3, tMax:=3,
gradFill( domaine1(4*exp(-x*x),-1,1), [colorA:=white, colorB:=gray, gradtype:=horizontal]),
Axes(0,1+i), Width:=0.5*mm,
gradLine( Cartesienne(4*exp(-x*x)), [colorA:=yellow, colorB:=darkgreen])
]
- gradients.png (23.41 Kio) Consulté 15581 fois