//W:Mute 2004 - Abstract
//www.wmute.org
//W:Mute 2004 - Abstract
//www.wmute.org

TimeStamp t=new TimeStamp();
int counter=0;
float sc=1.0;
float horSpace=10.0;
float verSpace=0.86*10.0;
float sliceWidth=1.0;
float horSize=109*sliceWidth; // fixed
float verSize=0.86*20.0;
float verBuffer=verSize;
int horNum=5;
int verNum=24;
int whiteNoise=0;
int blackNoise=0;
boolean first=true;

void setup(){
  size(605,680);
  background(255);
  //size(int((horSpace+horNum*(horSize+horSpace))*sc),int((verSpace+verNum*(verSize+verSpace))*sc));
  framerate(1);
  noStroke();
  fill(0);
  first=true;
}

void draw(){
  if (first){
    fill(225);
    rect(int(horSpace*sc),int(verSpace*sc),int( (horNum*(horSize+horSpace)-horSpace)*sc),verSize);
    rect(int(horSpace*sc),int((verSpace+(verNum+1)*(verSize+verSpace))*sc),int( (horNum*(horSize+horSpace)-horSpace)*sc),verSize);
    for (int hor=0;hor<horNum;hor++){
      for (int ver=1;ver<verNum+1;ver++){
        rect(int((horSpace+hor*(horSize+horSpace))*sc),int((verSpace+ver*(verSize+verSpace))*sc),horSize*sc,verSize);
      }
    }  
  first=false;
  }
  t=new TimeStamp();
  t.draw(horSpace*sc+(horSize+horSpace)*sc*(counter%horNum),verSpace*sc+(verSize+verSpace)*sc*((counter/horNum)%verNum+1),horSize,sliceWidth, verSize,sc);
  //if ((counter%(horNum*verNum))==0) saveFrame();
  counter++;
}

class TimeStamp {
  int ye,mo,da,ho,mi,se;
  int[] digits = new int[14];

  TimeStamp(){
    ye=year();
    mo=month();
    da=day();
    ho=hour();
    mi=minute();
    se=second();

    int remainder=ye;
    digits[0]=remainder/1000;
    remainder-=digits[0]*1000;
    digits[1]=remainder/100;
    remainder-=digits[1]*100;
    digits[2]=remainder/10;
    remainder-=digits[2]*10;
    digits[3]=remainder;

    remainder=mo;
    digits[4]=remainder/10;
    remainder-=digits[4]*10;
    digits[5]=remainder;

    remainder=da;
    digits[6]=remainder/10;
    remainder-=digits[6]*10;
    digits[7]=remainder;

    remainder=ho;
    digits[8]=remainder/10;
    remainder-=digits[8]*10;
    digits[9]=remainder;

    remainder=mi;
    digits[10]=remainder/10;
    remainder-=digits[10]*10;
    digits[11]=remainder;

    remainder=se;
    digits[12]=remainder/10;
    remainder-=digits[12]*10;
    digits[13]=remainder;

  }

  void draw(float xoff,float yoff, float w, float d, float h, float s){
    int slice=0;
int[][] isTrueLeft={{0,0,0,1,1,0,1},{0,0,1,1,0,0,1},{0,0,1,0,0,1,1},{0,1,1,1,1,0,1},{0,1,0,0,0,1,1},{0,1,1,0,0,0,1},{0,1,0,1,1,1,1},{0,1,1,1,0,1,1},{0,1,1,0,1,1,1},{0,0,0,1,0,1,1}};

  fill(255);
  rect(xoff,yoff,w*s,h*s);
  fill(0);

  //start=101
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(0, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  slice++;

  // left 7 digits
  for (int digitCounter=0;digitCounter<7;digitCounter++){
    //print(digits[digitCounter]);
    for (int sliceCounter=0;sliceCounter<7;sliceCounter++){
      draw_slice(isTrueLeft[digits[digitCounter]][sliceCounter],xoff+s*d*slice,yoff,h,d,s);
      slice++;
    }
  }

  //center=01010
  draw_slice(0, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(0, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(0, xoff+s*d*slice,yoff,h,d,s);
  slice++;

  // right 7 digits
  for (int digitCounter=7;digitCounter<14;digitCounter++){
    //print(digits[digitCounter]);
    for (int sliceCounter=0;sliceCounter<7;sliceCounter++){
      draw_slice(1-isTrueLeft[digits[digitCounter]][sliceCounter],xoff+s*d*slice,yoff,h,d,s);
      slice++;
    }
  }

  //end=101
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(0, xoff+s*d*slice,yoff,h,d,s);
  slice++;
  draw_slice(1, xoff+s*d*slice,yoff,h,d,s);
  //println();

}

void draw_slice(int bit,float xoff, float yoff, float verSize,float sliceWidth,float sc){
  int a=150;
  if (bit==1){
    fill(89,24,24,a);
    if (random(100)<80) fill(0,0,0,a);
    rect(xoff,yoff,sc*sliceWidth,sc*verSize);
    fill(255,255,255,a);
    for (int h=0;h<verSize;h++){
      if (random(100)<whiteNoise){
        rect(xoff,yoff+sc*h,sc*sliceWidth,sc*sliceWidth);
      }
    }
  }
  else{
    fill(0,0,0,a);
    for (int h=0;h<verSize;h++){
      if (random(100)<blackNoise){
        rect(xoff,yoff+sc*h,sc*sliceWidth,sc*sliceWidth);
      }
    }
  }

}

}