Mercurial > hg > beaglert
comparison projects/heavy/pd/hello-midi/hv_ctlin.pd @ 198:62f6269f4b3e
Added support for MidiIn to heavy (with example patch and subpatches).
author | Giulio Moro <giuliomoro@yahoo.it> |
---|---|
date | Fri, 05 Feb 2016 06:17:35 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
197:265a527f8be8 | 198:62f6269f4b3e |
---|---|
1 #N canvas 554 204 703 475 10; | |
2 #X obj -107 -439 outlet; | |
3 #X obj -52 -441 outlet; | |
4 #X obj -61 -743 r ctlin; | |
5 #X obj -68 -719 unpack f f f; | |
6 #X obj -6 -441 outlet; | |
7 #X obj -74 -548 spigot; | |
8 #X text -109 -420 value; | |
9 #X text -55 -420 number; | |
10 #X obj 51 -732 loadbang; | |
11 #X obj 17 -677 \$1; | |
12 #X obj -34 -656 == \$1; | |
13 #X obj -41 -571 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 | |
14 0 1; | |
15 #X obj -76 -521 unpack f f f; | |
16 #X obj -17 -623 ||; | |
17 #X obj 17 -653 == 0; | |
18 #X text -90 -859 Emulates ctlin \, except number of outlets is fixed. | |
19 ; | |
20 #X obj 68 -623 ||; | |
21 #X obj 102 -653 == 0; | |
22 #X obj 52 -656 == \$2; | |
23 #X obj 102 -677 \$2; | |
24 #X obj 17 -593 &&; | |
25 #X obj 51 -707 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 | |
26 -1 -1; | |
27 #X text 13 -571 If (inputController==\$1 || \$1==0) && (inputChannel==\$2 | |
28 || \$2==0); | |
29 #X text 37 -818 Known issue: trying to select inputController 0 will | |
30 result i accepting all controllers (because a pd external cannot tell | |
31 the difference between \$1 been explicitely set to 0 and the patch | |
32 not having any argument); | |
33 #X text 2 -420 channel; | |
34 #X obj -104 -678 pack f f f; | |
35 #X obj -80 -462 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 | |
36 -1 -1; | |
37 #X floatatom -79 -488 5 0 0 0 - - -; | |
38 #X obj -39 -458 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 | |
39 -1 -1; | |
40 #X floatatom -38 -484 5 0 0 0 - - -; | |
41 #X obj 12 -464 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 | |
42 -1 -1; | |
43 #X floatatom 13 -490 5 0 0 0 - - -; | |
44 #X msg -44 -818 1 2 3; | |
45 #X msg -6 -805 1 5 7; | |
46 #X msg -97 -815 1 5 6; | |
47 #X msg -100 -776 1 4 7; | |
48 #X obj -96 -841 r hv_ctlin; | |
49 #X obj -38 -778 s ctlin; | |
50 #X connect 2 0 3 0; | |
51 #X connect 3 0 25 0; | |
52 #X connect 3 1 10 0; | |
53 #X connect 3 1 25 1; | |
54 #X connect 3 2 18 0; | |
55 #X connect 3 2 25 2; | |
56 #X connect 5 0 12 0; | |
57 #X connect 8 0 21 0; | |
58 #X connect 9 0 14 0; | |
59 #X connect 10 0 13 0; | |
60 #X connect 11 0 5 1; | |
61 #X connect 12 0 0 0; | |
62 #X connect 12 0 27 0; | |
63 #X connect 12 1 1 0; | |
64 #X connect 12 1 29 0; | |
65 #X connect 12 2 4 0; | |
66 #X connect 12 2 31 0; | |
67 #X connect 13 0 20 0; | |
68 #X connect 14 0 13 1; | |
69 #X connect 16 0 20 1; | |
70 #X connect 17 0 16 1; | |
71 #X connect 18 0 16 0; | |
72 #X connect 19 0 17 0; | |
73 #X connect 20 0 11 0; | |
74 #X connect 21 0 9 0; | |
75 #X connect 21 0 19 0; | |
76 #X connect 25 0 5 0; | |
77 #X connect 27 0 26 0; | |
78 #X connect 29 0 28 0; | |
79 #X connect 31 0 30 0; | |
80 #X connect 32 0 37 0; | |
81 #X connect 33 0 37 0; | |
82 #X connect 34 0 37 0; | |
83 #X connect 35 0 37 0; | |
84 #X connect 36 0 37 0; |