// Never Weather-Beaten Saile More Willing Bent to Shore — Thomas Campion
// 108 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: Full arrangement: all 49 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(108/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: edit a riff to change every repeat.

// chords · harpsichord
const harpsichord = note(`<
  A B C D A B C D E F G H I J K L@2 D I J K L@2 D A B C D A B C D E F G H I J K L@2 D I J K L@2 M@2
>`.pickRestart({
  A: "[b3,d4] [a3,d4]", B: "g4@2 a4@2 [b3,d4,g4]@3 [c4,e4], c4 ~", C: "d4 c4 b3 c4 [a3,d4]@4, a3 ~@3", D: "[b3,d4]",
  E: "[b3,d4]@2 [a3,d4]@2 g3 a3 b3 c#4", F: "~@2 a3 b3 [c#4,e4]@2 [a3,d4]@2, d4 ~",
  G: "d4 g4 [a3,f#4] [b3,d4,g4], b3 ~", H: "[d4,a4] [b3,d4] [a3,d4]@2", I: "[c4,e4]!2 [a3,d4]@2",
  J: "d4 [b3,d4] [a3,d4]@2", K: "[b3,d4,g4] [e4,g4] [e4,a4] [a3,d4]",
  L: "[d4 [b3,d4] c4@2 c4 [b3,d4] [a3,d4]@2, ~@2 e4@3 ~@3]/2", M: "[[b3,d4]@29 ~@3]/2",
})).s("gm_harpsichord").gain(0.41).pan(0.6)

// chords · cello · "The First Book"
const cello = note(`<
  A B C D A B C D E F G H I J K L M D I J K L M D A B C D A B C D E F G H I J K L M D I J K L M N@2
>`.pickRestart({
  A: "g3 [d3,f#3]", B: "e3@2 f#3@2 g3@3 c3", C: "[d3,f#3] [e3,g3] g3 f#3, ~ d3", D: "[g2,g3]", E: "g3 f#3 e3@2",
  F: "f#3 g3 ~@2 a2@2 [d3,f#3]@2, d3 ~", G: "g3 e3 d3 g3", H: "f#3 g3 [d3,f#3]@2", I: "c3@2 a2@2 d3@3 c3, ~ f#3",
  J: "[b2,g3] [g2,g3] [d3,f#3]@2", K: "g3@2 e3@2 a2@2 d3 c3", L: "b2 a2 g2@2 c3@3 d3, g3@2 g3@5 ~",
  M: "e3 f#3 g3@2 g3@2 f#3@2, ~ d3", N: "[[g2,g3]@29 ~@3]/2",
})).s("gm_cello").gain(0.41).pan(1)

stack(harpsichord, cello)