Pourquoi ça marche pas ?
Ca devrait faire des fractales.
//voici les sources simplifiées du programme
//en C pour faire une fractale de Julia
double zr,zi; //parties réelles et irréelles de Z
double cr=0.13,ci=0.6; //parties réelles et irréelles de C
double zrc,zic; //parties réelles et irréelles de ( Z * Z )
double tampon;
for (ul x=0;x<100;x++) //boucles répetant le calcul pour chaque pixel dans un carré de 100 par 100
{
for (ul y=0;y<100;y++)
{
zr=(x*4.0)/100-2; //Calculs de changement d' échelle
zi=(y*4.0)/100-2; //(de 100*100 à 4*4)
zrc=zr*zr; //calcul de Z*Z
zic=zi*zi; //
for (ul i=0;i<1000 && zrc+zic<=4;i++) //On itère la suite Zn 1000 fois (sauf si le module devient superieur à 2)
{
tampon=zr*zr-zi*zi+cr; //calculs de l'élement suivant
zi=2*zr*zi+ci;
zr=tampon; //Z devient égal à l'élément suivant
zrc=zr*zr; //calcul de Z*Z
zic=zi*zi; //
}
if (zrc+zic<=4)
{//si le module de Z est inferieur à 2,on colore le pixel en noir
ForeColor(blackColor); //il fait parti de l'ensemble de Mandelbrot
}else
{
ForeColor(whiteColor); //sinon en blanc.
}
MoveTo(x,y); //On dessine le pixel
LineTo(x,y); //
}
}
//voici les sources simplifiées du programme
//en C pour faire une fractale de MANDELBROT
double zr,zi; //parties réelles et irréelles de Z
double cr,ci; //parties réelles et irréelles de C
double zrc,zic; //parties réelles et irréelles de ( Z * Z )
double tampon;
for (ul x=0;x<100;x++) //boucles répetant le calcul pour chaque pixel dans un carré de 100 par 100
{
for (ul y=0;y<100;y++)
{
zr=0; //Z0=0
zi=0; //
cr=(x*4.0)/100-2; //Calculs de changement d' échelle
ci=(y*4.0)/100-2; //(de 100*100 à 4*4)
zrc=0; //Z0*Z0=0
zic=0; //
for (ul i=0;i<1000 && zrc+zic<=4;i++) //On itère la suite Zn 1000 fois (sauf si le module devient superieur à 2)
{
tampon=zr*zr-zi*zi+cr; //calculs de l'élement suivant
zi=2*zr*zi+ci;
zr=tampon; //Z devient égal à l'élément suivant
zrc=zr*zr; //calcul de Z*Z
zic=zi*zi; //
}
if (zrc+zic<=4)
{//si le module de Z est inferieur à 2,on colore le pixel en noir
ForeColor(blackColor); //il fait parti de l'ensemble de Mandelbrot
}else
{
ForeColor(whiteColor); //sinon en blanc.
}
MoveTo(x,y); //On dessine le pixel
LineTo(x,y); //
}
}