101 lines
2.8 KiB
C++
101 lines
2.8 KiB
C++
using namespace Music;
|
|
void main()
|
|
{
|
|
// Music::Chord chord=ChordParser::parse("Gb-7");
|
|
// Music::Chord chord=ChordParser::parse("G-7");
|
|
// Music::Chord chord=ChordParser::parse("G-");
|
|
// Music::Chord chord=ChordParser::parse("G^");
|
|
// Music::Chord chord=ChordParser::parse("G7");
|
|
|
|
Music::Chord chord=ChordParser::parse("Gb7");
|
|
|
|
|
|
::OutputDebugString(chord.toString()+String("\n"));
|
|
|
|
/*
|
|
Music::Progression progression;
|
|
|
|
MIDIOutputDevice midiOut;
|
|
Music::Chord chord;
|
|
|
|
Note key(Note::A);
|
|
progression.createProgression(Progression::PIII_VI_II_V,key);
|
|
progression.play(midiOut);
|
|
progression.createProgression(Progression::PV_V,key);
|
|
progression.play(midiOut);
|
|
*/
|
|
|
|
|
|
|
|
/*
|
|
Music::ProgressionManager::createProgression(ProgressionManager::PV_V,progression,key);
|
|
key=key.getParentSecond();
|
|
Music::ProgressionManager::createProgression(ProgressionManager::PV_V,progression2,key);
|
|
progression+=progression2;
|
|
key=key.getParentSecond();
|
|
Music::ProgressionManager::createProgression(ProgressionManager::PV_V,progression2,key);
|
|
progression+=progression2;
|
|
*/
|
|
|
|
::Sleep(750);
|
|
|
|
// AeolianScale aeolianScale;
|
|
// aeolianScale.play(midiOut);
|
|
// aeolianScale.playBack(midiOut);
|
|
|
|
/*
|
|
MelodicMinorScale melodicMinorScale;
|
|
Music::Chord melodicMinorChord=melodicMinorScale.getI7Chord();
|
|
melodicMinorChord.play(midiOut);
|
|
::Sleep(750);
|
|
melodicMinorScale.play(midiOut);
|
|
melodicMinorScale.playBack(midiOut);
|
|
::Sleep(750);
|
|
melodicMinorChord.play(midiOut);
|
|
::Sleep(500);
|
|
::OutputDebugString(melodicMinorScale.toString());
|
|
*/
|
|
|
|
// SusFlat9Scale susFlat9Scale(Note::D);
|
|
// susFlat9Scale.play(midiOut);
|
|
// susFlat9Scale.playBack(midiOut);
|
|
// ::OutputDebugString(susFlat9Scale.toString());
|
|
|
|
// LydianAugmentedScale lydianAugmentedScale(Note::DSh);
|
|
// lydianAugmentedScale.play(midiOut);
|
|
// lydianAugmentedScale.playBack(midiOut);
|
|
// ::OutputDebugString(lydianAugmentedScale.toString()+String("\n"));
|
|
|
|
// LydianDominantScale lydianDominantScale;
|
|
// lydianDominantScale.play(midiOut);
|
|
// lydianDominantScale.playBack(midiOut);
|
|
// ::OutputDebugString(lydianDominantScale.toString()+String("\n"));
|
|
|
|
/*
|
|
Locrian2Scale locrian2Scale;
|
|
Music::Chord locrian2Chord=locrian2Scale.getI7Chord();
|
|
::OutputDebugString(locrian2Chord.toString()+String("\n"));
|
|
locrian2Chord.play(midiOut);
|
|
::Sleep(750);
|
|
locrian2Scale.play(midiOut);
|
|
locrian2Scale.playBack(midiOut);
|
|
::Sleep(500);
|
|
locrian2Chord.play(midiOut);
|
|
::Sleep(750);
|
|
::OutputDebugString(locrian2Scale.toString()+String("\n"));
|
|
|
|
AlteredScale alteredScale;
|
|
Music::Chord alteredChord=alteredScale.getI7Chord();
|
|
::OutputDebugString(alteredChord.toString()+String("\n"));
|
|
alteredChord.play(midiOut);
|
|
::Sleep(750);
|
|
alteredScale.play(midiOut);
|
|
alteredScale.playBack(midiOut);
|
|
::OutputDebugString(alteredScale.toString()+String("\n"));
|
|
::Sleep(500);
|
|
alteredChord.play(midiOut);
|
|
::Sleep(750);
|
|
*/
|
|
|
|
|
|
} |