/// <summary> Methode: get(id) /// <para>gibt einen Modus aus</para> /// </summary> /// <param name="id">ID des Modus, TYP: <b><i>INT</i></b></param> /// <returns>Modus-Objekt, TYP: <b><i>ds_Modus</i></b></returns> /// . /// <remarks> /// <para> Programmierer : Michael Pütz</para> /// Version : 0 /// <para> Unterversion : 1</para> /// Revision : 2 /// <para> letzteBearbeitung: 2016-12-17 22:13:41</para> /// <para> ersteBearbeitung : 2016-11-24 19:20:19</para> /// . /// <para> getestet am : </para> /// </remarks> public static ds_Modus get(int id) { #region DEBUG_INFO #if TEST string MethodenName = KLASSE + ".get(id)"; #if START MethodeStart = new wnd_StatusOn(MethodenName); #endif //START #if EINGABE MethodeInfo = new wnd_Info(MethodenName, "ID: " + id); #endif //EINGABE #endif //TEST #endregion DEBUG_INFO ds_Modus ausgabe; try { ausgabe = _liste[id]; } catch (ArgumentOutOfRangeException) { #region DEBUG_INFO #if TEST #if INFO MethodeInfo = new wnd_Info(MethodenName, "Modus wurde NICHT gefunden"); #endif //INFO #if START MethodeEnde = new wnd_StatusOff(MethodenName); #endif //START #endif //TEST #endregion DEBUG_INFO return(null); } #region DEBUG_INFO #if TEST #if AUSGABE AnzeigeModusData = new Anz_ModusData(MethodenName, ausgabe); #endif //AUSGABE #if START MethodeEnde = new wnd_StatusOff(MethodenName); #endif //START #endif //TEST #endregion DEBUG_INFO return(ausgabe); }
/// <summary> Methode: INIT() /// <para>initialisiert die Datenbank</para> /// </summary> /// . /// <remarks> /// <para> Programmierer : Michael Pütz</para> /// Version : 0 /// <para> Unterversion : 1</para> /// Revision : 2 /// <para> letzteBearbeitung: 2016-12-17 22:00:50</para> /// <para> ersteBearbeitung : 2016-11-24 18:02:29</para> /// . /// <para> getestet am : </para> /// </remarks> private static void INIT() { ds_Modus tmpModus; #region DEBUG_INFO #if TEST string MethodenName = KLASSE + ".INIT()"; #endif //TEST #endregion DEBUG_INFO #region Kirchentonarten tmpModus = erzeugeModus("-Dur", "-Jonisch (Dur)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-dorisch", "-dorisch (moll)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-phrygisch", "-phrygisch (moll)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lydisch", "-lydisch (Dur #11)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-mixolydisch", "-mixolydisch (Dur 7)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-äolisch", "-äolisch (natürliches moll)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lokrisch", "-lokrisch (moll vermindert)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion DEBUG_INFO #region Melodisch Moll tmpModus = erzeugeModus("-mel. moll", "-melodisch Moll I"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-dorisch b9", "-dorisch b9(melodisch moll II)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lydisch #5", "-lydisch #5 (melodisch moll III)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte_Ü); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-mixo #11", "-mixolydisch #11 (melodisch moll IV)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-mixo b13", "-mixolydisch b13 (melodisch moll V)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lokrisch 9", "-lokrisch 9 (melodisch moll VI)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte_V); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-superlokrisch", "-superlokrisch (melodisch moll VII)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez_V); tmpModus.ADD(eIntervall.Quinte_V); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion Melodisch Moll #region harmonisch Moll tmpModus = erzeugeModus("-harm. Moll", "-harmonisch Moll (HM I)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lokrisch 6", "-lokrisch 6 (HM II)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte_V); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-jonisch #5", "-jonisch #5 (HM III)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte_Ü); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-dorisch #11", "-dorisch #11 (HM IV)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-phrygisch Dur", "-phrygisch Dur (HM V)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-lydisch #9", "-lydisch #9 (HM VI)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_Ü); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-harmonisch verm.", "-harmonisch vermindert (HM VII)"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez_V); tmpModus.ADD(eIntervall.Quinte_V); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_V); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion harmonisch Moll #region Pentatonisch tmpModus = erzeugeModus("-penta I", "-pentatonisch I"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-penta II", "-pentatonisch II"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-penta III", "-pentatonisch III"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-penta IV", "-pentatonisch IV"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-penta V", "-pentatonisch V"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion Pentatonisch #region Moll Pentatonisch tmpModus = erzeugeModus("-moll penta I", "moll pentatonisch I"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-moll penta II", "moll pentatonisch II"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-moll penta III", "moll pentatonisch III"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-moll penta IV", "moll pentatonisch IV"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Tredez_K); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus("-moll penta V", "moll pentatonisch V"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion Moll Pentatonisch #region Jazz tmpModus = erzeugeModus("-Ganzton", "-Ganzton"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte_Ü); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus(" Ht-Gt", " Halbton-Ganzton"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_K); tmpModus.ADD(eIntervall.None_Ü); tmpModus.ADD(eIntervall.Terz_G); tmpModus.ADD(eIntervall.Undez_Ü); tmpModus.ADD(eIntervall.Quinte); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_K); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); tmpModus = erzeugeModus(" GtHt", " Ganzton-Halbton"); tmpModus.ADD(eIntervall.Prime); tmpModus.ADD(eIntervall.None_G); tmpModus.ADD(eIntervall.Terz_K); tmpModus.ADD(eIntervall.Undez); tmpModus.ADD(eIntervall.Quinte_V); tmpModus.ADD(eIntervall.Quinte_Ü); tmpModus.ADD(eIntervall.Tredez_G); tmpModus.ADD(eIntervall.Sept_G); #region DEBUG_INFO #if TEST #if INIT AnzeigeModusData = new Anz_ModusData(MethodenName, tmpModus); #endif //INIT #endif //TEST #endregion DEBUG_INFO _liste.Add(tmpModus); #endregion Jazz }