// Promises — The Cranberries
// 127 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: metre changes (2/4 at bar 1, 4/4 at bar 2) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: Full arrangement: all 173 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(127/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.

// other · pad poly · "Dolores"
const pad_poly = note(`<
  ~@28 A@2 B@2 C@2 D E A@2 F@2 G@2 D E H I@2 J@2 K L@2 M@2 N@2 O@4 M@2 N@2 O@4 ~@8 P@2 Q@2 R@2 S@2 T@2 Q@2 U@2 D E H I@2
  V@2 W X Y M@2 N@2 O@4 M@2 N@2 O@4 Z AA AB AA AB AC AD ~ M@2 N@2 O@4 M@2 N@2 O@4 AE AF AE AF AG AH AI AC ~@25
>`.pickRestart({
  A: "[~@6 a4@2 b4@2 a4@2 b4@2 c5@4 b4@3 ~ a4@4 b4@2 ~@2 a4@2]/2",
  B: "[d5@2 d5@2 b4@2 d5@4 d5@2 e5@2 a4@4 b4@3 ~@9 d5@2]/2",
  C: "[f#5@2 f#5@2 f#5@2 e5@4 e5@2 e5@2 g5@4 f#5@3 ~ d5@4 d5@2 d5@2 ~@2]/2", D: "e5!2 ~ d5 c5 ~ b4 a4",
  E: "~ c5 b4 ~@5", F: "[d5@2 d5@2 b4@2 d5@2 d5@2 d5@2 e5@2 a4@4 b4@3 ~@11]/2",
  G: "[~@4 f#5@2 f#5@4 e5@2 e5@2 g5@4 f#5@3 ~ d5@4 d5@2 ~@4]/2", H: "e5@6 ~@2 e5@3 ~ g5@3 ~",
  I: "[b5@3 ~ [g5,b5] [f#5,a5] [g5,b5] [g5,b5]@2 [d5,f#5]@6 ~]/2", // G F#m G D
  J: "[~@4 [g5,b5]@3 ~ [g5,b5]@2 [f#5,a5]@2 [g5,b5]@2 [g5,b5]@4 [d5,f#5]@13 ~]/2", K: "e5@3 ~ g5@3 ~",
  L: "[a5@2 g5 e5@8 ~@5]/2", M: "[e5@3 ~ b5@2 a5@4 e5@3 ~ g5@4 a5@3 ~ f#5@5 ~ f#5@2 g5@2]/2",
  N: "[a5@3 ~ g5@2 f#5@4 f#5@2 g5@2 f#5@5 ~@9 f#5@2 g5@2]/2",
  O: "[a5@3 ~ g5@2 f#5@4 e5@3 ~ g5@4 f#5@3 ~ e5@4 e5@2 f#5@2 e5@7 ~ g5@7 ~ b5@4 b5@2 b5@2 b5@2 b5@2 b5@2 a5@2 g5@2]/4",
  P: "[b4@2 b4@2 b4@2 a4@2 b4@2 b4@2 b4@2 c5@4 b4@3 ~@11]/2",
  Q: "[d5@2 d5@2 d5@2 b4@2 d5@2 d5@2 e5@2 a4@4 b4@3 ~@11]/2",
  R: "[f#5@2 f#5@2 f#5@2 e5@2 e5@2 e5@2 e5@2 g5@4 f#5@3 ~ e5@4 d5@3 ~@3]/2", S: "[e5!2 ~ d5 c5 ~ b4 a4@2 ~@7]/2",
  T: "[b4@2 b4@2 b4@2 a4@2 b4@3 ~ b4@2 c5@4 b4@3 ~@11]/2",
  U: "[f#5@3 ~ f#5@2 e5@4 e5@3 ~ g5@5 ~ f#5@2 d5@4 d5@3 ~ g4@2]/2",
  V: "[~@4 [g5,b5]@3 ~ [g5,b5]@2 [f#5,a5]@2 [g5,b5]@2 [g5,b5]@4 [d5,f#5]@8 ~@6]/2", W: "e5@3 ~ g5@2 ~@2",
  X: "a5@2 g5 e5@4 ~", Y: "~@4 g5 ~ a5 ~", Z: "e5@15 ~", AA: "~ b5!5 a5 g5", AB: "f#5@13 ~@3", AC: "~ c6!5 b5 a5",
  AD: "e5@13 ~@3", AE: "e5 f#5 ~ e5 f#5 ~ e5 f#5", AF: "~@2 e5@2 g5@2 ~@2 e5@3 ~ g5@3 ~", AG: "g5 e5 ~ g5 e5 ~ g5 e5",
  AH: "~@2 g5@2 e5@2 ~@2 g5@3 ~ e5@3 ~", AI: "e5 f#5 ~ e5 f#5 ~@3",
})).s("gm_pad_poly").gain(0.48)

// chords · acoustic guitar steel · "Guitare"
const acoustic_guitar_steel = note("<A@5 B@4 C@3 D@8 ~@153>".pickRestart({
  A: "[~@9 [e4,b4]@8 ~@2 b4@8 ~@2 b4@8 ~ [b3,f#4,b4]@8 ~@2 [f#4,a4]@8 ~@2 a4@8 ~@2 a4@9 ~@3, ~@7 e3@9 ~ d3@9 ~ [e3,g3]@9 ~ [d3,f#3]@9 d3@9 ~ d3@9 ~ [d3,f#3]@9 ~@5, ~@8 [g3,b3]@9 ~ [f#3,b3,f#4]@9 ~ [b3,e4]@9 ~@10 [f#3,b3]@9 ~ [f#3,a3,f#4]@9 ~ [b3,f#4]@9 ~@4]/5", // E5 B5 F#m Em D G B5 E5 …
  B: "[~@7 [f#4,a4]@8 ~@2 [f#4,a4]@8 ~@2 a4@8 ~ [d4,f#4,a4]@9 ~ [e4,g4]@8 ~@2 [e4,g4]@8, ~@6 [d3,f#3,a3]@9 f#3@9 ~ [d3,f#3]@9 ~@11 [e3,g3,c4]@9 e3@9 ~, ~@16 [a3,d4]@9 ~ [a3,f#4]@9 [f#3,a3]@9 ~@11 [a3,c4]@9]/4", // F#m D Em D C D5 D F#m …
  C: "[~@2 g4@18 ~ [b3,e4,b4]@8 ~@2 [f#4,b4]@8 ~@2 b4@7, e3@18 ~@2 [e3,g3]@9 d3@9 ~ e3@9, ~ [g3,c4,e4]@18 ~@11 [f#3,b3]@9 ~ [g3,b3,e4]@8]/3", // E5 B5 Em C B5 Em
  D: "[~@3 b4@8 ~ [b3,f#4,a4]@9 ~ [f#4,a4]@8 ~@2 [f#4,a4]@18 ~ [a3,f#4,a4]@9 ~ [f#4,a4]@8 ~@2 [f#4,a4]@8 ~@2 a4@8 ~@2 g4@37, ~ [d3,f#3]@9 ~ [d3,f#3]@9 ~ [d3,f#3,a3]@9 d3@18 ~@2 [d3,f#3]@9 ~@10 d3@9 ~@2 [a3,d4,f#4]@9 ~ [c4,e4]@38, ~@2 [b3,f#4]@9 ~@20 [f#3,b3]@18 ~@11 [f#3,a3,d4]@9 ~ [f#3,a3]@9 f#3@9 ~ [e3,g3]@38 ~]/8", // B7 F#m D F#m D C B5 D …
})).s("gm_acoustic_guitar_steel").gain(0.32)

// other · pad new age · "Crystal"
const pad_new_age = note("<~@22 A@2 B@2 ~@4 A@2 B@2 ~@4 A@2 B@2 ~@36 A@2 B@2 ~@4 A@2 B@2 ~@83>".pickRestart({
  A: "[[b3,b4] [f#4,f#5] [d4,d5] [b3,b4] [f#4,f#5] [d4,d5] [b3,b4] [f#4,f#5]@4 ~@5]/2", // B F# D B F# D B F#
  B: "[[a3,a4]@2 [f#4,f#5]@2 [d4,d5]@2 [a3,a4]@2 [f#4,f#5]@2 [d4,d5]@2 [a3,a4]@2 [g4,g5]@4 [f#4,f#5]@3 ~ [e4,e5]@8 ~@2]/2", // A F# D A F# D A G …
})).s("gm_pad_new_age").gain(0.29)

// chords · overdriven guitar · "Distorsion"
const overdriven_guitar = note(`<
  ~@20 A B C D E F G H A B C D E F G H A B C D E F G H A B C D E F G H I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 A
  B C D E F G H A B C D E F G H A B C D E F G H I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2
  K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 I@2 J@2 K@2 L@2 M@8 ~
>`.pickRestart({
  A: "[e3,g3,b3,e4]!2 ~ [e3,g3,b3,e4]!3 ~ [e3,g3,b3,e4]", B: "[e3,g3,b3,e4]!2 ~ [e3,g3,b3,e4]!3 ~@2",
  C: "[d3,f#3,b3,d4]!2 ~ [d3,f#3,b3,d4]!3 ~ [d3,f#3,b3,d4]", D: "[d3,f#3,b3,d4]!2 ~ [d3,f#3,b3,d4]!3 ~@2",
  E: "[d3,f#3,a3,d4]!2 ~ [d3,f#3,a3,d4]!3 ~ [d3,f#3,a3,d4]", F: "[d3,f#3,a3,d4]!2 ~ [d3,f#3,a3,d4]!3 ~@2",
  G: "[c3,e3,g3,c4]!2 ~ [c3,e3,g3,c4]!2 ~ [c3,e3,g3,c4]!2", H: "~ [c3,e3,g3,c4]!2 ~ [c3,e3,g3,c4] ~ [c3,e3,g3,c4] ~",
  I: "[e3,g3,b3,e4]!8", J: "[d3,f#3,b3,d4]!8", K: "[d3,f#3,a3,d4]!8",
  L: "[[c3,e3,g3,c4] [c3,e3,g3,c4]@2 [c3,e3,g3,c4] [c3,e3,g3,c4]@2 [c3,e3,g3,c4] [c3,e3,g3,c4]@2 [c3,e3,g3,c4] [c3,e3,g3,c4]@2 [c3,e3,g3,c4]!4]/2", // C
  M: "[~@64 b5@61 ~@3, [b2,e3,b3]@125 ~@3]/8", // E5
})).s("gm_overdriven_guitar").gain(0.29)

// bass · electric bass finger · "Basse"
const bass = note(`<
  A B@6 C@2 D@3 E@8 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 K@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G
  H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2 I@2 J@2 F G H@2
  I@2 J@2 F G H@2 I@2 J@2 L@2 M@2 N@2 O@2 F G H@2 I@2 O@2 F G H@2 I@2 J@2 P@2 Q@4 R@2 ~
>`.pickRestart({
  A: "~@7 e2@9", B: "[~ b2@10 e2@7 a2@2 ~ b2@5 b2@4 b1@10 f#2@10 b1@20 d2@9 a2@10 d2@7]/6",
  C: "[g2@2 ~ a2@5 a2@5 c2@9 g2@10]/2", D: "[c2@20 e2@9 b2@10 e2@7 ~ g2]/3",
  E: "[~ b2@5 b2@5 b1@10 f#2@9 b1@20 d2@10 a2@9 d2@7 ~ g2@2 a2@5 a2@5 c2@39]/8", F: "e2 e2@2 e2!2 e2@2 e2",
  G: "e2 e2@2 e2!2 e2@2 c2", H: "b1 b1@2 b1!2 b1@2 b1", I: "d2 d2@2 d2!2 d2@2 d2",
  J: "[c2 c2@2 c2 c2@2 c2 c2@2 c2 c2@2 c2@2 c2@2]/2", K: "[c2 c2@2 c2 c2@2 c2 c2@2 c2 c2@2 c2!4]/2",
  L: "[e2 e2@2 e2 e2@2 e2 e2@2 e2 e2@2 e2@2 e2@2]/2", M: "[b1 b1@2 b1 b1@2 b1 b1@2 b1 b1@2 b1@2 b1@2]/2",
  N: "[d2 d2@2 d2 d2@2 d2 d2@2 d2 d2@2 d2@2 d2@2]/2", O: "[c2 c2@2 c2 c2@2 c2 c2@2 c2 c2@2 c2!3 d2]/2",
  P: "e2@2 e2@3 ~ e2@2 e2@2 e2@3 ~ e2@2", Q: "[e2@2 e2@2 d2@2 e2@2 e2@2 e2@2 d2@2 e2@4 e2@3 ~ e2@2 e2@2 e2@3 ~ e2@2]/2",
  R: "[e2@2 e2@2 d2@2 e2@2 e2@2 e2@2 d2@2 e2@17 ~]/2",
})).s("gm_electric_bass_finger").gain(0.48)

// drums · kick
const kick = s("bd").struct(`<
  ~@20 A@2 B A@3 C D A@2 B A@3 C D A@2 B A@3 C D A@2 B A@3 C E F G F G F@2 C H F G F G F@2 C I F G F G F@2 C J A@2 B A@3
  C D A@2 B A@3 C D A@2 B A@3 C E F@3 G F@2 C I F G F G F@2 C E F G F G F@2 C I F G F G F@2 C I F G F G F@2 C E C H C H
  C H C E F G F G F@2 C E F G F G F@2 C K L M N O L M N ~@2
>`.pickRestart({
  A: "x!8", B: "x!2 ~@2 x!4", C: "x!2 ~ x!2 ~ x!2", D: "~ x!2 ~ x!4", E: "~ x!7", F: "x!5 ~ x!2", G: "x!5 ~ x ~",
  H: "~ x!2 ~ x ~ x ~", I: "~ x!2 ~ x ~@3", J: "~ x!2 ~ x ~ x!2", K: "~@2 x ~ x ~@3 x ~ x!3 ~@3", L: "x ~ x!2 ~ x!3",
  M: "x ~ x!2 ~ x!2 ~", N: "x!4 ~ x!3", O: "x ~ x!5 ~",
})).gain(0.48)

// drums · snare
const snare = s("sd").struct(`<
  ~@20 A@2 B A@3 C D A@2 B A@3 C D A@2 B A@3 C D A@2 B A@3 C E A F A G A@2 C H A F A G A@2 C I A F A G A@2 C J A@2 B A@3
  C D A@2 B A@3 C D A@2 B A@3 C E A@3 G A@2 C I A F A G A@2 C E A F A G A@2 C I A F A K A@2 C I A F A K A@2 C E C L C L
  C L C E A F A K A@2 C E A F A K A@2 C M N A B A@3 B ~@2
>`.pickRestart({
  A: "~ x ~ x", B: "x ~@2 x ~@2 x ~", C: "x!2 ~ x!2 ~ x!2", D: "~ x!2 ~@3 x ~", E: "~ x!7", F: "~@4 x ~@7 x!4",
  G: "~@4 x ~@3 x ~@3 x!4", H: "~@2 x ~ x ~@3 x ~ x!6", I: "~@2 x ~ x ~@3 x ~ x ~ x ~ x!2", J: "~ x!2 ~ x!4",
  K: "~@4 x ~@7 x ~ x!2", L: "~ x!2 ~ x ~ x ~", M: "~@2 x ~ x ~@5 x!3 ~@3", N: "x!2 ~ x",
})).gain(0.48)

// drums · low tom
const low_tom = s("lt").struct("<~@163 [~@10 x!3 ~@3] ~@9>").gain(0.48)

// drums · pedal hat
const pedal_hat = s("hh").struct(`<
  ~@20 A@33 B A B A@5 B A B A@5 B A B A@3 B A@27 B A@5 B A B A@5 B A B A@5 B A B A@5 B A B A@4 C D C D C D C A@2 B A B
  A@5 B A B A@3 E A@7 ~@2
>`.pickRestart({
  A: "x!8", B: "x!7 ~", C: "x!6 ~ x", D: "x!2 ~ x!3 ~ x", E: "x!5 ~@2 x",
})).gain(0.48)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@27 A ~@7 A ~@7 A ~@7 B ~@7 C ~@15 D ~@7 A ~@7 A ~@7 B ~@15 B ~@23 B ~@7 B ~@7 B ~@7 E ~@9
>`.pickRestart({
  A: "~ x", B: "~@4 x!4", C: "~@13 x!3", D: "~@6 x!2", E: "~@10 x!3 ~@3",
})).gain(0.56)

// drums · high tom
const high_tom = s("ht").struct(`<
  ~@27 A ~@7 A ~@7 A ~@7 B ~@7 C ~@15 D ~@7 A ~@7 A ~@7 B ~@15 B ~@23 B ~@7 B ~@7 B ~@17
>`.pickRestart({
  A: "~ x", B: "~@2 x!6", C: "~@11 x!2 ~@3", D: "~@6 x!2",
})).gain(0.56)

// drums · crash
const crash = s("cr").struct(`<
  ~@20 A ~@7 A ~@7 A ~@7 A ~@7 A ~ A ~ A ~ B C A ~ A ~ A ~ B C A ~ A ~ A ~ B D A ~@7 A ~@7 A ~@7 A ~ A E A ~ B C A ~ A ~
  A ~ B C A ~ A ~ A ~ B C A ~ A ~ A ~ B C A ~ A ~ A ~ B C F@7 C A ~ A ~ A ~ B C A ~ A ~ A ~ B D A ~@8
>`.pickRestart({
  A: "x", B: "x!2 ~ x!2 ~ x!2", C: "~ x!2 ~ x ~ x ~", D: "~ x!2 ~ x ~@3", E: "~ x", F: "x!8",
})).gain(0.48)

// drums · ride
const ride = s("rd").struct("<~@52 A@24 ~@24 A@15 B A@23 B A@7 B A@7 B A@7 C D ~@5 E ~@2>".pickRestart({
  A: "x!4", B: "x!3 ~", C: "x ~ x ~@4 x", D: "x", E: "~@7 x",
})).gain(0.48)

stack(
  pad_poly, acoustic_guitar_steel, pad_new_age, overdriven_guitar, bass, kick, snare, low_tom, pedal_hat, mid_tom,
  high_tom, crash, ride
)