music-macro-language
Version:
Music macro language parser
1,541 lines (1,456 loc) • 68.9 kB
JavaScript
module.exports = (function() {
"use strict";
/*
* Generated by PEG.js 0.9.0.
*
* http://pegjs.org/
*/
function peg$subclass(child, parent) {
function ctor() { this.constructor = child; }
ctor.prototype = parent.prototype;
child.prototype = new ctor();
}
function peg$SyntaxError(message, expected, found, location) {
this.message = message;
this.expected = expected;
this.found = found;
this.location = location;
this.name = "SyntaxError";
if (typeof Error.captureStackTrace === "function") {
Error.captureStackTrace(this, peg$SyntaxError);
}
}
peg$subclass(peg$SyntaxError, Error);
function peg$parse(input) {
var options = arguments.length > 1 ? arguments[1] : {},
parser = this,
peg$FAILED = {},
peg$startRuleFunctions = { Start: peg$parseStart },
peg$startRuleFunction = peg$parseStart,
peg$c0 = function(Commands) {
return Commands;
},
peg$c1 = ";",
peg$c2 = { type: "literal", value: ";", description: "\";\"" },
peg$c3 = function() {
return null;
},
peg$c4 = /^[a-gA-G]/,
peg$c5 = { type: "class", value: "[a-gA-G]", description: "[a-gA-G]" },
peg$c6 = /^[\-+]/,
peg$c7 = { type: "class", value: "[-+]", description: "[-+]" },
peg$c8 = /^[0-9]/,
peg$c9 = { type: "class", value: "[0-9]", description: "[0-9]" },
peg$c10 = ".",
peg$c11 = { type: "literal", value: ".", description: "\".\"" },
peg$c12 = function(tone, accidentals, length, dots) {
return {
command: "note",
tone: tone.toLowerCase(),
accidentals: accidentals,
length: +length,
dots: dots
};
},
peg$c13 = "r",
peg$c14 = { type: "literal", value: "r", description: "\"r\"" },
peg$c15 = "R",
peg$c16 = { type: "literal", value: "R", description: "\"R\"" },
peg$c17 = function(length, dots) {
return {
command: "rest",
length: +length,
dots: dots
};
},
peg$c18 = "o",
peg$c19 = { type: "literal", value: "o", description: "\"o\"" },
peg$c20 = "O",
peg$c21 = { type: "literal", value: "O", description: "\"O\"" },
peg$c22 = "-",
peg$c23 = { type: "literal", value: "-", description: "\"-\"" },
peg$c24 = function(number) {
if (0 > number || number > 8) {
error("RangeError: Octave must be between 0 and 8");
}
return {
command: "octave",
number: +number
};
},
peg$c25 = "<",
peg$c26 = { type: "literal", value: "<", description: "\"<\"" },
peg$c27 = function() {
return {
command: "octave_up"
};
},
peg$c28 = ">",
peg$c29 = { type: "literal", value: ">", description: "\">\"" },
peg$c30 = function() {
return {
command: "octave_down"
};
},
peg$c31 = "ns",
peg$c32 = { type: "literal", value: "ns", description: "\"ns\"" },
peg$c33 = "NS",
peg$c34 = { type: "literal", value: "NS", description: "\"NS\"" },
peg$c35 = function(number) {
return {
command: "node_shift",
type: "absolute",
number: +number
};
},
peg$c36 = "@ns",
peg$c37 = { type: "literal", value: "@ns", description: "\"@ns\"" },
peg$c38 = "@NS",
peg$c39 = { type: "literal", value: "@NS", description: "\"@NS\"" },
peg$c40 = function(number) {
return {
command: "node_shift",
type: "relative",
number: +number
}
},
peg$c41 = "#octave reverse",
peg$c42 = { type: "literal", value: "#octave reverse", description: "\"#octave reverse\"" },
peg$c43 = "#OCTAVE REVERSE",
peg$c44 = { type: "literal", value: "#OCTAVE REVERSE", description: "\"#OCTAVE REVERSE\"" },
peg$c45 = function() {
return {
command: "octave_reverse"
}
},
peg$c46 = "@d",
peg$c47 = { type: "literal", value: "@d", description: "\"@d\"" },
peg$c48 = "@D",
peg$c49 = { type: "literal", value: "@D", description: "\"@D\"" },
peg$c50 = function(number) {
return {
command: "detune",
number: +number
}
},
peg$c51 = "@l",
peg$c52 = { type: "literal", value: "@l", description: "\"@l\"" },
peg$c53 = "@L",
peg$c54 = { type: "literal", value: "@L", description: "\"@L\"" },
peg$c55 = ",",
peg$c56 = { type: "literal", value: ",", description: "\",\"" },
peg$c57 = /^[0-3]/,
peg$c58 = { type: "class", value: "[0-3]", description: "[0-3]" },
peg$c59 = /^[0-5]/,
peg$c60 = { type: "class", value: "[0-5]", description: "[0-5]" },
peg$c61 = function(depth, width, form, delay, time, dest) {
return {
command: "lfo",
depth: +depth,
width: +width,
form: +form,
delay: +delay,
time: +time,
dest: +dest
}
},
peg$c62 = { type: "any", description: "any character" },
peg$c63 = /^[\n\r\u2028\u2029]/,
peg$c64 = { type: "class", value: "[\\n\\r\\u2028\\u2029]", description: "[\\n\\r\\u2028\\u2029]" },
peg$c65 = "/*",
peg$c66 = { type: "literal", value: "/*", description: "\"/*\"" },
peg$c67 = "*/",
peg$c68 = { type: "literal", value: "*/", description: "\"*/\"" },
peg$c69 = "//",
peg$c70 = { type: "literal", value: "//", description: "\"//\"" },
peg$c71 = { type: "other", description: "whitespace" },
peg$c72 = "\t",
peg$c73 = { type: "literal", value: "\t", description: "\"\\t\"" },
peg$c74 = "\x0B",
peg$c75 = { type: "literal", value: "\x0B", description: "\"\\x0B\"" },
peg$c76 = "\f",
peg$c77 = { type: "literal", value: "\f", description: "\"\\f\"" },
peg$c78 = " ",
peg$c79 = { type: "literal", value: " ", description: "\" \"" },
peg$c80 = "\xA0",
peg$c81 = { type: "literal", value: "\xA0", description: "\"\\xA0\"" },
peg$c82 = "\uFEFF",
peg$c83 = { type: "literal", value: "\uFEFF", description: "\"\\uFEFF\"" },
peg$c84 = { type: "other", description: "end of line" },
peg$c85 = "\n",
peg$c86 = { type: "literal", value: "\n", description: "\"\\n\"" },
peg$c87 = "\r\n",
peg$c88 = { type: "literal", value: "\r\n", description: "\"\\r\\n\"" },
peg$c89 = "\r",
peg$c90 = { type: "literal", value: "\r", description: "\"\\r\"" },
peg$c91 = "\u2028",
peg$c92 = { type: "literal", value: "\u2028", description: "\"\\u2028\"" },
peg$c93 = "\u2029",
peg$c94 = { type: "literal", value: "\u2029", description: "\"\\u2029\"" },
peg$c95 = { type: "other", description: "comment" },
peg$currPos = 0,
peg$savedPos = 0,
peg$posDetailsCache = [{ line: 1, column: 1, seenCR: false }],
peg$maxFailPos = 0,
peg$maxFailExpected = [],
peg$silentFails = 0,
peg$result;
if ("startRule" in options) {
if (!(options.startRule in peg$startRuleFunctions)) {
throw new Error("Can't start parsing from rule \"" + options.startRule + "\".");
}
peg$startRuleFunction = peg$startRuleFunctions[options.startRule];
}
function text() {
return input.substring(peg$savedPos, peg$currPos);
}
function location() {
return peg$computeLocation(peg$savedPos, peg$currPos);
}
function expected(description) {
throw peg$buildException(
null,
[{ type: "other", description: description }],
input.substring(peg$savedPos, peg$currPos),
peg$computeLocation(peg$savedPos, peg$currPos)
);
}
function error(message) {
throw peg$buildException(
message,
null,
input.substring(peg$savedPos, peg$currPos),
peg$computeLocation(peg$savedPos, peg$currPos)
);
}
function peg$computePosDetails(pos) {
var details = peg$posDetailsCache[pos],
p, ch;
if (details) {
return details;
} else {
p = pos - 1;
while (!peg$posDetailsCache[p]) {
p--;
}
details = peg$posDetailsCache[p];
details = {
line: details.line,
column: details.column,
seenCR: details.seenCR
};
while (p < pos) {
ch = input.charAt(p);
if (ch === "\n") {
if (!details.seenCR) { details.line++; }
details.column = 1;
details.seenCR = false;
} else if (ch === "\r" || ch === "\u2028" || ch === "\u2029") {
details.line++;
details.column = 1;
details.seenCR = true;
} else {
details.column++;
details.seenCR = false;
}
p++;
}
peg$posDetailsCache[pos] = details;
return details;
}
}
function peg$computeLocation(startPos, endPos) {
var startPosDetails = peg$computePosDetails(startPos),
endPosDetails = peg$computePosDetails(endPos);
return {
start: {
offset: startPos,
line: startPosDetails.line,
column: startPosDetails.column
},
end: {
offset: endPos,
line: endPosDetails.line,
column: endPosDetails.column
}
};
}
function peg$fail(expected) {
if (peg$currPos < peg$maxFailPos) { return; }
if (peg$currPos > peg$maxFailPos) {
peg$maxFailPos = peg$currPos;
peg$maxFailExpected = [];
}
peg$maxFailExpected.push(expected);
}
function peg$buildException(message, expected, found, location) {
function cleanupExpected(expected) {
var i = 1;
expected.sort(function(a, b) {
if (a.description < b.description) {
return -1;
} else if (a.description > b.description) {
return 1;
} else {
return 0;
}
});
while (i < expected.length) {
if (expected[i - 1] === expected[i]) {
expected.splice(i, 1);
} else {
i++;
}
}
}
function buildMessage(expected, found) {
function stringEscape(s) {
function hex(ch) { return ch.charCodeAt(0).toString(16).toUpperCase(); }
return s
.replace(/\\/g, '\\\\')
.replace(/"/g, '\\"')
.replace(/\x08/g, '\\b')
.replace(/\t/g, '\\t')
.replace(/\n/g, '\\n')
.replace(/\f/g, '\\f')
.replace(/\r/g, '\\r')
.replace(/[\x00-\x07\x0B\x0E\x0F]/g, function(ch) { return '\\x0' + hex(ch); })
.replace(/[\x10-\x1F\x80-\xFF]/g, function(ch) { return '\\x' + hex(ch); })
.replace(/[\u0100-\u0FFF]/g, function(ch) { return '\\u0' + hex(ch); })
.replace(/[\u1000-\uFFFF]/g, function(ch) { return '\\u' + hex(ch); });
}
var expectedDescs = new Array(expected.length),
expectedDesc, foundDesc, i;
for (i = 0; i < expected.length; i++) {
expectedDescs[i] = expected[i].description;
}
expectedDesc = expected.length > 1
? expectedDescs.slice(0, -1).join(", ")
+ " or "
+ expectedDescs[expected.length - 1]
: expectedDescs[0];
foundDesc = found ? "\"" + stringEscape(found) + "\"" : "end of input";
return "Expected " + expectedDesc + " but " + foundDesc + " found.";
}
if (expected !== null) {
cleanupExpected(expected);
}
return new peg$SyntaxError(
message !== null ? message : buildMessage(expected, found),
expected,
found,
location
);
}
function peg$parseStart() {
var s0, s1;
s0 = [];
s1 = peg$parseTrack();
if (s1 !== peg$FAILED) {
while (s1 !== peg$FAILED) {
s0.push(s1);
s1 = peg$parseTrack();
}
} else {
s0 = peg$FAILED;
}
return s0;
}
function peg$parseTrack() {
var s0, s1, s2;
s0 = peg$currPos;
s1 = [];
s2 = peg$parseCommand();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parseCommand();
}
if (s1 !== peg$FAILED) {
s2 = peg$parseNextTrack();
if (s2 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c0(s1);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseNextTrack() {
var s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 59) {
s2 = peg$c1;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c2); }
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c3();
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parse_() {
var s0, s1;
s0 = [];
s1 = peg$parse_WhiteSpace();
if (s1 === peg$FAILED) {
s1 = peg$parse_LineTerminatorSequence();
if (s1 === peg$FAILED) {
s1 = peg$parse_MultiLineCommentNoLineTerminator();
if (s1 === peg$FAILED) {
s1 = peg$parseComment();
}
}
}
while (s1 !== peg$FAILED) {
s0.push(s1);
s1 = peg$parse_WhiteSpace();
if (s1 === peg$FAILED) {
s1 = peg$parse_LineTerminatorSequence();
if (s1 === peg$FAILED) {
s1 = peg$parse_MultiLineCommentNoLineTerminator();
if (s1 === peg$FAILED) {
s1 = peg$parseComment();
}
}
}
}
return s0;
}
function peg$parseCommand() {
var s0;
s0 = peg$parseComment();
if (s0 === peg$FAILED) {
s0 = peg$parseNote();
if (s0 === peg$FAILED) {
s0 = peg$parseRest();
if (s0 === peg$FAILED) {
s0 = peg$parseOctave();
if (s0 === peg$FAILED) {
s0 = peg$parseOctaveUp();
if (s0 === peg$FAILED) {
s0 = peg$parseOctaveDown();
if (s0 === peg$FAILED) {
s0 = peg$parseNoteShiftAbsolute();
if (s0 === peg$FAILED) {
s0 = peg$parseNoteShiftRelative();
if (s0 === peg$FAILED) {
s0 = peg$parseOctaveReverse();
if (s0 === peg$FAILED) {
s0 = peg$parseDetune();
if (s0 === peg$FAILED) {
s0 = peg$parseLFO();
}
}
}
}
}
}
}
}
}
}
return s0;
}
function peg$parseNote() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (peg$c4.test(input.charAt(peg$currPos))) {
s2 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c5); }
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = [];
if (peg$c6.test(input.charAt(peg$currPos))) {
s5 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c7); }
}
while (s5 !== peg$FAILED) {
s4.push(s5);
if (peg$c6.test(input.charAt(peg$currPos))) {
s5 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c7); }
}
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
s6 = peg$currPos;
s7 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
while (s8 !== peg$FAILED) {
s7.push(s8);
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
if (s7 !== peg$FAILED) {
s6 = input.substring(s6, peg$currPos);
} else {
s6 = s7;
}
if (s6 !== peg$FAILED) {
s7 = peg$parse_();
if (s7 !== peg$FAILED) {
s8 = [];
if (input.charCodeAt(peg$currPos) === 46) {
s9 = peg$c10;
peg$currPos++;
} else {
s9 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c11); }
}
while (s9 !== peg$FAILED) {
s8.push(s9);
if (input.charCodeAt(peg$currPos) === 46) {
s9 = peg$c10;
peg$currPos++;
} else {
s9 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c11); }
}
}
if (s8 !== peg$FAILED) {
s9 = peg$parse_();
if (s9 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c12(s2, s4, s6, s8);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseRest() {
var s0, s1, s2, s3, s4, s5, s6, s7;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 114) {
s2 = peg$c13;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c14); }
}
if (s2 === peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 82) {
s2 = peg$c15;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c16); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s6 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
while (s6 !== peg$FAILED) {
s5.push(s6);
if (peg$c8.test(input.charAt(peg$currPos))) {
s6 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
s6 = [];
if (input.charCodeAt(peg$currPos) === 46) {
s7 = peg$c10;
peg$currPos++;
} else {
s7 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c11); }
}
while (s7 !== peg$FAILED) {
s6.push(s7);
if (input.charCodeAt(peg$currPos) === 46) {
s7 = peg$c10;
peg$currPos++;
} else {
s7 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c11); }
}
}
if (s6 !== peg$FAILED) {
s7 = peg$parse_();
if (s7 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c17(s4, s6);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseOctave() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 111) {
s2 = peg$c18;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c19); }
}
if (s2 === peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 79) {
s2 = peg$c20;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c21); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 45) {
s6 = peg$c22;
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c23); }
}
if (s6 === peg$FAILED) {
s6 = null;
}
if (s6 !== peg$FAILED) {
s7 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s8 !== peg$FAILED) {
while (s8 !== peg$FAILED) {
s7.push(s8);
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s7 = peg$FAILED;
}
if (s7 !== peg$FAILED) {
s6 = [s6, s7];
s5 = s6;
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c24(s4);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseOctaveUp() {
var s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 60) {
s2 = peg$c25;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c26); }
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c27();
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseOctaveDown() {
var s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 62) {
s2 = peg$c28;
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c29); }
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c30();
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseNoteShiftAbsolute() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c31) {
s2 = peg$c31;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c32); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c33) {
s2 = peg$c33;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c34); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 45) {
s6 = peg$c22;
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c23); }
}
if (s6 === peg$FAILED) {
s6 = null;
}
if (s6 !== peg$FAILED) {
s7 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s8 !== peg$FAILED) {
while (s8 !== peg$FAILED) {
s7.push(s8);
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s7 = peg$FAILED;
}
if (s7 !== peg$FAILED) {
s6 = [s6, s7];
s5 = s6;
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c35(s4);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseNoteShiftRelative() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 3) === peg$c36) {
s2 = peg$c36;
peg$currPos += 3;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c37); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 3) === peg$c38) {
s2 = peg$c38;
peg$currPos += 3;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c39); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 45) {
s6 = peg$c22;
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c23); }
}
if (s6 === peg$FAILED) {
s6 = null;
}
if (s6 !== peg$FAILED) {
s7 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s8 !== peg$FAILED) {
while (s8 !== peg$FAILED) {
s7.push(s8);
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s7 = peg$FAILED;
}
if (s7 !== peg$FAILED) {
s6 = [s6, s7];
s5 = s6;
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c40(s4);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseOctaveReverse() {
var s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 15) === peg$c41) {
s2 = peg$c41;
peg$currPos += 15;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c42); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 15) === peg$c43) {
s2 = peg$c43;
peg$currPos += 15;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c44); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c45();
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseDetune() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c46) {
s2 = peg$c46;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c47); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c48) {
s2 = peg$c48;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c49); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 45) {
s6 = peg$c22;
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c23); }
}
if (s6 === peg$FAILED) {
s6 = null;
}
if (s6 !== peg$FAILED) {
s7 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s8 !== peg$FAILED) {
while (s8 !== peg$FAILED) {
s7.push(s8);
if (peg$c8.test(input.charAt(peg$currPos))) {
s8 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s7 = peg$FAILED;
}
if (s7 !== peg$FAILED) {
s6 = [s6, s7];
s5 = s6;
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
} else {
peg$currPos = s5;
s5 = peg$FAILED;
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c50(s4);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseLFO() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15, s16, s17, s18, s19, s20, s21, s22, s23, s24, s25;
s0 = peg$currPos;
s1 = peg$parse_();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c51) {
s2 = peg$c51;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c52); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c53) {
s2 = peg$c53;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c54); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (s3 !== peg$FAILED) {
s4 = peg$currPos;
s5 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s6 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s6 !== peg$FAILED) {
while (s6 !== peg$FAILED) {
s5.push(s6);
if (peg$c8.test(input.charAt(peg$currPos))) {
s6 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s5 = peg$FAILED;
}
if (s5 !== peg$FAILED) {
s4 = input.substring(s4, peg$currPos);
} else {
s4 = s5;
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
if (s5 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 44) {
s6 = peg$c55;
peg$currPos++;
} else {
s6 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c56); }
}
if (s6 !== peg$FAILED) {
s7 = peg$parse_();
if (s7 !== peg$FAILED) {
s8 = peg$currPos;
s9 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s10 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s10 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s10 !== peg$FAILED) {
while (s10 !== peg$FAILED) {
s9.push(s10);
if (peg$c8.test(input.charAt(peg$currPos))) {
s10 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s10 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s9 = peg$FAILED;
}
if (s9 !== peg$FAILED) {
s8 = input.substring(s8, peg$currPos);
} else {
s8 = s9;
}
if (s8 !== peg$FAILED) {
s9 = peg$parse_();
if (s9 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 44) {
s10 = peg$c55;
peg$currPos++;
} else {
s10 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c56); }
}
if (s10 !== peg$FAILED) {
s11 = peg$parse_();
if (s11 !== peg$FAILED) {
s12 = peg$currPos;
s13 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 45) {
s14 = peg$c22;
peg$currPos++;
} else {
s14 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c23); }
}
if (s14 === peg$FAILED) {
s14 = null;
}
if (s14 !== peg$FAILED) {
if (peg$c57.test(input.charAt(peg$currPos))) {
s15 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s15 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c58); }
}
if (s15 !== peg$FAILED) {
s14 = [s14, s15];
s13 = s14;
} else {
peg$currPos = s13;
s13 = peg$FAILED;
}
} else {
peg$currPos = s13;
s13 = peg$FAILED;
}
if (s13 !== peg$FAILED) {
s12 = input.substring(s12, peg$currPos);
} else {
s12 = s13;
}
if (s12 !== peg$FAILED) {
s13 = peg$parse_();
if (s13 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 44) {
s14 = peg$c55;
peg$currPos++;
} else {
s14 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c56); }
}
if (s14 !== peg$FAILED) {
s15 = peg$parse_();
if (s15 !== peg$FAILED) {
s16 = peg$currPos;
s17 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s18 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s18 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s18 !== peg$FAILED) {
while (s18 !== peg$FAILED) {
s17.push(s18);
if (peg$c8.test(input.charAt(peg$currPos))) {
s18 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s18 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s17 = peg$FAILED;
}
if (s17 !== peg$FAILED) {
s16 = input.substring(s16, peg$currPos);
} else {
s16 = s17;
}
if (s16 !== peg$FAILED) {
s17 = peg$parse_();
if (s17 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 44) {
s18 = peg$c55;
peg$currPos++;
} else {
s18 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c56); }
}
if (s18 !== peg$FAILED) {
s19 = peg$parse_();
if (s19 !== peg$FAILED) {
s20 = peg$currPos;
s21 = [];
if (peg$c8.test(input.charAt(peg$currPos))) {
s22 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s22 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s22 !== peg$FAILED) {
while (s22 !== peg$FAILED) {
s21.push(s22);
if (peg$c8.test(input.charAt(peg$currPos))) {
s22 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s22 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
}
} else {
s21 = peg$FAILED;
}
if (s21 !== peg$FAILED) {
s20 = input.substring(s20, peg$currPos);
} else {
s20 = s21;
}
if (s20 !== peg$FAILED) {
s21 = peg$parse_();
if (s21 !== peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 44) {
s22 = peg$c55;
peg$currPos++;
} else {