FANDOM


Edit

Mandelbrot Edit

This requires the use of the /Man command in your text bar to make it run.

Mandelbrot

Mandelbrot

$iter=100;
$esclim=2.0;
$ulx=-2.0;
$uly=1.0;
$lrx=1.0;
$lry=-1.0;
$width=70;
$height=40;
 
function abs(%x1,%y1)
  {
     return mSqrt(%x1*%x1+%y1*%y1);
  }
 
function escapeq(%cx,%cy)
 {
    %zx = 0;
    %zy = 0;
    %i = 0;
    while ( (%i<$iter) && (abs(%zx,%zy)<$esclim) )
      {
        %tmp=%zx*%zx-%zy*%zy;
        %zy=2.0*%zx*%zy;
        %zx=%tmp;
 
        %zx=%zx+%cx;
        %zy=%zy+%cy;
        %i=%i+1;
      }
   return(%i<$iter);
}
 
function ServerCmdMan()
{
  echo("Begin");


  for( %y = 1 ; %y < $height ; %y+=0.5 )
    {
      for( %x = 1 ; %x < $width ; %x+=0.5 )
       {
         %zx=$ulx+($lrx-$ulx)/$width*%x;
         %zy=$uly+($lry-$uly)/$height*%y;
         if (escapeq(%zx,%zy))
           {
             %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "0";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
          }
        else
          {
            %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "16";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
 
         }
       }
    } 


  echo("End");
}

Mandelbrot 2 Edit

Mandelbrot2

Mandelbrot 2

This requires the use of the /Man command in your text bar to make it run.

$iter=100;
$esclim=2.0;
$ulx=-2.0;
$uly=1.0;
$lrx=1.0;
$lry=-1.0;
$width=70;
$height=40;
 
function abs(%x1,%y1)
  {
     return mSqrt(%x1*%x1+%y1*%y1);
  }
 
function escapeq(%cx,%cy)
 {
    %zx = 0;
    %zy = 0;
    %i = 0;
    while ( (%i<$iter) && (abs(%zx,%zy)<$esclim) )
      {
        %tmp=%zx*%zx*%zx*%zx*%zx-10*%zx*%zx*%zx*%zy*%zy+(5*%zx*%zy*%zy*%zy*%zy);
        %zy=5*%zx*%zx*%zx*%zx*%zy-10*%zx*%zx*%zy*%zy*%zy+%zy*%zy*%zy*%zy*%zy;
        %zx=%tmp;
 
        %zx=%zx+%cx;
        %zy=%zy+%cy;
        %i=%i+1;
      }
   return(%i<$iter);
}
 
function ServerCmdMan()
{
  echo("Begin");


  for( %y = 1 ; %y < $height ; %y+=0.5 )
    {
      for( %x = 1 ; %x < $width ; %x+=0.5 )
       {
         %zx=$ulx+($lrx-$ulx)/$width*%x;
         %zy=$uly+($lry-$uly)/$height*%y;
         if (escapeq(%zx,%zy))
           {
             %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "0";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
          }
        else
          {
            %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "16";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
 
         }
       }
    } 


  echo("End");
}

Mandelbrot 3 Edit

Mandelbrot3

Mandelbrot 3

$iter=100;
$esclim=2.0;
$ulx=-2.0;
$uly=1.0;
$lrx=1.0;
$lry=-1.0;
$width=70;
$height=40;
 
function abs(%x1,%y1)
  {
     return mSqrt(%x1*%x1+%y1*%y1);
  }
 
function escapeq(%cx,%cy)
 {
    %zx = 0;
    %zy = 0;
    %i = 0;
    while ( (%i<$iter) && (abs(%zx,%zy)<$esclim) )
      {
        %tmp=%zx*(%zx*%zx-3*%zy*%zy);
        %zy=%zy*(3*%zx*%zx-%zy*%zy);
        %zx=%tmp;
 
        %zx=%zx+%cx;
        %zy=%zy+%cy;
        %i=%i+1;
      }
   return(%i<$iter);
}
 
function ServerCmdMan()
{
  echo("Begin");


  for( %y = 1 ; %y < $height ; %y+=0.5 )
    {
      for( %x = 1 ; %x < $width ; %x+=0.5 )
       {
         %zx=$ulx+($lrx-$ulx)/$width*%x;
         %zy=$uly+($lry-$uly)/$height*%y;
         if (escapeq(%zx,%zy))
           {
             %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "0";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
          }
        else
          {
            %temp = new fxDTSBrick()
               {
                  datablock = "brick1x1Data";
                  position = %x SPC 1 SPC %y;
                  rotation = "0 0 0 0";
                  colorID = "16";
                  scale = "1 1 1";
                  angleID = "0";
                  colorfxID = "0";
                  shapefxID = "0";
                  isPlanted = 1;
               };
 
         }
       }
    } 


  echo("End");
}

Sierpinski triangle Edit

Fractal1

Fractal1

%x=0;
%z=0;

for( %i = 1 ; %i < 4000 ; %i++ )
{

%a=getRandom(1,3);

if (%a==1)
{
%x = %x/2;
%z = (%z-250)/2;
}
if (%a == 2)
{
%x = (%x - 250)/2;
%z = (%z + 250)/2;
}
if (%a == 3)
{
%x = (%x + 250)/2;
%z = (%z + 250)/2;
}


%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x/3 SPC 1 SPC %z/3;
    rotation = "0 0 0 0";
    colorID = "0";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Sierpinski Pyramid Edit

Fractal2

Sierpinski pyramid

%x=0;
%z=0;

for( %i = 1 ; %i < 10000 ; %i++ )
{

%a=getRandom(1,5);

if (%a==1)
{
%x = (%x-200)/2;
%y = (%y-200)/2;
%z = (%z-200)/2;
}
if (%a == 2)
{
%x = (%x + 200)/2;
%y = (%y - 200)/2;
%z = (%z + 200)/2;
}
if (%a == 3)
{
%x = (%x - 200)/2;
%y = (%y - 200)/2;
%z = (%z - 200)/2;
}
if (%a == 4)
{
%x = (%x + 200)/2;
%y = (%y - 200)/2;
%z = (%z - 200)/2;
}
if (%a == 5)
{
%x = (%x + 0)/2;
%y = (%y + 200)/2;
%z = (%z + 0)/2;
}


%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x/3 SPC %z/3 SPC %y/3;
    rotation = "0 0 0 0";
    colorID = "0";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Fern Edit

Fractal3

Fern

%x=1;
%y=1;
%z=1;

for( %i = 1 ; %i < 1000 ; %i++ )
{

%a=getRandom(1,100);

if (%a==1)
{
%x = 0;
%z = 0.16*%z;
}
if (%a > 1 && %a <= 8)
{
%x = ((0.20*%x) - (0.26*%z));
%z = (0.23*%x + 0.22*%z + 16);
}
if (%a > 8 && %a <= 15)
{
%x = ((-0.15*%x) + 0.28*%z);
%z = (0.26*%x + 0.24*%z + 4.4);
}
if (%a > 15 && %a <= 100)
{
%x = (0.85*%x + 0.04*%z);
%z = ((-0.04*%x) + 0.85*%z + 16);
}


%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x SPC %y SPC %z;
    rotation = "0 0 0 0";
    colorID = "0";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Cantor set Edit

Fractal4

Cantor set

%x=0;
%y=1;
%z=0;

for( %i = 1 ; %i < 4000 ; %i++ )
{

%a=getRandom(1,4);

if (%a == 1)
{
%x = (%x - 250)/3;
%z = (%z - 250)/3;
}
if (%a == 2)
{
%x = (%x - 250)/3;
%z = (%z + 250)/3;
}
if (%a == 3)
{
%x = (%x + 250)/3;
%z = (%z + 250)/3;
}
if (%a == 4)
{
%x = (%x + 250)/3;
%z = (%z - 250)/3;
}


%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x/3 SPC 1 SPC %z/3;
    rotation = "0 0 0 0";
    colorID = "0";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

3D Cantor Set Edit

Fractal5

3D cantor set

%x=0;
%y=0;
%z=0;

for( %i = 1 ; %i < 5000 ; %i++ )
{

%a=getRandom(1,8);

if (%a == 1)
{
%x = (%x - 250)/3;
%y = (%y - 250)/3;
%z = (%z - 250)/3;
}
if (%a == 2)
{
%x = (%x - 250)/3;
%y = (%y - 250)/3;
%z = (%z + 250)/3;
}
if (%a == 3)
{
%x = (%x - 250)/3;
%y = (%y + 250)/3;
%z = (%z - 250)/3;
}
if (%a == 4)
{
%x = (%x - 250)/3;
%y = (%y + 250)/3;
%z = (%z + 250)/3;
}
if (%a == 5)
{
%x = (%x + 250)/3;
%y = (%y + 250)/3;
%z = (%z + 250)/3;
}
if (%a == 6)
{
%x = (%x + 250)/3;
%y = (%y - 250)/3;
%z = (%z + 250)/3;
}
if (%a == 7)
{
%x = (%x + 250)/3;
%y = (%y + 250)/3;
%z = (%z - 250)/3;
}
if (%a == 8)
{
%x = (%x + 250)/3;
%y = (%y - 250)/3;
%z = (%z - 250)/3;
}


%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x/3 SPC %y/3 SPC %z/3;
    rotation = "0 0 0 0";
    colorID = "0";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Vicsek Fractal Edit

Fractal6

Vicsek

%x=50;
%y=10;
%z=50;

for( %i = 1 ; %i < 6000 ; %i++ )
{

%a=getRandom(1,5);

if (%a==1)
{
%x = 0.33*%x - 66;
%z = 0.33*%z + 66;
}
if (%a == 2)
{
%x = 0.325*%x + 0.325*%z;
%z = -0.325*%x + 0.325*%z;
}
if (%a == 3)
{
%x = 0.33*%x - 66;
%z = 0.33*%z - 66;
}
if (%a == 4)
{
%x = 0.33*%x + 66;
%z = 0.33*%z - 66;
}
if (%a == 5)
{
%x = 0.33*%x + 66;
%z = 0.33*%z + 66;
}

%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x SPC 1.8 SPC %z;
    rotation = "0 0 0 0";
    colorID = "16";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Fractal Edit

Fractal7

Fractal

%x=50;
%y=10;
%z=50;

for( %i = 1 ; %i < 6000 ; %i++ )
{

%a=getRandom(1,5);

if (%a==1)
{
%x = 0.25*%x - 25;
%z = 0.25*%z + 25;
}
if (%a == 2)
{
%x = 0.288*%x - 0.167*%z -50;
%z = 0.167*%x + 0.288*%z -50;
}
if (%a == 3)
{
%x = 0.25*%x - 74.6;
%z = 0.25*%z + 74.6;
}
if (%a == 4)
{
%x = 0.5*%x + 50;
%z = 0.5*%z - 50;
}
if (%a == 5)
{
%x = 0.18*%x +0.174*%z + 50;
%z = -0.174*%x + 0.18*%z + 50;
}

%temp = new fxDTSBrick()
   {
    datablock = "brick1x1Data";
    position = %x SPC 1.8 SPC %z;
    rotation = "0 0 0 0";
    colorID = "16";
    scale = "1 1 1";
    angleID = "0";
    colorfxID = "0";
    shapefxID = "0";
    isPlanted = 1;
   };

}

Edit

Ad blocker interference detected!


Wikia is a free-to-use site that makes money from advertising. We have a modified experience for viewers using ad blockers

Wikia is not accessible if you’ve made further modifications. Remove the custom ad blocker rule(s) and the page will load as expected.