View Single Post
Old 06-03-2016, 06:15 AM   #85
SaschArt
Human being with feelings
 
SaschArt's Avatar
 
Join Date: Aug 2013
Posts: 188
Default

Array for scales:

Code:
slider1:5<0,11,1{Chromatic,Dorian,Harmonic Minor,Locrian,Lydian,Major,Melodic Minor,Mixolydian,Natural Minor,Pentatonic Major,Pentatonic Minor,Phrygian,Whole Tone}>Scale

@init
arr_scale = 500;  //init the array
arr_scale[12]="111111111111";    //Chromatic
arr_scale[13]="101101010110";    //Dorian
arr_scale[14]="101101011001";    //Harmonic Minor
arr_scale[15]="110110011010";    //Locrian
arr_scale[16]="101010110101";    //Lydian
arr_scale[17]="101011010101";    //Major
arr_scale[18]="101101010101";    //Melodic Minor
arr_scale[19]="101011010110";    //Mixolydian
arr_scale[20]="101101011010";    //Natural Minor
arr_scale[21]="101010010100";    //Pentatonic Major
arr_scale[22]="100101010010";    //Pentatonic Minor
arr_scale[23]="110101011010";    //Phrygian
arr_scale[24]="101010101010";    //Whole Tone
scale=-1;

@slider

scale != slider1 ? (
  scale = slider1; 
  scale_size = 0;
  i=0;
  while (i<12) (
    strcmp(strcpy_substr(#,arr_scale[scale+12],i,1), "1")==0 ? (
      arr_scale[scale_size]=i;
      scale_size+=1;
    );
    i+=1;
  );
);
arr_scale will contain scores from each scale.
SaschArt is offline   Reply With Quote