{
   "description" : "Demonstration of score transcription with Pbinds.",
   "ancestor_list" : [],
   "author" : "Bruno Ruviaro",
   "name" : "Happy Birthday Pbind",
   "id" : "1-5gG",
   "is_private" : null,
   "code" : "// Happy Birthday with Pbind\r\n\r\n// Basic version\r\n// just melody\r\n(\r\nPbind(\r\n\t\\midinote, Pseq([\r\n\t\t72, 72, 74, 72, 77, 76,\r\n\t\t72, 72, 74, 72, 79, 77,\r\n\t\t72, 72, 84, 81, 77, 76, 74,\r\n\t\t82, 82, 81, 77, 79, 77\r\n\t]),\r\n\t\\dur, Pseq([\r\n\t\t3/4, 1/4, 1, 1, 1, 2,\r\n\t\t3/4, 1/4, 1, 1, 1, 2,\r\n\t\t3/4, 1/4, 1, 1, 1, 1, 2, // \"fermata\"\r\n\t\t2/3, 2/3, 1, 1, 4, 6 // triplets etc\r\n\t]),\r\n\t\\amp, 0.5,\r\n\t\\legato, 1\r\n).play;\r\n)\r\n\r\n\r\n// ===================\r\n// Fancy version\r\n// One Pbind for melody, another for harmony\r\n(\r\nPbind(\r\n\t\\midinote, Pseq([\r\n\t\t/* m1 */ 72, 72,\r\n\t\t/* m2 */ 74, 72, 77,\r\n\t\t/* m3 */ 76, 72, 72,\r\n\t\t/* m4 */ 74, 72, 79,\r\n\t\t/* m5 */ 77, 72, 72,\r\n\t\t/* m6 */ 84, 81, 77,\r\n\t\t/* m7 */ 76, 74, 82, 82,\r\n\t\t/* m8-9 */ 81, 77, 79,\r\n\t\t/* m10-11 */ 77\r\n\t]),\r\n\t\\dur, Pseq([\r\n\t\t/* m1 */ 3/4, 1/4,\r\n\t\t/* m2 */ 1, 1, 1,\r\n\t\t/* m3 */ 2, 3/4, 1/4,\r\n\t\t/* m4 */ 1, 1, 1,\r\n\t\t/* m5 */ 2, 3/4, 1/4,\r\n\t\t/* m6 */ 1, 1, 1,\r\n\t\t/* m7 */ 1, 2, /* <<\"fermata\" */ 2/3, 2/3,\r\n\t\t/* m8-9 */ 1, 1, 4,\r\n\t\t/* m10-11 */ 6 // last note\r\n\t]),\r\n\t\\amp, 0.4,\r\n\t\\legato, 1\r\n).play;\r\n\r\n// chords (bass clef)\r\nPbind(\r\n\t\\midinote, Pseq([\r\n\t\t/* m1 */ \\rest,\r\n\t\t/* m2 */ [45, 53, 60], [44, 53, 59],\r\n\t\t/* m3 */ [43, 53, 58],\r\n\t\t/* m4 */ [43, 53, 58], [48, 52, 58],\r\n\t\t/* m5 */ [53, 57, 60, 62],\r\n\t\t/* m6 */ [54, 57, 63], [51, 54, 60], [47, 51, 57, 61],\r\n\t\t/* m7 */ [46, 53, 57, 62], [46, 56, 61], [51, 55, 61],\r\n\t\t/* m8 */ [45, 55, 60], [50, 53, 60], [43, 53, 59],\r\n\t\t/* m9 */ [43, 53, 58],\r\n\t\t/* m10 */[37, 44, 49, 53, 60], [39, 46, 51, 55, 60],\r\n\t\t/* m11 */[39, 48, 53, 55, 57]\r\n\t\t]),\r\n\t\\dur, Pseq([\r\n\t\t/* m1 */ Rest(1), // one beat rest\r\n\t\t/* m2 */ 2, 1,\r\n\t\t/* m3 */ 3,\r\n\t\t/* m4 */ 2, 1,\r\n\t\t/* m5 */ 3,\r\n\t\t/* m6 */ 1, 1, 1,\r\n\t\t/* m7 */ 3, /*<<\"fermata\"*/ 2/3, 2/3,\r\n\t\t/* m8-9 */ 1, 1, 1.75, 2.25,\r\n\t\t/* m10 */ 1.5, 1.5,\r\n\t\t/* m11 */ 3\r\n\t]),\r\n\t\\amp, 0.3,\r\n\t\\legato, 0.9\r\n).play;\r\n\r\n// extra embellishments that could not go in the Pbind above\r\nPbind(\r\n\t\\midinote, Pseq([\r\n\t\t/* m1 */ \\rest,\r\n\t\t/* m2-6 */ \\rest, // five bars of rest\r\n\t\t/* m7 */ [67, 72], [65, 72], \\rest,\r\n\t\t/* m8-9 */ \\rest, \\rest, 64, 63, 62\r\n\t]),\r\n\t\\dur, Pseq([\r\n\t\t/* m1 */ Rest(1),\r\n\t\t/* m2-6 */ Rest(15), // five bars of rest (5*3)\r\n\t\t/* m7 */ 1, 2, /* <<\"fermata\" */ Rest(1),\r\n\t\t/* m8-9 */ Rest(2), Rest(1/3), 2/3, 0.75, 2.25\r\n\t]),\r\n\t\\amp, 0.3,\r\n\t\\legato, 0.9\r\n).play;\r\n)\r\n\r\n// score: https://drive.google.com/file/d/1Ng-Gbhpb09gRQp5WswwwPSjlCl4kSxbx/view?usp=sharing",
   "labels" : [
      "melody",
      "chords",
      "transcription"
   ]
}