pakt01 ›

pakt00

See /f0blog/pact-februari/

//pakt00
//ok
int index;
PGraphics grad;
void setup() {
  size(640, 480, JAVA2D);
  frameRate(60);
  noFill();
  strokeWeight(1);
  smooth();
  index= 0;
  grad= createGraphics(width, height, JAVA2D);
  grad.beginDraw();
  grad.background(0);
  createGradient(grad, width*0.5, height*0.5, width, color(255.0, 255.0, 0.8*255.0), color(0, 0, 0));
  grad.endDraw();
}
void draw() {
  float x= width*0.5;
  float y= height*0.5;
  float w= width*0.25;
  float h= height*0.25;
  image(grad, 0, 0);
  stroke(255.0, 255.0, 0.8*255.0);
  for (int i= 0; i<120; i++) {
    float start= sin((index+i)*0.006+i)*PI;
    float end= sin((index+i)*0.0123+i)*TWO_PI;
    if (start<end) {
      float r= sin(index*0.01+i)*70.0+75.0;
      arc(x, y, r*2.0, r*2.0, start, end);
    } else {
      float r= sin(index*0.01+i)*50.0+55.0;
      arc(x+(sin(i*0.21)*w), y+(cos(i*0.2)*h), r*2.0, r*2.0, end, start);
    }
  }
  index++;
}
//Simple Radial Gradient by Ira Greenberg, modified by /f0
void createGradient (PGraphics ctx, float x, float y, float radius, color c1, color c2) {
  float px = 0, py = 0, angle = 0;
  // calculate differences between color components 
  float deltaR = red(c2)-red(c1);
  float deltaG = green(c2)-green(c1);
  float deltaB = blue(c2)-blue(c1);
  // hack to ensure there are no holes in gradient
  // needs to be increased, as radius increases
  float gapFiller = 8.0;
  for (int i=0; i< radius; i++) {
    for (float j=0; j<360; j+=1.0/gapFiller) {
      px = x+cos(radians(angle))*i;
      py = y+sin(radians(angle))*i;
      angle+=1.0/gapFiller;
      color c = color(
        (red(c1)+(i)*(deltaR/radius)), 
        (green(c1)+(i)*(deltaG/radius)), 
        (blue(c1)+(i)*(deltaB/radius)) 
        );
      ctx.stroke(c);
      ctx.rect(px, py, 1, 1);
    }
  }
  // adds smooth edge 
  // hack anti-aliasing
  ctx.noFill();
  ctx.strokeWeight(3);
  ctx.ellipse(x, y, radius*2, radius*2);
}