// Still the One — Orleans
// 137 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 138 bars on a 24-step grid, each part at one level. Source detail keeps the original performance.
setcpm(137/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.

// bass · electric bass finger · "FingrBass"
const bass = note(`<
  ~@2 A B C D E D F D@8 G@2 H@2 G@2 H I D G J K G H L@2 D@7 M G@2 H@2 G@2 H N D G J K G H L O D G J P Q H L@2 D@7 M G@2
  H R G@2 H@2 D G J P S H T U V@3 W X Y Z H AA G J AB AC H AD AE ~@6 AF@3 AG J AB AH H L AI D AJ J AK S H AL AM AN@2 AO
  AP AQ AR AS@3
>`.pickRestart({
  A: "~@21 d3@2 ~", B: "e3 ~ e3 ~ e3 ~ e3 ~", C: "e3@3 ~@3 e3@3 ~@3 e3@2 d3@2 ~ a2@2 g2@2 ~ d2 ~, ~@8 b2 ~@3",
  D: "e2 ~ e2 ~ e2 ~ e2 ~", E: "e2@3 ~@3 e2@4 ~@2 e2@3 ~@3 e2@4 d2@2", F: "e2 ~ e2 ~ e2 ~ e2 e1",
  G: "a1 ~ a1 ~ a1 ~ a1 ~", H: "b1 ~ b1 ~ b1 ~ b1 ~", I: "b1 ~ b1 ~ b1 ~ d2 ~", J: "c#2 ~ c#2 ~ c#2 ~ c#2 ~",
  K: "f#1@3 ~@3 f#1@3 ~@3 f#1@4 ~@2 f#1@3 ~@3", L: "e1 ~ e1 ~ e1 ~ e1 ~", M: "e2@4 ~@2 d2@3 ~@3 c#2@3 ~@3 b1@3 ~@3",
  N: "b1 ~ c#2 ~ d2 ~ d#2 ~", O: "e1 ~ f#1 ~ g1 ~ g#1 ~", P: "f#2 ~ f#2 ~ f#2 ~ g#2 ~",
  Q: "a2@3 ~@4 g2 ~@4 f#2@4 ~@2 e2@3 ~@3, ~@3 g#2 ~@8", R: "b1 ~ b1 ~ b1 ~ a#1 ~", S: "a2 g#2 f#2 e2",
  T: "e1 ~ f#1 ~ g#1 ~ b1 ~", U: "e2@3 ~@3 f#2@3 ~@3 g#2@4 ~@2 b2@3 ~@3", V: "e1 e2 e3 e2", W: "e1@3 e2@3 e3@3 e2@2 ~",
  X: "d2@6 a2@6 d3@6 a2@5 ~", Y: "c#2@3 e2@3 c#3@3 e2@2 ~", Z: "b1@2 ~@4 b1@2 ~@4 b1@3 ~@3 b1@3 ~@3",
  AA: "~ e2@3 ~@2 e2@3 ~@3 e2@3 ~@3 e2@3 ~@3", AB: "f#2 ~ f#2 ~ f#2 ~ f#2 ~", AC: "a2 ~ a2 ~ a2 ~ a2 ~",
  AD: "e1@4 ~@2 g#1@4 ~@2 b1@3 ~@3 c#2@3 ~@3", AE: "e2@3 ~@3 f#2@3 ~@3 e2@2 ~@4 c#2@3 ~@3",
  AF: "[~@22 a1@9 ~@3 b1@8 ~@4 e1@8 g#1@6 b1@6 g#1@6]/3", AG: "a1@3 f#1@3 a1@3 b1@2 ~", AH: "a1@5 ~ g#1@5 ~ f#1@6 e1@6",
  AI: "e1@2 f#1@2 g#1@2 b1 ~", AJ: "a2@3 ~@3 a2@3 ~@3 a2@3 ~@3 a2@4 ~@2", AK: "f#2 ~ f#2 ~ f#2 ~ g#2@2",
  AL: "e1@3 ~@3 e1@3 ~@3 e1@5 ~ b1@6", AM: "e2@3 ~@3 f#2@6 g#2@6 b2@4 ~@2", AN: "~@12 e3@11 ~, ~ e1@14 ~@9",
  AO: "~ e3, e1@7 ~@5", AP: "e1@12 e3@7 ~@5", AQ: "d3@7 ~@5 d3@3 c#3@4 b2 ~@4", AR: "a2@10 ~@2 c#2@3 e2@4 ~ c#2@4",
  AS: "[e1@17 ~]/3",
})).s("gm_electric_bass_finger").gain(0.58)

// chords · electric guitar clean · "GtrClean"
const electric_guitar_clean = note(`<
  A B C B C B C B C B C B C B C D E F G H I F G H J@2 K L M N O P Q B C B C B C B E F G R I F G H S T K L M N O P Q T K
  L M N O P Q B C B C B C B E F G H I F G R S T K L M N O P U V@2 W X Y@2 Z@2 T K L M N O AA AB ~@6 AC@2 T K L M N O P Q
  T K L M N O P U AD AE AF AG AH@2 AI@3
>`.pickRestart({
  A: "~@11 [d#3,a#3]", B: "[e3,b3] ~ b3 c#4@2 a3 b3@2 c#4 ~@2 [e3,b3], ~@2 e3@7 ~@3",
  C: "~@2 b3 c#4@2 a3 b3@2 c#4 ~@2 [d#3,a#3], ~@2 e3@7 ~@3", // D#5
  D: "[e3,b3]@2 ~@2 b3@3 c#4@3 a3@2 b3@4 c#4@2 ~@4 [e3,b3]@2, ~@2 e3@7 ~@3", // E5
  E: "~@2 b3 c#4@2 a3 b3@2 c#4 ~@2 [g#2,d#3], ~@2 e3@7 ~@3", // G#5
  F: "[a2,e3] ~ e3 f#3@2 d3 e3@2 f#3 ~@2 [a2,e3], ~@4 a2@15 ~@5", // A5
  G: "~@2 e3 f#3@2 d3 e3@2 f#3 ~@2 [b2,f#3], ~@2 a2@7 ~@3", H: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [b2,f#3], ~@2 b2@7 ~@3",
  I: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [g#2,d#3], ~@2 b2@7 ~@3", // G#5
  J: "[~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@3 b3 ~ b3 c#4@2 a3 b3@2 c#4 ~@2 [g#2,d#3], ~@4 b2@14 ~@3 a#3@2 e3@2 ~@3 e3@15 ~@5, ~@11 d#3 ~@12]/2", // G#5
  K: "[a2,e3] ~ e3 f#3@2 d3 e3@2 f#3 ~@2 [c#3,f#3], ~@2 a2@7 ~@3", // A5 F#5
  L: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [f#2,c#3], ~@2 c#3@7 ~@3", // F#5
  M: "~@2 c#3 d#3@2 b2 c#3@2 d#3 ~@2 [g#2,d#3], ~@2 f#2@7 ~@3", // G#5
  N: "[a2,e3] ~ e3 f#3@2 d3 e3@2 f#3 ~@2 [b2,f#3], ~@2 a2@7 ~@3", // A5 B5
  O: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [d#2,a#2], ~@2 b2@7 ~@3", // D#5
  P: "[e2,b2] ~ b2 c#3@2 a2 b2@2 c#3 ~@2 [e2,b2], ~@2 e2@7 ~@3", // E5
  Q: "~@2 b2 c#3@2 a2 b2@2 c#3 ~@2 [d#3,a#3], ~@2 e2@7 ~@3", // D#5
  R: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [b2,f#3], ~@4 b2@15 ~@5", // B5
  S: "~@2 f#3 g#3@2 e3 f#3@2 g#3 ~@2 [d#3,a#3], ~@2 b2@7 ~@3", // D#5
  T: "[e3,b3] ~ b3 c#4@2 a3 b3@2 c#4 ~@2 [g#2,d#3], ~@4 e3@15 ~@5", U: "~@2 b2 c#3@2 a2 b2@2 c#3 ~@3, ~@4 e2@15 ~@5",
  V: "e2 b2 [f#4,b4] b2", W: "e2 b2 [f#4,c#5] b2", X: "e2 b2 [f#4,c#5] ~",
  Y: "[~@3 a3@3 d4@3 e4@3 c#4@3 a3@3 c#3@4 ~@2, d3@3 ~]/2",
  Z: "[~@12 f#4@9 ~@2 [d#3,a#3], ~ b2@41 ~@6, ~@6 e3@35 ~@7, ~@2 b3@5 ~, ~@3 e4@4 ~]/2", // D#5
  AA: "[e2,b2] ~ b2 c#3@2 a2 b2@2 c#3 ~@2 [d#2,a#2], ~@2 e2@7 ~@3", // E5 D#5
  AB: "[e2,b2] ~ b2 c#3@2 a2 b2@2 c#3 ~@3, ~@2 e2@7 ~@3", AC: "[~@22 [a2,e3]@8 ~@4 [b2,f#3]@7 ~@5 [d#3,a#3]@2]/2",
  AD: "~ [e3,b3,e4]@19 ~@4", AE: "g#4@11 b4@11 ~@2, [e3,b3,e4]@11 ~", AF: "[f#3,c#4,f#4,a#4]@7 ~",
  AG: "~@13 f#5@11, [f#3,c#4,f#4,c#5]@5 ~", // F#5
  AH: "[[a3,d4,a4,d5]@21 ~@2 [a3,c#4,a4,c#5]@9 ~@4 [a4,c#5,e5]@8 ~@4, ~@35 [a3,c#4]@9 ~@4]/2", // D5 A
  AI: "[[e3,b3,e5,g#5]@31 ~@5]/3", // E
})).s("gm_electric_guitar_clean").gain(0.46)

// chords · overdriven guitar · "GtrOvrdrv"
const overdriven_guitar = note("<~@129 A B C D E@2 F@2 ~>".pickRestart({
  A: "[e3,b3,e4]@7 ~", B: "[e3,b3,e4,g#4]@9 ~@3 [e3,b3,e4,b4]@8 ~@4", C: "[f#3,c#4,f#4,a#4]@7 ~",
  D: "[f#3,c#4,f#4,c#5]@9 ~@3 [f#3,c#4,f#4,f#5]@8 ~@4", // F#5
  E: "[[d4,a4,d5]@21 ~@2 [c#4,a4,c#5]@10 ~@3 [e4,a4,e5]@9 ~@3, a3@11 ~]/2", F: "[[b3,e4,e5,g#5]@17 ~@7]/2",
})).s("gm_overdriven_guitar").gain(0.64)

// chords · distortion guitar · "GtrDistrt"
const distortion_guitar = note(`<
  ~@35 A B@2 ~ C@2 D ~@13 E@2 ~@8 F G@2 H I@4 J K@6 L M@2 N@2 O P Q R S ~@22 T@5 U@2 V W X Y@2 Z ~@13
>`.pickRestart({
  A: "~@6 g#3@3 [a3,c#4] ~@2 [b3,e4]@4 ~@2 [b3,e4]@4 ~@2, ~@5 b3@2 ~@17", // A E5
  B: "[[d4,f#4]@4 ~@2 [d4,f#4]@4 ~@2 [d4,f#4]@4 [b3,e4]@2 [a3,c#4]@3 ~ [g#3,b3]@12 ~@14]/2", // D E5 A G#m
  C: "[~@8 f#4 ~ g4 ~ [g#4,b4]@3 ~ g#4@2 [a4,c5]@12 [b4,e5]@3 ~@3 [c5,f#5]@6 e5@6, ~@3 [e4,g#4] ~@20, ~@7 a4@2 a#4@2 ~@4 b4@2 ~@25 b4@4 ~@2]/2", // G#m Am E5 Cdim E
  D: "c#5@11 ~, a4@19 ~@5",
  E: "[~@4 [g#4,b4]@2 [f#4,a4]@3 ~ g#4 ~ [g#4,b4]@4 ~@2 [f#4,b4]@10 ~@2 [b4,e5]@3 [g#4,c#5]@5 ~ [f#4,b4]@2 ~ g#4@3 ~@3, ~@9 e4@2 ~@19 a4 ~@10 e4@3 ~@4]/2", // G#m F#m G#m B5 E5 C#5 B5
  F: "d4@10 ~@2 d4@6 b3@3 ~ g#3 ~", G: "[b3@7 ~@3 b3@18 ~@2 b3@9 g#3@2 c#3@4 e3@2 ~]/2",
  H: "g#3@5 ~ b3@6 g#3@3 e3@2 c#3@6 ~",
  I: "[e3@9 ~@3 f#3@6 b3@2 ~@2 f#4@11 ~@3 g#4@6 e4@4 c5@12 ~@2 d5@3 c#5@2 b4@4 [d5,f#5]@7 ~@2 [c#5,e5] ~@3 c#5@7 ~ d5@3 ~@3, ~@82 e5@6 ~ b4@3 ~@4]/4", // D C#m
  J: "b4@5 ~ c#5@2 ~@2 c#5@2 b4@6 c#5@2 ~@2 c#5@2",
  K: "[b4@6 c#5@2 ~@2 c#5 ~ c#5@4 ~@2 b4 ~@3 b4@6 ~@2 g#4 ~@3 b4@5 ~@3 b4@2 ~ f#5@6 ~@3 c#5@3 ~@3 c#5@4 ~ c#5@2 ~@3 a4@11 ~@3 a4@6 f#4@3 a4@13 ~@6 b4@6 a4@9 ~@2 a4@3 b4@3 c#5@2 e5@2 ~@2 e5@3, ~@32 b4 ~@39]/6",
  L: "d#5@3 c#5@3 d#5@3 e5@2 ~ f#5@3 ~ e5@2 f#5@3 g5 ~@2", M: "[a5@10 ~@2 a5@6 g#5@3 a5@20 f#5@4 ~ e5@2]/2",
  N: "[f#5@4 ~@2 f#5@4 ~@2 f#5@6 e5@2 ~@2 e5@8 b4@3 c#5@8 ~@7]/2", O: "c#5@4 ~@2 a5@3 ~@3 e5@4 ~@2 f#5@4 ~@2",
  P: "f#5@2 ~@2 e5 ~ e5@2 ~@2 e5 ~ e5@5 ~ f#5@4 ~@2", Q: "~@4 e5 ~ f#5@2 ~ f#5@6 ~ e5@2 c#5@4 a4@2",
  R: "b4@4 f#4 ~ f#4 ~@5 f#4@2 g#4@2 a4@2 g#4@2 f#4 ~ d#4 ~", S: "e4@5 ~@7",
  T: "[~@22 b4@42 ~@2 [g#4,c#5]@2 ~ [g#4,c#5]@2 ~ e5@28 ~@14 c#5@3 ~ e4@2, ~@68 [f#4,b4]@2 ~ b4@28 ~@14 g#4@4 a4@3]/5", // C#5 B5
  U: "[[f#4,b4]@17 ~ [f#4,b4]@2 ~@2 b4@8 ~@18, ~@21 f#4@8 ~@19]/2", V: "~@18 [c#4,b4]@2 [b3,g#4]@2 c#4 ~",
  W: "[e4,g#4]@4 ~@2 [f#4,a4]@4 ~@2 [g4,a#4]@5 ~ [g#4,c#5]@4 ~@2", // E F#m Gm C#5
  X: "[e5,g#5]@15 ~@3 g#5@2 ~ b4 e5 ~, ~@17 e5@2 ~ [c#5,f#5]@2 ~@2", // E F#5
  Y: "[[b4,e5]@2 [c#5,f#5]@2 [e5,g#5,a5]@2 [b4,e5]@2 [c#5,f#5]@2 [e5,a5]@2 [b4,e5]@2 [c#5,f#5]@2 [e5,a5] ~ [e5,a5]@3 ~@3 e5@16 ~@2 [e5,a5]@4 ~@2, ~@11 a5@9 ~@4]/2", // E5 F#5 Amaj7 E5 F#5 A5 E5 F#5 …
  Z: "a5@9 [e5,g#5]@10 ~@5, e5 ~@2", // E
})).s("gm_distortion_guitar").gain(0.48).pan(0.4)

// drums · kick
const kick = s("bd").struct(`<
  ~@3 A ~ B@4 C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C
  D C D C D C D C D C D C D C D C D C D C D C D C D C D E@6 F ~ C D C D C D C D C G C G C G H I C D C D C D C D C D C D
  C D C D E@7 ~@2
>`.pickRestart({
  A: "~ x ~@4", B: "x ~ x", C: "x ~@4 x!2 ~@5", D: "~@2 x ~@2 x!2 ~@5", E: "x", F: "x!4", G: "~ x ~ x ~@2",
  H: "x ~@4 x!2 ~@4 x", I: "~@5 x ~@6",
})).gain(0.52)

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

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@3 A B ~@19 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@7 C ~@15 C ~@7 C ~@9
>`.pickRestart({
  A: "~@2 x!2", B: "~@17 x ~@2 x ~ x ~", C: "~@11 x",
})).gain(0.52)

// drums · hihat
const hihat = s("hh").struct("<~@5 A@19 B ~@8 A@7 B A@7 B ~@16 A@7 B A@7 B ~@24 A@7 ~@26>".pickRestart({
  A: "x!4", B: "x!3 ~",
})).gain(0.52)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@4 A ~@19 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@15 B ~@7 B ~@9
>`.pickRestart({
  A: "x ~@5 x!3 ~@3", B: "~@5 x",
})).gain(0.52)

// drums · open hat
const open_hat = s("oh").struct("<~@89 A B@6 C ~@32 D@4 E D ~@3>".pickRestart({
  A: "~ x!3", B: "x!4", C: "x!2 ~@2", D: "~@5 x", E: "~@19 x ~@4",
})).gain(0.52)

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

// drums · ride
const ride = s("rd").struct("<~@25 A@7 B ~@16 A@7 B A@7 B ~@16 A@7 B ~@8 C A@6 B ~@8 A@7 B A@7 B ~@9>".pickRestart({
  A: "x!4", B: "x!3 ~", C: "~ x!3",
})).gain(0.58)

// drums · tambourine
const tambourine = s("tb").struct("<~@129 [~@4 x!2 ~@2] [~@3 x!2 ~]!2 [~@4 x!2 ~@2]!3 ~@3>").gain(0.58)

stack(
  bass, electric_guitar_clean, overdriven_guitar, distortion_guitar, kick, snare, low_tom, hihat, mid_tom, open_hat,
  crash, ride, tambourine
)