private void button1_Click(object sender, EventArgs e)
{
key.Text = keyNote;
Scale_I.Text = "I (mi Ma7): Melodic minor";
Scale_II.Text = "II (mi7b5): Half Diminished";
Scale_V.Text = "V (7): Diminished Whole Tone";
Intervals_I.Text = "W H W W W W H";
Intervals_II.Text = "W H W W W W H";
Intervals_V.Text = "W H W W W W H";
//define the key notes for I, II and V
//root for I is the key note!
II_HalfDim dim_II = new II_HalfDim(keyNote);
V_Altered alt_V = new V_Altered(keyNote);
string newRootForMmII = dim_II.newRoot4MMScale;
string newRootForMmV = alt_V.newRoot4MMScaleV;
//Print the new scale roots on the Form
melodicMinorFor_I.Text = keyNote;
melodicMinorFor_II.Text = newRootForMmII;
melodicMinorFor_V.Text = newRootForMmV;
//define the melodic minor scale root notes for I, II and V
// root for I is the keyNote!
RootFor_II root_II = new RootFor_II(keyNote);
RootFor_V root_V = new RootFor_V(keyNote);
newRootForII = root_II.newRoot4II;
newRootForV = root_V.newRoot4V;
//define the new scales used for I, II and V based on the melodic minor scales and the root notes
MelodicMinor melodicMinor = new MelodicMinor(keyNote);
HalfDiminished halfDim = new HalfDiminished();
Altered altered = new Altered();
halfDim.setKey(newRootForII);
altered.setKey(newRootForV);
ScaleNotesFor_I.Text = melodicMinor.new_MM_Scale;
ScaleNotesFor_II.Text = halfDim.new_MM_Scale_II;
ScaleNotesFor_V.Text = altered.new_MM_Scale;
}
private void button2_Click(object sender, EventArgs e)
{
Scale_I.Text = "I (mi Ma7): Melodic minor";
Scale_II.Text = "II (mi7): Dorian b2";
Scale_V.Text = "V (7): Aeolian Dom";
Intervals_I.Text = "W H W W W W H";
Intervals_II.Text = "H W W W W H W";
Intervals_V.Text = "W W H W H W W";
//define the key notes for the melodic minor scales for I, II and V
//root for I is the key note!
II_Dorianb2 dorb2_II = new II_Dorianb2(keyNote);
V_AeolianDom aeolianDom_V = new V_AeolianDom(keyNote);
string newRootForMmII = dorb2_II.newRoot4MMScale;
string newRootForMmV = aeolianDom_V.newRoot4MMScale;
//Print the new scale roots on the Form
melodicMinorFor_I.Text = keyNote;
melodicMinorFor_II.Text = newRootForMmII;
melodicMinorFor_V.Text = newRootForMmV;
//define the new MM scale root notes for I, II and V
//RootFor_I root_I= new RootFor_I(keyNote);
RootFor_II root_II = new RootFor_II(keyNote);
RootFor_V root_V = new RootFor_V(keyNote);
newRootForI = keyNote;
newRootForII = root_II.newRoot4II;
newRootForV = root_V.newRoot4V;
MelodicMinor melodicMinor = new MelodicMinor(keyNote);
Dorianb2 dorb2 = new Dorianb2(newRootForII);
AeolianDom aeolianDom = new AeolianDom(newRootForV);
ScaleNotesFor_I.Text = melodicMinor.new_MM_Scale;
ScaleNotesFor_II.Text = dorb2.newMmScaleFor_II;
ScaleNotesFor_V.Text = aeolianDom.newMmScaleFor_V;
}