#N canvas 37 39 1098 482 12; #X msg 515 254 \; pd dsp \$1 \;; #X obj 574 151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 500 341 snapshot~; #X obj 500 367 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10 -262144 -1 -1 0.448248 256; #X obj 499 319 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 135 395 dac~; #X obj 626 25 fexpr~ (sin($x1*4000*3.1415)*(($x1*4000)%200/200))/4 \; ($x1*8000)%10*(sqrt(($x1*10000)%100))%100/200 \; (sin($x1*1000*3.1415)*(sin($x1*40*3.1415))) \; (sin($x1*10000*3.1415)*(($x1*3000)%30)*(sin($x1*40*3.1415))*(sin($x1*130*3.1415)))/100 \;; #X obj 56 44 phasor~ 0.2; #X obj 625 113 fexpr~ sin(sqrt($x1)*1000*3.1415926535)*(1-$x1) \; ($x1*25000%10)/10*(sin($x1*3.141592*60)) \; ($x1*fact($x1*80))%20/20 \; sin($x1*$x1*2000*3.14159265)*sin($x1*20*3.14159265)*sin($x1*11*3.14159265) \; sin(sqrt($x1*1000)*1000*3.1415926535)*max(0 \, (1-($x1*50))) \; ; #X obj 34 99 fexpr~ sin($x1*4000*3.141592*1+80*max(0 \, sin($x1*3.141592*8000))+1000*sin($x1*3.14159265*11))*max(0 \, sin($x1*3.141592*10))*max(0 \, sin($x1*3.141592*50)) \; sin($x1*20000*3.141592*1+800*max(0 \, sin($x1*3.141592*8000))+1000*sin($x1*3.14159265*10))*max(0 \, sin($x1*3.141592*2))*max(0 \, sin($x1*3.141592*100)) \; sin($x1*4000*3.141592*1+80*max(0 \, sin($x1*3.141592*8000))+100*sin($x1*3.14159265*11))*max(0 \, sin($x1*3.141592*10))*max(0 \, sin($x1*3.141592*25)) \; max(0 \, 1-$x1*500%10)*$x1*10000%50/30 \; sin(3.141592*1000*$x1)*(sin(3.141592*40*$x1)*0.5)+0.5 \;; #X text 832 349 Made by Il pleut; #X obj 331 416 osc~ 0.3; #X obj 574 444 osc~ 0.5; #X obj 224 419 phasor~ 0.5; #X obj 229 458 *~ 15; #X obj 143 521 fexpr~ ($x1+$x1[$x3*20-20]+$x1[(($x2)%2+$x4)*5-10])/1.5 ; #X text 147 44 Try different speed; #X text 641 223 For those two set the phasor~ at 0.1; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 4 0 2 0; #X connect 7 0 9 0; #X connect 9 0 15 0; #X connect 9 1 5 1; #X connect 9 2 5 0; #X connect 9 3 5 1; #X connect 9 3 5 0; #X connect 9 4 5 1; #X connect 9 4 2 0; #X connect 9 4 5 0; #X connect 11 0 15 2; #X connect 12 0 15 3; #X connect 13 0 14 0; #X connect 14 0 15 1; #X connect 15 0 5 0; #X connect 15 0 5 1;