// 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 32-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: 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: "[~@16 e5@3 ~ d5@3 ~ b4@3 ~ b4@7 ~ a4@6 ~@2 g4@3 ~ e4@3 ~ e4@3 ~ e5@3 ~ d5@3 ~]/2",
  B: "e5@19 ~ e5@3 ~ e5@3 ~ e5@3 ~", C: "f#5@3 ~ f#5@8 f#5@7 ~ g5@3 ~ f#5@6 ~@2",
  D: "[e5@6 ~@10 e5@3 ~ d5@3 ~ b4@3 ~ b4@7 ~ a4@6 ~@2 g4@3 ~ e4@3 ~ e4@3 ~ e5@3 ~ d5@3 ~]/2",
  E: "e5@19 ~ d5@6 ~@2 e5@3 ~", F: "f#5@3 ~ f#5@4 f#5@3 ~ f#5@3 ~ f#5@3 ~ g5@3 ~ f#5@6 ~@2",
  G: "[e5@6 ~@14 e5@3 ~ b5@3 ~ a5@7 ~ g5@6 ~@2 f#5@7 ~ e5@6 ~@2 e5@3 ~]/2",
  H: "[g5@19 ~ e5@3 ~ g5@3 ~ f#5@19 ~ [b4,f#5]@3 ~ [c5,g5]@3 ~ [d5,a5]@6 ~@2]/2", // B5 C5 D5
  I: "[~@20 e5@3 ~ b5@3 ~ a5@7 ~ g5@6 ~@2 f#5@7 ~ e5@6 ~@2 e5@3 ~]/2",
  J: "[g5@19 ~ e5@3 ~ g5@3 ~ f#5@19 ~@5 f#5@3 ~ f#5@3 ~ g5@8 f#5@6 ~@2 e5@7 ~ b4@6 ~@2 c5@17 ~@7 g5@3 ~ g5@3 ~ g5@7 ~ f#5@6 ~@2 e5@7 ~ b4@6 ~@2 e5@3 ~]/5",
  K: "[d5@15 ~@5 f#5@3 ~ f#5@3 ~ g5@8 f#5@6 ~@2 e5@7 ~ b4@6 ~@2 c5@17 ~@7 g5@3 ~ g5@3 ~ g5@7 ~ f#5@6 ~@2 e5@7 ~ b4@6 ~@2 e5@3 ~]/4",
  L: "d5@27 ~ c5@3 ~",
  M: "[b4@3 ~@13 [a4,f#5]@3 ~ [a4,f#5]@3 ~ [a4,f#5]@3 ~ [b4,g5]@7 ~ [a4,f#5]@6 ~@2 [a4,f#5]@7 ~ [a4,f#5]@3 ~ [a4,f#5]@3 ~ [b4,g5]@3 ~]/2", // D Em D Em
  N: "[[b4,g5]@6 ~@10 [d5,f#5]@3 ~ [d5,f#5]@3 ~ [d5,f#5]@3 ~ [e5,g5]@7 ~ [d5,f#5]@6 ~@2 [e5,g5]@7 ~ [d5,g5]@3 ~ [d5,g5]@6 ~@2]/2", // Em D Em D Em G5
  O: "[~@16 [f#5,a5]@3 ~ [f#5,a5]@3 ~ [f#5,a5]@3 ~ [g5,b5]@7 ~ [f#5,a5]@6 ~@2 [f#5,a5]@10 ~@6 [g5,b5]@3 ~]/2", // F#m G F#m G
  P: "[g5,b5]@3 ~ [e5,g5]@3 ~ [e5,g5]@15 ~@5 g5@3 ~", Q: "g5@3 ~ e5@3 ~ e5@3 ~ b5@7 ~ a5@10 ~@2",
  R: "~@8 [e5,b5]@3 ~ [d5,a5]@11 ~ [e5,b5]@6 ~@2", S: "~@8 [e5,b5]@3 ~ [d5,a5]@11 ~ [c5,e5]@6 ~@2",
  T: "[d5,a5]@19 ~@13", U: "[~@16 e5@3 ~ d5@3 ~ b4@3 ~ a4@8 g4@6 ~@2 e4@10 ~@2 e5@3 ~ d5@3 ~]/2",
  V: "e5@19 ~ [c5,e5]@3 ~ [c5,e5]@6 ~@2", // C
  W: "[[d5,f#5]@10 ~@2 [d5,f#5]@3 ~ [d5,f#5]@3 ~ [e5,g5]@3 ~ e5@6 ~@2 b4@7 ~@9 e5@3 ~ d5@3 ~ b4@3 ~ a4@7 ~ g4@6 ~@2 e4@10 ~@2 e5@3 ~ e5@23 ~ [c5,e5]@3 ~ [c5,e5]@6 ~@2, ~@24 f#5@15 ~@89]/4", // D Em C
  X: "[[d5,f#5]@10 ~@2 [d5,f#5]@7 ~ [e5,g5]@3 ~ e5@6 ~@2 b4@6 ~@14 e5@3 ~ b5@3 ~ a5@7 ~ g5@6 ~@2 f#5@7 ~ e5@6 ~@2 e5@3 ~, ~@12 g5@7 ~@29]/3", // D Em
  Y: "d5@27 ~ [d5,g5]@3 ~", Z: "[d5,g5]@3 ~ [b4,e5]@3 ~ [b4,e5]@15 ~@5 [d5,g5]@3 ~",
  AA: "[d5,g5]@3 ~ [c5,e5]@3 ~ [c5,e5]@15 ~@5 [d5,g5]@3 ~", // G5 C G5
  AB: "[d5,g5]@3 ~ [c5,e5]@3 ~ [c5,e5]@3 ~ [c5,e5]@7 ~ [c5,d5]@6 ~@2 [c5,e5]@3 ~", // G5 C Csus2 C
  AC: "e5@3 ~ f#5@10 ~@10 [a4,e5]@3 ~ [d5,g5]@3 ~, a4@7 ~@9", // A5 G5
  AD: "e5@3 ~ f#5@10 ~@10 [a4,e5]@3 ~ [d5,a5]@3 ~, a4@7 ~@9", // A5 D5
  AE: "[d5,a5]@3 ~ [b4,g5]@3 ~ [b4,g5]@15 ~ [a4,e5]@3 ~ [d5,a5]@3 ~", // D5 Em A5 D5
  AF: "[d5,a5]@3 ~ [c5,g5]@3 ~ [c5,g5]@13 ~@3 [a4,e5]@3 ~ [d5,a5]@3 ~", // D5 C5 A5 D5
  AG: "[d5,a5]@3 ~ [c5,g5]@3 ~ [c5,g5]@3 ~ [c5,g5]@7 ~ [c5,f#5]@6 ~@2 [c5,e5]@3 ~", // D5 C5 Cdim C
  AH: "e5@3 ~ f#5@10 ~@14 [d5,g5]@3 ~, a4@7 ~@9", AI: "[a4,e5] f#5@3", AJ: "e5@13 ~@19",
})).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: "~ b3@3 ~ b3@3 ~ b3@3 ~ b3@7 ~ b3@3 ~ b3@3 ~ b3@3, [b2,e3,g3]!3 [b2,e3,g3]@2 [b2,e3,g3]!3", // Em
  B: "~ c4@3 ~ c4@3 ~ c4@3 ~ c4@7 ~ c4@3 ~ c4@3 ~ c4@3, [c3,e3,g3]!3 [c3,e3,g3]@2 [c3,e3,g3]!3", // C
  C: "~ d4@3 ~ d4@3 ~ d4@3 ~ d4@7 ~ d4@3 ~ d4@3 ~@3 d4, [d3,g3,b3]@2 [d3,g3,b3]@2 [d3,g3,b3]@2 [d3,g3,b3]@4 [d3,g3,b3]@2 [d3,g3,b3]@2 [d3,g3,b3]!2, ~@29 d4@2 ~", // G
  D: "~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3, [f#3,a3,d4]!8", // D
  E: "~ c4@3 ~ c4@3 ~ c4@3 ~ c4@7 ~ c4@3 ~ c4@3 ~ c4@3, [c3,e3,a3]!3 [c3,e3,a3]@2 [c3,e3,a3]!3", // Am
  F: "~ b3@3 ~ b3@3 ~ b3@3 ~ b3@7 ~ b3@3 ~ b3@3 ~ b3@3, [b2,d3,g3]!3 [b2,d3,g3]@2 [b2,d3,g3]!3", // G
  G: "~ d4@3 ~ d4@3 ~ d4@3 ~ d4@7 ~ d4@3 ~ d4@3 ~ d4@3, [d3,f#3,a3]!3 [d3,f#3,a3]@2 [d3,f#3,a3]!3", // D
  H: "~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3 ~ f#4@3, [f#3,b3,d4]!8", I: "[~ [g3,b3]@63, [b2,e3]]/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 I E F C J K L C G E M C J E N O P Q R O P Q S C D K F C G E M C D K F C I K F C G E M C J E
  L C G E M C J E N C G E L C G E M C J E T C G E T C J E M C G E T C G E M C J E T C G E T C J E U V@2 ~
>`.pickRestart({
  A: "~@14 g2!2", B: "a2@3 ~ a2@3 ~ a2@3 ~ a2@3 ~ d2@3 ~ d2@3 ~ d2@3 ~ d2@3 ~",
  C: "e2@6 ~@2 e2@3 ~ e2@8 d2@3 ~ c2@3 ~ b1@3 ~", D: "a1@8 a1@3 ~ a1@8 a1@3 ~ a1@6 ~@2",
  E: "c2@6 ~@2 c2@3 ~ c2@8 c2@3 ~ b1@3 ~ c2@3 ~", F: "d2@6 ~@2 d2@3 ~ d2@11 ~ d2@3 ~ d2@3 ~",
  G: "a1@7 ~ a1@3 ~ a1@8 a1@3 ~ a1@4 b1@4", H: "d2@6 ~@2 d2@3 ~ g2@3 ~ a2@3 ~ g2@3 ~ e2@3 ~ d2@3 ~",
  I: "a1@7 ~ a1@3 ~ a1@8 a1@3 ~ a1@6 ~@2", J: "a1@8 a1@3 ~ a1@8 a1@3 ~ a1@4 b1@4",
  K: "c2@6 ~@2 c2@3 ~ c2@8 c2@3 ~ c2@6 ~@2", L: "d2@6 ~@2 d2@3 ~ d2@7 ~ d2@3 ~ d2@4 d2@3 ~",
  M: "d2@6 ~@2 d2@3 ~ g2@3 ~ a2@3 ~ a2@3 ~ g2@3 ~ d2@3 ~", N: "d2@6 ~@2 d2@3 ~ d2@7 ~ c2@3 ~ b1@3 ~ a1@3 ~",
  O: "g1@6 ~@2 g1@3 ~ g1@8 a1@3 ~ b1@3 ~ c2@3 ~", P: "d2@6 ~@2 d2@3 ~ d2@8 d2@3 ~ d2@3 ~ b1@3 ~",
  Q: "c2@6 ~@2 c2@3 ~ c2@7 ~ c2@3 ~ b1@3 ~ c2@3 ~", R: "d2@3 ~ e2@3 ~ d2@3 ~ c2@3 ~ b1@3 ~ c2@3 ~ a1@6 ~@2",
  S: "d2@3 ~ e2@3 ~ d2@3 ~ c2@3 ~ b1@3 ~ d2@3 ~ c2@3 ~ b1@3 ~", T: "d2@6 ~@2 d2@3 ~ d2@7 ~ d2@3 ~ d2@3 ~ d2@3 ~",
  U: "d2@6 ~@2 d2@3 ~ f#2@3 ~ a2@3 ~ g2@3 ~ f#2@3 ~ d2@3 ~", V: "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
)