From f84509732bc09873496bf13ee05ef5d2b5b73fd4 Mon Sep 17 00:00:00 2001
From: Yohann Dedy <yohann@dedy.fr>
Date: Sun, 10 Mar 2019 04:39:52 +0100
Subject: [PATCH] Premier jet approximatif

---
 arpegiateur.pd | 390 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 390 insertions(+)
 create mode 100644 arpegiateur.pd

diff --git a/arpegiateur.pd b/arpegiateur.pd
new file mode 100644
index 0000000..fee12c6
--- /dev/null
+++ b/arpegiateur.pd
@@ -0,0 +1,390 @@
+#N canvas 0 30 1280 994 10;
+#X obj 69 103 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 136 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 71 73 metro 500;
+#X obj 214 218 hradio 15 1 0 16 empty empty empty 0 -8 0 10 -262144
+-1 -1 1;
+#X obj 214 122 float, f 6;
+#X obj 272 121 + 1;
+#X obj 214 186 % 16;
+#X obj 255 165 nbx 5 14 1 16 0 0 empty empty empty 0 -8 0 10 -262144
+-1 -1 3 256;
+#X obj 256 53 nbx 5 14 0 500 0 0 empty empty empty 0 -8 0 10 -262144
+-1 -1 111 256;
+#X floatatom 165 262 5 0 0 0 - - -;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array sequence 15 float 3;
+#A 0 0 2 4 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 0 15 6 200 200 1 0 0;
+#X restore 934 508 graph;
+#X obj 772 122 tabwrite mode;
+#X floatatom 161 289 5 0 0 0 - - -;
+#X floatatom 169 163 5 0 0 0 - - -;
+#X msg 316 85 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array mode 7 float 3;
+#A 0 0 2 4 5 7 9 11;
+#X coords 0 0 8 12 200 200 1 0 0;
+#X restore 916 62 graph;
+#X obj 592 337 send tonique;
+#X floatatom 628 310 5 0 11 0 - - -;
+#X text 27 573 Mode Mineur;
+#X msg 123 541 0 2 4 5 7 9 11;
+#X text 27 541 Mode Majeur;
+#X msg 123 571 0 2 3 5 7 9 11;
+#X obj 805 331 send note;
+#X floatatom 768 176 5 0 11 0 - - -;
+#X obj 279 421 makenote;
+#X obj 279 468 noteout;
+#X floatatom 301 384 5 0 0 0 - - -;
+#X floatatom 349 387 5 0 0 0 - - -;
+#X floatatom 214 413 5 0 0 0 - - -;
+#X floatatom 353 461 5 1 16 0 - - -;
+#X obj 214 381 + 24;
+#X obj 214 251 tabread sequence;
+#X obj 214 347 tabread mode;
+#X obj 123 670 pack \$0 \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 622 109 vradio 15 1 0 12 empty empty empty 0 -8 0 10 -262144
+-1 -1 7;
+#X obj 347 712 unpack \$0 \$1 \$2 \$3 \$4 \$5 \$6;
+#X floatatom 400 743 3 0 0 0 - - -;
+#X floatatom 426 743 3 0 0 0 - - -;
+#X floatatom 347 742 3 0 0 0 - - -;
+#X floatatom 479 743 3 0 0 0 - - -;
+#X floatatom 453 743 3 0 0 0 - - -;
+#X floatatom 506 743 3 0 0 0 - - -;
+#X floatatom 700 554 5 0 0 0 - - -;
+#X obj 682 515 -, f 4;
+#X floatatom 653 634 5 0 0 0 - - -;
+#X obj 689 449 t b f;
+#X obj 643 476 f;
+#X obj 752 665 send offset;
+#X obj 214 289 +;
+#X obj 214 319 mod 7;
+#X obj 714 41 vradio 15 1 0 12 empty empty empty 0 -8 0 10 -262144
+-1 -1 23;
+#X obj 756 627 spigot;
+#X obj 808 584 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 321 338 receive tonique;
+#X text 606 109 DO;
+#X text 606 139 RE;
+#X text 606 169 MI;
+#X text 606 185 FA;
+#X text 600 213 SOL;
+#X text 606 244 LA;
+#X text 606 274 SI;
+#X text 698 42 DO;
+#X text 698 72 RE;
+#X text 698 102 MI;
+#X text 698 118 FA;
+#X text 692 146 SOL;
+#X text 698 177 LA;
+#X text 698 207 SI;
+#X msg 123 601 0 2 4 5 7 9 10;
+#X text 26 601 Mode Mixolidien;
+#X msg 123 630 0 2 3 5 7 9 10;
+#X text 26 629 Mode "Ré";
+#X msg 911 902 \; sequence \$0 \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8 \$9
+\$10 \$11 \$12 \$14 \$15;
+#X msg 926 833 pack 0 1 2 3 4 5 6;
+#X msg 82 773 \; mode \$0 \$1 \$2 \$3 \$4 \$5 \$6 \$7;
+#X msg 784 798 pack 0 2 4;
+#X obj 752 265 + 24;
+#X obj 604 423 receive note;
+#X obj 746 425 receive tonique;
+#X obj 255 273 receive degree;
+#X obj 383 1057 send degree;
+#X obj 340 919 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 585 704 receive offset;
+#X obj 345 867 ==;
+#X obj 387 873 ==;
+#X obj 420 883 ==;
+#X obj 346 815 f;
+#X obj 444 819 f;
+#X obj 487 812 f;
+#X obj 409 816 f;
+#X obj 521 813 f;
+#X obj 587 749 t b f;
+#X obj 383 936 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 433 919 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 376 815 f;
+#X floatatom 373 743 3 0 0 0 - - -;
+#X obj 457 883 ==;
+#X obj 497 932 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 489 881 ==;
+#X obj 541 939 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 524 891 ==;
+#X obj 579 927 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 560 800 f;
+#X obj 563 878 ==;
+#X obj 684 921 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 284 940 spigot;
+#X obj 363 965 spigot;
+#X obj 432 975 spigot;
+#X obj 496 980 spigot;
+#X obj 555 979 spigot;
+#X obj 616 973 spigot;
+#X obj 686 973 spigot;
+#X msg 264 983 0;
+#X msg 366 991 1;
+#X msg 430 999 2;
+#X msg 478 1011 3;
+#X msg 538 1021 4;
+#X msg 652 1005 5;
+#X msg 731 1007 6;
+#X obj 436 76 notein;
+#X floatatom 573 47 5 1 16 1 channel - -;
+#X floatatom 402 127 5 0 0 0 - - -;
+#X floatatom 450 120 5 0 0 0 - - -;
+#X obj 490 209 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 521 174 ==;
+#X obj 524 124 t b f;
+#X obj 509 280 spigot;
+#X floatatom 501 332 5 0 0 0 - - -;
+#N canvas 2 383 1276 285 clock 1;
+#X obj 241 115 midirealtimein;
+#X obj 262 415 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 226 228 sel 248 250 251 252;
+#X floatatom 238 189 5 0 0 0 - - -;
+#X obj 303 415 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 342 421 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 374 422 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 110 382 float;
+#X obj 174 380 + 1;
+#X floatatom 183 446 5 0 0 0 - - -;
+#X obj 85 463 mod 24;
+#X floatatom 76 591 5 0 0 0 - - -;
+#X msg 125 338 0;
+#X obj 101 631 sel 0;
+#X obj 126 700 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 164 690 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 263 673 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 256 631 sel 0;
+#X obj 204 602 mod 12;
+#X msg 307 566 6;
+#X msg 308 529 12;
+#X msg 382 561 8;
+#X msg 382 592 4;
+#X obj 312 715 s trig;
+#X msg 456 628 5;
+#X msg 462 594 13;
+#X obj 164 628 sel 0;
+#X obj 192 661 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 194 707 spigot;
+#X obj 194 730 s trig;
+#X obj 449 701 r trig;
+#X obj 458 748 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 227 685 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 298 667 spigot;
+#X obj 336 636 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 164 605 mod 8;
+#X msg 305 498 24;
+#X obj 252 491 inlet;
+#X obj 279 795 outlet;
+#X obj 288 752 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X connect 0 0 3 0;
+#X connect 2 0 7 0;
+#X connect 2 1 1 0;
+#X connect 2 1 12 0;
+#X connect 2 2 4 0;
+#X connect 2 3 5 0;
+#X connect 2 4 6 0;
+#X connect 3 0 2 0;
+#X connect 7 0 8 0;
+#X connect 7 0 9 0;
+#X connect 7 0 10 0;
+#X connect 7 0 18 0;
+#X connect 7 0 35 0;
+#X connect 8 0 7 1;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 7 0;
+#X connect 13 0 14 0;
+#X connect 13 0 15 0;
+#X connect 17 0 16 0;
+#X connect 17 0 33 0;
+#X connect 18 0 17 0;
+#X connect 19 0 18 1;
+#X connect 20 0 18 1;
+#X connect 21 0 18 1;
+#X connect 22 0 18 1;
+#X connect 24 0 18 1;
+#X connect 25 0 18 1;
+#X connect 26 0 27 0;
+#X connect 26 0 28 0;
+#X connect 28 0 29 0;
+#X connect 30 0 31 0;
+#X connect 32 0 28 1;
+#X connect 33 0 23 0;
+#X connect 33 0 39 0;
+#X connect 34 0 33 1;
+#X connect 35 0 26 0;
+#X connect 36 0 18 1;
+#X connect 37 0 18 1;
+#X connect 39 0 38 0;
+#X restore 202 19 pd clock;
+#X msg 317 26 4;
+#X msg 355 36 6;
+#X obj 701 586 mod 12;
+#X obj 469 253 mod 12;
+#X connect 1 0 2 0;
+#X connect 2 0 0 0;
+#X connect 2 0 4 0;
+#X connect 3 0 9 0;
+#X connect 3 0 31 0;
+#X connect 4 0 5 0;
+#X connect 4 0 6 0;
+#X connect 4 0 13 0;
+#X connect 5 0 4 1;
+#X connect 6 0 3 0;
+#X connect 7 0 6 1;
+#X connect 8 0 2 1;
+#X connect 14 0 4 1;
+#X connect 19 0 33 0;
+#X connect 21 0 33 0;
+#X connect 24 0 25 0;
+#X connect 24 1 25 1;
+#X connect 26 0 24 1;
+#X connect 27 0 24 2;
+#X connect 29 0 25 2;
+#X connect 30 0 28 0;
+#X connect 30 0 24 0;
+#X connect 31 0 12 0;
+#X connect 31 0 48 0;
+#X connect 32 0 30 0;
+#X connect 33 0 74 0;
+#X connect 33 0 35 0;
+#X connect 34 0 17 0;
+#X connect 34 0 16 0;
+#X connect 35 0 38 0;
+#X connect 35 1 95 0;
+#X connect 35 2 36 0;
+#X connect 35 3 37 0;
+#X connect 35 4 40 0;
+#X connect 35 5 39 0;
+#X connect 35 6 41 0;
+#X connect 36 0 89 0;
+#X connect 37 0 87 0;
+#X connect 38 0 86 0;
+#X connect 39 0 90 0;
+#X connect 40 0 88 0;
+#X connect 41 0 102 0;
+#X connect 42 0 131 0;
+#X connect 43 0 42 0;
+#X connect 45 0 46 0;
+#X connect 45 1 43 1;
+#X connect 46 0 43 0;
+#X connect 48 0 49 0;
+#X connect 49 0 32 0;
+#X connect 50 0 23 0;
+#X connect 50 0 76 0;
+#X connect 51 0 47 0;
+#X connect 52 0 51 1;
+#X connect 53 0 30 1;
+#X connect 68 0 33 0;
+#X connect 70 0 33 0;
+#X connect 73 0 72 0;
+#X connect 75 0 72 0;
+#X connect 76 0 22 0;
+#X connect 77 0 46 0;
+#X connect 78 0 45 0;
+#X connect 79 0 48 1;
+#X connect 81 0 105 1;
+#X connect 82 0 91 0;
+#X connect 83 0 81 0;
+#X connect 83 0 105 0;
+#X connect 84 0 92 0;
+#X connect 84 0 106 0;
+#X connect 85 0 93 0;
+#X connect 85 0 107 0;
+#X connect 86 0 83 0;
+#X connect 87 0 96 0;
+#X connect 88 0 98 0;
+#X connect 89 0 85 0;
+#X connect 90 0 100 0;
+#X connect 91 0 86 0;
+#X connect 91 0 89 0;
+#X connect 91 0 94 0;
+#X connect 91 0 88 1;
+#X connect 91 0 90 0;
+#X connect 91 0 87 0;
+#X connect 91 0 88 0;
+#X connect 91 0 102 0;
+#X connect 91 1 83 1;
+#X connect 91 1 84 1;
+#X connect 91 1 85 1;
+#X connect 91 1 96 1;
+#X connect 91 1 98 1;
+#X connect 91 1 100 1;
+#X connect 91 1 103 1;
+#X connect 92 0 106 1;
+#X connect 93 0 107 1;
+#X connect 94 0 84 0;
+#X connect 95 0 94 0;
+#X connect 96 0 97 0;
+#X connect 96 0 108 0;
+#X connect 97 0 108 1;
+#X connect 98 0 99 0;
+#X connect 98 0 109 0;
+#X connect 99 0 109 1;
+#X connect 100 0 101 0;
+#X connect 100 0 110 0;
+#X connect 101 0 110 1;
+#X connect 102 0 103 0;
+#X connect 103 0 104 0;
+#X connect 103 0 111 0;
+#X connect 104 0 111 1;
+#X connect 105 0 112 0;
+#X connect 106 0 113 0;
+#X connect 107 0 114 0;
+#X connect 108 0 115 0;
+#X connect 109 0 116 0;
+#X connect 110 0 117 0;
+#X connect 111 0 118 0;
+#X connect 112 0 80 0;
+#X connect 113 0 80 0;
+#X connect 114 0 80 0;
+#X connect 115 0 80 0;
+#X connect 116 0 80 0;
+#X connect 117 0 80 0;
+#X connect 118 0 80 0;
+#X connect 119 0 121 0;
+#X connect 119 0 132 0;
+#X connect 119 1 122 0;
+#X connect 119 2 124 0;
+#X connect 120 0 125 0;
+#X connect 123 0 126 1;
+#X connect 124 0 123 0;
+#X connect 125 0 124 0;
+#X connect 125 1 124 1;
+#X connect 126 0 127 0;
+#X connect 126 0 50 0;
+#X connect 128 0 4 0;
+#X connect 129 0 128 0;
+#X connect 130 0 128 0;
+#X connect 131 0 44 0;
+#X connect 131 0 51 0;
+#X connect 132 0 126 0;