// Too Many Broken Hearts — Jason Donovan
// 120 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 106 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(120/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.

// bass · electric bass finger · "FINGERDBAS"
const bass = note(`<
  ~ A B C D A B C E F G F G F G H I J K L M L N O P Q R S T Q R S U F G F G F G H I J K L M L N O P Q R S T Q R S U Q R
  S T Q R S U F G F G F G H I J K L M L N O P Q R S T Q R S U Q R S T Q R S U Q R S T Q R S V ~
>`.pickRestart({
  A: "c2 ~ c2 ~ c2 ~ g1 ~ g1 ~ g1 ~ g1 ~ f1 ~", B: "f1 ~ f1 ~ f1 ~ f1 ~ a1 ~ g1!2 a1@2 g1@2",
  C: "c2 ~ c2 ~ c2 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~", D: "c2 ~ g1 ~ g1 ~ f1!2 g1 ~ f1!2 g1 ~ g1 ~",
  E: "c2 ~ c2 ~ c2 ~ f1!2 g1 ~ g1 ~ c2 ~ b1 ~", F: "a1 ~ a1 ~ a1 ~ a1 ~ g1 ~ g1 ~ g1 ~ g1 ~",
  G: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ c1 ~ c1 ~", H: "c2 ~ c2 ~ c2 ~ c2 ~ a#1 ~ a#1 ~ a#1 ~ a#1 ~",
  I: "a1 ~ a1 ~ a1 ~ f1!2 a1 ~ f1!2 a1 ~ f1 ~", J: "g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~",
  K: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~", L: "e1 ~ e1 ~ e1 ~ g1 ~ g1 ~ g1 ~ g1 ~ f1 ~",
  M: "f1 ~ f1 ~ f1 ~ a1 ~ a1 ~ a1 ~ g1 ~ g1!2", N: "f1 ~ f1 ~ f1 ~ f1 ~ g1 ~ f1!2 g1 ~ f1 g1",
  O: "c2 ~ c2 ~ c2 ~ a#1 ~ a#1 ~ a#1 ~ a#1 ~ a1 ~", P: "a1 ~ a1 ~ a1 ~ g1 ~ g1 ~ g1 ~ a1 ~ a1 ~",
  Q: "d2 ~ d2 ~ d2 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~", R: "g1 ~ g1 ~ g1 ~ b1 ~ b1 ~ a1 ~ a1 ~ a1 c#2",
  S: "d2 ~ d2 ~ d2 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~", T: "a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 c#2",
  U: "d2 ~ a1!2 d2 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~", V: "d2 ~ a1!2 d2 ~ g1 ~ g1 ~ g1 ~ g1 a1 ~ d2",
})).s("gm_electric_bass_finger").gain(0.4)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  A B@2 C@2 B@2 D@2 E F G@3 F H@2 I@2 J K L@2 M@2 N@2 O@2 N@2 P@2 Q@6 R@2 S@2 J K L@2 M@2 N@2 O@2 N@2 P@2 N@2 O@2 N@2
  P@2 T U V@2 T U R@2 S@2 J K L@2 M@2 N@2 O@2 N@2 P@2 N@2 O@2 N@2 P@2 N@2 O@2 N@2 W@3
>`.pickRestart({
  A: "~@12 g5@2 c6 [d6,e6]", // Dsus2
  B: "[[c4,e4,g4]@4 ~ f6 e6 ~@6 g5 a5 c6, g6@5 ~@2 c6@6 ~@3, f6 ~@7 [b3,d4,g4]@8 [c4,f4,a4]@12 [b3,d4,g4]@4]/2", // C G F G
  C: "[[c4,e4,g4]@6 [c4,f4,a4]@10 c6@2 d6@2 e6@2 d6@2 ~@2 g5@4 c6 [d6,e6], g5@3 ~, e6 ~@2 f6@4 ~ [c4,e4,g4]@3 [c4,d4,g4]@5]/2", // C F Dsus2 C Csus2
  D: "[[c4,e4,g4]@6 [c4,f4,a4]@10 c6@2 d6@2 e6@2 d6@4 c6@3 b5@3, g5, e6 ~@2 f6@4 ~ [c4,e4,g4]@3 [c4,d4,g4]@5]/2", // C F C Csus2
  E: "[e4,a4,c5] [d4,g4,b4], a5 ~@3", F: "[c4,f4,a4]",
  G: "[[e4,a4,c5]@4 ~@5 e6@2 a5@2 g5@2 ~ [e4,a4,c5]@4 [d4,g4,b4]@4, a5 ~ [d4,g4,b4]@2 [c4,e4,a4]@4 ~@4, ~@7 d6@2 ~@6 a5@2 ~@7]/3", // Am G Am
  H: "[[c4,e4,g4,e6]@4 [d4,f4,a#4]@4 ~ e6@2 a5@4 ~, ~@4 d6@5 ~@7, ~ [c4,e4,a4]]/2", // C A# Am
  I: "[[c4,e4,g4]@7 e6 g6@4 e6@2 ~@12 g5@2 c6@2 d6@2, g5@3 ~, ~ [b3,d4,g4] [c4,e4,a4]@2, ~@8 f6 ~@5 [c6,g6]@10 ~@8]/2", // C G Am C5
  J: "[c4,e4,g4,e6] [b3,d4,g4,g6], g5", K: "c7@14 b6 a6, [c4,f4,a4,c6]",
  L: "[[c4,e4,g4]@4 ~@2 e6 ~@6 e6 f6 g6, [c6,g6]@3 g5@4 ~, ~ [b3,d4,g4] [c4,e4,a4]@2, ~@7 c6@8 ~]/2", // C C5 G Am
  M: "[~ e6 f6 g6 ~ e6 f6 g6 [c4,f4,a4,a5]@4 [d4,g4,b4,g5,b5]@2 [c#4,e4,a4,a5,c#6]@2, [c4,e4,g4,g5,c6]@4 f5@8 a6 ~ a6 ~, ~ [d4,f4,a#4,a#5] ~@2]/2", // F G A C A#
  N: "[[d4,f#4,a4]@4 ~ g6 f#6 ~@6 a5 b5 d6, a5@3 ~, a6@5 ~@2 d6@6 ~@3, ~@2 [c#4,e4,a4]@2 [b3,d4,g4]@3 [c#4,e4,a4]]/2", // D A G A
  O: "[[d4,f#4,a4]@3 [d4,g4,b4]@5 d6 e6 f#6 e6 ~ a5@2 ~, a5@3 ~, f#6 ~@2 g6@4 ~ [d4,f#4,a4]@3 [d4,e4,a4]@5]/2", // D G D Dsus2
  P: "[[d4,f#4,a4]@3 [d4,g4,b4]@5 d6 e6 f#6 e6 ~ d6@3, a5@3 ~, [f#6,a6] ~@2 d6@4 ~ [d4,f#4,a4]@3 [d4,e4,a4]@5]/2", // D G F#m D Dsus2
  Q: "[[e4,a4,c5]@4 [d4,g4,b4]@4 [c4,f4,a4]@8 [e4,a4,c5]@4 ~@5 e6@2 a5@2 g5@2 ~ [e4,a4,c5]@4 [d4,g4,b4]@4 [c4,f4,a4]@8, a6@18 ~@5 d6@2 ~@6 a5@8 ~@9, a5 ~@7 a5 ~ [d4,g4,b4]@2 [c4,e4,a4]@4 a6@5 ~@3]/6", // Am G F Am G F G Am
  R: "[[c4,e4,g4,c6,e6]@4 d6@2 e6 g5 ~ [e5,e6] ~ [d5,d6] ~ [c5,c6] ~@2, ~ [d4,f4,a#4] [c4,e4,a4]@2, ~@7 g6@2 ~@7]/2", // C E D C A# Am
  S: "[[c4,e4,g4]@7 e6 g6@4 e6@2 ~@12 g5@2 c6@2 d6@2, g5@3 ~, e6@3 ~ [b3,d4,g4]@4 [c4,e4,a4]@8, ~@8 f6 ~@5 [c6,g6]@10 ~@8]/2", // C G Am C5
  T: "a5@6 b5 c6 a5@6 [b5,b6] [c6,c7], a6@7 ~, [e4,a4,c5] [d4,g4,b4]", // B C Am G
  U: "a5@2 c6@2 b5@2 b6 c7 b5@2 g5@2 e5@2 b6 c7, [c4,f4,a4], a6@3 c6 a6@3 g5", // F
  V: "[a5@2 a6!2 b5@2 c6@2 ~@2 a6!2 b5@2 c6@2 ~@2 a6!2 b5@2 c6@2 ~@2 a6!2 b5@2 c6@2, e5@6 ~ d5@2 e5@4 c6 ~@2, [e4,a4,c5] [d4,g4,b4] [c4,e4,a4]@2, ~@2 c6@2 g6 ~ a6 ~@3 c6@2 g6 ~ a6 ~@3 c6@2 g6 ~ a6 ~@5 g6 ~ a6 ~]/2", // Am G Am
  W: "[[d4,f#4,a4]@6 [d4,g4,b4]@10 d6@2 e6@2 f#6@2 [d4,e4,a4]@9 [d4,f#4,a4]@2 ~@15, a5 ~, [f#6,a6] ~@2 d6@4 ~ [d4,f#4,a4]@3 e6 ~@12]/3", // D G Dsus2 D F#m D
})).s("gm_string_ensemble_1").gain(0.25)

// other · vibraphone
const vibraphone = note(`<
  ~ A B C D A B E F G H I J ~ K L M ~@7 N O P Q R O P S T U H I J ~ K L M ~@7 N O P Q R O P S V O P Q R O P S V U H I J
  ~ K L M ~@7 N O P Q R O P S V O P Q R O P S V O P Q R O P S W ~
>`.pickRestart({
  A: "[c5,e5,g5] ~@15", B: "[c5,f5,a5] ~@15", C: "[e5,e6] ~@5 [f5,f6] ~@9",
  D: "[c5,c6] ~ [d5,d6] ~ [e5,e6] ~ [d5,d6] ~@3 [g4,g5] ~@5", E: "[g5,g6] ~@7 [c5,c6] ~@5 [c5,c6] ~",
  F: "[c5,c6] ~ [d5,d6] ~ [e5,e6] ~ [d5,d6] ~@3 [g4,g5] ~ [c5,c6] ~ [b4,b5] ~", G: "[a4,a5] ~@15",
  H: "~@8 [g3,g4] ~ [a3,a4] ~ [c4,c5] ~ [a3,a4] ~", I: "~@14 [d5,d6] ~",
  J: "~@2 [e5,e6] ~@3 [a4,a6] ~@3 [g4,g6] ~@3 [a4,a5] ~", K: "~@8 [g3,g4] ~ [a3,a4] ~ [c4,c5] ~ [d4,d5] ~",
  L: "[e4,e5] ~@7 d5 ~ e5 ~@5", M: "d5 ~ e5 ~@3 a4 ~@3 g4 ~@3 e4 ~", N: "~@10 [d5,a5] ~ [d5,b5] ~ [d5,a5,d6] ~",
  O: "[d5,f#5,a5] ~@15", P: "[d5,g5,b5] ~@15", Q: "[f#5,f#6] ~@5 [g5,g6] ~@9",
  R: "[d5,d6] ~ [e5,e6] ~ [f#5,f#6] ~ [e5,e6] ~@3 [a4,a5] ~@5", S: "[a5,a6] ~@7 [d5,d6] ~@5 [d5,d6] ~",
  T: "[d5,d6] ~ [e5,e6] ~ [f#5,f#6] ~ [e5,e6] ~@3 [a4,a5] ~ [d5,d6] ~@3", U: "[e4,e5] ~@15",
  V: "[d5,d6] ~ [e5,e6] ~ [f#5,f#6] ~ [e5,e6] ~@3 [d5,d6] ~ [d5,d6] ~@3", // D E F# E D
  W: "[d5,d6] ~ [e5,e6] ~ [f#5,f#6] ~ [e5,e6] ~@9", // D E F# E
})).s("gm_vibraphone").gain(0.45)

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

// chords · french horn · "FR.HORN"
const french_horn = note(`<
  ~ A B ~ C A D E F ~@3 G ~@2 H@2 ~@4 I J K L M N ~ O M P Q R ~@3 G ~@2 H@2 ~@4 I J K L M N ~ O M P Q S M N ~ O M P Q R
  ~@3 G ~@2 T U ~@4 I J K L M N ~ O M P Q S M N ~ O M P Q R M N ~ O M P Q V ~
>`.pickRestart({
  A: "[e4,g4,c5,c6] ~@5 [e4,g4,c5,c6]@6 [d4,g4,b4,b5]@2 [f4,a4,c5,c6] ~", B: "~@10 [g4,g5]!2 [a4,g5]@2 [c5,g5,c6] ~",
  C: "[c4,g4,c5]@2 [d4,g4,d5] ~@3 [d4,g4,d5]@2 ~@2 [g3,g4]@3 ~@3", D: "~@10 [g4,g5]!2 [a4,g5]@2 [g4,g5] ~",
  E: "[e4,g4,c5,e5] ~@5 [f4,a4,c5,f5]@3 ~ [f4,a4,c5,f5] ~@3 [c4,g4,c5] ~", // C F C5
  F: "[c4,g4,c5]@2 [d4,g4,d5] ~ [e4,g4,e5] ~ [d4,g4,d5]@2 ~@2 [e4,g4] ~ [e4,a4]!2 ~ [e4,a4]", // C5 G5 Em G5 Em A5
  G: "~@6 [a3,a4]@4 [g3,g4]@4 [a3,a4] ~", // A G A
  H: "[e6 ~@3 e6 ~@5 d6 ~@3 d6@4 e6 ~@3 a5@2 ~@2 g5@2 ~@2 e5@2, [g4,c5]@4 [f4,a#4]@3 [e4,a4]@8 ~]/2", // C5 A#5 A5
  I: "[g4,c5,e5] [g4,b4,d5]", J: "[e4,a4,c5]", K: "c6 ~ c6 ~@2 a#5 ~ a#5, [g4,c5,e5] [f4,a#4,d5]",
  L: "a5@2 ~@2 a5@2 ~@2 [g4,b4,d5]@2 a5 ~ b5 d6 ~@2, [f4,a4,c5]@4 ~@2 [a4,c#5,e5] ~", // G F A
  M: "[f#4,a4,d5,d6] ~@5 [f#4,a4,d5,d6]@6 [e4,a4,c#5,c#6]@2 [g4,b4,d5,d6] ~", // D A G
  N: "~@10 [a4,a5]!2 [b4,a5]@2 [d5,a5,d6] ~", O: "[d4,a4,d5]@2 [e4,a4,e5] ~@3 [e4,a4,e5]@2 ~@2 [a3,a4]@3 ~@3",
  P: "~@10 [a4,a5]!2 [b4,a5]@2 [a4,a5] ~", Q: "[f#4,a4,d5,f#5] ~@5 [g4,b4,d5,g5]@3 ~ [g4,b4,d5,g5] ~@3 [d4,a4,d5] ~",
  R: "[d4,a4,d5]@2 [e4,a4,e5] ~ [f#4,a4,f#5] ~ [e4,a4,e5]@2 ~@2 [f#4,a4] ~ [f#4,b4] [f#4,d5] ~@2", // D5 A5 F#m A5 F#m B5 D
  S: "[d4,a4,d5]@2 [e4,a4,e5] ~ [f#4,a4,f#5] ~ [e4,a4,e5]@2 ~@2 [f#4,a4] ~ [f#4,b4] [f#4,d5] ~ [f#4,b4]", // D5 A5 F#m A5 F#m B5 D B5
  T: "c6 ~@3 c6 ~@3 [f4,a#4] ~ [d4,d5]@2 [e4,e5]@2 [g4,g5]@2, [g4,c5] ~", U: "~ [e4,e5] ~ [a4,a5] ~ [g4,g5] ~ [e4,e5]",
  V: "[d4,a4,d5,d6]@2 [e4,a4,e5,e6] ~ [f#4,a4,f#5,f#6] ~ [e4,a4,e5,e6] ~@3 [f#4,a4,a5,a6] ~ [f#4,b4,b5,b6] [f#4,d5,d6,d7] ~ [d3,f#4,d5,d6,d7]", // D5 A5 F#m A5 F#m B5 D
})).s("gm_french_horn").gain(0.3)

// drums · kick
const kick = s("bd").struct("<~ [x!2]!103 [x ~@7 x ~@6 x] ~>").gain(0.5)

// drums · snare
const snare = s("sd").struct(`<
  A B@3 C B@11 D B@7 E B@3 C B@3 C B@7 D B@7 E B@3 C B@3 C B@3 C B@3 C B@7 D B@7 E B@3 C B@3 C B@3 C B@3 E B@3 C B@3 C ~
>`.pickRestart({
  A: "~@14 x!2", B: "~ x ~ x", C: "~@4 x ~@5 x ~ x!2 ~ x", D: "~@4 x ~@5 x ~ x!3 ~", E: "~@4 x ~@7 x ~ x!2",
})).gain(0.5)

// drums · clap
const clap = s("cp").struct(`<
  ~@25 A ~ A ~ A ~ A ~@17 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@9 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
  A ~@2
>`.pickRestart({
  A: "~@10 x!2 ~ x!2 ~",
})).gain(0.2)

// drums · low tom
const low_tom = s("lt").struct("<A ~@7 B ~@15 C ~@23 C ~@31 C ~@15 A ~@9>".pickRestart({
  A: "~@12 x!4", B: "~@15 x", C: "~@8 x!4 ~ x!2 ~",
})).gain(0.4)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B
  A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A C ~
>`.pickRestart({
  A: "x ~ x ~ x ~ x ~ x ~ x!3 ~ x!2", B: "x ~ x ~ x ~ x!3 ~ x ~ x ~ x!2", C: "x ~ x ~ x ~ x!3 ~ x ~ x!2 ~ x",
})).gain(0.3)

// drums · high tom
const high_tom = s("ht").struct("<A ~@7 B ~@15 C ~@23 C ~@31 C ~@15 A ~@9>".pickRestart({
  A: "~@2 x!4 ~@10", B: "~@5 x ~@2", C: "~ x!2 ~@5",
})).gain(0.4)

// drums · crash
const crash = s("cr").struct(`<
  ~ A ~@3 A ~@11 B ~@3 B ~@3 A ~@15 B ~@3 B ~@3 A ~@7 A ~@15 B ~@3 B ~@3 A ~@7 A ~@7 A ~@6 C ~
>`.pickRestart({
  A: "x", B: "~ x ~@2", C: "~@15 x",
})).gain(0.2)

// drums · tambourine
const tambourine = s("tb").struct("<~@25 [~ x ~ x]!8 ~@16 [~ x ~ x]!16 ~@16 [~ x ~ x]!23 [~ x ~@2] ~>").gain(0.2)

// drums · cabasa
const cabasa = s("cabasa:4").struct(`<
  ~ A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B
  A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A C ~
>`.pickRestart({
  A: "~@6 x ~@7 x!2", B: "~@6 x!2 ~@6 x ~", C: "~@6 x!2 ~@8",
})).gain(1.26)

stack(
  bass, string_ensemble_1, vibraphone, harpsichord, french_horn, kick, snare, clap, low_tom, hihat, high_tom, crash,
  tambourine, cabasa
)