From 35994ca3a4ef6a136a16cac63b4f68540d0434e1 Mon Sep 17 00:00:00 2001
From: Frank Barknecht <fbar@users.sourceforge.net>
Date: Fri, 23 Apr 2004 16:22:42 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r1630, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/abstractions/rradical/; revision=1631
---
 usecases/hiphopdrum.pd | 173 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 173 insertions(+)
 create mode 100644 usecases/hiphopdrum.pd

(limited to 'usecases/hiphopdrum.pd')

diff --git a/usecases/hiphopdrum.pd b/usecases/hiphopdrum.pd
new file mode 100644
index 0000000..9638e49
--- /dev/null
+++ b/usecases/hiphopdrum.pd
@@ -0,0 +1,173 @@
+#N canvas 105 0 969 872 10;
+#X obj 591 808 ezdac~;
+#X obj 101 133 rrad.pattseq /patt;
+#X floatatom 250 517 5 0 0 0 - - -;
+#X obj 146 522 pack 0 0 10;
+#X msg 170 561 note \$3 \$1 \$2;
+#X obj 657 3 rrad.mmetr /m;
+#X msg 754 105 /*/bpm \$1;
+#X obj 102 564 print;
+#X obj 316 477 int;
+#X obj 348 625 rrad.fluid~ /hip;
+#X obj 379 503 careGUI;
+#N canvas 144 40 830 399 more 0;
+#X obj 218 52 inlet;
+#X obj 58 235 outlet;
+#X obj 44 59 inlet;
+#X obj 160 228 outlet;
+#X obj 44 125 rrad.pattseq-ng /bass;
+#X obj 219 121 rrad.pattseq-ng /hh;
+#X obj 401 118 rrad.pattseq-ng /patt;
+#X connect 0 0 4 1;
+#X connect 0 0 5 1;
+#X connect 0 0 6 1;
+#X connect 2 0 4 0;
+#X connect 2 0 5 0;
+#X connect 2 0 6 0;
+#X connect 4 0 1 0;
+#X connect 4 1 3 0;
+#X connect 5 0 1 0;
+#X connect 5 1 3 0;
+#X connect 6 0 1 0;
+#X connect 6 1 3 0;
+#X restore 852 81 pd more;
+#X msg 148 94 /patt/name \$1;
+#X obj 145 63 symbol /patt;
+#X obj 239 62 symbol /hh;
+#X obj 332 62 symbol /bass;
+#X obj 108 12 hradio 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 233 28 select 0 1 2;
+#X msg 172 15 \$1;
+#X obj 703 533 chordpool;
+#X obj 677 637 rrad.fluid~ /piano;
+#X obj 695 604 prepend note;
+#X obj 707 486 r beat;
+#X obj 626 106 s beat;
+#X symbolatom 837 572 10 0 0 0 - - -;
+#X obj 794 594 prepend get;
+#X obj 134 716 unpack 0 0 0 0;
+#X obj 700 579 prepend 1;
+#X obj 145 811 pack 0 0;
+#X obj 617 639 print n;
+#X msg 143 752 \$1;
+#N canvas 73 450 931 365 symbols 0;
+#X obj 48 126 speakerboxx /boxx;
+#X obj 52 30 r beat;
+#X obj 54 92 print;
+#X obj 178 94 mod 8;
+#X obj 721 220 outlet;
+#X obj 53 59 route b2;
+#X obj 54 240 outlet~;
+#X obj 160 240 gpans~;
+#X obj 160 270 throw~ left;
+#X obj 245 270 throw~ right;
+#X connect 0 0 6 0;
+#X connect 0 0 7 0;
+#X connect 0 0 7 1;
+#X connect 0 1 4 0;
+#X connect 1 0 5 0;
+#X connect 3 0 0 0;
+#X connect 5 0 3 0;
+#X connect 7 0 8 0;
+#X connect 7 1 9 0;
+#X restore 811 613 pd symbols;
+#X obj 783 544 symbol;
+#X obj 837 535 t b b;
+#X obj 143 777 makenote 60 500;
+#X floatatom 257 710 5 0 0 0 - - -;
+#N canvas 457 357 461 328 bass 0;
+#X obj 69 35 r beat;
+#X obj 240 48 inlet;
+#X obj 59 132 rrad.fluid~ /doublebass;
+#X obj 69 89 pack 0 0 1;
+#X msg 62 110 note \$3 \$1 \$2;
+#X obj 61 301 outlet~;
+#X obj 160 303 outlet~;
+#X obj 76 67 rrad.pattseq-ng /double;
+#X connect 0 0 7 0;
+#X connect 1 0 7 1;
+#X connect 2 0 5 0;
+#X connect 2 1 6 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 7 0 3 0;
+#X connect 7 1 3 1;
+#X restore 885 819 pd bass;
+#X obj 406 823 catch~ left;
+#X obj 491 823 catch~ right;
+#X msg 795 489 /*/preset \$1;
+#X obj 797 469 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X obj 430 478 r beat;
+#X obj 477 477 route b1;
+#X obj 616 479 select 0;
+#X obj 559 484 mod 32;
+#X msg 368 589 set;
+#X obj 409 595 s SET_ALL_RRADICALS;
+#X msg 224 666 10;
+#X msg 266 664 200;
+#X obj 704 510 rrad.pattseq-ng /piano;
+#X connect 1 3 11 1;
+#X connect 1 3 36 0;
+#X connect 1 3 49 1;
+#X connect 2 0 3 2;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 1 0;
+#X connect 5 0 11 0;
+#X connect 5 0 23 0;
+#X connect 5 2 6 0;
+#X connect 6 0 1 1;
+#X connect 6 0 11 1;
+#X connect 8 0 3 1;
+#X connect 9 0 0 0;
+#X connect 9 1 0 1;
+#X connect 10 0 45 0;
+#X connect 11 0 3 0;
+#X connect 11 1 3 1;
+#X connect 12 0 1 1;
+#X connect 13 0 12 0;
+#X connect 14 0 12 0;
+#X connect 15 0 12 0;
+#X connect 16 0 17 0;
+#X connect 17 0 13 0;
+#X connect 17 1 14 0;
+#X connect 17 2 15 0;
+#X connect 19 1 26 0;
+#X connect 20 0 0 0;
+#X connect 20 1 0 1;
+#X connect 21 0 20 0;
+#X connect 22 0 49 0;
+#X connect 25 0 19 0;
+#X connect 26 0 30 0;
+#X connect 26 1 30 0;
+#X connect 26 2 30 0;
+#X connect 26 3 30 0;
+#X connect 27 0 21 0;
+#X connect 28 0 27 0;
+#X connect 30 0 34 0;
+#X connect 31 1 32 1;
+#X connect 32 0 24 0;
+#X connect 32 0 25 0;
+#X connect 33 0 24 0;
+#X connect 33 1 32 0;
+#X connect 34 0 28 0;
+#X connect 34 1 28 1;
+#X connect 35 0 34 2;
+#X connect 36 0 0 0;
+#X connect 36 1 0 1;
+#X connect 37 0 0 0;
+#X connect 38 0 0 1;
+#X connect 39 0 49 1;
+#X connect 40 0 39 0;
+#X connect 41 0 42 0;
+#X connect 42 0 44 0;
+#X connect 43 0 40 0;
+#X connect 44 0 43 0;
+#X connect 45 0 46 0;
+#X connect 47 0 35 0;
+#X connect 48 0 35 0;
+#X connect 49 0 19 1;
+#X connect 49 0 33 0;
+#X connect 49 1 34 1;
-- 
cgit v1.2.1