-
Notifications
You must be signed in to change notification settings - Fork 0
/
Slendro - Pelog Gamelan Tuning Scheme Import.pd
129 lines (129 loc) · 3.89 KB
/
Slendro - Pelog Gamelan Tuning Scheme Import.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
128
129
#N canvas 568 155 1405 948 12;
#X msg 381 261 close;
#X floatatom 705 196 5 0 0 0 - - - 0;
#X msg 705 152 0;
#X msg 738 152 1;
#X msg 771 152 2;
#X msg 804 152 3;
#X obj 287 319 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X floatatom 287 373 5 0 0 0 - - - 0;
#X msg 837 152 4;
#X msg 287 487 0;
#X floatatom 287 430 5 0 0 0 - - - 0;
#X obj 287 458 until;
#X obj 705 259 route float symbol, f 28;
#X floatatom 705 288 5 0 0 0 - - - 0;
#X obj 801 332 s2l /;
#X obj 801 365 unpack f f;
#X text 851 332 (from zexy library);
#X obj 287 290 delay 10;
#X floatatom 287 599 5 0 0 0 - - - 0;
#X obj 287 545 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 287 152 openpanel;
#X obj 287 127 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X msg 287 182 read -c \$1;
#X obj 287 261 t b;
#X text 284 37 Pelog Gamelan, f 73;
#X obj 287 401 - 5;
#X obj 381 290 text define -k pelog;
#A set ! pelog_mal.scl ! Malaysian Pelog \, Pierre Genest: Différentes gammes encore en usage 5 ! 13/12 4/3 3/2 13/8 2/1;
#X obj 287 344 text size pelog;
#X obj 287 516 text delete pelog;
#X obj 287 570 text size pelog;
#X floatatom 801 400 5 0 0 0 - - - 0;
#X floatatom 868 400 5 0 0 0 - - - 0;
#X obj 705 230 text get pelog;
#X text 284 53 ============================================================;
#X text 285 88 1 Opening and processing Scala file;
#X text 606 89 2 Reading processed Scala file;
#X floatatom 705 316 5 0 0 0 - - - 0;
#X obj 728 456 pow;
#X msg 728 427 2;
#X obj 608 552 *;
#X floatatom 608 580 8 0 0 0 - - - 0;
#X obj 705 399 t b b f;
#X floatatom 728 484 8 0 0 0 - - - 0;
#X floatatom 723 343 5 0 0 0 - - - 0;
#X obj 705 370 /;
#X floatatom 608 156 5 0 0 0 - - - 0;
#X msg 608 127 555;
#X obj 801 428 /;
#X floatatom 801 456 5 0 0 0 - - - 0;
#X obj 801 482 t b f;
#X msg 672 152 0;
#X obj 672 127 bng 15 250 50 0 empty sd0 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 705 127 bng 15 250 50 0 empty sd1 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 738 127 bng 15 250 50 0 empty sd2 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 771 127 bng 15 250 50 0 empty sd3 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 804 127 bng 15 250 50 0 empty sd4 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 837 127 bng 15 250 50 0 empty sd5 empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 608 719 output~;
#X obj 608 613 t f b, f 6;
#X msg 647 645 100;
#X obj 608 677 rds~;
#X obj 292 876 qlist;
#X obj 292 847 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X msg 325 846 read pelog.txt;
#X text 704 53 ========================================================;
#X connect 0 0 26 0;
#X connect 1 0 32 0;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 27 0;
#X connect 7 0 25 0;
#X connect 8 0 1 0;
#X connect 9 0 28 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X connect 12 0 13 0;
#X connect 12 1 14 0;
#X connect 13 0 36 0;
#X connect 14 0 15 0;
#X connect 15 0 30 0;
#X connect 15 1 31 0;
#X connect 17 0 6 0;
#X connect 19 0 29 0;
#X connect 20 0 22 0;
#X connect 21 0 20 0;
#X connect 22 0 23 0;
#X connect 22 0 26 0;
#X connect 23 0 17 0;
#X connect 25 0 10 0;
#X connect 27 0 7 0;
#X connect 29 0 18 0;
#X connect 30 0 47 0;
#X connect 31 0 47 1;
#X connect 32 0 12 0;
#X connect 36 0 44 0;
#X connect 37 0 42 0;
#X connect 38 0 37 0;
#X connect 39 0 40 0;
#X connect 40 0 58 0;
#X connect 41 0 39 0;
#X connect 41 1 38 0;
#X connect 41 2 37 1;
#X connect 42 0 39 1;
#X connect 43 0 44 1;
#X connect 44 0 41 0;
#X connect 45 0 39 0;
#X connect 46 0 45 0;
#X connect 47 0 48 0;
#X connect 48 0 49 0;
#X connect 49 0 39 0;
#X connect 49 1 39 1;
#X connect 50 0 36 0;
#X connect 51 0 50 0;
#X connect 52 0 2 0;
#X connect 53 0 3 0;
#X connect 54 0 4 0;
#X connect 55 0 5 0;
#X connect 56 0 8 0;
#X connect 58 0 60 0;
#X connect 58 1 59 0;
#X connect 59 0 60 1;
#X connect 60 0 57 0;
#X connect 60 0 57 1;
#X connect 62 0 61 0;
#X connect 63 0 61 0;