|
Le script d'exemple ci-dessous montre comment utiliser ArcPath et ClosePath. remarquez qu'aucun des deux traits radiaux n'est programmé explicitement :
-
la position du trait étant au centre, ArcPath dessine le rayon avant de dessiner l'arc,
-
Le chemin ayant commencé au centre, ClosePath dessine un deuxième rayon fermant le chemin. La jonction des deux lignes est parfaite. Avec une commande standard LineTo vous auriez dû utiliser des réglages supplémentaires pour obtenir le même effet.
La couleur rouge est définie avec un quatrième composant (l'opacité) inférieur à 1 :
{0.8, 0, 0, 0.9}
ce qui donne l'effet de transparence.
|
Importer le script
set r to 200
set c to {r * 1.25, r * 1.25}
BeginFigure(0)
SetPenWidth(r / 40)
SetFillColor({0.1, 0.1, 1})
CirclePath(c, r / 2)
DrawPath(3)
SetPenWidth(r / 20)
SetFillColor({0.8, 0, 0, 0.9})
MoveTo(c)
ArcPath(c, r, 0, pi / 2, false)
ClosePath()
DrawPath(3)
EndFigure()
|