//changed little 12channel 4x 10Watt high powder (9)chipleds on 12V each color 2x 33yF10V tantal in line,switched by D882 NPN transistor over 470R from STM32F103C8T6
//more colorpowder! caused diverends voltages for redgreenblue.. blue direct connected to 12V D882, green 1 Diode n4007(SMD) ((1000V1A) as resistor to D882, reed 3x N4007 in line to D882
//leds soltered on much NYM1.5mm˛cooperwire as heatsink turbine 66yF tantal + 16V 330yF elko parralel 2connectedchannel D882 pulsed blowe trhourgh
//poower by 12V ATX 3x(2x10V3300yFin line)=total 9900yF on 12V parralel
//caused diffrent led positions looking like dancing light explosions if watching inside :3 much powerbreak down caused high pulsdrains
/*pictures
 * https://marderchen.lima-city.de/NEU+/4x10watt_RGB_doomcoloringlight_1.jpg
 * https://marderchen.lima-city.de/NEU+/4x10watt_RGB_doomcoloringlight_2.jpg
 * https://marderchen.lima-city.de/NEU+/4x10watt_RGB_doomcoloringlight_3.jpg
 * https://marderchen.lima-city.de/NEU+/4x10watt_RGB_doomcoloringlight_5.jpg
 * https://marderchen.lima-city.de/NEU+/4x10watt_RGB_doomcoloringlight_6_12Vdrainbord.jpg
 * https://marderchen.lima-city.de/NEU+/using_osziloscope_12Vforsupplystabilaty.jpg (measuring supplybereakdown)
 */
//the scope is bpmtimegesynct to my favorite music (GOA,progressive-trance,psychedelick,"Full on" station from soverryawesome radio Caprice:3
//look so less kotelines somuch complexity *PURRR* [MEOW] project (idea,material and brainfuckingkoting work) by marderchen but R.I.P.Artikel 13! so do with it whatever want to :3
#define strobe1 PC13
#define strobe2 PC14
#define strobe3 PC15
#define strobe4 PA0
#define strobe5 PA1
#define strobe6 PA2
#define strobe7 PA3
#define strobe8 PA4
#define strobe9 PA5
#define strobe10 PA6
#define strobe11 PA7
#define strobe12 PB0

#define strobe13 PB1  //fan
#define strobe14 PB10 //same

#define strobe15 PB11
#define strobe16 PB12
#define strobe17 PB13
#define strobe18 PB14

#define channelz 12

void setup(){
  delay(300);
pinMode(strobe1,OUTPUT); pinMode(strobe2,OUTPUT); pinMode(strobe3,OUTPUT); pinMode(strobe4,OUTPUT); pinMode(strobe5,OUTPUT); pinMode(strobe6,OUTPUT);
pinMode(strobe7,OUTPUT); pinMode(strobe8,OUTPUT); pinMode(strobe9,OUTPUT); pinMode(strobe10,OUTPUT); pinMode(strobe11,OUTPUT); pinMode(strobe12,OUTPUT);
pinMode(strobe13,OUTPUT); pinMode(strobe14,OUTPUT); pinMode(strobe14,OUTPUT); pinMode(strobe15,OUTPUT); pinMode(strobe16,OUTPUT); pinMode(strobe17,OUTPUT); pinMode(strobe18,OUTPUT);
ratemal();}
uint8_t beatsplit,strop[channelz+1],helligkeiten[channelz+1],newtrigger,blinkdata[10][channelz+1];
uint16_t fanp=5;
void loop(){zeitreise();}//
long littletime=micros();long slowtime=micros();long dimmer=micros();
void zeitreise(void){
  while ((micros()- slowtime)>20500){ //something between 19500-20500 raw-
     beatsplit++;if (beatsplit >40){beatsplit=1;newtrigger++;if(newtrigger>16){newtrigger=random(1,4)*3;ratemal();}}
     for(uint8_t fiz=0;fiz<channelz;fiz++){strop[fiz]=blinkdata[round(beatsplit/5)][fiz];}
     slowtime = micros();}
  while ((micros()- dimmer)  >=   23){for(uint8_t fu=0;fu<channelz;fu++){if(strop[fu]>=1){strop[fu]-=1;}}dimmer = micros();}//downfade
 while ((micros()- littletime)  >= 30){pulspowder();pulspowder();pulspowder();littletime = micros();}
  }
void ratemal(void){
 for(uint8_t tik=0;tik<9;tik++){for(uint8_t tok=0;tok<channelz;tok++){blinkdata[tik][tok]=0;}}
 for(uint8_t wusch=0;wusch<channelz;wusch++){helligkeiten[wusch]=(random(0,3)*10)+110;}
 for(uint8_t wisch=0;wisch<9;wisch++){if(random(0,10)<7){for(uint8_t wasch=0;wasch<channelz;wasch++){if(random(0,25)<2){blinkdata[wisch][wasch]=helligkeiten[wasch];}}}}}
uint8_t maxx=140;
void pulspowder(void) {
  for (uint8_t fcount=0; fcount <=maxx; fcount++) {//oh have to change this back to old system caused writing HIGH or LOW 1800x each cyclus to inhibit the whole programm
    if(fcount==0){allof();}
    if (fcount <= (maxx-1) && fcount >=1) {
    if (fcount==(maxx-strop[0])) {digitalWrite(strobe1,HIGH);}
    if (fcount==(maxx-strop[1])) {digitalWrite(strobe2,HIGH);}
    if (fcount==(maxx-strop[2])) {digitalWrite(strobe3,HIGH);}
    if (fcount==(maxx-strop[3])) {digitalWrite(strobe4,HIGH);}
    if (fcount==(maxx-strop[4])) {digitalWrite(strobe5,HIGH);}
    if (fcount==(maxx-strop[5])) {digitalWrite(strobe6,HIGH);}
    if (fcount==(maxx-strop[6])) {digitalWrite(strobe7,HIGH);}
    if (fcount==(maxx-strop[7])) {digitalWrite(strobe8,HIGH);}
    if (fcount==(maxx-strop[8])) {digitalWrite(strobe9,HIGH);}
    if (fcount==(maxx-strop[9])) {digitalWrite(strobe10,HIGH);}
    if (fcount==(maxx-strop[10])) {digitalWrite(strobe11,HIGH);}
    if (fcount==(maxx-strop[11])) {digitalWrite(strobe12,HIGH);}
    if (fcount==(maxx-fanp)) {digitalWrite(strobe13,HIGH);}
    if (fcount==(maxx-fanp)) {digitalWrite(strobe14,HIGH);}

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

void allof(void){
  digitalWrite(strobe1, LOW);digitalWrite(strobe2, LOW);digitalWrite(strobe3, LOW);digitalWrite(strobe4, LOW);digitalWrite(strobe5, LOW);digitalWrite(strobe6, LOW);
  digitalWrite(strobe7, LOW);digitalWrite(strobe8, LOW);digitalWrite(strobe9, LOW);digitalWrite(strobe10, LOW);digitalWrite(strobe11, LOW);digitalWrite(strobe12, LOW);
 digitalWrite(strobe13, LOW);digitalWrite(strobe14, LOW);digitalWrite(strobe15, LOW);digitalWrite(strobe16, LOW);digitalWrite(strobe17, LOW);digitalWrite(strobe18, LOW);
}
void allon(void){
  digitalWrite(strobe1, HIGH);digitalWrite(strobe2, HIGH);digitalWrite(strobe3,HIGH);digitalWrite(strobe4,HIGH);digitalWrite(strobe5,HIGH);digitalWrite(strobe6, HIGH);
  digitalWrite(strobe7, HIGH);digitalWrite(strobe8, HIGH);digitalWrite(strobe9,HIGH);digitalWrite(strobe10,HIGH);digitalWrite(strobe11,HIGH);digitalWrite(strobe12, HIGH);

}