const
  cNoteOff               = 128;
  cNoteOn                = 144;
  cPolyPressure          = 160;
  cControlChange         = 176;
  cProgramChange         = 192;
  cAfterTouch            = 208;
  cChannelPressure       = cAfterTouch;
  cPitchWheel            = 224;
  cPitchBend             = cPitchWheel;
  cPitchChange           = 249;
  cClock                 = 248;
  cSongStart             = 250;
  cContinue              = 251;
  cSongStop              = 252;
  cActiveSensing         = 254;
  cSystemReset           = 255;
  cVolume                = 7;
  cModWheel              = 1;
  cModulation            = cModWheel;
  cBreath                = 2;
  cFootControl           = 4;
  cPortamento            = 65;
  cBalance               = 8;
  cPan                   = 10;
  cSustain               = 64;
  cDamper                = cSustain;
  cExpression            = 11;
  cAfterTouch_Cont       = 128;
  cModFrequency          = cExpression;
  cProphesyRibbon        = 16;
  cProphesyWheelUp       = 2;
  cProphesyWheelDown     = 3;
  cProphesyPedal         = 18;
  cProphesyKnob1         = 21;
  cProphesyKnob2         = 22;
  cNoiseLevel            = cFootControl;
  cPickPosition          = cFootControl;
  cStringDamping         = cExpression;
  cStringDetune          = cModWheel;
  cBodySize              = cBreath;
  cBowPressure           = cBreath;
  cBowPosition           = cPickPosition;
  cBowBeta               = cBowPosition;
  cReedStiffness         = cBreath;
  cReedRestPos           = cFootControl;
  cFluteEmbouchure       = cBreath;
  cJetDelay              = cFluteEmbouchure;
  cLipTension            = cBreath;
  cSlideLength           = cFootControl;
  cStrikePosition        = cPickPosition;
  cStickHardness         = cBreath;
  cTrillDepth            = 1051;
  cTrillSpeed            = 1052;
  cStrumSpeed            = cTrillSpeed;
  cRollSpeed             = cTrillSpeed;
  cFilterQ               = cBreath;
  cFilterFreq            = 1062;
  cFilterSweepRate       = cFootControl;
  cShakerInst            = 1071;
  cShakerEnergy          = cBreath;
  cShakerDamping         = cModFrequency;
  cShakerNumObjects      = cFootControl;
  cStrumming             = 1090;
  cNotStrumming          = 1091;
  cTrilling              = 1092;
  cNotTrilling           = 1093;
  cRolling               = cStrumming;
  cNotRolling            = cNotStrumming;
  cPlayerSkill           = 2001;
  cChord                 = 2002;
  cChordOff              = 2003;
  cSINGER_FilePath       = 3000;
  cSINGER_Frequency      = 3001;
  cSINGER_NoteName       = 3002;
  cSINGER_Shape          = 3003;
  cSINGER_Glot           = 3004;
  cSINGER_VoicedUnVoiced = 3005;
  cSINGER_Synthesize     = 3006;
  cSINGER_Silence        = 3007;
  cSINGER_VibratoAmt     = cModWheel;
  cSINGER_RndVibAmt      = 3008;
  cSINGER_VibFreq        = cExpression;

const
  Midi2Pitch : array[0..128] of Double =
  (    8.18 ,    8.66,    9.18,    9.72,    10.30,    10.91,    11.56,    12.25,
      12.98,    13.75,   14.57,   15.43,    16.35,    17.32,    18.35,    19.45,
      20.60,    21.83,   23.12,   24.50,    25.96,    27.50,    29.14,    30.87,
      32.70,    34.65,   36.71,   38.89,    41.20,    43.65,    46.25,    49.00,
      51.91,    55.00,   58.27,   61.74,    65.41,    69.30,    73.42,    77.78,
      82.41,    87.31,   92.50,   98.00,   103.83,   110.00,   116.54,   123.47,
     130.81,   138.59,  146.83,  155.56,   164.81,   174.61,   185.00,   196.00,
     207.65,   220.00,  233.08,  246.94,   261.63,   277.18,   293.66,   311.13,
     329.63,   349.23,  369.99,  392.00,   415.30,   440.00,   466.16,   493.88,
     523.25,   554.37,  587.33,  622.25,   659.26,   698.46,   739.99,   783.99,
     830.61,   880.00,  932.33,  987.77,  1046.50,  1108.73,  1174.66,  1244.51,
    1318.51,  1396.91, 1479.98, 1567.98,  1661.22,  1760.00,  1864.66,  1975.53,
    2093.00,  2217.46, 2349.32, 2489.02,  2637.02,  2793.83,  2959.96,  3135.96,
    3322.44,  3520.00, 3729.31, 3951.07,  4186.01,  4434.92,  4698.64,  4978.03,
    5274.04,  5587.65, 5919.91, 6271.93,  6644.88,  7040.00,  7458.62,  7902.13,
    8372.02,  8869.84, 9397.27, 9956.06, 10548.08, 11175.30, 11839.82, 12543.85,
   13289.75);

