// Mona Lisa — Nat King Cole
// 180.8 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 99 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
// note: The whole transcription plays 13 ms behind the beat; the grid follows it, so its parts stay together.
setcpm(180.8/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order, A@4 for four bars: edit a riff to change every repeat.

// chords · piano
const piano = note(`<
  ~@12 A B@5 C D E D@2 F@2 G H B I B@4 J K L M N@2 B O P Q B R L S B@2 T Q B U B@5 C D F D@2 T@3 V B I B@4 J K W L N X B
  O P Q B Y L@2 B J P Z B AA P@2 B AB@3
>`.pickRestart({
  A: "g2 ~ g2@2 f2 ~ f2 ~ e2@2 e2 ~ d2 ~ d2 ~",
  B: "c3 ~ c3 ~ [g3,c4,e4] ~ [g3,c4,e4] ~ g2 ~ g2 ~ [g3,c4,e4] ~ [g3,c4,e4] ~", // C
  C: "c3 ~ c3 ~ [g3,c4,e4] ~ [g3,c4,e4] ~ c3 ~ c3 ~ [g3,c4,e4] ~ [g3,c4,e4] ~", // C
  D: "d3 ~ d3 ~ [a3,d4,f4] ~ [a3,d4,f4] ~ a2 ~ a2 ~ [a3,d4,f4] ~ [a3,d4,f4] ~", // Dm
  E: "g2 ~ g2 ~ [b3,d4,g4] ~ [b3,d4,g4] ~ b2 ~ b2 ~ [b3,d4,g4] ~ [b3,d4,g4] ~", // G
  F: "g2 ~ g2 ~ [b3,d4,g4] ~ [b3,d4,g4] ~ d3 ~ d3 ~ [b3,d4,g4] ~ [b3,d4,g4] ~", // G
  G: "g2 ~ g2 ~ [b3,d4,g4] ~ [b3,d4,g4] ~ d3 ~ d3 ~ [b3,d4] ~ [b3,d4] ~, ~@6 g4 ~", // G Bm
  H: "g2 ~ g2 ~ [b3,d4,g4] ~ [b3,d4,g4] ~ a2 ~ a2 ~ [b2,b3,d4,g4] ~ [b2,b3,d4,g4] ~", // G
  I: "c3 ~ c3 ~ [g2,g3,c4,e4] ~ [g2,g3,c4,e4] ~ a2 ~ a2 ~ [b2,g3,c4,e4] ~ [b2,g3,c4,e4] ~", // C Cmaj7
  J: "c3 ~ c3 ~ [g3,c4,e4] ~ [g3,c4,e4] ~ b2 ~ b2 ~ [g3,c4,e4] ~ [g3,c4,e4] ~", // C
  K: "a2 ~ a2 ~ [g3,a#3,c4,e4] ~ [g3,a#3,c4,e4] ~ g2 ~ g2 ~ [g3,a#3,c4,e4] ~ [g3,a#3,c4,e4] ~", // C7
  L: "f2 ~ f2 ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c3 ~ c3 ~ [a3,c4,f4] ~ [a3,c4,f4] ~", // F
  M: "f3 ~ f3 ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c3 ~ c3 ~ [a3,c4,f4] ~ [a3,c4,f4] ~", // F
  N: "f3 ~ f3 ~ [g#3,c4,f4] ~ [g#3,c4,f4] ~ c3 ~ c3 ~ [g#3,c4,f4] ~ [g#3,c4,f4] ~", // Fm
  O: "c3 ~ c3 ~ [g3,c4,e4] ~ [g3,c4,e4] ~ b2 ~ b2 ~ [a2,g3,c4,e4] ~ [a2,g3,c4,e4] ~", // C Am7
  P: "g2 ~ g2 ~ [g3,b3,d4,f4] ~ [g3,b3,d4,f4] ~ d3 ~ d3 ~ [g3,b3,d4,f4] ~ [g3,b3,d4,f4] ~", // G7
  Q: "g2 ~ g2 ~ [g3,b3,d4,f4] ~ [g3,b3,d4,f4] ~ a2 ~ a2 ~ [g3,b3,d4,f4] ~ [g3,b3,d4,f4] ~", // G7
  R: "c3 ~ c3 ~ [g3,a#3,c4,e4] ~ [g3,a#3,c4,e4] ~ a2 ~ a2 ~ [g2,g3,a#3,c4,e4] ~ [g2,g3,a#3,c4,e4] ~", // C7
  S: "f3 ~ f3 ~ [a3,c4,f4] ~ [a3,c4,f4] ~ e3 ~ e3 ~ [a3,c4,f4] ~ [a3,c4,f4] ~", // F
  T: "g2 ~ g2 ~ [g3,b3,d4] ~ [g3,b3,d4] ~ d3 ~ d3 ~ [g3,b3,d4] ~ [g3,b3,d4] ~", // G
  U: "c3 ~ c3 ~ [g2,g3,c4,e4] ~ [g2,g3,c4,e4] ~ a2 ~ a2 ~ [b2,g3,c4,e4] ~ [b2,c4,e4] ~", // C Cmaj7
  V: "g2 ~ g2 ~ [g3,b3,d4] ~ [g3,b3,d4] ~ a2 ~ a2 ~ [b2,g3,b3,d4,f4] ~ [b2,g3,b3,d4,f4] ~", // G G7
  W: "f2 ~ f2 ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c3 ~ c3 ~ [a3,c4,f4] ~ c4 ~", // F
  X: "f2 ~ f2 ~ [g#3,c4,f4] ~ [g#3,c4,f4] ~ g#2 ~ g#2 ~ [g#3,c4,f4] ~ [g#3,c4,f4] ~", // Fm
  Y: "c3 ~ c3 ~ [g3,a#3,c4,e4] ~ [g3,c4,e4] ~ a2 ~ a2 ~ [g3,a#3,c4,e4] ~ [g3,a#3,c4,e4] ~", // C7 C C7
  Z: "g2 ~ g2 ~ [g3,b3,d4] ~ [g3,b3,d4] ~ d3 ~ d3 ~ [g3,b3,d4,f4] ~ [g3,b3,d4,f4] ~, ~@2 f4 ~@5", // G G7
  AA: "c3 ~ c3 ~ [g3,c4,d4,e4] ~ [g3,c4,e4] ~ b2 ~ b2 ~ [a2,g3,c4,e4] ~ [a2,g3,c4,e4] ~", // C Am7
  AB: "[[c3,g3,c4,e4] ~@3 [f3,g3,b3] ~@3 [g3,c4,e4]@36 ~@4]/3", // C G7 C
})).s("gm_piano").gain(0.12).pan(0.2)

// bass · electric guitar jazz
const bass = note(`<
  ~@12 A B@5 C D E D@2 F@3 G H I B@4 J K L M L N B O F P B Q L R B S F P H I B@5 T D F D@2 F@3 U H I B@4 J K L@3 V B W F
  P B Q L X B W F Y B W F Y B Z@3
>`.pickRestart({
  A: "g2!2 f2!2 e2!2 d2!2", B: "c2@4 ~@4 g1@5 ~@3", C: "c2@5 ~@3 c2@4 c#2@4", D: "d2@4 ~@4 a1@5 ~@3", E: "g1 ~ b1 c#2",
  F: "g1 ~ d2 ~", G: "g1@5 ~ g1 ~ a1@4 b1@4", H: "c2@4 ~@4 g1@7 ~", I: "c2 ~ g1@2 a1@2 b1@2", J: "c2@5 ~@3 b1@5 ~@3",
  K: "a1@4 ~@4 g1@5 ~@3", L: "f1 ~ c2 ~", M: "f2@5 ~@3 c2@4 a1@4", N: "f1@4 ~@2 f1 ~ g1@4 a1@4",
  O: "c2 ~ c2@2 b1@2 a1@2", P: "g1 ~ a1 b1", Q: "c2@4 ~@2 c2 ~ a1@4 g1@4", R: "f2@5 ~@3 e2@4 d2@4", S: "c2 ~ g1 c2",
  T: "c2@4 ~@2 c2 ~ c2@3 ~ c#2@4", U: "g1 ~ g1@2 a1@2 b1@2", V: "f1@4 ~@2 f1 ~ g#1@3 ~ a1@3 ~", W: "c2 ~ b1 a1",
  X: "f1@5 ~@3 c2@4 f1@4", Y: "g1 ~ d2 g1", Z: "[c2 ~ g1@2 c2@18 ~@2]/3",
})).s("gm_electric_guitar_jazz").gain(0.37)

// chords · string ensemble 2
const string_ensemble_2 = note(`<
  ~@13 A@6 B C D@2 E@4 F@7 G H@2 I@2 J@2 K@2 L@2 H@2 J@2 K@2 M@8 B C D@2 E@4 F@7 G H@2 I@2 J@2 K@2 N@2 H@2 J@2 K@2 O@8
>`.pickRestart({
  A: "[g3,c4,e4]/6", B: "[a3,d4,f4]", C: "[f3,g3,b3,d4]", D: "[a3,d4,f4]/2", E: "[f3,g3,b3,d4]/4", F: "[g3,c4,e4]/7",
  G: "[g3,a#3,c4,e4]", H: "[a3,c4,f4]/2", I: "[g#3,c4,f4]/2", J: "[g3,c4,e4]/2", K: "[f3,g3,b3,d4]/2",
  L: "[[g3,c4,e4]@3 [g3,a#3,c4,e4]]/2", M: "[g3,c4,e4]/8", N: "[~ a#3, [g3,c4,e4]]/2",
  O: "[[g3,c4,e4]@31 [f3,g3,b3,d4]@32 [g3,c4,e4]@18 ~@2 [g3,b3,d4]@2 ~@2 [g3,c4,e4]@36 ~@5]/8", // C G7 C G C
})).s("gm_string_ensemble_2").gain(0.08)

// chords · alto sax
const alto_sax = note(`<
  ~@15 A ~@3 B ~@3 C ~@3 D ~@3 D ~@3 E ~@3 F ~ B ~ F ~@3 A ~@4 G H I J K L M N O P Q R S T U V ~@3 D ~@3 E ~@3 F ~ B ~ F
  ~@3 A ~@11
>`.pickRestart({
  A: "~@2 [e4,g4] [f4,a4] [e4,g4]@2 [c4,e4] [g3,c4]", B: "~@2 [f4,a4] [g4,b4] [f4,a4]@2 [e4,g4] [d4,f4]",
  C: "~ [b3,e4] [f4,a4] [g4,b4] [f4,a4]@2 [e4,g4] [d4,f4]", D: "~ [c4,e4] [e4,g4] [f4,a4] [e4,g4]@2 [c4,e4] [g3,c4]",
  E: "~ [c4,f4] [f4,a4] [f4,a#4] [f4,a4]@2 [c4,f4] [a3,c4]", F: "~@4 [c4,e4] [d4,f4] [d#4,f#4] [e4,g4]",
  G: "~ g4@2 ~ g4 ~ f#4 ~", H: "a4@3 ~ g4@2 ~@2 g4@2 f#4@2 ~@2 a4 ~", I: "~@2 g4@5 ~ e4@2 ~@2 c4@2 ~@2",
  J: "a3@5 ~ g3@10", K: "~@2 c5@5 ~ c5@2 ~@2 b4@2 ~@2", L: "b4@2 c5 b4 a4@2 ~@2 a4@4 g4@2 g4@2",
  M: "~@2 e4@5 ~ f4@3 ~ g4@2 ~@2", N: "d4", O: "~ a4@2 ~ a4 ~ g#4 ~", P: "b4 ~ a4 ~ a4 g#4 ~ b4",
  Q: "~@2 a4@5 ~ f4@3 ~ d4@2 ~@2", R: "c4@5 ~ b3@10", S: "~@2 g3@5 ~ g3@2 ~@2 a3@4", T: "b3@4 c4@3 ~ d4@2 e4@3 ~ f4@2",
  U: "~@2 a4@6 g4@2 a4 g4 f4@2 ~@2", V: "e4",
})).s("gm_alto_sax").gain(0.17).pan(0.4)

// other · alto sax
const alto_sax_2 = note("<A@2 B C@2 D@2 E F G@4 ~@86>".pickRestart({
  A: "[~@15 e3@4 ~ f3@3 g3@3 ~ a3@4 ~]/2", B: "a3@11 ~ a3@4", C: "[b3@3 ~ c4@4 c4@11 b3@4 ~ a3@3 ~ a3 b3 a3 ~]/2",
  D: "[g3@21 ~@11]/2", E: "g3@4 a3@3 ~ g3@3 f4@3 ~@2", F: "g4@12 ~ e4@3",
  G: "[~ d4@3 ~ f4@4 ~ g4@10 ~ e4@3 ~ d4@2 ~ c4@24 ~@12]/4",
})).s("gm_alto_sax").gain(0.35)

// other · brass section
const brass_section = note(`<
  ~@15 A ~@3 B ~@3 C ~@3 D ~@3 D ~@3 E ~@3 F ~ B ~ F ~@3 A ~@4 G H I J K L M N O P Q R S T U V ~@3 D ~@3 E ~@3 F ~ B ~ F
  ~@3 A ~@11
>`.pickRestart({
  A: "~@2 g4 a4 g4@2 e4 c4", B: "~@2 a4 b4 a4@2 g4 f4", C: "~ e4 a4 b4 a4@2 g4 f4", D: "~ e4 g4 a4 g4@2 e4 c4",
  E: "~ f4 a4 a#4 a4@2 f4 c4", F: "~@4 e4 f4 f#4 g4", G: "~ e4@2 ~ e4 ~ e4 ~", H: "e4@3 ~ e4@2 ~@2 e4@2 e4@2 ~@2 e4 ~",
  I: "~@2 e4@5 ~ c4@2 ~@2 a3@2 ~@2", J: "e3@5 ~ e3@10", K: "~@2 g4@5 ~ g4@2 ~@2 g4@2 ~@2", L: "g4 ~ e4 ~ e4@2 e4!2",
  M: "~@2 c4@5 ~ d4@3 ~ e4@2 ~@2", N: "a3", O: "~ d4@2 ~ d4 ~ d4 ~", P: "f4 ~ f4 ~ f4!2 ~ f4",
  Q: "~@2 f4@5 ~ d4@3 ~ a3@2 ~@2", R: "g3@5 ~ g3@10", S: "~@2 d3@5 ~ d3@2 ~@2 d3@4", T: "g3@4 g3@3 ~ b3@2 b3@3 ~ d4@2",
  U: "~ d4@3 d4 ~ d4 ~", V: "c4",
})).s("gm_brass_section").gain(0.08).pan(0.7)

// chords · epiano1
const epiano1 = note("<A@3 B@7 C@2 ~@87>".pickRestart({
  A: "[~@4 f4@22 ~ [f2,a3,c4,f4]@21, ~ [c2,g3]@12 ~@11, ~ a#3@11 ~@12, ~ [c3,d4]@8 ~@7]/3", // F C5 Csus2
  B: "[~@4 [a3,d#4,f#4]@22 ~@27 [d4,g4]@23 ~ [a3,d4,f4]@12 [f3,b3]@10 ~@3 f4@10, ~@4 [f#2,c4]@24 g2@46 ~@3 g2@35, ~@29 c4@48 ~@12 e4@12 ~@11, ~@29 [g3,e4]@46 ~@26 [a3,c4,d4]@10 ~]/7", // D#dim G5 Dm Fdim F#dim C D7
  C: "[~ b3@5 ~ [c3,e3,g3,c4]@9, ~ [f3,e4]@10 ~@21]/2", // C Fmaj7
})).s("gm_epiano1").gain(0.17).pan(0.4)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~@13 A@3 B A@2 C D C@2 D@4 A E A@5 F G@2 H@2 A I D@2 A J G@2 A@2 D@2 A I A@6 C D C@2 D@3 K A E A@6 G@2 H@2 A E D@2 A I
  G@2 A@2 D@2 A@2 D@2 B L@3
>`.pickRestart({
  A: "[e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~@3 [e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~@3", // C
  B: "[e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~@3 [e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~ [e3,g3,c4,e4]@2", // C
  C: "[d3,a3,d4,f4]@4 [d3,a3,d4,f4] ~@3 [d3,a3,d4,f4]@4 [d3,a3,d4,f4] ~@3", // Dm
  D: "[d3,g3,b3,f4,g4]@4 [d3,g3,b3,f4,g4] ~@3 [d3,g3,b3,f4,g4]@4 [d3,g3,b3,f4,g4] ~@3", // G7
  E: "[e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~ [e3,g3,c4,e4]@4 [e3,g3,c4,e4]@2 [e3,g3,c4,e4] ~@3", // C
  F: "[e3,g3,a#3,c4,e4]@4 [e3,g3,a#3,c4,e4] ~ [e3,g3,a#3,c4,e4]@4 [e3,g3,a#3,c4,e4]@2 [e3,g3,a#3,c4,e4] ~@3", // C7
  G: "[f3,a3,c4,f4]@4 [f3,a3,c4,f4] ~@3 [f3,a3,c4,f4]@4 [f3,a3,c4,f4] ~@3", // F
  H: "[f3,g#3,c4,f4]@4 [f3,g#3,c4,f4] ~@3 [f3,g#3,c4,f4]@4 [f3,g#3,c4,f4] ~@3", // Fm
  I: "[e3,g3,c4,e4]@4 [e3,g3,c4,e4] ~ [e3,g3,c4,e4]@6 [e3,g3,c4,e4] ~@3", // C
  J: "[e3,g3,a#3,c4,e4]@4 [e3,g3,a#3,c4,e4] ~ [e3,g3,a#3,c4,e4]@6 [e3,g3,a#3,c4,e4] ~@3", // C7
  K: "[d3,g3,b3,f4,g4]@4 [d3,g3,b3,f4,g4] ~ [d3,g3,b3,f4,g4]@4 [d3,g3,b3,f4,g4]@2 [d3,g3,b3,f4,g4] ~@3", // G7
  L: "[[e3,g3,c4,e4] ~ [d3,g3,b3,f4,g4]@2 [e3,g3,c4,e4]@18 ~@2]/3", // C G7 C
})).s("gm_acoustic_guitar_steel").gain(0.07).pan(0.8)

// drums · kick
const kick = s("bd").struct("<~@13 [x!2]!84 ~@2>").gain(0.45)

// drums · snare
const snare = s("sd").struct("<~@12 A B@15 C B@7 C B@7 C B@7 C B@15 C B@7 C B@7 C B@7 C B@3 D ~@2>".pickRestart({
  A: "~@5 x!3", B: "~ x ~ x", C: "~@2 x ~@3 x!2", D: "~ x!2 ~@5",
})).gain(0.4)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@13 A B C D B C D B C D B C D B C E A B C D B C D E A B C D B C D E A B C D B C D E A B C D B C D B C D B C D B C E A
  B C D B C D E A B C D B C D E A B C D B C D E A D@2 ~@3
>`.pickRestart({
  A: "~ x!2 ~ x!4", B: "x!3 ~ x!4", C: "x!8", D: "x!5 ~ x!2", E: "x!3 ~ x!3 ~",
})).gain(0.15)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~@13 A@2 ~ B A ~ B A ~ B A ~ B A ~ A@3 ~ B A ~ B A@3 ~ B A ~ B A@3 ~ B A ~ B A@3 ~ B A ~ B A ~ B A ~ B A ~ A@3 ~ B A ~
  B A@3 ~ B A ~ B A@3 ~ B A ~ B A@2 B@2 ~@3
>`.pickRestart({
  A: "~@3 x ~@4", B: "~@5 x ~@2",
})).gain(0.1)

// drums · open hat
const open_hat = s("oh").struct("<~@28 A ~@7 A ~@7 A ~@7 A ~@15 A ~@7 A ~@7 A ~@7 A ~@3 B ~@2>".pickRestart({
  A: "~@7 x", B: "x",
})).gain(0.25)

// drums · crash
const crash = s("cr").struct("<~@13 A ~@15 A ~@7 A ~@7 A ~@7 A ~@15 A ~@7 A ~@7 A ~@7 A ~@2 B ~@2>".pickRestart({
  A: "x", B: "~ x",
})).gain(0.25)

stack(
  piano, bass, string_ensemble_2, alto_sax, alto_sax_2, brass_section, epiano1, acoustic_guitar_steel, kick, snare,
  hihat, hihat_soft, open_hat, crash
)