// P_2_2_4_01
//
// Generative Gestaltung, ISBN: 978-3-87439-759-9
// First Edition, Hermann Schmidt, Mainz, 2009
// Hartmut Bohnacker, Benedikt Gross, Julia Laub, Claudius Lazzeroni
// Copyright 2009 Hartmut Bohnacker, Benedikt Gross, Julia Laub, Claudius Lazzeroni
//
// http://www.generative-gestaltung.de
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at http://www.apache.org/licenses/LICENSE-2.0
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
/**
 * limited diffusion aggregation 
 * 
 * KEYS
 * s                   : save png
 */

var maxCount = 5000; //max count of the circles
var currentCount = 1;
var x = [maxCount];
var y = [maxCount];
var r = [maxCount];

function setup() {
  createCanvas(780,780);
  smooth();
  //frameRate(10);
  // first circle
  x[0] = width/2;
  y[0] = height/2;
  r[0] = 10;
  //r[0] = 400; 
}

function draw() {
  background(255);
  strokeWeight(0.5);
  //noFill();

  // create a radom set of parameters
  var newR = random(1, 7);
  var newX = random(0+newR, width-newR);
  var newY = random(0+newR, height-newR);

  var closestDist = 100000000;
  var closestIndex = 0;
  // which circle is the closest?
  for(var i=0; i < currentCount; i++) {
    var newDist = dist(newX,newY, x[i],y[i]);
    if (newDist < closestDist) {
      closestDist = newDist;
      closestIndex = i; 
    } 
  }

  // show random position and line
  // fill(230);
  // ellipse(newX,newY,newR*2,newR*2); 
  // line(newX,newY,x[closestIndex],y[closestIndex]);

  // aline it to the closest circle outline
  var angle = atan2(newY-y[closestIndex], newX-x[closestIndex]);

  x[currentCount] = x[closestIndex] + cos(angle) * (r[closestIndex]+newR);
  y[currentCount] = y[closestIndex] + sin(angle) * (r[closestIndex]+newR);
  r[currentCount] = newR;
  currentCount++;

  // draw them
  for (var i=0 ; i < currentCount; i++) {
    fill(236,36,95);
    noStroke();
   //fill(50);
    ellipse(x[i],y[i], r[i]*2,r[i]*2);  
  }
  if (currentCount >= maxCount) noLoop();
}

function keyPressed() {
  if (key == 's' || key == 'S') save("P_2_2_4_01.png");
}