[PD] A patch to share

Kyle Klipowicz kyleklip at gmail.com
Mon Mar 23 17:53:19 CET 2009


Neat!
~Kyle

On Sat, Mar 21, 2009 at 10:22 AM, Pall Thayer <palli at pallit.lhi.is> wrote:

> I was going through some old stuff on my computer and found this patch I
> made a few years ago for a project called Autodrawn. The piece used to run
> on my server but due to my laziness in updating or even upgrading my server
> it's no longer running. However, the PD patch that goes with the work is
> interesting so I want to share it with the community. I've loosely applied
> the GPL to it. It might not be an interesting technical feat but rather
> conceptually. It plays a repeated sequence from Kraftwerk's Autobahn
> interspersed with live mp3 feeds of police scanners. The idea was to take
> the idea of the autobahn as portrayed on the original album cover, as
> something beautifully peaceful and positive and turn it into a more modern
> view of the freeway as something ominous and dangerous which has taken on an
> even newer meaning in recent years as a symbol of the negative impacts our
> fossil fuel consumption is having on the environment. Also, I just think it
> sounds cool. Even though it's just playing the same short sequence over and
> over again, it's still fun to listen to for long periods of time.
>
> So, if you find something interesting to do with it, feel free.
>
> best r.
> Pall Thayer
>
>
> #N canvas 4 98 985 512 10;
> #X obj 149 96 mp3amp~;
> #X msg 19 70 disconnect;
> #X floatatom 193 123 5 0 0 0 - - -;
> #X obj 234 96 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
> -1 -1 0 1;
> #X obj 327 108 mp3amp~;
> #X msg 264 86 disconnect;
> #X floatatom 371 135 5 0 0 0 - - -;
> #X obj 412 108 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
> -1 -1 0 1;
> #X obj 466 123 delread~ dc 400;
> #X obj 466 167 delwrite~ dc 400;
> #X floatatom 466 105 5 0 0 0 - - -;
> #X obj 12 104 delread~ sas 400;
> #X obj 12 148 delwrite~ sas 400;
> #X obj 471 145 *~ 0.1;
> #X obj 17 126 *~ 0.1;
> #X obj 149 306 mp3amp~;
> #X msg 86 269 disconnect;
> #X floatatom 193 333 5 0 0 0 - - -;
> #X obj 234 306 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
> -1 -1 0 1;
> #X floatatom 322 334 5 0 0 0 - - -;
> #X obj 327 374 *~ 0.1;
> #X obj 322 352 delread~ sw 400;
> #X obj 322 396 delwrite~ sw 400;
> #X obj 544 326 f;
> #X obj 615 326 + 1;
> #X obj 683 274 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
> 1;
> #X floatatom 563 378 5 0 0 0 - - -;
> #N canvas 0 22 450 300 (subpatch) 0;
> #X array array103 100 float 1;
> #A 0 68 61 0 73 66 0 0 0 0 75.7258 75.7258 75.7258 73.1658 68.0458
> 65.4858 65.4858 66.3391 67.1925 68.0458 68.0458 68.0458 62.9258 61.6458
> 60.3658 57.8058 55.2458 52.6858 50.1258 47.5658 45.0058 42.4458 39.8857
> 38.1791 36.4724 34.7658 33.0591 31.3524 29.6457 27.0857 24.5257 21.9657
> 19.4057 18.1257 16.8457 16.8457 14.2857 14.2857 9.16572 4.04571 1.50713
> 1.54285 45.082 50.202 47.642 47.642 47.642 47.642 47.642 48.4953 49.3486
> 50.202 51.0553 51.9086 52.762 54.042 55.322 56.602 57.882 59.162 60.442
> 61.722 63.002 64.282 65.562 66.842 68.122 68.122 68.122 68.122 80.922
> -0.385712 -0.414283 -0.45714 -0.499997 -0.528568 -0.585711 -0.599997
> -0.614282 0 100 50 78 54 0 0 0 0 0 0 0;
> #X coords 0 128 99 0 100 50 1;
> #X restore 619 176 graph;
> #X obj 547 347 tabread array103;
> #X obj 594 437 line;
> #X obj 525 459 *~;
> #X obj 521 392 mtof;
> #X obj 487 371 mtof;
> #X obj 487 393 osc~;
> #X obj 448 371 mtof;
> #X obj 681 370 route 0;
> #X obj 569 326 mod 8;
> #X msg 496 234 \; array103 0 68 61 0 73 66 0 0 0;
> #X obj 448 393 osc~;
> #X obj 521 414 osc~;
> #X obj 447 347 - 24;
> #X obj 486 347 - 12.1;
> #X obj 31 413 delwrite~ autob 450;
> #X obj 18 353 delread~ autob 450;
> #X obj 682 302 metro 300;
> #X obj 628 44 f;
> #X obj 699 44 + 1;
> #X obj 653 44 mod 2;
> #X floatatom 657 76 5 0 0 0 - - -;
> #X obj 612 393 delay 5;
> #X obj 740 38 delay 5000;
> #X obj 342 53 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 361 44 delay 5000;
> #X obj 737 60 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 496 13 metro 300000;
> #X obj 657 103 route 0 1;
> #X obj 657 125 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 686 125 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 715 125 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 49 2 delay 5000;
> #X obj 126 44 delay 5000;
> #X obj 762 153 route 0 1;
> #X obj 762 175 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 791 175 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 820 175 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 323 24 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 22 2 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1
> ;
> #X obj 761 127 pipe 60000;
> #X obj 103 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 146 150 *~ 0.4;
> #X obj 146 360 *~ 0.23;
> #X obj 324 162 *~ 0.33;
> #X msg 286 306 connecturl http://12.40.197.36:8000;
> #X obj 794 250 route 0 1;
> #X obj 794 272 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 823 272 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 852 272 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 793 224 pipe 80000;
> #X obj 766 255 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 780 303 delay 5000;
> #X obj 818 330 delay 5000;
> #X obj 780 325 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 818 351 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X obj 31 388 *~ 0.2;
> #X msg 615 416 0.03 200;
> #X obj 768 405 noise~;
> #X obj 811 439 *~;
> #X obj 843 414 line;
> #X msg 869 383 0 30;
> #X obj 852 354 pipe 150;
> #X obj 745 467 osc~ 1000;
> #X obj 657 467 osc~ 505;
> #X msg 718 79 connecturl http://68.108.10.240:8000;
> #X obj 933 283 vsl 15 128 0 50 0 0 empty empty empty 0 -8 0 8 -262144
> -1 -1 5381 1;
> #X floatatom 899 235 5 0 0 0 - - -;
> #X obj 882 265 * 0.3;
> #X msg 561 416 0.2 5;
> #N canvas 0 22 541 284 mp3send 1;
> #X obj 38 32 inlet~;
> #X obj 147 184 mp3cast~;
> #X msg 186 62 icecast;
> #X msg 186 154 passwd *********;
> #X msg 186 131 mountpoint autodrawn;
> #X msg 186 108 mpeg 44100 32 1 5;
> #X obj 93 33 inlet~;
> #X msg 186 85 connect localhost 8000;
> #X obj 58 237 dac~;
> #X text 306 17 The mp3cast stuff is old \, here for posterity;
> #X connect 0 0 8 0;
> #X connect 2 0 1 0;
> #X connect 3 0 1 0;
> #X connect 4 0 1 0;
> #X connect 5 0 1 0;
> #X connect 6 0 8 1;
> #X connect 7 0 1 0;
> #X restore 42 226 pd mp3send;
> #X obj 872 20 loadbang;
> #X obj 845 190 fiddle~ 2048 1 20 3;
> #X msg 830 382 0.55;
> #X msg 872 143 auto 0;
> #X msg 47 23 connecturl http://74.229.4.35:4000:8000;
> #X msg 149 67 connecturl http://69.239.28.85:8000;
> #X msg 180 270 connecturl http://216.66.69.100:3074/;
> #X msg 369 86 connecturl http://live.scanact.net:80/live;
> #X text 608 -5 (c) 2004 Pall Thayer - Use as per conditions of GPL
> v.3;
> #N canvas 0 22 450 300 resothing 0;
> #X obj 174 155 vcf~;
> #X obj 173 188 bp~ 20000 40;
> #X obj 185 123 * 100;
> #X obj 173 29 inlet~;
> #X obj 185 50 inlet;
> #X obj 172 253 outlet~;
> #X obj 290 59 loadbang;
> #X msg 228 123 10;
> #X msg 185 77 \$1 100;
> #X obj 185 101 line;
> #X connect 0 0 1 0;
> #X connect 1 0 5 0;
> #X connect 2 0 0 1;
> #X connect 3 0 0 0;
> #X connect 4 0 8 0;
> #X connect 6 0 7 0;
> #X connect 7 0 0 2;
> #X connect 7 0 2 0;
> #X connect 8 0 9 0;
> #X connect 9 0 2 0;
> #X restore 864 445 pd resothing;
> #X connect 0 0 12 0;
> #X connect 0 0 69 0;
> #X connect 0 1 12 0;
> #X connect 0 1 69 0;
> #X connect 0 2 2 0;
> #X connect 1 0 0 0;
> #X connect 3 0 69 1;
> #X connect 4 0 9 0;
> #X connect 4 0 71 0;
> #X connect 4 1 9 0;
> #X connect 4 1 71 0;
> #X connect 4 2 6 0;
> #X connect 5 0 4 0;
> #X connect 7 0 71 1;
> #X connect 8 0 13 0;
> #X connect 10 0 8 0;
> #X connect 11 0 14 0;
> #X connect 13 0 9 0;
> #X connect 13 0 71 0;
> #X connect 14 0 12 0;
> #X connect 14 0 69 0;
> #X connect 15 0 22 0;
> #X connect 15 0 70 0;
> #X connect 15 1 22 0;
> #X connect 15 1 70 0;
> #X connect 15 2 17 0;
> #X connect 16 0 15 0;
> #X connect 18 0 70 1;
> #X connect 19 0 21 0;
> #X connect 20 0 22 0;
> #X connect 20 0 70 0;
> #X connect 21 0 20 0;
> #X connect 23 0 24 0;
> #X connect 23 0 28 0;
> #X connect 24 0 36 0;
> #X connect 25 0 44 0;
> #X connect 25 0 54 0;
> #X connect 26 0 31 0;
> #X connect 26 0 96 0;
> #X connect 26 0 40 0;
> #X connect 26 0 41 0;
> #X connect 26 0 49 0;
> #X connect 26 0 89 0;
> #X connect 28 0 35 0;
> #X connect 28 0 100 0;
> #X connect 28 0 88 0;
> #X connect 29 0 30 1;
> #X connect 30 0 42 0;
> #X connect 30 0 97 1;
> #X connect 30 0 97 0;
> #X connect 31 0 39 0;
> #X connect 32 0 33 0;
> #X connect 33 0 30 0;
> #X connect 34 0 38 0;
> #X connect 35 1 26 0;
> #X connect 36 0 23 1;
> #X connect 38 0 30 0;
> #X connect 39 0 30 0;
> #X connect 40 0 34 0;
> #X connect 41 0 32 0;
> #X connect 43 0 83 0;
> #X connect 44 0 23 0;
> #X connect 44 0 99 0;
> #X connect 45 0 46 0;
> #X connect 45 0 48 0;
> #X connect 45 0 5 0;
> #X connect 46 0 47 0;
> #X connect 47 0 45 1;
> #X connect 48 0 55 0;
> #X connect 48 0 67 0;
> #X connect 48 0 77 0;
> #X connect 49 0 84 0;
> #X connect 50 0 53 0;
> #X connect 51 0 105 0;
> #X connect 52 0 51 0;
> #X connect 53 0 92 0;
> #X connect 54 0 45 0;
> #X connect 55 0 56 0;
> #X connect 55 1 57 0;
> #X connect 55 2 58 0;
> #X connect 56 0 52 0;
> #X connect 57 0 50 0;
> #X connect 59 0 66 0;
> #X connect 60 0 68 0;
> #X connect 61 0 62 0;
> #X connect 61 1 63 0;
> #X connect 61 2 64 0;
> #X connect 62 0 60 0;
> #X connect 63 0 59 0;
> #X connect 65 0 1 0;
> #X connect 66 0 102 0;
> #X connect 67 0 61 0;
> #X connect 67 0 65 0;
> #X connect 68 0 103 0;
> #X connect 69 0 97 0;
> #X connect 69 0 99 0;
> #X connect 70 0 97 0;
> #X connect 70 0 97 1;
> #X connect 70 0 99 0;
> #X connect 71 0 97 1;
> #X connect 71 0 99 0;
> #X connect 72 0 15 0;
> #X connect 73 0 74 0;
> #X connect 73 1 75 0;
> #X connect 73 2 76 0;
> #X connect 74 0 79 0;
> #X connect 75 0 80 0;
> #X connect 77 0 73 0;
> #X connect 77 0 78 0;
> #X connect 78 0 16 0;
> #X connect 79 0 81 0;
> #X connect 80 0 82 0;
> #X connect 81 0 104 0;
> #X connect 82 0 72 0;
> #X connect 83 0 42 0;
> #X connect 83 0 97 0;
> #X connect 83 0 97 1;
> #X connect 84 0 29 0;
> #X connect 85 0 107 0;
> #X connect 86 0 9 0;
> #X connect 86 0 12 0;
> #X connect 86 0 42 0;
> #X connect 86 0 97 1;
> #X connect 86 0 97 0;
> #X connect 87 0 86 1;
> #X connect 88 0 87 0;
> #X connect 89 0 100 0;
> #X connect 90 0 107 0;
> #X connect 91 0 107 0;
> #X connect 92 0 4 0;
> #X connect 93 0 107 1;
> #X connect 94 0 95 0;
> #X connect 95 0 93 0;
> #X connect 96 0 29 0;
> #X connect 98 0 25 0;
> #X connect 98 0 101 0;
> #X connect 99 3 94 0;
> #X connect 100 0 87 0;
> #X connect 101 0 99 0;
> #X connect 102 0 0 0;
> #X connect 103 0 0 0;
> #X connect 104 0 15 0;
> #X connect 105 0 4 0;
> #X connect 107 0 86 0;
>
> --
> Pall Thayer
> palli at pallit.lhi.is
> http://www.this.is/pallit
>
>
>
>
> _______________________________________________
> Pd-list at iem.at mailing list
> UNSUBSCRIBE and account-management ->
> http://lists.puredata.info/listinfo/pd-list
>



-- 
-----
------------
   ----     -----
---- -------- - ------
http://perhapsidid.wordpress.com
http://myspace.com/kyleklipowicz
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.puredata.info/pipermail/pd-list/attachments/20090323/24cfb260/attachment.htm>


More information about the Pd-list mailing list