Fougère de Barnsley

Script par actualisation du curseur n:
[code]ActualiserConstruction()[br]Si(a<0.01,SoitValeur(X,0))[br]Si(a<0.01,SoitValeur(Y,bb*y(A)))[br]Si(a>=0.01∧ a<0.86,SoitValeur(X,c*x(A)+d*y(A)))[br]Si(a>=0.01 ∧ a<0.86,SoitValeur(Y,-d*x(A)+c*y(A)+b))[br]Si(a>=0.86∧ a<0.93,SoitValeur(X,e*x(A)+f*y(A)))[br]Si(a>=0.86 ∧ a<0.93,SoitValeur(Y,g*x(A)+h*y(A)+b))[br]Si(a>=0.93,SoitValeur(X,i*x(A)+j*y(A)))[br]Si(a>=0.93,SoitValeur(Y,k*x(A)+l*y(A)+m))[br]SoitValeur(A,(X,Y))[br]SoitValeur(lp,Ajouter(lp,A))[br][br][br][br][br][/code]
avec:
Valeurs initiales: A=(0,0) et lp={(0,0)}[br][br]a=AléaUniforme(0, 1)[br][br]
Image obtenue avec 23620 points (Et de la patience :)
En savoir plus:
La fougère de Barnsley:[br][br][url=https://fr.wikipedia.org/wiki/Foug%C3%A8re_de_Barnsley]https://fr.wikipedia.org/wiki/Foug%C3%A8re_de_Barnsley[/url][br][br][br][url=https://mathcurve.com/fractals/fougere/fougere.shtml]https://mathcurve.com/fractals/fougere/fougere.shtml[br][br][/url][url=http://michel.caron.pagesperso-orange.fr/algorithme/fougere.html]http://michel.caron.pagesperso-orange.fr/algorithme/fougere.html[/url] (Un programme en python)[br][br]Plusieurs programmes dans différents langages sur la version anglaise de wikipedia:[br][br][url=https://en.wikipedia.org/wiki/Barnsley_fern]https://en.wikipedia.org/wiki/Barnsley_fern[/url]
Remarque
En ligne cela peut très lent. Il est préférable de télécharger le fichier ggb pour l’exécuter sur son ordinateur.

Information: Fougère de Barnsley