Français   Spirales
Une magnifique rose....

# Commande principale: demarrer
pour new
# set defaults, screen, pen et tortue
init ftd [400 400]
fcfg noir fcc vert levecrayon cachetortue
fin

pour demarrer
new fcc rouge
repete 4 [
repetepour [angle 12 1 -0.1] [avance 12 tournegauche :angle]
avance 19 levecrayon fixexy 0 0 baissecrayon
repetepour [angle 12 1 -0.1] [avance 12 tournedroite :angle]
avance 19 levecrayon fixexy 0 0 tournegauche 90 levecrayon]
fin



Tester le programme maintenant

Procédure à exécuter:
demarrer