Added note length modifier support to l directive

This primairly includes the dotted note and if it were inside a triplet.
This commit references #1.

src/AddmusicK/Music.cpp

@@ -569,12 +569,11 @@ void Music::parseLDirective()
 			error("Error parsing \"l\" directive.");
 		}
 		defaultNoteLength = i;
-		return;
 	}
-	if (i == -1) error("Error parsing \"l\" directive.")
-	if (i < 1 || i > 192) error("Illegal value for \"l\" directive.")
-
-	defaultNoteLength = 192 / i;
+	else if (i == -1) error("Error parsing \"l\" directive.")
+	else if (i < 1 || i > 192) error("Illegal value for \"l\" directive.")
+	else {defaultNoteLength = 192 / i;}
+	defaultNoteLength = getNoteLengthModifier(defaultNoteLength);
 }
 void Music::parseGlobalVolumeCommand()
 {
@@ -2815,6 +2814,10 @@ int Music::getNoteLength(int i)
 	else if (i < 1 || i > 192) i = defaultNoteLength;
 	else i = 192 / i;
 
+	return getNoteLengthModifier(i);
+}
+
+int Music::getNoteLengthModifier(int i) {
 	int frac = i;
 
 	int times = 0;
@@ -2829,9 +2832,10 @@ int Music::getNoteLength(int i)
 	//}
 	if (triplet)
 		i = (int)floor(((double)i * 2.0 / 3.0) + 0.5);
-	return i;
+	return i;
 }
 
+
 bool sortTempoPair(const std::pair<double, int> &p1, const std::pair<double, int> &p2)
 {
 	if (p1.first == p2.first)

src/AddmusicK/Music.h

@@ -166,7 +166,8 @@ class Music
 	int getIntWithNegative();
 	int getHex(bool anyLength = false);
 	int getPitch(int j);
-	int getNoteLength(int);
+	int getNoteLength(int);
+	int getNoteLengthModifier(int);
 
 	bool guessLength;
 	int resizedChannel;