// Animal Instinct — The Cranberries
// 129 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// 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: Full arrangement: all 115 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(129/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 · pad poly · "Dolores 2"
const pad_poly = note(`<
  ~@8 A@2 B C D@2 E F G@2 H@2 I@2 J@5 K@4 L M@2 N@2 O@2 P Q R S R T ~@4 U@2 V W@4 X@3 H@2 I@2 J@5 K@4 Y Z AA AB AC Z AA
  AB AD AE AF AG AD AE AF AG AH Z AA AB AD AE AF AG AI AJ ~@18
>`.pickRestart({
  A: "[~@8 e5@2 d5@2 b4@2 b4@4 a4@3 ~ g4@2 e4@2 e4@2 e5@2 d5@2]/2", B: "e5@5 e5!3", C: "f#5@2 f#5@4 f#5@4 g5@2 f#5@3 ~",
  D: "[e5@3 ~@5 e5@2 d5@2 b4@2 b4@4 a4@3 ~ g4@2 e4@2 e4@2 e5@2 d5@2]/2", E: "e5@10 d5@3 ~ e5@2",
  F: "f#5@2 f#5@2 f#5@2 f#5@2 f#5@2 g5@2 f#5@3 ~", G: "[e5@3 ~@7 e5@2 b5@2 a5@4 g5@3 ~ f#5@4 e5@3 ~ e5@2]/2",
  H: "[g5@10 e5@2 g5@2 f#5@9 ~ [b4,f#5]@2 [c5,g5]@2 [d5,a5]@3 ~]/2", // B5 C5 D5
  I: "[~@10 e5@2 b5@2 a5@4 g5@3 ~ f#5@4 e5@3 ~ e5@2]/2",
  J: "[g5@10 e5@2 g5@2 f#5@9 ~@3 f#5@2 f#5@2 g5@4 f#5@3 ~ e5@4 b4@3 ~ c5@8 ~@4 g5@2 g5@2 g5@4 f#5@3 ~ e5@4 b4@3 ~ e5@2]/5",
  K: "[d5@7 ~@3 f#5@2 f#5@2 g5@4 f#5@3 ~ e5@4 b4@3 ~ c5@8 ~@4 g5@2 g5@2 g5@4 f#5@3 ~ e5@4 b4@3 ~ e5@2]/4", L: "d5@7 c5",
  M: "[b4@2 ~@6 [a4,f#5]@2 [a4,f#5]@2 [a4,f#5]@2 [b4,g5]@4 [a4,f#5]@3 ~ [a4,f#5]@4 [a4,f#5]@2 [a4,f#5]@2 [b4,g5]@2]/2", // D Em D Em
  N: "[[b4,g5]@3 ~@5 [d5,f#5]@2 [d5,f#5]@2 [d5,f#5]@2 [e5,g5]@4 [d5,f#5]@3 ~ [e5,g5]@4 [d5,g5]@2 [d5,g5]@3 ~]/2", // Em D Em D Em G5
  O: "[~@8 [f#5,a5]@2 [f#5,a5]@2 [f#5,a5]@2 [g5,b5]@4 [f#5,a5]@3 ~ [f#5,a5]@5 ~@3 [g5,b5]@2]/2", // F#m G F#m G
  P: "[g5,b5]@2 [e5,g5]@2 [e5,g5]@7 ~@3 g5@2", Q: "g5@2 e5@2 e5@2 b5@4 a5@5 ~",
  R: "~@4 [e5,b5]@2 [d5,a5]@6 [e5,b5]@3 ~", S: "~@4 [e5,b5]@2 [d5,a5]@6 [c5,e5]@3 ~", T: "[d5,a5]@5 ~@3",
  U: "[~@8 e5@2 d5@2 b4@2 a4@4 g4@3 ~ e4@5 ~ e5@2 d5@2]/2", V: "e5@10 [c5,e5]@2 [c5,e5]@3 ~",
  W: "[[d5,f#5]@5 ~ [d5,f#5]@2 [d5,f#5]@2 [e5,g5]@2 e5@3 ~ b4@4 ~@4 e5@2 d5@2 b4@2 a4@4 g4@3 ~ e4@5 ~ e5@2 e5@12 [c5,e5]@2 [c5,e5]@3 ~, ~@3 f#5@2 ~@11]/4", // D Em C
  X: "[[d5,f#5]@5 ~ [d5,f#5]@4 [e5,g5]@2 e5@3 ~ b4@3 ~@7 e5@2 b5@2 a5@4 g5@3 ~ f#5@4 e5@3 ~ e5@2, ~@12 g5@7 ~@29]/3", // D Em
  Y: "d5@7 [d5,g5]", Z: "[d5,g5]@2 [b4,e5]@2 [b4,e5]@7 ~@3 [d5,g5]@2",
  AA: "[d5,g5]@2 [c5,e5]@2 [c5,e5]@7 ~@3 [d5,g5]@2", // G5 C G5
  AB: "[d5,g5]@2 [c5,e5]@2 [c5,e5]@2 [c5,e5]@4 [c5,d5]@3 ~ [c5,e5]@2", // G5 C Csus2 C
  AC: "e5@2 f#5@5 ~@5 [a4,e5]@2 [d5,g5]@2, a4@7 ~@9", AD: "e5@2 f#5@5 ~@5 [a4,e5]@2 [d5,a5]@2, a4@7 ~@9",
  AE: "[d5,a5]@2 [b4,g5]@2 [b4,g5]@7 ~ [a4,e5]@2 [d5,a5]@2", AF: "[d5,a5] [c5,g5] [c5,g5]@3 ~ [a4,e5] [d5,a5]",
  AG: "[d5,a5]@2 [c5,g5]@2 [c5,g5]@2 [c5,g5]@4 [c5,f#5]@3 ~ [c5,e5]@2", AH: "e5@2 f#5@5 ~@7 [d5,g5]@2, a4@7 ~@9",
  AI: "[a4,e5] f#5@3", AJ: "e5@3 ~@5",
})).s("gm_pad_poly").gain(0.48)

// chords · acoustic guitar steel · "Guitare"
const acoustic_guitar_steel = note(`<
  A B C D A B C D A E B D A E B D A E B D A E B D A E B D A E B D F G B H F G B H A E B D A E B D A E B D A E B D A E B
  D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D A E B D I@2 ~
>`.pickRestart({
  A: "[b2,e3,g3,b3]!3 [b2,e3,g3,b3]@2 [b2,e3,g3,b3]!3", B: "[c3,e3,g3,c4]!3 [c3,e3,g3,c4]@2 [c3,e3,g3,c4]!3",
  C: "[d3,g3,b3,d4]@2 [d3,g3,b3,d4]@2 [d3,g3,b3,d4]@2 [d3,g3,b3,d4]@4 [d3,g3,b3,d4]@2 [d3,g3,b3,d4]@2 [d3,g3,b3,d4]!2", // G
  D: "[f#3,a3,d4,f#4]!8", E: "[c3,e3,a3,c4]!3 [c3,e3,a3,c4]@2 [c3,e3,a3,c4]!3",
  F: "[b2,d3,g3,b3]!3 [b2,d3,g3,b3]@2 [b2,d3,g3,b3]!3", G: "[d3,f#3,a3,d4]!3 [d3,f#3,a3,d4]@2 [d3,f#3,a3,d4]!3",
  H: "[f#3,b3,d4,f#4]!8", I: "[~ b3@31, [b2,e3,g3]]/2",
})).s("gm_acoustic_guitar_steel").gain(0.35)

// other · string ensemble 1 · "Strings"
const string_ensemble_1 = note(`<
  ~@43 A B C B D@2 ~@38 A B C B E B C B E B C B E B C B E B C B E B C B F@3 ~
>`.pickRestart({
  A: "~@2 d5 c5", B: "b4@3 c5", C: "g4@2 d5 c5", D: "[f#4@3 ~]/2", E: "f#4@2 d5 c5", F: "[~ b3@2, f#4]/3",
})).s("gm_string_ensemble_1").gain(0.35)

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

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

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

// drums · low tom
const low_tom = s("lt").struct("<~@7 [~@4 x!4] ~@107>").gain(0.48)

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

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@7 A ~@3 B ~@7 C ~@7 C ~@3 C ~@7 C ~@7 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3 C ~@3
  D ~@3 C ~@11
>`.pickRestart({
  A: "~ x!7", B: "~@7 x", C: "~@6 x!2", D: "~@5 x!3",
})).gain(0.48)

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

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

// drums · crash
const crash = s("cr").struct(`<
  ~@8 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3
  A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@10
>`.pickRestart({
  A: "x",
})).gain(0.48)

// drums · tambourine
const tambourine = s("tb").struct("<~@32 A@7 B A@7 B ~@24 A@7 B A@7 B A@7 B A@7 B A@2 C ~@8>".pickRestart({
  A: "~ x ~ x", B: "x!4", C: "~ x ~@2",
})).gain(0.48)

// drums · ride
const ride = s("rd").struct("<~@23 [~@7 x] ~@91>").gain(0.48)

stack(
  pad_poly, acoustic_guitar_steel, string_ensemble_1, bass, kick, snare, low_tom, pedal_hat, mid_tom, open_hat,
  high_tom, crash, tambourine, ride
)