// Hot Legs — Rod Stewart
// 135 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 88 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): Jazz Electric.
setcpm(135/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · fretless bass
const bass = note(`<
  A B A B A C A D E F A G H I E J K C K C K C L M A C A D E F A G H I E J K C K C K C L M N C N D O P N Q H R S T K C K
  U K C L M K C K U K C L M K C K U K C L ~ N C N V N W L ~
>`.pickRestart({
  A: "g2@3 g2 g2@3 g2", B: "g2@3 g2!2 e2 f2 f#2", C: "g2 g2@2 g2!2 e2 f2 f#2", D: "g2 g2@2 g2!3 a2 b2",
  E: "c3@3 c3 c3@3 c3", F: "c3@2 e3 g3 e3 c3 a2 f#2", G: "g2 g2@2 g2 b2 d3 e3 d#3", H: "d3@3 d3 d3@3 d3",
  I: "d3 d3@2 d3!3 b2 a2", J: "c2!2 e2!2 f2!2 f#2!2", K: "g2 g2@2 g2 g2@3 g2", L: "g2 ~@7",
  M: "[g3,c4] [d3,g3] [g3,c4] [d3,g3]@4 ~", N: "g2@3 g2!2 g2@2 g2", O: "c3@3 c3!2 c3@2 c3",
  P: "c3!2 e2 a2 g2 e2 f2 f#2", Q: "g2 g2@2 g2 b2 d3 e3 b2", R: "d3 d3@2 d3!2 g2 a2 b2", S: "c3@2 c3!6",
  T: "c3!2 e2!2 f2!2 f#2!2", U: "e2 d2 e2 d2 f2 d2 f#2 d2", V: "g2!2 b2 f3 f3@2 e3@2", W: "d2!2 e2!2 f2!2 f#2!2",
})).s("gm_fretless_bass").gain(0.35)

// chords · acoustic guitar steel · "Steel String"
const acoustic_guitar_steel = note(`<
  A B@2 A@5 C D B@2 E F D@2 A@8 B A B A D@2 A@2 F@2 D@2 A@12 D@2 A@2 F@2 D@2 B A@5 B A@3 B A@20 ~
>`.pickRestart({
  A: "[g2,d3,g3]@2 [g2,d3,g3] [g2,d3,g3]@3 [g2,d3,g3]@2", B: "[g2,d3,g3] [g2,d3,g3]@3", C: "[c3,g3,c4] [c3,g3,c4]@3",
  D: "[c3,g3,c4]@2 [c3,g3,c4] [c3,g3,c4]@3 [c3,g3,c4]@2", E: "[d3,a3,d4] [d3,a3,d4]@3",
  F: "[d3,a3,d4]@2 [d3,a3,d4] [d3,a3,d4]@3 [d3,a3,d4]@2", // D5
})).s("gm_acoustic_guitar_steel").gain(0.19).pan(0.4)

// chords · acoustic guitar steel · "Steel String"
const acoustic_guitar_steel_2 = note(`<
  A@4 B A@3 C@2 D@2 E@2 C@2 F D@7 F D@3 C@2 A@2 G E C@2 B A B A@2 B A@2 D@3 F C@2 D F H@2 I C D@8 A@4 B A@3 D F D@13 ~
>`.pickRestart({
  A: "[g3,b3,d4]@3 [g3,b3,d4]@2 [g3,b3,d4]@2 [g3,b3,d4]", B: "[g3,b3,d4]@3 [g3,b3,d4]@2 [g3,b3,d4]@3",
  C: "[e3,g3,c4]@3 [e3,g3,c4]@2 [e3,g3,c4]@2 [e3,g3,c4]", D: "[d3,g3,b3]@3 [d3,g3,b3]@2 [d3,g3,b3]@2 [d3,g3,b3]",
  E: "[f#3,a3,d4]@3 [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]", F: "[d3,g3,b3]@3 [d3,g3,b3]@2 [d3,g3,b3]@3",
  G: "[f#3,a3,d4]@3 [f#3,a3,d4]@2 [f#3,a3,d4]@3", H: "[d3,f#3,a3]@3 [d3,f#3,a3]@2 [d3,f#3,a3]@2 [d3,f#3,a3]",
  I: "[e3,g3,c4]@3 [e3,g3,c4]@2 [e3,g3,c4]@3", // C
})).s("gm_acoustic_guitar_steel").gain(0.19).pan(0.8)

// chords · electric guitar jazz · "Jazz Electric"
const electric_guitar_jazz = note(`<
  A B A B C D E@2 F G@2 H I@2 J@2 K L M N O P Q R C D E@2 F G@2 H I@2 J@2 K L M N O P Q R S@2 T@2 U V@2 W X@2 Y@2 O P O
  P Z P Q ~ O P O P Z P Q ~ O P O P Z P AA AB AC AD AC AD AC AD AE@2
>`.pickRestart({
  A: "~@2 d4@2 e4@2 g4@2 a#4 a4 ~ g4 a4@2 g4@2", B: "b4@2 d5 [g4,b4]@3 ~@2",
  C: "[d4,g4,b4]@2 [d4,g4,b4]@2 [d4,g4,b4] a4 g4 e4", D: "[d4,g4,b4]@4 ~@3 d4",
  E: "[[d4,g4,b4] a4 g4 e4 [b3,d4,g4] g4 e4 [d4,g4,b4]@5 ~@2 a4 g4]/2", F: "[c4,e4,a4] g4 e4 [c4,e4,g4]@5",
  G: "[~@2 g4 e4 [c4,g4,b4]@2 e4 [b3,d4]@5 ~@4]/2", H: "~@5 b4 a4 g4",
  I: "[[d4,f#4,a4] a4 g4 [d4,f#4,a4]@2 a4 g4 [d4,f#4,b4]@5 ~ d4 b4 g4]/2", // D Bm
  J: "[[e4,g4,a#4] a4 [e4,g4]@2 [e4,g4]@2 [g4,a#4] [e4,g4]@2 [e4,g4]@3 g4!2 e4 d4]/2", // Edim Em Gm Em
  K: "~@2 [d4,g4,b4]@2 [d4,g4,b4]@2 ~ d4", L: "[b3,d4,g4] g4!2 [d4,g4,b4]@3 ~@2",
  M: "~@2 [d4,g4,b4]@2 [d4,g4,b4]@2 b4 g4", N: "[d4,g4,b4]@2 [c4,e4] [b3,d4]@3 ~@2",
  O: "~@2 [d4,g4,b4]@2 [d4,g4,b4]@2 g4 e4", P: "[b3,d4,g4] [b3,d4,g4]@2 [d4,g4,b4]@3 ~@2",
  Q: "[b3,d4] g4!2 e4 g4 b4 ~@2", R: "g4 ~@7", S: "[[d4,g4,b4] a4 g4 e4 [b3,d4,g4]@2 e4 [d4,g4,b4]@5 ~@2 [c4,e4]!2]/2",
  T: "[[b3,d4,g4]@2 [b3,d4,g4]@2 [b3,d4,g4] g4 e4 [d4,g4,b4]@5 ~@2 a4 g4]/2", U: "[c4,e4,a4]@2 [c4,e4,a4] [c4,e4,a4]@5",
  V: "[~ g4!2 e4 [c4,e4,b4]@2 e4 [b3,d4]@5 ~@4]/2", W: "~@5 b4 [d4,g4,b4]@2",
  X: "[[d4,f#4,a4]@2 [d4,f#4,a4]@2 [d4,f#4,a4] a4 g4 [d4,f#4,b4]@5 ~ a#4!2 g4]/2", // D Bm
  Y: "[[e4,g4,a#4] [e4,g4,a#4]@3 [c4,e4,g4]!3 [c4,e4,g4]@2 [c4,e4,g4]@3 g4!2 e4 d4]/2", // Edim C
  Z: "~@2 [d4,g4,b4]@2 [d4,g4,b4] b4 [d4,g4,b4] e4", AA: "[b3,d4] g4!2 e4 g4 b4 c5 b4",
  AB: "a4@2 g4@2 b4@2 d5@2 a#4 a4 g4@2 a4@2 g4@2", AC: "~ [d4,g4,b4]!2 ~", AD: "[b3,d4]@2 ~ [b3,d4]@5",
  AE: "[[b3,d4] g4!2 e4 g4 [b4,g5]@7 ~@4]/2", // Bm Em
})).s("gm_electric_guitar_jazz").gain(0.31).pan(0.1)

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

// drums · kick · soft notes
const kick_soft = s("bd").struct(`<
  A ~ B ~ B A B A B A ~@7 A B ~ A ~@4 A ~ C ~ A B C ~@3 A ~ A B ~ A C ~@2 B A ~@2 A C A B A C ~ A ~@4 B A ~@3 C A@2 ~@6
  C B@2 ~@3 C ~ B C A C@2 ~
>`.pickRestart({
  A: "~@7 x", B: "~ x ~@5 x", C: "~ x ~@6",
})).gain(0.2)

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

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

// drums · low tom
const low_tom = s("lt").struct("<~@47 [~@12 x!3 ~] ~@40>").gain(0.35)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@3 A ~@3 B ~@3 C ~@19 D ~@15 E ~@21 F ~@3 G ~@9 C ~@4>".pickRestart({
  A: "~ x ~ x!3 ~ x ~@8", B: "~@14 x!2", C: "~@3 x", D: "~@12 x!3 ~", E: "~@9 x!2 ~@5", F: "~@7 x", G: "~@9 x!7",
})).gain(0.35)

// drums · crash
const crash = s("cr").struct(`<
  ~@4 A ~@3 A ~@3 A ~@3 A ~@5 A ~@5 A ~@3 A ~@3 A ~@3 A ~ A ~@5 A ~@3 A ~@3 A ~@5 A ~@7 A ~@3 A ~@3 A ~@3 A ~ A ~ A ~
>`.pickRestart({
  A: "x",
})).gain(0.35)

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

// drums · ride · soft notes
const ride_soft = s("rd").struct(`<
  A B A ~ C D@2 B E ~ E ~ E F E G A H A H D I ~@2 G E G ~ G E H I E@2 F B F B F B J K ~@2 B ~ B ~ B ~ B ~ B ~ G K A@5 K
  ~@2 A@5 I ~@2 C G C G@2 I ~@2 G B J I J I H ~
>`.pickRestart({
  A: "~@5 x ~@8 x ~", B: "~ x ~@2", C: "~@6 x ~@4 x ~@4", D: "~@4 x ~@10 x", E: "~@7 x", F: "~@3 x ~@3 x",
  G: "~@3 x ~@4", H: "~@2 x ~@4 x", I: "~ x ~@4 x ~@9", J: "~ x ~@4 x ~@7 x ~", K: "~@5 x ~@10",
})).gain(0.1)

stack(
  bass, acoustic_guitar_steel, acoustic_guitar_steel_2, electric_guitar_jazz, kick, kick_soft, snare, snare_soft,
  low_tom, hihat, mid_tom, crash, ride, ride_soft
)