Français   Fractales.
C'est une courbe mathématique semblable à la courbe du dragon.

La c-courbe s'appelle de manière récursive. Il n'y a pas besoin d'une variable paire comme dans la courbe du dragon.

La c-courbe d'ordre 0 est une ligne droite.
La limite de cette courbe est aux alentours de 13 (8192 segments), au moment où les segments deviennent trop petits (taille inférieure à 2).

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

pour initialise :order
# donne length et angle global values
donne "size 8*puissance (rac 2) (9-:order)
donne "angle 90
fin

pour display :order
# tape header title et curve level
fcc blanc
fpos [-190 184] etiquette phrase [c-curve level] :order
fin

pour c_curve :order
si :order < 1 [avance :size stop] # ie si = 0
tournedroite 45
c_curve :order-1
tournegauche 90
c_curve :order-1
tournedroite 45
fin

pour demarrer :order
new
initialise :order display :order
fpos [-94 0] fcc vert tournedroite 90 baissecrayon
c_curve :order
# tournedroite 180 c_curve :order # comment in repetepour double c curve
fin

Tester le programme maintenant

Procédure à exécuter:
demarrer 7