Merge branch 'newtree'
[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / tools / faust2pd / examples / seqdemo / seqdemo.pd
1 #N canvas 186 168 982 777 10;
2 #X obj 225 605 audio-out;
3 #X obj 225 488 freeverb;
4 #X obj 225 27 midi-in 2;
5 #X obj 175 113 r seq;
6 #X text 74 710 v0.1;
7 #X obj 476 604 audio-out;
8 #X obj 728 604 audio-out;
9 #X obj 9 27 pulse;
10 #X obj 163 11 r pulse;
11 #X obj 9 339 s pulse;
12 #X msg 9 310 130;
13 #X msg 43 310 180;
14 #X msg 77 310 250;
15 #X msg 113 310 500;
16 #X obj 9 284 s seq;
17 #X msg 9 256 pat1;
18 #X msg 53 257 pat2;
19 #X msg 96 257 pat3;
20 #X obj 9 179 s part1;
21 #X obj 84 179 s part2;
22 #X obj 163 179 s part3;
23 #X obj 225 11 r part1;
24 #X obj 476 11 r part2;
25 #X obj 728 12 r part3;
26 #X obj 728 28 midi-in 2;
27 #X obj 225 342 chorus;
28 #X obj 476 27 midi-in 2;
29 #N canvas 89 543 469 296 more-presets 0;
30 #X msg 20 234 \; seq pat1 \; pulse 130;
31 #X msg 120 234 \; part1 pan 0.2 \; part3 pan 0.8;
32 #X text 18 175 Defaults;
33 #X text 18 9 Play with different patterns \, tempi and settings;
34 #X msg 19 39 \; seq pat1 \; pulse 130 \; part2 drive 0 \, tone 20 \,
35 res 0;
36 #X msg 20 103 \; seq pat1 \; pulse 130 \; part2 drive 3 \, tone 10
37 \, res 3;
38 #X msg 243 40 \; seq pat3 \; pulse 180 \; part2 drive 0 \, tone 20
39 \, res 0;
40 #X msg 244 102 \; seq pat3 \; pulse 180 \; part2 drive 10 \, tone 15
41 \, res 0;
42 #X obj 120 201 r initdefaults;
43 #X obj 20 202 loadbang;
44 #X connect 8 0 0 0;
45 #X connect 8 0 1 0;
46 #X connect 9 0 0 0;
47 #X connect 9 0 1 0;
48 #X restore 8 635 pd more-presets;
49 #X text 6 613 Click here to see more...;
50 #X msg 8 379 \; seq pat1 \; pulse 130;
51 #X msg 135 380 \; seq pat3 \; pulse 180;
52 #X text 9 230 Patterns and tempi;
53 #X obj 476 342 chorus;
54 #X obj 728 343 chorus;
55 #X obj 476 488 freeverb;
56 #X obj 728 488 freeverb;
57 #X obj 225 77 organ;
58 #X obj 476 77 karplusplus;
59 #X obj 728 78 subtractive;
60 #X msg 7 475 \; part2 drive 0 \, tone 20 \, res 0;
61 #X msg 7 510 \; part2 drive 3 \, tone 10 \, res 3;
62 #X msg 7 546 \; part2 drive 10 \, tone 15 \, res 0;
63 #X text 6 449 Fuzz settings (karplusplus);
64 #X text 16 692 Pd-Pure Step Sequencer Demo;
65 #X obj 9 129 sequ;
66 #X connect 1 0 0 0;
67 #X connect 1 1 0 1;
68 #X connect 1 2 0 2;
69 #X connect 2 0 36 0;
70 #X connect 2 1 36 1;
71 #X connect 3 0 44 0;
72 #X connect 7 0 44 0;
73 #X connect 8 0 7 0;
74 #X connect 10 0 9 0;
75 #X connect 11 0 9 0;
76 #X connect 12 0 9 0;
77 #X connect 13 0 9 0;
78 #X connect 15 0 14 0;
79 #X connect 16 0 14 0;
80 #X connect 17 0 14 0;
81 #X connect 21 0 2 0;
82 #X connect 22 0 26 0;
83 #X connect 23 0 24 0;
84 #X connect 24 0 38 0;
85 #X connect 24 1 38 1;
86 #X connect 25 0 1 0;
87 #X connect 25 1 1 1;
88 #X connect 25 2 1 2;
89 #X connect 26 0 37 0;
90 #X connect 26 1 37 1;
91 #X connect 32 0 34 0;
92 #X connect 32 1 34 1;
93 #X connect 32 2 34 2;
94 #X connect 33 0 35 0;
95 #X connect 33 1 35 1;
96 #X connect 33 2 35 2;
97 #X connect 34 0 5 0;
98 #X connect 34 1 5 1;
99 #X connect 34 2 5 2;
100 #X connect 35 0 6 0;
101 #X connect 35 1 6 1;
102 #X connect 35 2 6 2;
103 #X connect 36 0 25 0;
104 #X connect 36 1 25 1;
105 #X connect 36 2 25 2;
106 #X connect 37 0 32 0;
107 #X connect 37 1 32 1;
108 #X connect 37 2 32 2;
109 #X connect 38 0 33 0;
110 #X connect 38 1 33 1;
111 #X connect 38 2 33 2;
112 #X connect 44 0 18 0;
113 #X connect 44 1 19 0;
114 #X connect 44 2 20 0;