/usr/lib/pd/extra/rtc/play-samp~.pd is in pd-rtclib 4.1-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 | #N canvas 192 80 584 531 10;
#X obj 463 47 inlet;
#X obj 169 74 unpack f s f;
#X obj 169 48 inlet;
#X obj 208 420 outlet~;
#X obj 208 315 tabread4~;
#X obj 208 174 list prepend set;
#X obj 208 200 list trim;
#X text 223 49 IN: transposition tablename gain;
#X obj 119 284 vline~;
#N canvas 238 24 737 582 trigger-sample 1;
#X text 90 155 Wait for the;
#X text 88 169 cutoff to finish;
#X text 71 446 set the upper line~ to start;
#X text 70 465 at the first sample and go;
#X text 69 486 forever (until the next trigger);
#X obj 212 211 t b b;
#X obj 298 499 s \$0-phase;
#X obj 212 315 s \$0-cutoff;
#X obj 212 53 inlet;
#X obj 242 136 s \$0-cutoff;
#X text 87 118 cut the sound off;
#X obj 212 266 f;
#X obj 389 57 inlet;
#X obj 212 77 t b b;
#X text 394 37 gain;
#X obj 315 57 inlet;
#X text 314 35 transpos;
#X obj 298 454 * 1e+07;
#X obj 299 435 f 1;
#X msg 298 478 1 \, 4.41e+08 \$1;
#X obj 463 466 r \$0-arraysize;
#X obj 345 303 moses 0;
#X obj 406 534 s \$0-phase;
#X obj 406 467 * 1e+07;
#X obj 407 448 f 1;
#X obj 406 490 pack 0 0;
#X msg 406 513 \$2 \, -4.41e+08 \$1;
#X obj 423 426 abs;
#X obj 315 78 t a a;
#X obj 299 307 < 0;
#X obj 299 331 select 0 1;
#X obj 299 285 f;
#X obj 345 273 pow -1;
#X msg 242 107 0 2;
#X obj 212 164 delay 2;
#X connect 5 0 11 0;
#X connect 5 1 31 0;
#X connect 8 0 13 0;
#X connect 11 0 7 0;
#X connect 12 0 11 1;
#X connect 13 0 34 0;
#X connect 13 1 33 0;
#X connect 15 0 28 0;
#X connect 17 0 19 0;
#X connect 18 0 17 0;
#X connect 19 0 6 0;
#X connect 20 0 25 1;
#X connect 21 0 27 0;
#X connect 21 1 18 1;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X connect 25 0 26 0;
#X connect 26 0 22 0;
#X connect 27 0 24 1;
#X connect 28 0 31 1;
#X connect 28 1 32 0;
#X connect 29 0 30 0;
#X connect 30 0 18 0;
#X connect 30 1 24 0;
#X connect 31 0 29 0;
#X connect 32 0 21 0;
#X connect 33 0 9 0;
#X connect 34 0 5 0;
#X restore 53 192 pd trigger-sample;
#X obj 224 348 r \$0-cutoff;
#X obj 208 390 *~;
#X obj 224 368 vline~;
#X obj 119 250 r \$0-phase;
#X obj 238 269 arraysize;
#X obj 208 229 t a b a;
#X obj 238 291 s \$0-arraysize;
#X obj 463 71 s \$0-loop;
#X obj 133 110 t a b a;
#N canvas 0 0 433 475 loops 0;
#X obj 89 174 spigot 0;
#X obj 207 246 r \$0-arraysize;
#X obj 89 324 delay;
#X obj 132 323 t b;
#X obj 140 150 r \$0-loop;
#X obj 89 64 inlet;
#X obj 89 352 outlet;
#X obj 155 173 select 0;
#X msg 155 195 stop;
#X floatatom 188 318 8 0 0 0 - - -;
#X obj 207 268 / 44.1;
#X obj 159 290 *;
#X obj 89 113 pow -1;
#X obj 89 89 abs;
#X obj 89 138 t b a;
#X connect 0 0 2 0;
#X connect 1 0 10 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X connect 3 0 0 0;
#X connect 4 0 0 1;
#X connect 4 0 7 0;
#X connect 5 0 13 0;
#X connect 7 0 8 0;
#X connect 8 0 2 0;
#X connect 10 0 11 1;
#X connect 11 0 2 1;
#X connect 11 0 9 0;
#X connect 12 0 14 0;
#X connect 13 0 12 0;
#X connect 14 0 0 0;
#X connect 14 1 11 0;
#X restore 26 145 pd loops;
#X connect 0 0 17 0;
#X connect 1 0 18 0;
#X connect 1 1 5 0;
#X connect 1 2 9 2;
#X connect 2 0 1 0;
#X connect 4 0 11 0;
#X connect 5 0 6 0;
#X connect 6 0 15 0;
#X connect 8 0 4 0;
#X connect 10 0 12 0;
#X connect 11 0 3 0;
#X connect 12 0 11 1;
#X connect 13 0 8 0;
#X connect 14 0 16 0;
#X connect 15 0 4 0;
#X connect 15 1 14 0;
#X connect 15 2 14 0;
#X connect 18 0 19 0;
#X connect 18 1 9 0;
#X connect 18 2 9 1;
#X connect 19 0 9 0;
|