interpretor/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;