//12channel 4* 10Watt RGB led 12Volt powered minifullonflasher with special 3lcdbeameroptic lense glas use it if usefull [MEOW] #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 #define strobe14 PB10 #define strobe15 PB11 #define strobe16 PB14 #define strobe17 PB15 #define strobe18 PA8 #define strobe19 PA9 #define strobe20 PA10 #define strobe21 PB5 #define strobe22 PB6 #define strobe23 PB7 #define strobe24 PB8 #define t1 PB12 #define t2 PB13 #define channelz 12 #define sqsteps 21 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(t1,INPUT); allof();delay(300);ratemal();} void loop(){zeitreise();}// uint8_t beatsplit,strop[channelz+1],helligkeiten[channelz+1],newtrigger,blinkdata[sqsteps+1][channelz+1],isoncount,onpress[4],modi=1,doubleup=4,zufall; uint8_t moden[5]={1,2,4}; uint8_t xmoden[7]={0,41,82,0,81};//long thing matching vauels to psy fullon {0,81,72,0,59} //most time spendet for adjusting.. uint16_t coolcach; 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 >=xmoden[doubleup]){beatsplit=1;newtrigger++;if(newtrigger>24){ratemal();newtrigger=random(1,4)*3;}}//ratemal(); for(uint8_t fiz=0;fiz= (2400/(doubleup*4))){for(uint8_t fu=0;fu=1){strop[fu]-=1;}}dimmer = micros();}//downfade while ((micros()- littletime) >= 8){pulspowder();littletime = micros();}//istinput();pulspowder();pulspowder(); } void ratemal(void){ zufall=random(0,60); if(modi==3 && zufall <10){doubleup=moden[0];} if(modi==3 && zufall >=10 && zufall <30){doubleup=moden[1];} if(modi==3 && zufall >=30){doubleup=moden[2];} for(uint8_t tik=0;tik<=sqsteps;tik++){for(uint8_t tok=0;tok=1){isoncount++;}}}if(isoncount<=5){ratemal();}}//try solong until minimum 3flashes/sequenz void istinput(void){ onpress[2]++; if (onpress[2] >20) { if (digitalRead(t1) == HIGH && onpress[0] ==0 ) { onpress[0] =1;moduswechsel();} if (onpress[0] == 1 ) { onpress[1]++;} if (onpress[1] >= 5) { onpress[1] =0; onpress[0]=0; }onpress[2]=0;}} void moduswechsel(void){modi++; if(modi>3){modi=0;} } uint8_t maxx=100; 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 <= (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);}/*//noot connected here 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); } //mutch copper build in.. //user 4x 10Watt RGB on 6600yF stabilisated 12V from 12V2ADC switchingsupply .. // parralel 4x 16V10yF tantal parralel to each color, 1xN4007 as resistor inline to red color //leds(negative) pulsed with D882 3A NPN transistor connected with 220R to stmGPIO //12V->AMS1117 3V3 (with laarge copper heatsink) ->3V3 STM32F103C8T6 /*pictures * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12Vflasher_wallcolordottry_1.jpg * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12Vflasher_wallcolordottry_2.jpg * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12Vflasher_wallcolordottry_3.jpg * https://marderchen.lima-city.de/NEU+/dotprojctorcasing4*10Watt.jpg * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12V_flashdotprojector_cased_1.jpg * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12V_flashdotprojector_cased_2.jpg * https://marderchen.lima-city.de/NEU+/4x10Watt_RGB_12V_flashdotprojector_cased_3_hihi.jpg * and some on videoend * build it to try dotprojection effect on wal :3 */ //have fun :3 do with it whatever want to //WARNING rist of eleptical shok or something //must short pulsing caused led heatsink smal //have fun use idea kote the anything you found in internetz from li in any way you want :3 world have to became cute flashingpsychedeliccolorfull hihihi //oh have uptadet this little https://marderchen.lima-city.de/wuselindex.html refresh for other randommusic [MEOW]