-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathbytebeat~-help.pd
75 lines (75 loc) · 2.15 KB
/
bytebeat~-help.pd
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
#N canvas 95 54 970 408 10;
#X obj 10 308 dac~;
#X msg 158 46 \; pd dsp 1 \;;
#X obj 9 72 rpole~ 1;
#X obj 10 279 *~ 0.5;
#X obj 10 253 lop~ 4000;
#X obj 10 228 expr~ ((($v1&0xff)^0x80)-128)/128;
#X obj 9 47 sig~ 0.781405;
#X floatatom 9 23 5 0 0 0 - - -;
#X obj 157 21 loadbang;
#X text 218 226 <-- putchar \, conversion 2 unsigend char;
#X text 75 253 <-- filter frequencies above 4 khz;
#X obj 10 142 bytebeat~;
#N canvas 822 23 545 219 bytebeat-sub 0;
#X obj 1 8 inlet~;
#X obj 5 126 outlet~;
#X obj 140 91 pack 0 \$0;
#X obj 140 166 s pd-bytebeat-dyn;
#N canvas 823 268 336 251 bytebeat-dyn 0;
#X obj 100 50 r~ bytebeat-dyn-1;
#X obj 100 100 bytebeat~-56;
#X obj 100 150 s~ bytebeat-dyn-2;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X restore 3 68 pd bytebeat-dyn;
#X obj 5 103 r~ bytebeat-dyn-2;
#X obj 1 33 s~ bytebeat-dyn-1;
#X msg 184 54 2;
#X msg 183 33 56;
#X obj 141 5 inlet;
#X msg 140 116 clear \, obj 100 50 r~ bytebeat-dyn-1 \, obj 100 100
bytebeat~-\$1 \, connect 0 0 1 0 \, obj 100 150 s~ bytebeat-dyn-2 \,
connect 1 0 2 0;
#X connect 0 0 6 0;
#X connect 2 0 10 0;
#X connect 5 0 1 0;
#X connect 7 0 2 0;
#X connect 8 0 2 0;
#X connect 9 0 2 0;
#X connect 10 0 3 0;
#X restore 485 142 pd bytebeat-sub;
#X msg 572 112 47;
#X text 80 140 <-- replace with whatever bytebeat~ named object that
gets generated.;
#X text 590 141 <-- we can also dynamically generate the named bytebeat~
object here... if the object name that was just generated was received.
;
#X obj 485 73 rpole~ 1;
#X obj 485 48 sig~ 0.781405;
#X floatatom 485 24 5 0 0 0 - - -;
#X obj 485 310 dac~;
#X obj 485 281 *~ 0.5;
#X obj 485 255 lop~ 4000;
#X obj 485 230 expr~ ((($v1&0xff)^0x80)-128)/128;
#X text 550 255 <-- filter frequencies above 4 khz;
#X text 695 227 <-- putchar \, conversion 2 unsigend char;
#X text 15 358 megrimm 2011;
#X connect 2 0 11 0;
#X connect 3 0 0 0;
#X connect 3 0 0 1;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 6 0 2 0;
#X connect 7 0 6 0;
#X connect 8 0 1 0;
#X connect 11 0 5 0;
#X connect 12 0 22 0;
#X connect 13 0 12 1;
#X connect 16 0 12 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 20 0 19 0;
#X connect 20 0 19 1;
#X connect 21 0 20 0;
#X connect 22 0 21 0;