//simpelest 24channel (8x 3Watt RGB)
//led ratet maximum 3V3 but is soldering leds direkt on coopelblockheatsink (solder! ledsocketmetal to coopermetal no thermal past!)and soldering tantal 10V33yF capacitoe paralel to each color to reduce the switchingonvoltage
//its kind of §wattRGB ledhack.. just can switch the Ground with D882 3A NPN transistor direkt to 5V connected ledcolor (gren and blue red need adidional 1A1000V N4005 diode as resitor between) the result is psychedelic epic bright flashing
//capacitor also let led color glow is no powerpuls durring other leds pulsed poulsduration = brighteness dutypulssequenzrepeating fast as the capacitor neer to discharge so led permanently on and not dutysequenzflashing :3
//Li-ion->extendet 2x 5V2A stepup  ->AMS1117 3V3 800mA constantvoltage IC >STM32F103C8T6 >GPIOs >220R(Ohm)>D882>(N4007 onlyforred)>LED>+5V 5V stabilizer with highdrain 3x 6.3V 1800yF elektrolyte and some 10V33yFtandal 3V3stabilized with
//3x 10V33yF tantal, boostestepup extendet with 4x 10V33yF tantal on input+some elektrolyte wires: 1.5mm² NYM cooper wire also as heatsink for booststepup watch pictures:
/*1rst
 * https://marderchen.lima-city.de/NEU+/8x3WattRGB_24chanorgan_parting.jpg
 * https://marderchen.lima-city.de/NEU+/D882_3Anpn_pinbending_forPCBcompatible.jpg for matching SMD->PCB
 * https://marderchen.lima-city.de/NEU+/8x3WattRGB_24chanorgan_3ampereNPNs_soldering.jpg
 * https://marderchen.lima-city.de/NEU+/8x3WattRGB_24chanorgan_solderdone.jpg
 * https://marderchen.lima-city.de/NEU+/8x3WattRGB_24chanorgan_hardware.jpg planet powersource 5V fromATX supply
 * case comming later..
 * testvideo on googledrive(w0bm if boothdone) https://drive.google.com/open?id=1F3MUliJP7Jj3gEktlZphB0OYnjSHxt5z
 * sorry the psachedelic feeling can not be catchet with a cam and given back with pc monitor (monitor 250cd =  250 ANSI Lumen.. but raw calculated about ~3klumen for maximum short light output..)
 * 2nd
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_mapping.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_parting.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_stm.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_mainheatsinkcooper.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_ledpreparing.jpg
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_soldering_ledstested.jpg not looking fine but extremly requires much solder/cooper for drifing led with 5Vwithout gone broken emediatly
 * sometimes just write large textfiles (german) maybe funny :3 (in chaotic german written!) https://marderchen.lima-city.de/NEU+/RIP_ledtechnick_und_warumnixweltzukunft.txt
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_extendet_5V%3E2Asupply1.jpg testing ups some solderingerror red<->blue fail
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_fixedwieringfailture.jpg (final soldered and working)
 * https://marderchen.lima-city.de/NEU+/2nd_psychedelic_8xoverpowered-3Watt_RGB_flasher_nice3V3dongletest.jpg oh lock how cute bright but its only driven with 3V3 f4rom dongle and should lader have 5V capacitors only 3V chared nice..
 * planetz powersource Li-ion highdraincells
 * same (following)kote for booth blinkythuingys
 */
//have fun :3 do with it whatever want to
//WARNING better not change this kote if not have understand it if rebuild this psychedelic breinhack musicvisualizing exactly like in pictures
//overpowered with 5Vdriven (result much more than 3Watt dot lightoutput)RGB leds will hurt your eyes if watching in permanently on ones if not shure connect dongle or 3V3 for lowpowertesting
//this desing is not made for permanentla constant light source its extremlyfast overheating if not pulksflashing driving
//switch of 5V if flashing new if STM32F103 caused is GPIOout permanently is switched HIGH LEDcolors also get broken
//its(via timing matching to goa/psy/prograssivetrance/psychedelic~143to145 bpm)thingy caused permanently on and not flashing :3

#define strobe1 PC13
#define strobe2 PC14
#define strobe3 PC15
#define strobe4 PB9
#define strobe5 PB8
#define strobe6 PB7
#define strobe7 PA3
#define strobe8 PA4
#define strobe9 PA5
#define strobe10 PA6
#define strobe11 PA7
#define strobe12 PB0
#define strobe13 PB1
#define strobe14 PB10
#define strobe15 PB11
#define strobe16 PB12
#define strobe17 PB13
#define strobe18 PB14
#define strobe19 PB15
#define strobe20 PA8
#define strobe21 PA9
#define strobe22 PA10
#define strobe23 PB5
#define strobe24 PB6
#define channelz 24
#define fan PA2
#define nix1 PA0
#define nix2 PA1

void setup(){
  delay(10);
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);
pinMode(strobe19,OUTPUT); pinMode(strobe20,OUTPUT); pinMode(strobe21,OUTPUT); pinMode(strobe22,OUTPUT); pinMode(strobe23,OUTPUT); pinMode(strobe24,OUTPUT);
pinMode(fan,OUTPUT);
allof();delay(300);ratemal();}
uint8_t beatsplit,strop[channelz+1],helligkeiten[channelz+1],newtrigger,blinkdata[10][channelz+1],isoncount;
uint32_t doubleup=20000000;
uint16_t fanp=5;
void loop(){zeitreise();}//
long littletime=micros();long slowtime=micros();long dimmer=micros();
void zeitreise(void){
  while ((micros()- slowtime)>(20100/doubleup)){ //something between 19500-20500 raw-
     beatsplit++;if (beatsplit >(40*doubleup)){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)  >=   (20/doubleup)){for(uint8_t fu=0;fu<channelz;fu++){if(strop[fu]>=1){strop[fu]-=1;}}dimmer = micros();}//downfade
 while ((micros()- littletime)  >= 14){pulspowder();pulspowder();pulspowder();littletime = micros();}
  }
void ratemal(void){
 if(random(0,5) <3){doubleup=1;}else if(random(0,5) <4){doubleup=2;} else{doubleup=4;}
 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*doubleup))<7){for(uint8_t wasch=0;wasch<channelz;wasch++){if(random(0,35)<2){blinkdata[wisch][wasch]=helligkeiten[wasch];}}}}waserraten();}
void waserraten(void){
 isoncount=0; for(uint8_t tak=0;tak<9;tak++){for(uint8_t tek=0;tek<channelz;tek++){if(blinkdata[tak][tek]>=1){isoncount++;}}}if(isoncount<=3){ratemal();}}//try solong until minimum 3flashes/sequenz
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-strop[12])) {digitalWrite(strobe13,HIGH);}
    if (fcount==(maxx-strop[13])) {digitalWrite(strobe14,HIGH);}
    if (fcount==(maxx-strop[14])) {digitalWrite(strobe15,HIGH);}
    if (fcount==(maxx-strop[15])) {digitalWrite(strobe16,HIGH);}
    if (fcount==(maxx-strop[16])) {digitalWrite(strobe17,HIGH);}
    if (fcount==(maxx-strop[17])) {digitalWrite(strobe18,HIGH);}
    if (fcount==(maxx-strop[18])) {digitalWrite(strobe19,HIGH);}
    if (fcount==(maxx-strop[19])) {digitalWrite(strobe20,HIGH);}
    if (fcount==(maxx-strop[20])) {digitalWrite(strobe21,HIGH);}
    if (fcount==(maxx-strop[21])) {digitalWrite(strobe22,HIGH);}
    if (fcount==(maxx-strop[22])) {digitalWrite(strobe23,HIGH);}
    if (fcount==(maxx-strop[23])) {digitalWrite(strobe24,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);
 digitalWrite(strobe19, LOW);digitalWrite(strobe20, LOW);digitalWrite(strobe21, LOW);digitalWrite(strobe22, LOW);digitalWrite(strobe23, LOW);digitalWrite(strobe24, LOW);
}