Фрактали. Побудови

void setup() {
  size(400,400);
  smooth();
}
void draw() {
  background(255);
  stroke(0);
  noFill();
  drawCircle(width/2,height/2,200);
}
void drawCircle(float x, float y, float radius) {
  ellipse(x, y, radius, radius);
  if(radius > 2) {
    drawCircle(x + radius/2, y, radius/2);
    drawCircle(x- radius/2, y, radius/2);
  }
}

let a;
let b;
function setup() {
	createCanvas(windowWidth, windowHeight);
	background(100);
	a=windowWidth;	b=windowHeight;}
function draw() {
  background(255);
  stroke(0);
  noFill();
  drawCircle(a/2,b/2,b-20); }
function drawCircle(x, y, r) {
  ellipse(x, y, r, r);
  if(r > 2) {
    drawCircle(x + r/2, y, r/2);
    drawCircle(x- r/2, y, r/2);
  }
}

void kvadrat(int x, int y, int n)
{
  if (n>1)
  {
    int x2=x+n;
    int y2=y+n;
    rect(x,y,n,n);
    n=int(n/2);
    kvadrat(x2,y2,n);
  }
}
Виклик процедури:
kvadrat(100,100,100);

function kvadrat( x,  y,  n) {
  if (n>1)  { 
    rect(x,y,n,n);
    x2=x+n;
    y2=y+n;
    n=int(n/2);
    kvadrat(x2,y2,n);
  }
}
Виклик функції:
kvadrat(100,100,100);

void tr(float x1, float y1, float x2, float y2, float x3, float y3)
{
  line(int(x1), int(y1), int(x2), int(y2));
  line(int(x2), int(y2), int(x3), int(y3));
  line(int(x3), int(y3), int(x1), int(y1));
}

void dr(float x1, float y1, float x2, float y2, float x3, float y3, int n)
{
if (n>0) {
   float x1n = (x1 + x2) / 2;
   float y1n = (y1 + y2) / 2;
   float x2n = (x2 + x3) / 2;
   float y2n = (y2 + y3) / 2;
   float x3n = (x3 + x1) / 2;
   float  y3n = (y3 + y1) / 2;
   tr(x1n, y1n, x2n, y2n, x3n, y3n);
   dr(x1, y1, x1n, y1n, x3n, y3n, n - 1);
   dr(x2, y2, x1n, y1n, x2n, y2n, n - 1);
   dr(x3, y3, x2n, y2n, x3n, y3n, n - 1);
   }
}

Виклик процедури:

int iter=5;
tr(320,10,600,470,40,470);
dr(320,10,600,470,40,470,iter);

function dr( x1,  y1,  x2,  y2,  x3,  y3,  n){
if (n>0) {
   let x1n,x2n,x3n,y1n,y2n,y3n;
    x1n = (x1 + x2) / 2;    y1n = (y1 + y2) / 2;
    x2n = (x2 + x3) / 2;    y2n = (y2 + y3) / 2;
    x3n = (x3 + x1) / 2;    y3n = (y3 + y1) / 2;
    triangle(x1n, y1n, x2n, y2n, x3n, y3n);
    dr(x1, y1, x1n, y1n, x3n, y3n, n - 1);
    dr(x1n, y1n, x2, y2, x2n, y2n, n - 1);
    dr(x3n, y3n,  x2n, y2n, x3, y3,n - 1);
   }
}

void koh2(float startx, float endx, float starty, float endy, float level)
{
  if (level==1 )
  {
    line(int(startx), int(starty), int(endx), int(endy));
  }
  else
  {
    float L = sqrt( (endx-startx) * (endx-startx) + (endy-starty) * (endy-starty) );
    float h = L /(2 * sqrt(3));
    float sina = (endy - starty)/L;
    float cosa = (endx - startx)/L;
    
    float x1 = startx + (endx - startx)/3;
    float x2 = (endx + startx)/2 + h * sina;
    float x3 = startx + 2 * (endx - startx)/3;
    
    float y1 = starty + (endy - starty)/3;
    float y2 = (endy + starty)/2 - h * cosa;
    float  y3 = starty + 2 * (endy - starty)/3;
    
    koh2(startx, x1, starty, y1, level-1);
    koh2(x1, x2, y1, y2, level-1);
    koh2(x2, x3, y2, y3, level-1);
    koh2(x3, endx, y3, endy, level-1);
  }
}

Виклик процедури:

 koh2(0,500, 500, 500, 5);

function setup() {
	createCanvas(windowWidth, windowHeight);
	background(100);
}

function draw() {
	background(255);
  stroke(0);
  noFill();
  koh2(0,500, 500, 500, 5);
}

function koh2( startx,  endx,  starty,  endy,  level) {
	let L,h,sina,cosa,x1,x2,x3,y1,y2,y3;
  if (level==1 )  {    line(int(startx), int(starty), int(endx), int(endy));  }
  else  {
     L = sqrt( (endx-startx) * (endx-startx) + (endy-starty) * (endy-starty) );
     h = L /(2 * sqrt(3));
     sina = (endy - starty)/L;
     cosa = (endx - startx)/L;
    
     x1 = startx + (endx - startx)/3;
     x2 = (endx + startx)/2 + h * sina;
     x3 = startx + 2 * (endx - startx)/3;
    
     y1 = starty + (endy - starty)/3;
     y2 = (endy + starty)/2 - h * cosa;
     y3 = starty + 2 * (endy - starty)/3;
    
    koh2(startx, x1, starty, y1, level-1);
    koh2(x1, x2, y1, y2, level-1);
    koh2(x2, x3, y2, y3, level-1);
    koh2(x3, endx, y3, endy, level-1);
  }
}