#P window setfont "Sans Serif" 9.; #P window linecount 1; #P message 536 106 14 9109513 3; #P message 506 107 14 9109513 2; #P message 476 107 14 9109513 1; #P message 447 107 14 9109513 8; #P message 417 107 16 9109513 -2; #P message 392 107 16 9109513 -1; #P number 632 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 606 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 580 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 554 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 528 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 502 484 24 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P newex 462 413 71 9109513 route symbol; #P newex 462 437 50 9109513 zl slice 1; #P newex 699 426 71 9109513 route symbol; #P newex 502 459 140 9109513 unpack 1 2 3 4 5 6; #P button 699 358 15 0; #P newex 699 472 80 9109513 prepend append; #P newex 699 450 50 9109513 zl slice 1; #P newex 699 380 91 9109513 t dump clear; #N coll MyChords; #T flags 1 0; #T 0 "Babel Speak" -1 -2 8 1 2 3; #T 1 "Stacked Inverted Minor 2nd's" -12 -11 -10 -9 -8 -7; #T 2 "Stacked Inverted Major 2nd's" -12 -10 -8 -6 -4 -2; #T 3 "Stacked Minor 2nd's" 1 2 3 4 5 6; #T 4 "Stacked Major 2nd's" 2 4 6 8 10 12; #T 5 "Stacked Octaves" -36 -24 -12 12 24 36; #T 6 "Stacked Perfect 5ths" -29 -17 -5 7 19 31; #T 7 "5ths and Octaves" -17 -12 -5 7 12 19; #T 8 "Dominant 7b5" 4 -2 6 10 -8 -12; #T 9 "Dominant 7#5" 4 -2 8 10 -8 -12; #T 10 "Dominant 7b9" 4 -2 13 10 -8 -12; #T 11 "Dominant 7#9" 4 -2 15 10 -8 -12; #T 12 "Dominant 7b5b9" 4 -2 5 13 -8 10; #T 13 "Dominant 7#5#9" 4 -2 8 15 -8 10; #T 14 "Dominant 7b5#9" 4 -2 5 15 -8 10; #T 15 "Dominant 7#5b9" 4 -2 8 13 -8 10; #T 16 "Dominant 9" 4 -2 2 -8 14 -12; #T 17 "Dominant 13" 4 -2 2 -3 9 -10; #T 18 "Dominant 13b9" 4 -2 1 -3 9 -11; #T 19 "Major 9" 4 -1 2 -1 -8 14; #T 20 "Minor 9" 3 -2 2 -2 -9 14; #T 21 "Minor 11" 3 -2 2 5 -9 17; #T 22 "Stacked Tritones" -12 -24 -6 6 18 12; #T 23 "Stacked Minor 3rds" 3 6 9 12 -9 -6; #T 24 "Stacked Major 3rds" 4 8 12 -8 -4 -12; #T 25 "Stacked 4ths" -7 -2 3 8 13 -12; #T 26 "Major 7#5" 4 8 11 -12 -8 -4; #T 27 "Inverted Minor 2nds 2" -1 -2 -3 -4 -5 -6; #P newobj 699 404 94 9109513 coll MyChords; #N coll MyChords; #T flags 1 0; #T 0 "Babel Speak" -1 -2 8 1 2 3; #T 1 "Stacked Inverted Minor 2nd's" -12 -11 -10 -9 -8 -7; #T 2 "Stacked Inverted Major 2nd's" -12 -10 -8 -6 -4 -2; #T 3 "Stacked Minor 2nd's" 1 2 3 4 5 6; #T 4 "Stacked Major 2nd's" 2 4 6 8 10 12; #T 5 "Stacked Octaves" -36 -24 -12 12 24 36; #T 6 "Stacked Perfect 5ths" -29 -17 -5 7 19 31; #T 7 "5ths and Octaves" -17 -12 -5 7 12 19; #T 8 "Dominant 7b5" 4 -2 6 10 -8 -12; #T 9 "Dominant 7#5" 4 -2 8 10 -8 -12; #T 10 "Dominant 7b9" 4 -2 13 10 -8 -12; #T 11 "Dominant 7#9" 4 -2 15 10 -8 -12; #T 12 "Dominant 7b5b9" 4 -2 5 13 -8 10; #T 13 "Dominant 7#5#9" 4 -2 8 15 -8 10; #T 14 "Dominant 7b5#9" 4 -2 5 15 -8 10; #T 15 "Dominant 7#5b9" 4 -2 8 13 -8 10; #T 16 "Dominant 9" 4 -2 2 -8 14 -12; #T 17 "Dominant 13" 4 -2 2 -3 9 -10; #T 18 "Dominant 13b9" 4 -2 1 -3 9 -11; #T 19 "Major 9" 4 -1 2 -1 -8 14; #T 20 "Minor 9" 3 -2 2 -2 -9 14; #T 21 "Minor 11" 3 -2 2 5 -9 17; #T 22 "Stacked Tritones" -12 -24 -6 6 18 12; #T 23 "Stacked Minor 3rds" 3 6 9 12 -9 -6; #T 24 "Stacked Major 3rds" 4 8 12 -8 -4 -12; #T 25 "Stacked 4ths" -7 -2 3 8 13 -12; #T 26 "Major 7#5" 4 8 11 -12 -8 -4; #T 27 "Inverted Minor 2nds 2" -1 -2 -3 -4 -5 -6; #P newobj 462 392 94 9109513 coll MyChords; #P window setfont "Sans Serif" 20.; #P user umenu 462 315 379 9109587 1 64 343 1; #X add "Babel Speak"; #X add "Stacked Inverted Minor 2nd's"; #X add "Stacked Inverted Major 2nd's"; #X add "Stacked Minor 2nd's"; #X add "Stacked Major 2nd's"; #X add "Stacked Octaves"; #X add "Stacked Perfect 5ths"; #X add "5ths and Octaves"; #X add "Dominant 7b5"; #X add "Dominant 7#5"; #X add "Dominant 7b9"; #X add "Dominant 7#9"; #X add "Dominant 7b5b9"; #X add "Dominant 7#5#9"; #X add "Dominant 7b5#9"; #X add "Dominant 7#5b9"; #X add "Dominant 9"; #X add "Dominant 13"; #X add "Dominant 13b9"; #X add "Major 9"; #X add "Minor 9"; #X add "Minor 11"; #X add "Stacked Tritones"; #X add "Stacked Minor 3rds"; #X add "Stacked Major 3rds"; #X add "Stacked 4ths"; #X add "Major 7#5"; #X add "Inverted Minor 2nds 2"; #P window setfont "Sans Serif" 9.; #P comment 719 359 226 9109513 bang to fill the menu after you modified the list; #P window linecount 2; #P comment 505 508 100 9109513 send these to your pitch shifters....; #P window linecount 3; #P user com 471 351 166 9109513 48; #K set 0 28526 27769 8294 26988 27749 25632 29800 25888 26217 29299 29728 25448 28530 25715 11822 11789 16750 25632 29537 30309 8308 26725 8291 28524 27680 29807 8289 8294 26988 25888 3368 29800 26995 8297 29472 29537 30309 25632 30569 29800 8308 26725 8304 24948 25448 25970 11822 11817; #K end; #P window setfont "Fixedwidth Serif" 12.; #P window linecount 12; #P message 99 497 68 9240588 -12=Oct -11=b9 -10=9 -9=#9/b3 -8=3 -7=4/11 -6=#4/b5 -5=5 -4=#5 -3=6/13 -2=b7 -1=7; #P message 10 497 59 9240588 12=Oct 11=7 10=b7 9=6/13 8=#5 7=5 6=#4/b5 5=4/11 4=3 3=b3/#9 2=9 1=b9; #P window setfont "Sans Serif" 18.; #P window linecount 2; #P comment 11 435 134 9109522 Pitch to Interval Conversion; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P hidden message 164 227 23 9109513 115; #P hidden message 143 72 23 9109513 100; #P window setfont "Fixedwidth Serif" 10.; #P hidden newex 901 804 56 9240586 r Pitch6; #P hidden newex 804 805 56 9240586 r Pitch5; #P hidden newex 704 805 56 9240586 r Pitch4; #P hidden newex 606 806 56 9240586 r Pitch3; #P hidden newex 500 805 56 9240586 r Pitch2; #P hidden newex 405 805 56 9240586 r Pitch1; #P window setfont "Sans Serif" 20.; #P comment 887 622 68 9109524 Pitch 6; #P window setfont "Sans Serif" 9.; #P hidden newex 900 784 93 9109513 zmap 0. 100. 0. 1.; #P window setfont "Sans Serif" 20.; #P flonum 886 592 68 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 899 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 899 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 795 714 160 9109513 pfft~ gizmo_loadme 4096 4; #P window setfont "Sans Serif" 20.; #P comment 791 622 68 9109524 Pitch 5; #P flonum 790 592 69 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 804 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 804 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 794 665 160 9109513 pfft~ gizmo_loadme 4096 4; #P hidden newex 796 751 33 9109513 *~ 0.8; #P hidden newex 801 784 93 9109513 zmap 0. 100. 0. 1.; #P hidden newex 794 690 33 9109513 *~ 0.8; #P window setfont "Sans Serif" 20.; #P comment 690 622 68 9109524 Pitch 4; #P window setfont "Sans Serif" 9.; #P hidden newex 703 784 93 9109513 zmap 0. 100. 0. 1.; #P window setfont "Sans Serif" 20.; #P flonum 689 592 68 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 702 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 702 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 598 714 160 9109513 pfft~ gizmo_loadme 4096 4; #P window setfont "Sans Serif" 20.; #P comment 594 622 68 9109524 Pitch 3; #P flonum 593 592 69 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 607 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 607 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 597 665 160 9109513 pfft~ gizmo_loadme 4096 4; #P hidden newex 599 751 33 9109513 *~ 0.8; #P hidden newex 604 784 93 9109513 zmap 0. 100. 0. 1.; #P hidden newex 597 690 33 9109513 *~ 0.8; #P window setfont "Sans Serif" 24.; #P message 0 237 146 9109528 Output Level; #P user gain~ 80 283 24 100 158 0 1.071519 7.94321 10.; #P user gain~ 48 283 24 100 158 0 1.071519 7.94321 10.; #P window setfont "Sans Serif" 20.; #P comment 487 622 68 9109524 Pitch 2; #P window setfont "Sans Serif" 24.; #P message 16 29 108 9109528 Dry Level; #P user gain~ 92 99 24 100 158 0 1.071519 7.94321 10.; #P user gain~ 19 97 24 100 158 0 1.071519 7.94321 10.; #P window setfont "Sans Serif" 9.; #P hidden newex 500 784 93 9109513 zmap 0. 100. 0. 1.; #P window setfont "Sans Serif" 20.; #P flonum 486 592 68 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 499 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 499 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 394 714 160 9109513 pfft~ gizmo_loadme 4096 4; #P window setfont "Sans Serif" 20.; #P comment 391 622 68 9109524 Pitch 1; #P flonum 390 592 69 20 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P hidden newex 404 832 92 9109513 expr pow(2.\\\,$f1/12); #P hidden flonum 404 857 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 394 665 160 9109513 pfft~ gizmo_loadme 4096 4; #P hidden newex 152 30 48 9109513 loadbang; #N out~ 2; #P hidden newobj 98 413 39 9109513 out~ 2; #N out~ 1; #P hidden newobj 24 413 39 9109513 out~ 1; #N in~ 2; #P hidden newobj 85 69 33 9109513 in~ 2; #N in~ 1; #P hidden newobj 13 68 33 9109513 in~ 1; #P hidden newex 395 751 33 9109513 *~ 0.8; #P hidden newex 401 784 93 9109513 zmap 0. 100. 0. 1.; #P hidden newex 394 690 33 9109513 *~ 0.8; #P hidden fasten 48 0 47 1 904 942 950 942; #P hidden fasten 43 0 42 1 775 935 775 655 949 655; #P hidden connect 49 0 48 0; #P hidden connect 50 0 49 0; #P hidden connect 89 0 50 0; #P connect 83 0 50 0; #P hidden connect 58 0 50 0; #P hidden connect 44 0 43 0; #P hidden connect 45 0 44 0; #P hidden connect 47 0 41 0; #P hidden fasten 51 0 41 0 905 803 896 752 801 752; #P hidden connect 4 0 19 0; #P hidden connect 4 0 13 0; #P hidden connect 4 0 33 0; #P hidden connect 4 0 47 0; #P hidden connect 42 0 39 0; #P hidden fasten 40 0 39 0 799 803; #P hidden connect 3 0 18 0; #P hidden connect 3 0 8 0; #P hidden fasten 3 0 28 0 439 222; #P hidden connect 3 0 42 0; #P hidden connect 88 0 45 0; #P connect 82 0 45 0; #P hidden connect 57 0 45 0; #P hidden fasten 34 0 33 1 707 942 753 942; #P hidden fasten 29 0 28 1 578 935 578 655 752 655; #P hidden connect 35 0 34 0; #P hidden connect 36 0 35 0; #P connect 71 0 72 0; #P fasten 75 1 71 0 765 446 704 446; #P connect 75 0 71 0; #P connect 69 0 75 0; #P connect 70 0 69 0; #P connect 73 0 70 0; #P hidden connect 7 0 59 0; #P hidden connect 7 0 60 0; #P hidden connect 7 0 84 0; #P hidden connect 7 0 85 0; #P hidden connect 7 0 86 0; #P hidden connect 7 0 87 0; #P hidden connect 7 0 88 0; #P hidden connect 7 0 89 0; #P hidden connect 7 0 73 0; #P hidden connect 87 0 36 0; #P connect 81 0 36 0; #P hidden connect 56 0 36 0; #P connect 74 5 83 0; #P hidden connect 30 0 29 0; #P hidden connect 31 0 30 0; #P connect 74 4 82 0; #P hidden connect 33 0 27 0; #P hidden fasten 37 0 27 0 708 803 697 752 604 752; #P hidden connect 28 0 25 0; #P hidden fasten 26 0 25 0 589 803 589 692 602 692; #P hidden connect 86 0 31 0; #P connect 80 0 79 0; #P connect 80 0 31 0; #P hidden connect 55 0 31 0; #P connect 74 3 81 0; #P connect 74 2 80 0; #P hidden fasten 14 0 13 1 504 942 549 942; #P hidden fasten 9 0 8 1 375 935 375 655 549 655; #P connect 74 1 79 0; #P connect 74 0 78 0; #P connect 76 1 74 0; #P hidden connect 15 0 14 0; #P hidden connect 16 0 15 0; #P hidden connect 85 0 16 0; #P connect 79 0 16 0; #P hidden connect 54 0 16 0; #P connect 77 0 76 0; #P fasten 77 1 76 0 528 433 467 433; #P connect 68 0 77 0; #P connect 67 0 68 0; #P fasten 70 1 67 0 785 401 852 401 852 309 467 309; #P fasten 72 0 67 0 704 496 869 496 869 309 467 309; #P hidden connect 10 0 9 0; #P hidden connect 11 0 10 0; #P hidden fasten 17 0 2 0 496 803 496 752 400 752; #P hidden connect 13 0 2 0; #P hidden fasten 1 0 0 0 384 803 384 692 399 692; #P hidden connect 8 0 0 0; #P hidden connect 84 0 11 0; #P connect 78 0 11 0; #P hidden connect 53 0 11 0; #P hidden connect 19 0 6 0; #P hidden connect 23 0 6 0; #P hidden connect 59 0 18 0; #P hidden connect 59 0 19 0; #P hidden connect 18 1 19 0; #P hidden fasten 41 0 23 0 90 328; #P hidden fasten 39 0 22 0 58 267; #P hidden fasten 39 0 23 0 90 267; #P hidden fasten 27 0 23 0 90 328; #P hidden fasten 25 0 22 0 58 267; #P hidden fasten 25 0 23 0 90 267; #P hidden fasten 2 0 23 0 90 328; #P hidden fasten 0 0 22 0 58 267; #P hidden fasten 0 0 23 0 90 267; #P hidden connect 22 1 23 0; #P hidden connect 60 0 23 0; #P hidden fasten 2 0 22 0 58 328; #P hidden fasten 41 0 22 0 58 328; #P hidden connect 60 0 22 0; #P hidden connect 18 0 5 0; #P hidden connect 22 0 5 0; #P window clipboard copycount 90;