//---------------------------------------------------------------------------------------
wxString IdfyTonalityCtrol::prepare_score(EClef nClef, EKeySignature nKey,
ImoScore** pProblemScore)
{
//delete the previous score
if (*pProblemScore)
{
delete *pProblemScore;
*pProblemScore = NULL;
}
//determine tonic note
// 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 4 4 4 4 4 5 5 5 5 5 6 6 6 6 6
// 0 2 4 6 8 0 2 4 6 8 0 2 4 6 8 0 2 4 6 8 0 2 4 6 8 0 2 4 6 8 0 2 4 6 8
string notes = "c2d2e2f2g2a2b2c3d3e3f3g3a3b3c4d4e4f4g4a4b4c5d5e5f5g5a5b5c6d6e6f6g6a6b6";
int nRoot = get_step_for_root_note(nKey)* 2 + 14; //note in octave 3
string note[16]; //4 notes per chord
if (RandomGenerator::flip_coin())
{
//Marcelo Galvez. Tónica en los extremos
//I
note[0] = notes.substr(nRoot, 2); //I
note[1] = notes.substr(nRoot+8, 2); //V
note[2] = notes.substr(nRoot+18, 2); //III
note[3] = notes.substr(nRoot+28, 2); //I
//IV
note[4] = notes.substr(nRoot-8, 2); //IV
note[5] = notes.substr(nRoot+10, 2); //VI
note[6] = notes.substr(nRoot+20, 2); //IV
note[7] = notes.substr(nRoot+28, 2); //I
//V
note[8] = notes.substr(nRoot-6, 2); //V
note[9] = notes.substr(nRoot+8, 2); //V
note[10] = notes.substr(nRoot+16, 2); //II
note[11] = notes.substr(nRoot+26, 2); //VII
}
else
{
//Marcelo Galvez. Tónica en los extremos. Opción 2
//I
note[0] = notes.substr(nRoot, 2); //I
note[1] = notes.substr(nRoot+4, 2); //III
note[2] = notes.substr(nRoot+22, 2); //V
note[3] = notes.substr(nRoot+28, 2); //I
//IV
note[4] = notes.substr(nRoot-8, 2); //IV
note[5] = notes.substr(nRoot+6, 2); //IV
note[6] = notes.substr(nRoot+24, 2); //VI
note[7] = notes.substr(nRoot+28, 2); //I
//V
note[8] = notes.substr(nRoot-6, 2); //V
note[9] = notes.substr(nRoot+2, 2); //II
note[10] = notes.substr(nRoot+22, 2); //V
note[11] = notes.substr(nRoot+26, 2); //VII
}
//I
note[12] = note[0]; //I
note[13] = note[1]; //V
note[14] = note[2]; //I
note[15] = note[3]; //III
// //Emilio Mesias
// //I
// note[0] = notes.substr(nRoot, 2); //I
// note[1] = notes.substr(nRoot+8, 2); //V
// note[2] = notes.substr(nRoot+14, 2); //I
// note[3] = notes.substr(nRoot+18, 2); //III
// //IV
// note[4] = notes.substr(nRoot-8, 2); //IV
// note[5] = notes.substr(nRoot, 2); //I
// note[6] = notes.substr(nRoot+6, 2); //IV
// note[7] = notes.substr(nRoot+10, 2); //VI
// //V
// note[8] = notes.substr(nRoot-6, 2); //V
// note[9] = notes.substr(nRoot+2, 2); //II
// note[10] = notes.substr(nRoot+8, 2); //V
// note[11] = notes.substr(nRoot+12, 2); //VII
// //I
// note[12] = notes.substr(nRoot, 2); //I
// note[13] = notes.substr(nRoot+8, 2); //V
// note[14] = notes.substr(nRoot+14, 2); //I
// note[15] = notes.substr(nRoot+18, 2); //III
//create the score
string sPattern;
*pProblemScore = static_cast<ImoScore*>(ImFactory::inject(k_imo_score, m_pDoc));
(*pProblemScore)->set_long_option("Render.SpacingMethod", long(k_spacing_fixed));
ImoInstrument* pInstr = (*pProblemScore)->add_instrument();
// (g_pMidi->DefaultVoiceChannel(), g_pMidi->DefaultVoiceInstr(), "");
ImoSystemInfo* pInfo = (*pProblemScore)->get_first_system_info();
pInfo->set_top_system_distance( pInstr->tenths_to_logical(30) ); // 3 lines
pInstr->add_staff(); //add second staff: five lines, standard size
pInstr->add_clef( k_clef_G2, 1 );
pInstr->add_clef( k_clef_F4, 2 );
pInstr->add_key_signature( nKey );
pInstr->add_time_signature(2 ,4);
//add A4 note
pInstr->add_object("(n =a4 w p1)");
pInstr->add_barline(k_barline_simple);
pInstr->add_object("(r w)");
// Loop to add chords
int i=0;
for (int iC=0; iC < 4; iC++)
{
pInstr->add_spacer(15);
pInstr->add_barline(k_barline_simple);
sPattern = "(chord (n " + note[i++] + " w p2)";
sPattern += "(n " + note[i++] + " w p2)";
for (int iN=2; iN < 4; iN++)
sPattern += "(n " + note[i++] + " w p1)";
sPattern += ")";
pInstr->add_staff_objects( sPattern );
}
pInstr->add_spacer(20);
pInstr->add_barline(k_barline_end);
(*pProblemScore)->close(); //for generating StaffObjs collection
//return key signature name
return get_key_signature_name(nKey);
}
