// La Grange — ZZ Top
// 155 bpm, 4/4, key A minor. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 129 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): OVERDRIVE.
setcpm(155/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 · "FINGERDBAS"
const bass = note(`<
  ~@24 A B C B D E A F G E G H G I G B A B J B G B G K L M L N O P L Q O P L R L N L P O R L N O S L P O P L N O N L T U
  V W X Y Z AA AB ~@8 AC AD AE AD AF AG AH AI AJ AD AK AI AJ AD AJ AD AF AD AJ AL AF AI AJ AM AK AD AJ AM AJ AM AJ AD AN
>`.pickRestart({
  A: "a1 ~@2 a1 a1@2 ~ a1 a1@2 ~ a1 a1@2 ~ a1", B: "a1@2 ~ a1 a1@2 ~ a1 c2@2 ~ c2 d2@2 ~ d2",
  C: "a1 ~@2 a1!2 ~@2 a1 a1@2 ~ a1!2 ~@2 a1", D: "a1@2 ~ a1!2 ~@2 a1 a1@2 ~ a1!2 ~@2 a1",
  E: "a1 ~@2 a1 a1@2 ~ a1 c2@2 ~ c2 d2@2 ~ d2", F: "a1 ~@2 a1 a1@2 ~ a1 a1@2 ~ a1!2 g1 ~ e1",
  G: "a1@2 ~ a1 a1@2 ~ a1 a1@2 ~ a1 a1@2 ~ a1", H: "a1@2 ~ a1!2 ~@2 a1 c2@2 ~ c2 d2@2 ~ d2",
  I: "a1 ~@2 a1!2 ~@2 a1 c2@2 ~ c2 d2@2 ~ d2", J: "a1 ~@2 a1 a1@2 ~ a1 a1@2 ~ a1!2 ~@2 a1", K: "a1@3 ~@13",
  L: "c2@2 ~ c2 c2@2 ~ c2 c2@2 ~ c2 c2@2 ~ c2", M: "c2@2 ~ c2 c2@2 ~@2 d#2@2 ~ c2 f2@3 a#1, ~@7 c2@2 ~@7",
  N: "c2@2 ~ c2 c2@2 ~ c2 d#2@2 ~ c2 f2@3 a#1", O: "c2 ~@2 c2 c2@2 ~ c2 c2@2 ~ c2 c2@2 ~ c2",
  P: "c2@2 ~ c2 c2@2 ~ c2 d#2@2 ~ c2 f2@2 ~ a#1", Q: "c2 ~@2 c2 c2@2 ~ c2 d#2@2 ~ c2 f2@3 a#1",
  R: "c2@2 ~ c2 c2@2 ~ c2 d#2@3 c2 f2@2 ~ a#1", S: "c2@2 ~ c2 c2@2 ~ c2 d#2@3 c2 f2@3 a#1",
  T: "c2@2 ~ c2 c2@2 ~ c2 d#2@3 c2 f2@2 ~@2", U: "g2@3 ~@5", V: "f#2@5 ~@11", W: "f2@3 ~@5",
  X: "a1 ~@2 a1 c2 c#2 ~ a2@7 ~@2", Y: "g2@3 ~@13", Z: "f#2 ~@3", AA: "f2 ~@3",
  AB: "a1@2 ~@2 c2 c#2 ~ a2@8 ~, ~@3 a1@2 ~@11", AC: "a1@2 ~ a1 c2@3 a1 a1@2 ~ a1 c2@3 a1",
  AD: "a1@2 ~ a1 c2@2 ~ a1 c2@4 d2@4", AE: "a1 ~@2 a1 c2@2 ~ a1 a1@2 ~ a1 c2@3 a1",
  AF: "a1@2 ~ a1 c2@2 ~ a1 a1@2 ~ a1 c2@3 a1", AG: "a1@2 ~ a1 c2@3 a1 c2@2 ~ c2 d2@2 ~ d2",
  AH: "a1@2 ~@2 c2@2 ~ a1 a1@2 ~ a1 c2@2 ~ a1, ~@3 a1@2 ~@11", AI: "a1@2 ~ a1 c2@3 a1 c2@4 d2@4",
  AJ: "a1@2 ~ a1 c2@2 ~ a1 a1@2 ~ a1 c2@2 ~ a1", AK: "a1 ~@2 a1 c2@2 ~ a1 a1@2 ~ a1 c2@2 ~ a1",
  AL: "a1@2 ~ a1 c2@2 ~ a1 c2@2 ~ c2 d2@2 ~ d2", AM: "a1@2 ~ a1 c2@2 ~ a1 c2@4 d2@3 ~", AN: "a1 ~@3",
})).s("gm_electric_bass_finger").gain(0.5)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note(`<
  ~@25 A ~ A B A ~ C ~ A B A D A ~ A ~ A ~ E@2 A F ~@2 G ~ G ~ H ~ G ~ G ~ G I G ~ G ~ G ~ G ~ G ~ G ~ G ~ G ~ G ~@2 J K
  L M N O P Q ~@9 A ~ A B A B A ~ A ~ R B A ~ A S A ~ A ~ A ~ A ~ T ~ R ~ A ~@3
>`.pickRestart({
  A: "~@11 a2 ~@3 a2", B: "[e3,a3] ~@7", C: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@2 ~ a2 [a3,d4]@3 a2", D: "a3 ~@7",
  E: "[~@11 a2 ~@3 a2@2 ~@15]/2", F: "~@15 g2", G: "~@11 c3 ~@3 c3", H: "~@8 c4@2 ~ c3 d#4 ~@2 c3", I: "[g3,c4] ~@7",
  J: "a4@3 g4@2 a4@3 g4@3 a4@2 g4@3", K: "a4@3 f#4@2 a4@3 f#4@3 a4@3 f#4@2", L: "a4@3 f4@3 a4@3 f4@2 a4@3 f4@2",
  M: "a2@2 ~ a2 c3 c#3 ~ [e3,a3]@8 [e3,a3]", N: "~ a4@2 g4@2 a4@3 g4@3 a4@2 g4@3",
  O: "a4@3 f#4@3 a4@2 f#4@3 a4@3 f#4@2", P: "~ a4@2 f4@3 a4@3 f4@3 a4@2 f4@2", Q: "a2@2 ~ a2 c3 c#3 ~ [e3,a3]@9",
  R: "~@8 a3 ~@2 a2 ~@3 a2", S: "[e3,a3]@3 ~@13", T: "~@8 [e3,a3] ~@2 a2 ~@3 a2",
})).s("gm_overdriven_guitar").gain(0.35).pan(0.6)

// chords · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note(`<
  A B@2 C D C D E A F D F G C D C G C H C D F H ~ A I H J G I A ~ A C G K D I H C H I A E H I A L M N M O P Q M R M N M
  S T@2 M U M V P U M U M U M U M W M U M U ~@8 A X Y X Z C AA@2 A AB H AC G I G I H I H C G I H E AD I H I A I H I H I
  H I H AE H AF AG
>`.pickRestart({
  A: "[e3,a3] ~@2 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", // A5
  B: "[~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 e3 [a3,d4]@3 ~ [g3,c4]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3], ~@15 e3@2 ~@15]/2", // A5 C5 D5 C5 A5
  C: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 e3 [a3,d4]@3 e3", D: "[e3,g3]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]",
  E: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 e3 [a3,d4]@2 ~ e3", F: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@2 ~ e3 [a3,d4]@3 e3",
  G: "[g3,c4]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", // C5 A5
  H: "[e3,a3]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", I: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 ~ [a3,d4]@3 ~",
  J: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 e3 [a3,d4]@3 e3, ~@8 a3 ~@7", // A5 C5 D5
  K: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 ~ [a3,d4]@2 ~@2", L: "~@3 [e3,a3] ~@12",
  M: "[g3,c4]@2 ~ [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4]", // C5
  N: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@4 [c4,f4]@3 ~, ~@12 d#4 ~@3", // C5 D#5 F5
  O: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@3 g3 [c4,f4]@3 d#4", // C5 D#5 F5
  P: "[g3,c4] ~@2 [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4]", // C5
  Q: "~@3 [g3,c4] ~@3 [g3,c4,d#4] [a#3,d#4]@3 ~ [c4,f4]@3 ~", R: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@3 g3 [c4,f4]@3 g3",
  S: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@2 ~ g3 [c4,f4]@2 ~ a#3", // C5 D#5 F5
  T: "[~@3 [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4] ~@3 [g3,c4]@2 ~@2 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@4 [c4,f4]@3 ~, ~@28 d#4 ~@3]/2", // C5 D#5 F5
  U: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@3 ~ [c4,f4]@3 ~", V: "~@3 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@4 [c4,f4]@3 ~",
  W: "[g3,c4] ~@2 [g3,c4] ~@3 [g3,c4] [a#3,d#4]@3 ~ [c4,f4]@3 ~", // C5 D#5 F5
  X: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@2 ~ e3 [a3,d4]@2 ~ e3", // A5 C5 D5
  Y: "[a3,d4]@2 ~ [e3,g3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", // D5 Em A5
  Z: "[a3,d4]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", // D5 A5
  AA: "[[g3,c4]@2 ~ [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]@2 ~@15]/2", // C5 A5
  AB: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@4 [a3,d4]@3 ~", AC: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@2 ~@2 [a3,d4]@3 e3",
  AD: "g3 ~@2 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3] ~@3 [e3,a3]", // A5
  AE: "~@3 [e3,a3] ~@3 [e3,a3] [g3,c4]@3 ~ [a3,d4]@3 ~, ~@8 a3 ~@7", // A5 C5 D5
  AF: "~@3 [e3,a3]@2 ~@2 [e3,a3] [g3,c4]@3 ~ [a3,d4]@3 ~", AG: "[e3,a3]@3 ~@13",
})).s("gm_electric_guitar_muted").gain(0.4)

// chords · rock organ · "ELEC ORGAN"
const rock_organ = note(`<
  ~@24 A@2 B@2 A@2 B@4 C@2 B@4 C@2 A@2 C@2 D@2 E@22 F@2 E@8 G@3 H I@3 J ~@7 K@3 L@2 M@6 L@2 N@4 O@2 P@2 N@2 M@4 N@6 Q
>`.pickRestart({
  A: "[[e4,a4]@24 [g4,c5]@3 ~ [a4,d5]@3 ~]/2", B: "[[e4,a4]@23 ~ [g4,c5]@3 ~ [a4,d5]@3 ~]/2",
  C: "[[e4,a4]@23 ~ [g4,c5]@3 ~ [a4,d5]@2 ~@2]/2", D: "[[e4,a4]@19 ~@13]/2",
  E: "[[g4,c5]@23 ~ [a#4,d#5]@3 ~ [c5,f5]@3 ~]/2", F: "[[g4,c5]@22 ~@2 [a#4,d#5]@3 ~ [c5,f5]@3 ~]/2",
  G: "[g5@16 f#5@16 f5@15 ~, a5]/3", H: "a4 ~@2 a4 c5 c#5 ~ a5@8 ~, ~@6 e5@9 ~", I: "[g5@16 f#5@15 ~ f5@16, a5]/3",
  J: "a4@2 ~ a4 c5 c#5 ~ [e5,a5]@9", // A5
  K: "[~@7 [f#2,g2,g#2,a2,a#2,b2] [c3,d3,d#3,e3,f#3] [f3,g#3,a#3] a#3 g#3 [c#3,d#3] ~ [a2,b2,c3,c#3,d3,d#3,e3] [f3,g3,g#3,a3,a#3,b3,c#4] [a#3,c4,d4,d#4,e4,f4,f#4,g#4] d#4 [f#4,g#4,c#5] ~@21 [g5,c6]@3 ~ [a5,d6]@3 ~, ~@13 g#2@2 f#3@2 [e5,a5]@24 ~@7]/3", // Cdim A#7 C#sus2 A C#7 A#7 F#sus2 C5 …
  L: "[[e5,a5]@24 [g5,c6]@4 [a5,d6]@3 ~]/2", M: "[[e5,a5]@24 [g5,c6]@3 ~ [a5,d6]@3 ~]/2",
  N: "[[e5,a5]@23 ~ [g5,c6]@3 ~ [a5,d6]@3 ~]/2", O: "[[e5,a5]@24 ~@7 f#4]/2",
  P: "[[d#4,g#4,a#4] [c#5,d#5] ~@22 [g5,c6]@3 ~ [a5,d6]@3 ~, [e5,a5]@3 ~]/2", Q: "[e5,a5]@3 ~@13",
})).s("gm_rock_organ").gain(0.3)

// chords · rock organ · "ELEC ORGAN" · soft notes · A#m D#m Gm F#sus2 A#m
const rock_organ_soft = note(`<
  ~@95
  [~@8 c#3 c#4 ~ [a#3,c#4] [a#2,f#3] [d#2,f#2] [g2,a#2] ~]
  [~ a#4 ~@14]
  ~@16
  [~@10 [f#2,g#2] [a2,b2,c3,c#3] [d3,d#3,e3,f3] [g3,g#3,a3] [a#3,c#4] d#4, ~@5 a#2 f#3 ~]
  ~@15
>`).s("gm_rock_organ").gain(0.15)

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

// drums · rim
const rim = s("rim").struct("<[x ~@2 x!2 ~@2 x!2 ~@2 x!2 ~@2 x]!23 x ~@64 [x ~@2 x!2 ~@2 x!2 ~@2 x!2 ~@2 x]!7 ~@34>")
  .gain(0.25)

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

// drums · low tom
const low_tom = s("lt").struct("<~@23 A ~@7 A ~@15 B ~@31 C ~@15 A ~@17 A ~@3 A ~@3 A ~@3 A ~ A ~>".pickRestart({
  A: "~@15 x", B: "~@4 x!2 ~ x ~@4 x!2 ~ x", C: "~@13 x ~ x",
})).gain(0.3)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@97 A ~ B ~ A C ~@9 B@7 C ~@2 A B C ~ C A ~>".pickRestart({
  A: "x", B: "x!2", C: "~ x",
})).gain(0.15)

// drums · mid tom
const mid_tom = s("mt").struct("<~@23 A ~@7 A ~@15 B ~@31 C ~@15 A ~@17 A ~@3 D ~@7 D ~ A ~>".pickRestart({
  A: "~@13 x ~@2", B: "~ x ~ x!2 ~@4 x ~ x!2 ~@3", C: "~@11 x!2 ~@3", D: "~@12 x!2 ~@2",
})).gain(0.3)

// drums · high tom
const high_tom = s("ht").struct("<~@23 A ~@7 A ~@15 B ~@31 C ~@15 A ~@17 A ~@3 D ~@3 E ~@3 D ~ A ~>".pickRestart({
  A: "~@3 x", B: "~ x ~@8 x ~@5", C: "~@8 x!2 ~@6", D: "~@8 x!2 ~ x ~@4", E: "~@13 x ~@2",
})).gain(0.3)

// drums · crash
const crash = s("cr").struct("<~@24 A ~@7 A ~@15 A ~@31 A@3 B A@3 B A ~@7 A ~@17 A ~@3 A ~@3 A ~@3 A ~ A>".pickRestart({
  A: "x", B: "x ~@6 x ~@8",
})).gain(0.25)

// drums · ride
const ride = s("rd").struct(`<
  ~@24 A B C B@4 A C B@4 C A D A B A B A B A E F D A C@4 D A B@4 D B@2 A B A B A@3 B@2 A@2 C A B A G E@3 H E@4 ~@8 A B A
  B A B A B@2 D A B@2 D A D A I A B A@3 C A D B C B J A@2 ~
>`.pickRestart({
  A: "x!4", B: "x ~@3 x ~@3 x ~@3 x ~@2 x", C: "x ~@3 x ~@2 x!2 ~@3 x ~@2 x", D: "x ~@3 x ~@2 x!2 ~@3 x ~@3", E: "x",
  F: "~ x!3", G: "x!3 ~", H: "x ~@6 x ~@8", I: "x ~@3 x ~@2 x!2 ~@7", J: "x!2 ~@2",
})).gain(0.25)

// drums · cowbell
const cowbell = s("cb").struct("<~@24 [x!4]!56 x!8 ~@4 [x!4]!36 x>").gain(0.25)

stack(
  bass, overdriven_guitar, electric_guitar_muted, rock_organ, rock_organ_soft, kick, rim, snare, low_tom, hihat,
  hihat_soft, mid_tom, high_tom, crash, ride, cowbell
)