let dim = 50;
let art_world = new field2D(dim);
let past = new field2D(dim);

let emotions = [];

// the names of these chemicals:
let names = "delightdesire, sadnessfearambivalence aggressivenessfriendlinessexcitementcowardicemelancholy".split
let mouseX=0.5, mouseY=0.5;




const lower_limit = 0.01;
const upper_limit = 50.0;

/*delight, sadness, fear, desire, thumos*/

// reaction constants:

let kdelight = 0.5;
let kdelightfear = 0.5;

let ksadness = 0.5;
let ksadelight = 0.5;
let ksadfear = 1.0;

let kfear = 1.0;
let kfeardesire = 1.0;

let kdesire = 0.5;
let ksaddesire = 0.5;
let kdesiredelight = 1.0;
let kambivalence=0.5, kaggressiveness=0.5, kfriendliness=1.0, kexcitement=1.0, kcowardice=0.5, kmelancholy=0.5;

function reset() {
  // initial concentrations for the set of chemicals:

  emotions = [0.5, 0.5, 0.5, 0.5,0.5, 0.5, 0.5, 0.5,0.5,0.5];
  
  art_world.set(0);
    past.set(0);
}

function react() {
 //emotions[delight, desire, sadness, fear,ambivalence, aggressiveness, friendliness, excitement, cowardice, melancholy]
  let [delight, desire, sadness, fear,ambivalence, aggressiveness, friendliness, excitement, cowardice, melancholy] = emotions;
  
  // delta changes of each chemical:
  let ddelight = 0,
    dsadness = 0,
    dfear = 0,
    ddesire = 0,
    dambivalence= 0,
    daggressiveness= 0, 
    dfriendliness= 0,
    dexcitement= 0,
    dcowardice= 0,
    dmelancholy= 0;
  // dthumos = 0;
  // timestep -- needs to be small, or else the dynamics can break:
  let dt = 0.00001;

  
 let x= mouseX;
 let y =mouseY;
   x = Math.min(Math.max(x, 0.5), 1.0);
 
  y =Math.min(Math.max(y, 0.5), 1.0);
 
  // apply reaction rules:

  // sadness => 2sadness         @rate ksadness (ksadness<kdelight)
  
  //sadness+delight=>2Delight
  
  dsadness += -ksadness * sadness;
 
  dsadness += ksadelight * sadness * delight;
  ddelight += -ksadelight * sadness * delight;
  //delight=>2Delight
  ddelight += kdelight * delight;
  
  //Desire+Fear=>2Fear;
  dfear += -kfear * fear;
  dfear += kfeardesire * desire * fear;
  ddesire += -kfeardesire * desire * fear;
 
  //desire=>2Desire
  ddesire += kdesire * desire;
 
  //Sadness=>2Sadness && Delight=>2Delight
  //Ambivalence=>.
  dambivalence += (ksadelight* 1) *sadness *delight;
  dambivalence+=  -kambivalence* ambivalence;
    
   //Fear=>2Fear && Desire=>2Desire
  //Aggressiveness
  daggressiveness += (kfeardesire*1*mouseX) *fear*desire;
  daggressiveness += -kaggressiveness *aggressiveness;
   
  //Fear=>2Fear
  //Cowardice
  dcowardice += (kfear * 1)*fear;
  dcowardice += -kcowardice * cowardice/x;


   
   //Sadness=>2Sadness && Excitement=>. 
   //Melancholy
    dmelancholy += (ksadelight *1)*sadness;
    dmelancholy += -kmelancholy* melancholy/x;
    
    
    //Desire=>2Desire &&Aggressiveness=>.
    //Friendliness
    dfriendliness   += (kfeardesire *1 )*desire/aggressiveness;
    dfriendliness   += -kfriendliness * friendliness/y;

  //Delight=>2Delight && Aggressiveness=>2Aggressiveness
    //Excitement
    dexcitement     += (kdelight*1) *delight*aggressiveness;
    dexcitement     += -kexcitement * excitement/y;

    // apply changes:
    delight += ddelight * dt;
    sadness += dsadness * dt;
    fear += dfear * dt;
    desire += ddesire * dt;
    ambivalence += dambivalence *dt;
    melancholy += dmelancholy *dt;
    excitement+= dexcitement * dt;
    friendliness += dfriendliness *dt;
    aggressiveness += daggressiveness *dt;
    cowardice += dcowardice *dt;
 
 
  ambivalence = Math.min(Math.max(ambivalence, lower_limit), upper_limit);


  melancholy = Math.min(Math.max(melancholy, lower_limit), upper_limit);


  excitement = Math.min(Math.max(excitement, lower_limit), upper_limit);


  friendliness= Math.min(Math.max(friendliness, lower_limit), upper_limit);


  aggressiveness = Math.min(Math.max(aggressiveness, lower_limit), upper_limit);


  cowardice = Math.min(Math.max(cowardice, lower_limit), upper_limit);


  
  
  
  
  //thumos += dthumos * dt;
  emotions = [delight, desire, sadness, fear,ambivalence,melancholy,excitement,friendliness,aggressiveness,cowardice];
}

function update(dt) {
  // run 100,000 reactions per second

  for (let i = 0; i < dt * 500000; i++) {
    react();
  }
   var tmp = art_world;
  art_world = past;
  past = tmp;
  
  art_world.diffuse(past, 0.2);
  art_world.set(function(x, y) {
    if (
      y < (random() * 0.2 + 0.4) * art_world.height &&
      y > (random() * 0.2 + 0.4) * art_world.height
    ) {
      if (
        x < (random() * 0.2 + 0.05) * art_world.width &&
        x > (random() * 0.2 + 0.05) * art_world.width
      )
        return 0;
      // Middle Pole
      if (
        x < (random() * 0.2 + 0.4) * art_world.width &&
        x > (random() * 0.2 + 0.4) * art_world.width
      ) {
        return 0.2;
      } else if (
        x < (random() * 0.2 + 0.75) * art_world.width &&
        x > (random() * 0.2 + 0.75) * art_world.width
      ) {
        // Right Pole
        return 0;
      }
    }
    return art_world.get(x, y);
  });
  art_world.map(function(v) {
    return clamp(v, 0, 1);
  });
}

function key(kind, key) {
  if (key == "r" && kind == "down") {
    reset();
  }
}

function mouse(e, pt) {
  mouseX = pt[0] + 0.5;
  mouseY = pt[1] + 0.5;
  art_world.deposit(1, pt);
}

function draw(ctx) {
  // display the current concentrations

  // unpack chemical array into local variables:
  let [delight, desire, sadness, fear,ambivalence, aggressiveness, friendliness, excitement, cowardice, melancholy] = emotions;
  let emotionLabel = ["delight", "desire", "sadness", "fear","ambivalence", "aggressiveness", "friendliness", "excitement", "cowardice", "melancholy"];
  //  Let ["desire", "delight", "sadness", "fear"]
  let numemotions = emotions.length;

  // for each chemical:
  for (let i = 0; i < emotions.length; i++) {
    let c = emotions[i];
    let t = i / numemotions;
    let x = Math.sin(Math.PI * 2 * t);
    let y = Math.cos(Math.PI * 2 * t);
    // human-readable information:
    let name = String.fromCharCode(65 + i);
    let label = i;

    // area = pi * radius*radius
    // radius = sqrt(area/pi)
    // clamp c between 0 and 10 to prevent blowups in renderer:
    let radius = Math.sqrt(Math.min(5, Math.max(0, c/2)) / Math.PI);
    //let area = Math.PI * radius * radius;

    draw2D.push().translate(0.5, 0.5).scale(0.25).translate(x, y);
    {
      draw2D.color("lightgrey");
      draw2D.hsl(t, 0.3);
      ctx.font = "0.1px sans";
      ctx.fillText(label, -0.175, 0.025);

      draw2D.hsl(-t*mouseY/2*mouseX , 0.9);
      draw2D.circle(radius);
      
     
      //
    }
   
  
    draw2D.pop();


    write(emotionLabel[i], c);
  }
}
/*

*/