// Sweet Emotion — Aerosmith
// 99 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 78, 4/4 at bar 79) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 89 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(99/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
const bass = note(`<
  ~ A B A C A B A D A B A D E@2 F G E@2 F G H I J K E@2 F G E@2 F G H I H I J K J K A B A D A B A D E@2 F G E@2 F G H I
  J K E@2 F G E@2 F G H I H K J K J L@2 M@8 N@3
>`.pickRestart({
  A: "[a1,a2]@2 ~@3 a1 ~ a3@2 ~@2 a1 ~@3 a1, ~ a2@5 d3@2, ~@3 a1@2 ~ a1@3 a1@2 ~@2 a1@2 ~, ~@2 g3@4 ~ c#3, ~@5 a3 ~@2", // A
  B: "a1 ~@4 a1 ~ a3@2 ~@2 a1 ~@3 a1, a2 a2@5 d3@2, ~ a1@3 g3@8 ~@2 c#3@2, ~@6 a1@3 a1@2 ~@2 a1@2 ~, ~@5 a3 ~@2",
  C: "[a1,a2]@2 ~@4 g3 ~ a1@2 ~ a1 d3 a1 c#3 a1, ~@2 a2@2 g3@2 ~ a3@3 a3@2 ~@4, ~@3 a1@2 a1@2 ~@9", // A
  D: "[a1,a2]@2 a2 ~@3 g3 ~ a1@2 ~ a1 d3 a1 c#3 a1, ~@3 a1@2 a1@2 ~@9, ~@4 g3@2 ~ a3@3 a3@2 ~@4", // A
  E: "a1 ~ a1@3 ~ a1@4 g1@2 a1@2 g1@2", F: "a1 ~ a1@2 ~@2 a1@4 g1@2 a1@2 g1@2",
  G: "a1 ~ a1@3 ~ a1@4 g1@2 ~ g1@2 ~, ~@6 a1 ~", H: "d2 c2 a1 ~ e1 f#1@3 g1 g1@3 g#1@2 a1 ~",
  I: "d2 c2 a1 ~ e1 f#1@3 g1@4 g#1@2 a1 ~", J: "d2 c2 a1@2 e1 f#1@3 g1 g1@3 g#1@2 a1 ~",
  K: "d2 c2 a1 ~ e1 f#1@3 g1@3 g#1@3 a1@2", L: "[d2 c2 a1@2 e1 f#1@3 g1@17 ~@7]/2",
  M: "[~@8 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1!2 ~@4 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 e2 ~@3 d3 ~ e1@2 ~ e1 a2 e1 g#2 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1!2 ~@4 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 e2 ~@3 d3 e3, ~@5 e2@5 a2@2 ~@5 e3 ~@4 d3@4 a2@2 ~@13 e3 ~@4 d3@4 a2@2 ~@5 e3 ~@4 d3 ~, ~@11 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@2 e1@4 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 e1@2 ~@12 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@2 e1@4 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 e1@2 ~, ~@12 d3@8 ~@2 g#2@2 e2@2 e2@10 a2@4 ~@10 e3@2 ~@8 d3@2 ~ e3@3 e3@2 ~@8 d3@8 a2@4 ~@10 e3@2 ~@8 d3@8 a2@4 ~@8, ~@9 e3 ~@4 d3@4 ~ g#2 ~ e2@5 ~ g#2 ~@9 e2@5 ~ g#2 e2 e2@5 ~ g#2 ~ e2@5 ~ g#2 ~@4]/8", // E
  N: "[e1@2 ~ e1 a2 e1 g#2 e1 a1@33 ~@7, ~ e3 ~@22]/3",
})).s("gm_electric_bass_finger").gain(0.51).pan(0.6)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@5 A B A C A B A C D E@2 D F D@3 G H I J D E@2 D F D@3 G H G H I J I J A B A C A B A C D E@2 D F D@3 G H I J D E@2 D
  F D@3 G H G J I J I K@2 L@8 M@3
>`.pickRestart({
  A: "[a1,a2]@2 ~@3 a1 ~ a3@2 ~@2 a1 ~@3 a1, ~ a2@5 d3@2, ~@3 a1@2 ~ a1@3 a1@2 ~@2 a1@2 ~, ~@2 g3@4 ~ c#3, ~@5 a3 ~@2", // A
  B: "~@5 a1 ~ a3@2 ~@2 a1 ~@3 a1, [a1,a2] a2@5 d3@2, ~ a1@3 g3@8 ~@2 c#3@2, ~@6 a1@3 a1@2 ~@2 a1@2 ~, ~@5 a3 ~@2", // A
  C: "[a1,a2]@2 a2 ~@3 g3 ~ a1@2 ~ a1 d3 a1 c#3 a1, ~@3 a1@2 a1@2 ~@9, ~@4 g3@2 ~ a3@3 a3@2 ~@4", // A
  D: "[a2,e3,a3,d4]@2 [a2,e3,a3,c#4] ~@2 [a2,e3,a3]@6 ~ [a2,e3,a3]@3 ~", // Asus4 A A5
  E: "[a2,e3,a3,d4] ~ [a2,e3,a3,c#4] ~@2 [a2,e3,a3]@6 ~ [a2,e3,a3]@3 ~", // Asus4 A A5
  F: "[a2,e3,a3,d4]@2 [a2,e3,a3,c#4] ~ e3 [a2,e3,a3]@6 ~ [a2,e3,a3]@3 ~", G: "d3 c3 a2 ~ e2 f#2@3 g2 g2@3 g#2@2 a2 ~",
  H: "d3 c3 a2 ~ e2 f#2@3 g2@4 g#2@2 a2 ~", I: "d3 c3 a2@2 e2 f#2@3 g2 g2@3 g#2@2 a2 ~",
  J: "d3 c3 a2 ~ e2 f#2@3 g2@3 g#2@3 a2@2", K: "[d3 c3 a2@2 e2 f#2@3 g2@17 ~@7]/2",
  L: "[~@8 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 ~@5 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 e2 ~@3 d3 ~ e1@2 ~ e1 a2 e1 g#2 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 ~@5 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 ~@3 e1 ~ e3@2 ~@2 e1 ~@3 e1 [e1,e2]@2 e2 ~@3 d3 e3, ~@10 e2@10 a2@4 ~@2 e2@10 a2@4 ~@10 e3@2 ~@8 d3@2 ~ e3@3 e3@2 ~@8 d3@8 a2@4 ~@2 e2@10 a2@4 ~@10 e3@2 ~@8 d3@2 ~@2, ~@11 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~ [e1,e2]@2 ~@4 e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 e1@2 ~@12 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~ [e1,e2]@2 ~@4 e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 ~ e1@3 e1@2 ~@2 e1@2 ~@4 e1@2 e1@2 ~, ~@12 d3@8 ~@2 g#2@2 ~ e1@4 ~@5 e3@2 ~@8 d3@8 a2@4 ~@26 e3@2 ~@8 d3@8 ~@2 g#2@2 ~@2 e2@10 a2@4 ~@8, ~@18 e3@2 ~@8 d3@8 ~@2 g#2@2 ~@2 e2@10 ~@2 g#2@2 ~@18 e2@10 ~@2 g#2@2 ~ e1@4 ~@5 e3@2 ~@8 d3@8 ~@2 g#2@2 ~@8]/8", // E
  M: "[e1@2 ~ e1 a2 e1 g#2 e1 [a2,e3,a3]@33 ~@7, ~ e3 ~@22]/3", // A5
})).s("gm_electric_guitar_clean").gain(0.36).pan(0.2)

// chords · overdriven guitar
const overdriven_guitar = note(`<
  ~ A@2 B C ~@8 D E F G H G@3 I J K L D E F G H G@3 I J I J K L K L M N O P Q R@3 D E F G H G@3 I J K L D E F G H G@3 I
  J I L K L K S@2 T@8 U@3
>`.pickRestart({
  A: "[f#3@27 ~ f#3@4]/2", B: "e3@15 ~", C: "e4@7 ~",
  D: "[a2,e3,a3,d4]@2 [a2,e3,a3,c#4] ~@2 a2@2 ~ c3 a2@3 [a2,e3,a3]@3 ~, ~@5 [e3,a3]@6 ~@5, ~@7 a2@2 ~@7", // Asus4 A A5
  E: "[a2,e3,a3,d4] ~ [a2,e3,a3,c#4] ~@2 a2@2 ~ c3 a2@3 [a2,a3]@4, ~@5 [e3,a3]@6 ~ e3@2 ~@2, ~@7 a2@2 ~@7", // Asus4 A A5
  F: "[a2,e3,a3,d4] ~ [a2,e3,a3,c#4] ~@2 a2@2 ~ c3 a2@2 ~ [a2,e3,a3]@3 ~, ~@5 [e3,a3]@6 ~@5, ~@7 a2@2 ~@7", // Asus4 A A5
  G: "[a2,e3,a3,d4]@2 [a2,e3,a3,c#4] ~@2 a2@2 ~ c3 a2@2 ~ [a2,e3,a3]@3 ~, ~@5 [e3,a3]@6 ~@5, ~@7 a2@2 ~@7", // Asus4 A A5
  H: "[a2,e3,a3,d4]@2 [a2,e3,a3,c#4] ~ e3 a2@2 ~ c3 a2@2 ~ [a2,e3,a3]@3 ~, ~@5 [e3,a3]@6 ~@5, ~@7 a2@2 ~@7", // Asus4 A A5
  I: "d3 c3 a2 ~ e2 f#2@3 g2 g2@3 g#2@2 a2 ~", J: "d3 c3 a2 ~ e2 f#2@3 g2@4 g#2@2 a2 ~",
  K: "[d3,d4] [c3,c4] [a2,a3]@2 [e2,e3] [f#2,c#3,f#3]@3 [g2,g3] [g2,d3,g3]@3 [g#2,d#3,g#3,c4]@2 [a2,e3,a3,c#4]@2, ~@8 b3@3 ~@5", // D C A E F#5 G G5 G# …
  L: "[d3,d4] [c3,c4] [a2,a3] ~ [e2,e3] [f#2,c#3,f#3]@3 [g2,d3,g3,b3]@3 [g#2,d#3,g#3,c4]@3 [a2,e3,a3,c#4]@2", // D C A E F#5 G G# A
  M: "a2@12 ~ a2 e3 a2", N: "a3@9 a2 ~@2 a2@4", O: "a2@13 ~ e3@2, ~@13 a3@3", P: "a2@7 [e3,a3] ~ [e3,a3]@5 [e3,a3]@2",
  Q: "a2@13 a2 ~ a2, ~@7 e3", R: "[a3@10 [a2,e3,a3] ~@2 [a2,e3,a3] ~ a2@14 ~@13 [e3,a3]@4 ~@2, ~@15 a2@8 ~]/3",
  S: "[[d3,d4] [c3,c4] [a2,a3]@2 [e2,e3] [f#2,c#3,f#3]@3 [g2,g3,b3]@23 ~]/2", // D C A E F#5 G
  T: "[~@8 e2 ~ e2@2 d3 e2 d3 e3@2 e2 e3@2 a2@2 g#2@2 e2 ~ e2@2 d3 e2 d3 e3@2 e2 e3 ~ a2@2 g#2@2 e2@2 e2@2 d3 e2 d3 e3@2 e2 e3@2 a2@2 g#2@2 e2 ~ e2@2 d3 e2 d3 e3@2 e3 ~ e3 a2@2 g#2 ~ e2 ~ e2@2 d3 e2 d3 e3@2 e2 e3@2 a2@2 g#2@2 e2 ~ e2@2 d3 e2 d3 e3@2 e2 e3 ~ a2@2 g#2@2 e2@2 e2@2 d3 e2 d3 e3@2 e2 e3@2 a2@2 g#2@2 e2 ~ e2@2 d3 e2 d3 e3]/8",
  U: "[~ e3 ~ e3 a2@2 g#2 ~ [a2,e3,a3]@32 ~@8]/3", // A5
})).s("gm_overdriven_guitar").gain(0.51).pan(0.7)

// chords · percussive organ
const percussive_organ = note("<~ A@4 B@2 C@2 D@2 E@2 F@8 ~@4 F@8 ~@8 B@2 C@2 D@2 E@2 F@8 ~@4 F@8 ~@20>".pickRestart({
  A: "[a3,a4]/4", B: "[e5@29 ~ c#5@2, [a3,e4,a4]]/2", C: "[[a3,e4,a4,d5,f#5]@16 [a3,e4,a4,c#5,e5]@15 ~, a5@15 ~]/2",
  D: "[[a3,e4,a4]@8 ~@7 c#5, e5@7 ~]/2", E: "[[a3,e4,a4,d5,f#5]@16 [a3,e4,a4,c#5,e5]@15 ~, a5@31 ~]/2",
  F: "[[a3,e4,a4]@127 ~]/8", // A5
})).s("gm_percussive_organ").gain(0.51)

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

// drums · kick · soft notes
const kick_soft = s("bd").struct("<~@21 A B A C ~@8 A B A@3 B A C ~@16 A B A C ~@8 A B A C A B A C ~@12>".pickRestart({
  A: "~ x!3", B: "~ x!2 ~", C: "~ x ~@2",
})).gain(0.26)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@20 A ~@11 A ~@23 A ~@11 A ~@7 B C D ~@7 E ~@2>".pickRestart({
  A: "~@8 x!2 ~ x!3 ~ x", B: "~@4 x!3 ~@9", C: "~@14 x!2", D: "x!3 ~@13", E: "~ x ~@3 x ~@10",
})).gain(0.26)

// drums · low tom
const low_tom = s("lt").struct("<~@78 [~@4 x!3 ~@9] ~@7 [~@3 x ~@4] ~@2>").gain(0.51)

// drums · hihat
const hihat = s("hh").struct("<A@21 B@4 A@8 B@8 A@16 B@4 A@8 B@7 C D E A F A F A F A G ~@2>".pickRestart({
  A: "x!16", B: "x!2 ~ x!3 ~ x!3 ~ x!3 ~ x", C: "x!2 ~ x!3 ~ x ~@4 x ~@3", D: "~ x ~ x", E: "~@8 x!8", F: "x!7 ~ x!8",
  G: "x!7 ~@9",
})).gain(0.26)

// drums · mid tom
const mid_tom = s("mt").struct("<~@78 [~@2 x!2 ~@12] ~@7 [~@3 x ~@12] ~@2>").gain(0.51)

// drums · open hat
const open_hat = s("oh").struct("<~@21 A@4 ~@8 A@8 ~@16 A@4 ~@8 A@7 B ~@3 C ~ C ~ C ~ D ~@2>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~@4", C: "~@7 x ~@8", D: "~@7 x!2 ~@7",
})).gain(0.51)

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

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

stack(
  bass, electric_guitar_clean, overdriven_guitar, percussive_organ, kick, kick_soft, snare, snare_soft, low_tom, hihat,
  mid_tom, open_hat, crash, ride
)