//by marderchen use if want


#define R1  PB9
#define G1  PB8
#define B1  PB7
#define R2  PB6
#define G2  PB5
#define B2  PA10
#define R3  PA9
#define G3  PA8
#define B3  PB15
#define W1  PB14
#define W2  PB13

#define R4  PC13
#define G4  PC14
#define B4  PC15
#define R6  PA1
#define G6  PA2
#define B6  PA3
#define R5  PA4
#define G5  PA5
#define B5  PA6
#define R7  PA7
#define G7  PB0
#define B7  PB1
#define R8  PB10
#define G8  PB11
#define B8  PB12


#define t1 PA12
#define t2 PA15

#define channelz 26
#define sqsteps 64
#define mass 26
uint8_t strop[channelz+6];
uint8_t maxx=240;
void setup(){
  delay(10);
pinMode(R1,OUTPUT); pinMode(G1,OUTPUT); pinMode(B1,OUTPUT); pinMode(R2,OUTPUT); pinMode(G2,OUTPUT); pinMode(B2,OUTPUT); pinMode(R3,OUTPUT); pinMode(G3,OUTPUT); pinMode(B3,OUTPUT); pinMode(R4,OUTPUT); pinMode(G4,OUTPUT); pinMode(B4,OUTPUT);
pinMode(R5,OUTPUT); pinMode(G5,OUTPUT); pinMode(B5,OUTPUT); pinMode(R6,OUTPUT); pinMode(G6,OUTPUT); pinMode(B6,OUTPUT); pinMode(R7,OUTPUT); pinMode(G7,OUTPUT); pinMode(B7,OUTPUT); pinMode(R8,OUTPUT); pinMode(G8,OUTPUT); pinMode(B8,OUTPUT);
pinMode(W1,OUTPUT); pinMode(W2,OUTPUT); pinMode(t1,INPUT);

allof();delay(300);setzen();}

void loop(){zeitreise();}
uint8_t beatsplit,azeig[mass][channelz],bzeig[mass][channelz],upper=12,bisneu,beatbetween=126,downer=1,diese,bp=1,led,kled;//125
uint8_t ubp[]={4,4,8,8,8,16,16,16,16,32,32,32};
uint8_t bpv[]={2,2,2,2,2,2,2,2,1,2};
long littletime=micros();long maintime=millis();long ledbeat=micros();
void zeitreise(void){
  if ((millis()- maintime)  >=  5){downfade(); maintime = millis();} //istinput(); setfan();
  while ((micros()- littletime)  >= 2){pulspowder();littletime = micros();} //
  if ((micros()- ledbeat)>(beatbetween*100)){beatsplit+=bp; //hihi like the optical flashing to beat effect sometimes try other idea :3
  if(beatsplit >=64){beatsplit=0;bisneu++;kled=0;diese=0;}//strop[1]=100;}prüfen speed
  if((beatsplit%upper)==0){
     if((kled%2)==0){strop[diese]=azeig[kled][diese];}else{strop[25-diese]=bzeig[kled][diese];}kled++;}
     if((beatsplit%8)==0){diese++;}
     //if(beatsplit==0){strop[15]=maxx;}//oben
    // if(beatsplit==0){} //mitte
    // if(beatsplit==32){strop[17]=maxx;}
    //q if(beatsplit==48){strop[16]=100;}
  if(bisneu>20){upper=ubp[random(0,11)];bisneu=random(0,10);setzen();}
  ledbeat=micros();}
  }

void setzen(void){
  downer=random(1,5)*5;bp=bpv[random(0,9)];
 for(uint8_t hier=0;hier<channelz;hier++){for(uint8_t undso=0;undso<mass;undso++){
  azeig[undso][hier]=0;bzeig[undso][hier]=0;azeig[undso][hier]=random(0,12)*20;bzeig[undso][hier]=random(0,12)*20;}}
}//led=random(0,20);if(led<10){}else{

void downfade(void){for (uint8_t daz=0;daz<channelz;daz++){if(strop[daz]>=downer){strop[daz]-=downer;}if(strop[daz]>=1){strop[daz]-=1;}}}

void pulspowder(void) {
  for (uint8_t fcount=0; fcount <=maxx; fcount++) {

    if (fcount <= (maxx-1) && fcount >=1) {
    if (fcount==(maxx-strop[0])) {digitalWrite(W1,HIGH);}
    if (fcount==(maxx-strop[1])) {digitalWrite(R1,HIGH);}
    if (fcount==(maxx-strop[2])) {digitalWrite(G1,HIGH);}
    if (fcount==(maxx-strop[3])) {digitalWrite(B1,HIGH);}
    if (fcount==(maxx-strop[4])) {digitalWrite(R2,HIGH);}
    if (fcount==(maxx-strop[5])) {digitalWrite(G2,HIGH);}
    if (fcount==(maxx-strop[6])) {digitalWrite(B2,HIGH);}
    if (fcount==(maxx-strop[7])) {digitalWrite(R3,HIGH);}
    if (fcount==(maxx-strop[8])) {digitalWrite(G3,HIGH);}
    if (fcount==(maxx-strop[9])) {digitalWrite(B3,HIGH);}
    if (fcount==(maxx-strop[10])) {digitalWrite(R4,HIGH);}
    if (fcount==(maxx-strop[11])) {digitalWrite(G4,HIGH);}
    if (fcount==(maxx-strop[12])) {digitalWrite(B4,HIGH);}
    if (fcount==(maxx-strop[13])) {digitalWrite(R5,HIGH);}
    if (fcount==(maxx-strop[14])) {digitalWrite(G5,HIGH);}
    if (fcount==(maxx-strop[15])) {digitalWrite(B5,HIGH);}
    if (fcount==(maxx-strop[16])) {digitalWrite(R6,HIGH);}
    if (fcount==(maxx-strop[17])) {digitalWrite(G6,HIGH);}
    if (fcount==(maxx-strop[18])) {digitalWrite(B6,HIGH);}
    if (fcount==(maxx-strop[19])) {digitalWrite(R7,HIGH);}
    if (fcount==(maxx-strop[20])) {digitalWrite(G7,HIGH);}
    if (fcount==(maxx-strop[21])) {digitalWrite(B7,HIGH);}
    if (fcount==(maxx-strop[22])) {digitalWrite(R8,HIGH);}
    if (fcount==(maxx-strop[23])) {digitalWrite(G8,HIGH);}
    if (fcount==(maxx-strop[24])) {digitalWrite(B8,HIGH);}
    if (fcount==(maxx-strop[25])) {digitalWrite(W2,HIGH);}

}
    if (fcount>=maxx){allof();}}}

void allof(void){
  digitalWrite(R1,LOW); digitalWrite(B1,LOW); digitalWrite(G1,LOW); digitalWrite(R2,LOW); digitalWrite(B2,LOW); digitalWrite(G2,LOW); digitalWrite(R3,LOW); digitalWrite(B3,LOW); digitalWrite(G3,LOW); digitalWrite(R4,LOW); digitalWrite(B4,LOW); digitalWrite(G4,LOW);
  digitalWrite(R5,LOW); digitalWrite(B5,LOW); digitalWrite(G5,LOW); digitalWrite(R6,LOW); digitalWrite(B6,LOW); digitalWrite(G6,LOW); digitalWrite(R7,LOW); digitalWrite(G7,LOW);digitalWrite(B7,LOW); digitalWrite(R8,LOW); digitalWrite(G8,LOW);digitalWrite(B8,LOW);
digitalWrite(W1,LOW); digitalWrite(W2,LOW);
}

//alternating generator
/*
  while ((micros()- slowtime)>11900){
     if(beatsplit==0){strop[15]=maxx;}
     if(beatsplit==16){strop[16]=60;}
     if(beatsplit==32){strop[17]=maxx;digitalWrite(cal1,HIGH);}
     if(beatsplit==48){strop[16]=100;}
     for(uint8_t fiz=0;fiz<channelz;fiz++){if(strop[fiz]<4){strop[fiz]=blinkdata[beatsplit][fiz][0];}}
     beatsplit++;if(beatsplit >sqsteps){beatsplit=0;digitalWrite(cal1,LOW);
     for(uint8_t wo=0;wo<sqsteps;wo++){for (uint8_t wer=0;wer<channelz;wer++){
      blinkdata[wo][wer][2]++;if(blinkdata[wo][wer][2]>blinkdata[wo][wer][1]){blinkdata[wo][wer][2]=0;blinkdata[wo][wer][1]=random(0,5)+2;blinkdata[wo][wer][0]=random(2,10)*20;}}}}

     slowtime = micros();}
  while ((micros()- dimmer)  >=  4000){for(uint8_t fap=0;fap<1;fap++){for(uint8_t fu=0;fu<channelz+4;fu++){if(strop[fu]<=140&&strop[fu]>=5){strop[fu]-=5;}if(strop[fu]>=1){strop[fu]-=1;}}}dimmer = micros();}//downfade
 //digitalWrite(strobe13,HIGH);
  */