Skip to content
Permalink
Browse files
july 14 push of changes
  • Loading branch information
@hamilr4
hamilr4 committed Jul 14, 2020
1 parent 7d2e6b3 commit d2cbd1752c4ead9362bf200ebeb5cb4d9a96a7f3
Show file tree
Hide file tree
Showing 36 changed files with 8,104 additions and 1,343 deletions.
BIN -10.8 MB assignment2_recording_rothgj.wav
View file
Binary file not shown.
208 bartoa.pd
View file
@@ -1,30 +1,29 @@
#N canvas 1912 -8 1920 997 12;
#X obj 65 21 inlet~;
#X obj 142 495 outlet;
#X obj 49 499 outlet~;
#X obj 238 17 receive bartoa_tempo;
#X obj 970 43 receive bartoa_control;
#X obj 970 94 list trim;
#X msg 970 115 1 2 3 4 5, f 37;
#X obj 970 73 list prepend set;
#X floatatom 141 93 5 0 0 0 - - -;
#X obj 970 259 phasor~;
#X obj 970 293 *~ 2;
#X obj 970 315 -~ 1;
#X obj 970 347 phasor~;
#X obj 970 374 expr~ $v1 > 0.5;
#X obj 970 410 *~ 2;
#X obj 970 432 -~ 1;
#X text 1050 259 Sawtooth wave;
#X text 1080 346 Square wave;
#X obj 285 267 delread~ bartoa_delay1;
#X obj 142 252 +~;
#X text 966 154 Potential Future Changes: Use mouse cursor to control
#N canvas 0 173 1680 980 12;
#X obj 65 141 inlet~;
#X obj 142 615 outlet;
#X obj 49 619 outlet~;
#X obj 238 137 receive bartoa_tempo;
#X obj 970 23 receive bartoa_control;
#X obj 970 214 list trim;
#X msg 970 235 bartoa key 1 Meta_L 0, f 37;
#X obj 970 193 list prepend set;
#X floatatom 141 213 5 0 0 0 - - -;
#X obj 970 379 phasor~;
#X obj 970 413 *~ 2;
#X obj 970 435 -~ 1;
#X obj 970 467 phasor~;
#X obj 970 494 expr~ $v1 > 0.5;
#X obj 970 530 *~ 2;
#X obj 970 552 -~ 1;
#X text 1050 379 Sawtooth wave;
#X text 1080 466 Square wave;
#X obj 285 387 delread~ bartoa_delay1;
#X obj 142 372 +~;
#X text 966 274 Potential Future Changes: Use mouse cursor to control
pitch and delay time? It clicks whenever the delay changes however.
If this can be smoothed \, like the line functionality for volume \,
then this control method will be ideal.;
#N canvas 1912 -8 1920 997 bartoa_pitch_controller 0;
#X obj 165 21 key;
#N canvas 0 23 1680 980 bartoa_pitch_controller 0;
#X floatatom 165 45 5 0 0 0 - - -;
#X obj 165 68 select 122 115 120 100 99 118 103 98 104 110 106 109
44;
@@ -41,7 +40,6 @@ then this control method will be ideal.;
#X msg 458 308 70;
#X msg 488 331 71;
#X msg 517 353 72;
#X obj 29 24 key;
#X floatatom 29 48 5 0 0 0 - - -;
#X obj 29 71 select 111 112;
#X obj 29 110 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
@@ -55,50 +53,51 @@ then this control method will be ideal.;
#X msg 76 140 12;
#X floatatom 166 396 5 0 0 0 - - -;
#X obj 166 419 outlet;
#X obj 29 24 inlet;
#X text 225 23 ROB - replaced [key] here;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 2 2 5 0;
#X connect 2 3 6 0;
#X connect 2 4 7 0;
#X connect 2 5 8 0;
#X connect 2 6 9 0;
#X connect 2 7 10 0;
#X connect 2 8 11 0;
#X connect 2 9 12 0;
#X connect 2 10 13 0;
#X connect 2 11 14 0;
#X connect 2 12 15 0;
#X connect 3 0 23 0;
#X connect 4 0 23 0;
#X connect 5 0 23 0;
#X connect 6 0 23 0;
#X connect 7 0 23 0;
#X connect 8 0 23 0;
#X connect 9 0 23 0;
#X connect 10 0 23 0;
#X connect 11 0 23 0;
#X connect 12 0 23 0;
#X connect 13 0 23 0;
#X connect 14 0 23 0;
#X connect 15 0 23 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X connect 1 3 5 0;
#X connect 1 4 6 0;
#X connect 1 5 7 0;
#X connect 1 6 8 0;
#X connect 1 7 9 0;
#X connect 1 8 10 0;
#X connect 1 9 11 0;
#X connect 1 10 12 0;
#X connect 1 11 13 0;
#X connect 1 12 14 0;
#X connect 2 0 21 0;
#X connect 3 0 21 0;
#X connect 4 0 21 0;
#X connect 5 0 21 0;
#X connect 6 0 21 0;
#X connect 7 0 21 0;
#X connect 8 0 21 0;
#X connect 9 0 21 0;
#X connect 10 0 21 0;
#X connect 11 0 21 0;
#X connect 12 0 21 0;
#X connect 13 0 21 0;
#X connect 14 0 21 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 18 1 20 0;
#X connect 19 0 24 0;
#X connect 20 0 25 0;
#X connect 21 0 22 0;
#X connect 22 0 21 1;
#X connect 22 0 23 1;
#X connect 23 0 26 0;
#X connect 24 0 21 0;
#X connect 25 0 21 0;
#X connect 26 0 27 0;
#X restore 141 60 pd bartoa_pitch_controller;
#N canvas 2395 274 450 300 bartoa_delay_controller 0;
#X obj 38 18 key;
#X connect 16 1 18 0;
#X connect 17 0 22 0;
#X connect 18 0 23 0;
#X connect 19 0 20 0;
#X connect 20 0 19 1;
#X connect 20 0 21 1;
#X connect 21 0 24 0;
#X connect 22 0 19 0;
#X connect 23 0 19 0;
#X connect 24 0 25 0;
#X connect 26 0 15 0;
#X connect 26 0 0 0;
#X restore 141 180 pd bartoa_pitch_controller;
#N canvas 1230 274 450 300 bartoa_delay_controller 0;
#X floatatom 38 42 5 0 0 0 - - -;
#X obj 38 105 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
@@ -110,20 +109,28 @@ then this control method will be ideal.;
#X msg 85 142 -10;
#X obj 38 67 select 119 113;
#X obj 33 232 outlet;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X obj 117 21 inlet;
#X text 166 22 ROB - take the key out of here \, use a global one with
your name on it to prevent confusion with other patches;
#X obj 960 212 list trim;
#X obj 960 236 route zhaox10;
#X obj 960 260 route key;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 5 1;
#X connect 6 0 9 0;
#X connect 7 0 5 0;
#X connect 8 0 2 0;
#X connect 8 1 3 0;
#X restore 285 207 pd bartoa_delay_controller;
#X obj 286 172 delwrite~ bartoa_delay1 3000;
#X floatatom 285 238 5 0 0 0 - - -;
#X connect 5 0 4 1;
#X connect 5 0 8 0;
#X connect 6 0 4 0;
#X connect 7 0 1 0;
#X connect 7 1 2 0;
#X connect 9 0 0 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X restore 285 327 pd bartoa_delay_controller;
#X obj 286 292 delwrite~ bartoa_delay1 3000;
#X floatatom 285 358 5 0 0 0 - - -;
#N canvas 1912 -8 1920 997 bartoa_sound1 0;
#X obj 71 31 inlet;
#X obj 104 100 mtof;
@@ -196,24 +203,40 @@ then this control method will be ideal.;
#X connect 30 0 29 0;
#X connect 32 0 8 1;
#X connect 33 0 32 0;
#X restore 141 122 pd bartoa_sound1;
#X obj 141 384 *~;
#X obj 246 319 loadbang;
#X msg 248 350 0;
#X obj 141 438 throw~ bartoa_audio_1;
#X msg 210 350 0.5;
#X text 507 107 The "gimmick" of this patch is manipulating the delay
#X restore 141 242 pd bartoa_sound1;
#X obj 141 504 *~;
#X obj 246 439 loadbang;
#X msg 248 470 0;
#X obj 141 558 throw~ bartoa_audio_1;
#X msg 210 470 0.5;
#X text 507 227 The "gimmick" of this patch is manipulating the delay
time of the delwrite and delread features to create new kinds of sounds
with the admittedly simple sound wave. When performing \, the delay
time is intended to be changed frequently with the Q and W keys.;
#X text 508 189 This patch is primarily controlled by the bottom two
#X text 508 309 This patch is primarily controlled by the bottom two
rows of letter keys on the keyboard (Z through \, ) not unlike a piano.
Z translates to middle C \, S translates to C# \, X translates to D
\, etc etc etc. It's not unlike the piano controls for FL Studio.;
#X text 512 275 Additional controls: O - Lower octave by 1 P - Raise
#X text 512 395 Additional controls: O - Lower octave by 1 P - Raise
octave by 1 Q - Lower the delay time by 10s. W - Raise the delay time
by 10s.;
#X obj 530 139 key;
#X text 476 160 ROB - use a global key controller with your name in
the message to avoid confusion with other patches;
#X obj 404 559 receive bartoa_control;
#X obj 987 52 list trim;
#X obj 987 98 route key;
#X obj 987 122 unpack f s f;
#X floatatom 987 146 5 0 0 0 - - -;
#X symbolatom 1028 147 10 0 0 0 - - -;
#X floatatom 1105 147 5 0 0 0 - - -;
#X obj 987 75 route bartoa;
#X obj 1105 170 s key_\$0;
#X obj 405 161 r key_\$0;
#X obj 404 583 print;
#X text 93 18 Andrew Barton;
#X connect 4 0 7 0;
#X connect 4 0 37 0;
#X connect 5 0 6 0;
#X connect 7 0 5 0;
#X connect 8 0 25 0;
@@ -234,3 +257,12 @@ by 10s.;
#X connect 27 0 30 0;
#X connect 28 0 26 1;
#X connect 30 0 26 1;
#X connect 37 0 43 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 39 1 41 0;
#X connect 39 2 42 0;
#X connect 42 0 44 0;
#X connect 43 0 38 0;
#X connect 45 0 21 0;
#X connect 45 0 22 0;
10 bpmtoms.pd
View file
@@ -7,10 +7,10 @@
#X obj 327 101 inlet;
#X obj 327 236 outlet;
#X text 174 31 Convert BPM to MS for Metro;
#X floatatom 167 120 5 0 0 0 - - -;
#X text 171 100 bpm;
#X floatatom 221 121 10 0 0 0 - - -;
#X text 244 101 ms;
#X floatatom 167 137 5 0 0 0 - - -;
#X text 171 119 bpm;
#X floatatom 221 138 10 0 0 0 - - -;
#X text 244 120 ms;
#X obj 410 102 inlet;
#X floatatom 410 126 5 0 0 0 - - -;
#X floatatom 467 203 10 0 0 0 - - -;
@@ -36,4 +36,4 @@
#X connect 16 0 8 0;
#X connect 18 0 19 0;
#X connect 19 0 17 0;
#X coords 0 -1 1 1 220 48 2 90 100;
#X coords 0 -1 1 1 220 60 2 90 100;
42 class_keycontrollers.pd
View file
@@ -0,0 +1,42 @@
#N canvas 192 142 765 562 12;
#X obj 217 82 key;
#X floatatom 217 108 5 0 0 0 - - -;
#X obj 172 82 keyup;
#X floatatom 172 108 5 0 0 0 - - -;
#X obj 45 81 keyname;
#X text 293 80 key: 119 keyname_s: symbol w keyname: 1 keyup: 119 keyname_s:
symbol w keyname: 0;
#X obj 104 141 pack f s;
#X obj 104 177 list append;
#X obj 104 208 list prepend key;
#X obj 104 236 list prepend \$1;
#X obj 104 327 s \$1_control;
#X symbolatom 91 107 10 0 0 0 - - -;
#X floatatom 45 107 5 0 0 0 - - -;
#X text 28 37 SEND KEYSTROKE DATA TO EACH USER'S UNIQUE SEND;
#X obj 197 327 outlet;
#X obj 104 267 gate;
#X obj 315 250 tgl 18 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 249 248 inlet;
#X symbolatom 335 250 10 0 0 0 - - -;
#X msg 335 222 \$1;
#X obj 335 172 loadbang;
#X connect 0 0 1 0;
#X connect 1 0 7 1;
#X connect 2 0 3 0;
#X connect 3 0 7 1;
#X connect 4 0 12 0;
#X connect 4 1 11 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 15 0;
#X connect 11 0 6 1;
#X connect 12 0 6 0;
#X connect 15 0 10 0;
#X connect 15 1 14 0;
#X connect 16 0 15 1;
#X connect 17 0 15 1;
#X connect 19 0 18 0;
#X connect 20 0 19 0;
35 clone_phasor.pd
View file
@@ -0,0 +1,35 @@
#N canvas 0 23 919 746 12;
#X obj 130 321 phasor~;
#X obj 130 269 mtof;
#X obj 130 175 unpack f f f;
#X floatatom 130 199 5 0 0 0 - - -;
#X floatatom 170 199 5 0 0 0 - - -;
#X floatatom 210 199 5 0 0 0 - - -;
#X obj 210 321 line~;
#X obj 210 222 / 127;
#X floatatom 210 246 5 0 0 0 - - -;
#X obj 130 377 dac~;
#X msg 210 269 \$1 10;
#X obj 130 222 + 36;
#X floatatom 130 246 5 0 0 0 - - -;
#X floatatom 130 293 5 0 0 0 - - -;
#X obj 130 353 *~;
#X obj 129 114 inlet;
#X obj 151 148 print;
#X connect 0 0 14 0;
#X connect 1 0 13 0;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 2 2 5 0;
#X connect 3 0 11 0;
#X connect 5 0 7 0;
#X connect 6 0 14 1;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 12 0;
#X connect 12 0 1 0;
#X connect 13 0 0 0;
#X connect 14 0 9 0;
#X connect 15 0 2 0;
#X coords 0 -1 1 1 300 500 1 100 100;
6 dsp_onoff.pd
View file
@@ -2,9 +2,9 @@
#X msg 106 203 \; pd dsp 0;
#X msg 175 203 \; pd dsp 1;
#X text 250 210 <-- Turn DSP on by clicking here;
#X obj 106 116 tgl 20 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
#X obj 106 121 tgl 20 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 131 117 DSP on/off;
#X text 131 122 DSP on/off;
#X msg 106 163 \; pd dsp \$1;
#X connect 3 0 5 0;
#X coords 0 -1 1 1 110 50 2 100 100;
#X coords 0 -1 1 1 110 60 2 100 100;

0 comments on commit d2cbd17

Please sign in to comment.