pakt13

See /software/p5js/pakt-februari/pakt13/ for a JavaScript version and /software/supercollider/februari-pakt/pakt13/ for accompanying sound code.

#include "cinder/app/App.h"
#include "cinder/cairo/Cairo.h"

using namespace ci;
using namespace ci::app;
using namespace std;

const int WIDTH= 640;
const int HEIGHT= 480;

class pakt13App : public App {
public:
  void setup();
  void draw();
  int index, n;
  float w, h;
  float rows, cols;
};

void pakt13App::setup() {
  index= 0;
  w= getWindowWidth();
  h= getWindowHeight();
  rows= 11.0f;
  cols= 11.0f;
}

void pakt13App::draw() {
  cairo::Context ctx(cairo::createWindowSurface());
  ctx.setFillRule(1);

  cairo::GradientRadial radialGrad(getWindowCenter(), 0, getWindowCenter(), getWindowWidth());
  radialGrad.addColorStop(0, Color(0.5, 0.6, 0.5));
  radialGrad.addColorStop(1, Color(0, 0, 0));
  ctx.setSource(radialGrad);
  ctx.paint();

  ctx.setSourceRgb(1, 1, 1);
  for(int y= 0; y<=rows; y++) {
    for(int x= 0; x<=cols; x++) {
      ctx.rectangle(Rectf((x/rows*w)+(sin(index+(x*y))*(sin((index+x)*0.0015f)+sin((index+y)*0.0062)*10.0f)), (y/cols*h)+(cos(index+(x*y))*(sin((index+y)*0.0325f)+sin((index+y)*0.0072)*10.0f)), 4.0f, 4.0f));
    }
  }
  ctx.fill();
  index++;
}

CINDER_APP(pakt13App, Renderer2d, [&]( App::Settings *settings ) {
  settings->setWindowSize( WIDTH, HEIGHT );
  settings->setResizable( false );
})