-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathdkkeytonum.pd
127 lines (127 loc) · 3.16 KB
/
dkkeytonum.pd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
#N canvas 793 312 971 1017 12;
#X obj 72 300 key;
#X obj 193 297 keyup;
#X obj 70 342 t f b;
#X obj 193 322 spigot 1;
#X obj 193 347 t f b;
#X obj 67 778 pack f f;
#X msg 154 421 1;
#X msg 264 411 0;
#X obj 67 930 outlet;
#X obj 346 201 inlet;
#X obj 683 116 text define -k \$0-keytonum;
#A set 96 \; 49 \; 50 \; 51 \; 52 \; 53 \; 54 \; 55 \; 56 \; 57 \;
48 \; 45 \; 61 \; 113 \; 119 \; 101 \; 114 \; 116 \; 121 \; 117 \;
105 \; 111 \; 112 \; 91 \; 93 \; 97 \; 115 \; 100 \; 102 \; 103 \;
104 \; 106 \; 107 \; 108 \; 59 \; 39 \; 122 \; 120 \; 99 \; 118 \;
98 \; 110 \; 109 \; 44 \; 46 \; 47 \;;
#X obj 98 462 text search \$0-keytonum;
#X obj 346 237 f \$1;
#X obj 346 262 == 0;
#X obj 413 209 loadbang;
#X text 733 15 derek kwan;
#X text 736 35 pdkvabs;
#X text 739 62 gpl v 3 2017;
#X text 28 123 arg1/in1: exclude keyup;
#X obj 677 205 inlet;
#X text 401 179 exclude keyup;
#X text 730 211 on/off;
#X obj 67 903 spigot 0, f 53;
#X text 18 20 dkkeytonum - keys to sequential numbers 0-46;
#X text 81 43 (excluding backslash \, space is 46);
#X obj 70 367 sel 32;
#X obj 193 372 sel 32;
#X msg 17 470 46;
#X obj 78 528 pack f f;
#X msg 78 553 \$2 \$1;
#X obj 78 578 route 0 1;
#X obj 677 266 f \$3;
#X text 30 174 arg3/in3: off/on;
#X obj 536 200 inlet;
#X obj 533 251 f \$2;
#X obj 215 562 moses 13;
#X obj 315 601 moses 25;
#X obj 384 638 moses 36;
#X obj 195 839 pack f f f, f 52;
#X obj 215 587 t b f;
#X obj 315 651 t b f;
#X obj 384 688 t b f;
#X obj 449 728 t b f;
#X msg 198 632 0;
#X msg 315 676 1;
#X msg 384 713 2;
#X msg 449 753 3;
#X text 43 152 arg2/in2: row mode;
#X text 321 81 row mode 0: keydown = num 1 \, keyup = num 0;
#X text 320 109 row mode 1: [row \, row idx \, keydown/up];
#X text 549 176 row mode;
#X obj 315 626 - 13;
#X obj 384 663 - 25;
#X obj 449 703 - 36;
#X obj 73 492 moses 0;
#X obj 449 678 moses 46;
#X obj 512 738 t b f;
#X obj 512 713 - 46;
#X msg 512 763 4;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 25 0;
#X connect 2 1 6 0;
#X connect 3 0 4 0;
#X connect 4 0 26 0;
#X connect 4 1 7 0;
#X connect 5 0 22 0;
#X connect 6 0 5 1;
#X connect 6 0 38 2;
#X connect 7 0 5 1;
#X connect 7 0 38 2;
#X connect 9 0 12 0;
#X connect 11 0 54 0;
#X connect 12 0 13 0;
#X connect 13 0 3 1;
#X connect 14 0 12 0;
#X connect 14 0 31 0;
#X connect 14 0 34 0;
#X connect 19 0 31 0;
#X connect 22 0 8 0;
#X connect 25 0 27 0;
#X connect 25 1 11 0;
#X connect 26 0 27 0;
#X connect 26 1 11 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 5 0;
#X connect 30 1 35 0;
#X connect 31 0 22 1;
#X connect 33 0 34 0;
#X connect 34 0 28 1;
#X connect 35 0 39 0;
#X connect 35 1 36 0;
#X connect 36 0 51 0;
#X connect 36 1 37 0;
#X connect 37 0 52 0;
#X connect 37 1 55 0;
#X connect 38 0 22 0;
#X connect 39 0 43 0;
#X connect 39 1 38 1;
#X connect 40 0 44 0;
#X connect 40 1 38 1;
#X connect 41 0 45 0;
#X connect 41 1 38 1;
#X connect 42 0 46 0;
#X connect 42 1 38 1;
#X connect 43 0 38 0;
#X connect 44 0 38 0;
#X connect 45 0 38 0;
#X connect 46 0 38 0;
#X connect 51 0 40 0;
#X connect 52 0 41 0;
#X connect 53 0 42 0;
#X connect 54 1 28 0;
#X connect 55 0 53 0;
#X connect 55 1 57 0;
#X connect 56 0 58 0;
#X connect 56 1 38 1;
#X connect 57 0 56 0;
#X connect 58 0 38 0;