A simple Pure Data patch from https://www.reddit.com/r/generative/comments/icl8yd/some_simple_pure_data_patch_i_made_generative/

simple_patch.pd

#N canvas -8 -8 1280 952 12;
#X obj 289 126 s \$0-b;
#X obj 291 65 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X msg 813 177 1 \, 0 100;
#X obj 813 204 line~;
#X obj 813 282 osc~;
#X obj 813 308 +~;
#X obj 813 87 i;
#X obj 850 87 + 1;
#X obj 813 113 mod 4;
#X obj 813 230 *~;
#X obj 813 139 route 0;
#X obj 813 345 lop~ 500;
#X obj 813 45 r \$0-b;
#X obj 731 197 noise~;
#X obj 731 231 *~;
#X obj 814 258 *~ 200;
#X msg 858 666 1 \, 0 \$1;
#X obj 858 692 line~;
#X obj 839 724 *~;
#X obj 797 672 noise~;
#X obj 858 574 r \$0-b;
#X obj 858 600 random 100;
#X obj 305 291 r \$0-b;
#X obj 303 574 osc~;
#X obj 303 548 *~ 200;
#X obj 303 522 *~;
#X obj 302 608 lop~ 1000;
#X obj 303 386 route 0;
#X floatatom 463 580 5 0 0 0 - - -;
#X obj 462 480 mtof;
#X obj 463 423 random 64;
#X obj 461 452 + 50;
#X obj 303 496 line~;
#X obj 303 327 random 3;
#X obj 571 673 +~;
#X obj 1016 799 dac~;
#X obj 936 463 phasor~ 1.1;
#X obj 906 762 vcf~ 220 3;
#X obj 976 631 random 12;
#X obj 976 657 + 3;
#X msg 1071 660 1 \, 0 \$1;
#X obj 1071 686 line~;
#X obj 1052 718 *~;
#X obj 1013 688 noise~;
#X obj 1071 568 r \$0-b;
#X obj 1071 594 random 100;
#X obj 1119 756 vcf~ 220 3;
#X obj 1189 625 random 12;
#X obj 1189 651 + 3;
#X obj 1149 457 phasor~ 2.3;
#X obj 1149 483 *~ 5000;
#X obj 936 489 *~ 3000;
#X msg 303 463 1 \, 0 50;
#X obj 572 698 clip~ -0.5 0.5;
#X obj 288 99 metro 120;
#X obj 608 512 dac~;
#X obj 654 321 vd~ d;
#X obj 610 431 +~;
#X obj 632 458 delwrite~ d 500;
#X obj 650 347 *~ 0.75;
#X obj 656 295 random 50;
#X obj 647 410 *~;
#X obj 729 302 random 50;
#X obj 729 356 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 610 484 *~ 0.4;
#X obj 965 228 > 25;
#X obj 965 202 random 75;
#X obj 965 254 * 200;
#X floatatom 963 289 5 0 0 0 - - -;
#X obj 646 378 +~;
#X obj 729 328 > 25;
#X connect 1 0 54 0;
#X connect 2 0 3 0;
#X connect 3 0 9 0;
#X connect 3 0 9 1;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 6 0 8 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 14 1;
#X connect 9 0 15 0;
#X connect 10 0 2 0;
#X connect 10 0 60 0;
#X connect 10 0 62 0;
#X connect 10 0 66 0;
#X connect 11 0 34 1;
#X connect 12 0 6 0;
#X connect 13 0 14 0;
#X connect 14 0 5 1;
#X connect 15 0 4 0;
#X connect 16 0 17 0;
#X connect 17 0 18 1;
#X connect 18 0 37 0;
#X connect 19 0 18 0;
#X connect 20 0 21 0;
#X connect 20 0 38 0;
#X connect 21 0 16 0;
#X connect 22 0 33 0;
#X connect 23 0 26 0;
#X connect 24 0 23 0;
#X connect 25 0 24 0;
#X connect 26 0 34 0;
#X connect 27 0 52 0;
#X connect 27 0 30 0;
#X connect 29 0 24 1;
#X connect 29 0 28 0;
#X connect 30 0 31 0;
#X connect 31 0 29 0;
#X connect 32 0 25 0;
#X connect 32 0 25 1;
#X connect 33 0 27 0;
#X connect 34 0 53 0;
#X connect 36 0 51 0;
#X connect 37 0 35 0;
#X connect 37 0 69 1;
#X connect 38 0 39 0;
#X connect 39 0 37 2;
#X connect 40 0 41 0;
#X connect 41 0 42 1;
#X connect 42 0 46 0;
#X connect 43 0 42 0;
#X connect 44 0 45 0;
#X connect 44 0 47 0;
#X connect 45 0 40 0;
#X connect 46 0 35 1;
#X connect 46 0 69 1;
#X connect 47 0 48 0;
#X connect 48 0 46 2;
#X connect 49 0 50 0;
#X connect 50 0 46 1;
#X connect 51 0 37 1;
#X connect 52 0 32 0;
#X connect 53 0 57 0;
#X connect 54 0 0 0;
#X connect 56 0 59 0;
#X connect 57 0 58 0;
#X connect 57 0 64 0;
#X connect 59 0 69 0;
#X connect 60 0 56 0;
#X connect 61 0 57 1;
#X connect 62 0 70 0;
#X connect 63 0 61 1;
#X connect 64 0 55 0;
#X connect 64 0 55 1;
#X connect 65 0 67 0;
#X connect 66 0 65 0;
#X connect 67 0 15 1;
#X connect 67 0 68 0;
#X connect 69 0 61 0;
#X connect 70 0 63 0;