// Lean on Me — Club Nouveau
// 88 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 121 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(88/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 · piano
const piano = note(`<
  A B C D E F G H I@3 J K@4 L F G M N F G O I@3 J K@4 L F G M N F G P Q R S@2 T R U@2 L F G V E F G O I@3 J K@4 L F G M
  N F G P Q R S@2 T R U@2 L F G V E F G O W X Y Z AA X Y AB@2 AC AD AE AF AG AF AG AF AG AF AH AI AJ AI AJ AI AJ AI AJ
  AI AJ AI ~@2
>`.pickRestart({
  A: "~@2 [e3,g3,c4] ~ c3 [e3,g3,c4] ~ c3 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4] ~ [a3,c4,f4] ~", // C Dm Em F
  B: "~@2 [a3,c4,f4] ~ c3 [a3,c4,f4] ~ c3 [a3,c4,f4] ~ [g3,b3,e4] ~ [f3,a3,d4] ~ [e3,g3,c4] ~", // F Em Dm C
  C: "~@2 [e3,g3,c4] ~ c3 [e3,g3,c4] ~ c3 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4]@3 a2", // C Dm Em
  D: "[g3,b3,e4]@4 ~@2 [f3,a3,d4]@3 c3 a#3 ~ a3 [f3,g3] [g1,e3] g3", // Em Dm Fsus2 C
  E: "c3 ~ [e3,g3,c4] ~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4] ~ [a3,c4,f4] ~", // C Dm Em F
  F: "~@2 [a3,c4,f4] ~@2 [a3,c4,f4] ~@2 [a3,c4,f4] ~ [g3,b3,e4] ~ [f3,a3,d4] ~ [e3,g3,c4] ~", // F Em Dm C
  G: "~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4]@3 ~", // C Dm Em
  H: "[f3,g3,b3]@4 ~@2 [e3,g3,c4]@7 ~@3", // G7 C
  I: "[[e4,g4,a#4,d#5]@3 ~@5 c4 ~ d4 ~ e4 ~ f4@5 ~@5 f4 ~ e4 ~ d4 ~ c4@5 ~@5 c4 ~ d4 ~ e4@3 ~]/3", // D#
  J: "e4@4 ~@2 d4@5 ~@5",
  K: "[[c4,c5]@3 ~@5 [c4,c5] ~ [d4,d5] ~ [e4,e5] ~ [f4,f5]@5 ~@5 [f4,f5] ~ [e4,e5] ~ [d4,d5] ~ [c4,c5]@5 ~@5 [c4,c5] ~ [d4,d5] ~ [e4,e5] ~ [b3,b4]@6 ~@2 [c4,c5] ~@3 [c4,e4] ~ [a3,d4] ~ [g3,c4,e4]@2]/4", // C D E F E D C D …
  L: "~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4] ~ [a3,c4,f4] ~", // C Dm Em F
  M: "[g3,b3,e4]@4 ~@2 [f3,a3,d4]@3 e3 a#3 ~ a3 [f3,g3] e3 g3", // Em Dm Fsus2
  N: "e3 ~ [e3,g3,c4] ~@2 [e3,g3,c4] ~@2 [e3,g3,c4] ~ [f3,a3,d4] ~ [g3,b3,e4] ~ [a3,c4,f4] ~", // C Dm Em F
  O: "[f3,g3,b3]@4 ~@2 [e3,g3,c4]@3 c3 a#3 ~ a3 [f3,g3] e3 g3", // G7 C Fsus2
  P: "[f3,g3,b3]@4 ~@2 [e3,g3,c4]@3 c3 a#3 ~ a3 [f3,a3] e3 g3", Q: "c4@3 ~ c4@2 ~ c4 a#3 ~ c4 ~@3 g3 ~",
  R: "f3 ~ g3 ~ a3 ~ c4 ~@5 [c4,e4,g4] [a3,d4,f4] [g3,c4,e4] ~", // C Dm C
  S: "[[c4,e4,g4]@3 ~ [c4,e4,g4] ~ [a3,d4,f4] ~ [g3,c4,e4]@3 ~ [g3,c4,e4] ~ g3 ~ g3@3 ~ [a3,d4,f4] ~ [g3,c4,e4] ~@5 e3 ~ f3 ~, ~@14 [b3,d4]@5 ~@13]/2", // C Dm C Dm C Bm
  T: "c4@3 ~ c4@2 ~ c4 a#3 ~ c4 ~@3 g4 ~",
  U: "[[c4,e4,g4]@3 ~ [c4,e4,g4] ~ [a3,d4,f4] ~ [g3,c4,e4]@3 ~ [g3,c4,e4] ~ [g3,b3,d4]@5 ~ [a3,d4,f4] ~ [g3,c4,e4] ~@3 [c4,e4] ~ [a3,d4] ~ [g3,c4,e4]@2]/2", // C Dm C G Dm C D5 C
  V: "[g3,b3,e4]@4 ~@2 [f3,a3,d4]@3 c3 a#3 ~ a3 [f3,g3] e3 g3", W: "[e4,g4,a#4,d#5]@3 ~ e4 ~ c5 ~ f4@2 ~ f4 ~ e4 ~ c4",
  X: "c4 e4@2 ~@2 e4 ~ c4!2 e4@2 ~@5", Y: "[c4,c5] ~ [c4,c5] ~ [e4,e5] ~ [c4,c5] ~ [f3,f4]@2 ~ [f3,f4] ~ e4 ~ c4",
  Z: "c4 ~ e4@7 ~ c4 ~@5", AA: "[c4,c5]@3 ~ [e4,e5] ~ [c4,c5] ~ [f3,f4]@2 ~ [f3,f4] ~ e4 ~ c4",
  AB: "[c4 ~ e4@4 ~ [c5,g5,a#5]@2 ~ [c5,f5,a5] ~ [c5,e5,g5] [d5,f5,a5] ~ [c5,e5,g5]@2 ~ [e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~]/2", // C7 F C Dm C
  AC: "~@2 [f4,a4,c5] ~@3 [f4,a4,c5] ~@3 [f4,a4,c5] ~@3 [f4,a4,c5] ~", // F
  AD: "~@2 [e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~", // C
  AE: "~@2 [b3,d4,g4] ~@3 [b3,d4,g4] ~ [b3,d4,g4]@3 ~@3 c4 ~", // G
  AF: "[d4,f4]@3 ~ [c4,e4] ~ [c4,e4] ~@2 g4 a4 g4 c5 ~ a4!2", AG: "[d4,f4]@3 ~ [c4,e4] ~ [c4,e4] ~@3 g5 ~ d#5 d5 c5 ~",
  AH: "[d4,f4]@3 ~ [c4,e4] ~ [c4,e4] ~ f5 e5 f5 g5 d#5 d5 c5 ~", AI: "c4 ~ c4 ~@2 d#3 e3 g3 c4 ~ c3 ~ a#2 c3 d#3 ~",
  AJ: "c4 ~ c4 ~@2 d#3 e3 g3 c4 ~ c3 ~ a#3 a3 g3 ~",
})).s("gm_piano").gain(0.35)

// bass · slap bass 2
const bass = note(`<
  ~@4 A B C D E ~ F G H@3 I H@3 J H@3 K E ~ F G H@3 I H@3 J H@3 L M N M O M N P Q H@3 J H@3 R E ~ F G H@3 I H@3 J H@3 L
  M N M O M N P Q H@3 J H@3 L S ~ T ~ U ~ V W X@2 Y Z E AA E AA E AA E AA AB AC AB AC AB AC AB AC AB AC AB AC ~
>`.pickRestart({
  A: "c2@3 ~@4 c2!2 ~ d2 ~ e2 ~ f2 ~", B: "~@7 c2 f2!2 e2 ~ d2 ~ c2 ~", C: "~@7 g2 c2 ~ d2 ~ e2@3 ~",
  D: "g1@2 ~ g1 a1 g1 c2@3 ~ g2 ~ a2 g2 e2 d2", E: "c2@3 ~@13", F: "~@14 c2 ~", G: "e2@3 ~ e2 ~ d2@3 ~ d2 ~ g2 ~ e2 ~",
  H: "[c2@3 ~@4 c2!2 ~ d2 ~ e2 ~ f2@5 ~@4 c2 f2 ~ e2 ~ d2 ~ c2@5 ~@4 c2!2 ~ d2 ~ e2@3 ~]/3",
  I: "g1@2 ~ g1 a1 g1 c2@3 ~ g2 ~ a2 ~ g2 ~", J: "e2@3 ~ e2 ~ d2@3 ~ g2 ~@3 g2 ~", K: "~ b1@3 b1 ~ c2@5 ~@3 g1 ~",
  L: "b1@3 ~ b1 ~ c2@5 ~@5", M: "c2 ~ c2 ~@5 a#1 ~ c2 ~@5", N: "~@8 a#1 ~ c2 ~@3 a#1 ~",
  O: "g1 ~ g1 ~@5 a#1 ~ c2 ~@3 a#1 ~", P: "c2 ~ c2 ~@5 e2 ~ f2 ~ f#2 ~ g2@2",
  Q: "~@2 g1 ~ a1 g1 c2@3 ~ g2 ~ a2 g2 e2 ~", R: "b1@3 ~ b1 ~ c2@5 ~@3 g1 ~",
  S: "[c2,c3]@3 ~ [e2,e3] ~ [c3,c4] ~ [f1,f2]@2 ~ [f1,f2] ~@4", // C E C F
  T: "[c2,c3] ~ [c2,c3] ~ [e2,e3] ~ [c2,c3] ~ [f1,f2]@2 ~ [f1,f2] ~@4", // C E C F
  U: "[c2,c3]@3 ~ [e2,e3] ~ [c2,c3] ~ [f1,f2]@2 ~ [f1,f2] ~@4", // C E C F
  V: "[c2,c3] ~ [c2,c3] ~ [e2,e3] ~ [d2,c3] ~ [f1,f2]@2 ~ [f1,f2] ~@4", W: "~@9 g1 a1 ~ a#1 ~ b1 ~",
  X: "c2 ~ c2@10 ~@2 g2 ~", Y: "c3@12 ~@2 b2 ~", Z: "g2@4 ~@2 g2 ~ g2@3 ~@5", AA: "c2@3 ~@7 a1 ~ a#1 ~ b1 ~",
  AB: "c2 ~ b1 ~ a#1@3 ~ a1 ~ g#1 ~ g1@3 ~", AC: "c2 ~ b1 ~ a#1@3 ~ d#2 ~ d#2 ~ d#2 ~ d2 ~",
})).s("gm_slap_bass_2").gain(0.27)

// other · brass section
const brass_section = note(`<
  ~@31 A@4 B C@2 D@2 ~ E F@2 ~ E G@3 H I B J K@3 ~@7 A@4 B L@4 ~ E F@2 ~ E M@4 I B J K@3 ~@16 N@4 ~@13
>`.pickRestart({
  A: "[~@10 e4 ~ d4 ~ e4@5 ~@5 c4 ~ d4 ~ e4 ~ f4@5 ~@4 d4 f4 ~ e4 ~ d4 ~ c4@5 ~@5 c4 ~ d4 ~ e4@3 ~]/4",
  B: "e4@3 ~ e4 ~ d4@5 ~@5", C: "[c4@3 ~@5 c4 ~ d4 ~ e4 ~ f4@5 ~@4 c4 f4 ~ e4 ~ d4 ~ c4@2]/2",
  D: "[g3@3 ~@3 c4 ~ d4@2 d4 ~ d4 ~ b3@6 d4 ~ c4@5 ~@5]/2", E: "~@12 g4 f4 e4 ~",
  F: "[g4@3 ~ g4 ~ f4 ~ e4@3 ~ e4 ~ d4@6 f4 ~ e4 ~@9]/2",
  G: "[g4@3 ~ g4 ~ f4 ~ e4@3 ~ e4 ~ d4@6 f4 ~ e4 ~@3 e4 ~ d4 ~ c4@5 ~@5 c4 ~ d4 ~ e4 ~ f4@2]/3",
  H: "e4 d4 c4 ~@4 d4 f4 ~ e4 ~ d4 ~ a3 ~", I: "g3@3 ~@5 c4 ~ d4 ~ e4@3 ~", J: "c4@3 ~@5 c4 ~ d4 ~ e4 ~ f4@2",
  K: "[c4 a3 c4 ~@4 c4 f4 ~ e4 ~ d4 ~ c4@5 ~@3 e4 ~ d4@2 c4 ~ c4 ~ b3@6 d4 ~ c4@5 ~@5]/3",
  L: "[c4@3 ~@5 c4 ~ d4 ~ e4 ~ f4@5 ~@4 c4 f4 ~ e4 ~ d4 ~ c4@5 ~@3 c4 ~ d4@2 d4 ~ d4 ~ b3@6 d4 ~ c4@5 ~@5]/4",
  M: "[g4@3 ~ g4 ~ f4 ~ e4@3 ~ e4 ~ d4@6 f4 ~ e4 ~@3 e4 ~ d4 ~ e4@5 ~@5 c4 ~ d4 ~ e4 ~ f4@5 ~@4 d4 f4 ~ e4 ~ d4 ~ c4@2]/4",
  N: "d4@4 c4 ~ c4 ~@9",
})).s("gm_brass_section").gain(0.27)

// chords · tenor sax · Dm C
const tenor_sax = note("<~@100 [[d4,f4,a4]@3 ~ [e4,g4,c5] ~ [e4,g4,c5] ~@9]!8 ~@13>").s("gm_tenor_sax").gain(0.35)

// drums · kick
const kick = s("bd").struct("<~@8 [x!2 ~@2 x ~@3]!80 ~@8 [x!2 ~@2 x ~@3]!23 ~@2>").gain(0.24)

// drums · snare
const snare = s("sd").struct("<~@8 [~ x ~ x]!80 ~@11 [~@3 x] [~ x ~ x]!19 ~@2>").gain(0.24)

// drums · hihat
const hihat = s("hh").struct("<~@8 [x!8]!80 ~@12 [x!8]!19 ~@2>").gain(0.24)

// drums · cowbell
const cowbell = s("cb").struct("<~@24 A@7 B ~@24 A@7 B ~@24 C@12 A@19 ~@2>".pickRestart({
  A: "x!2 ~ x ~ x ~ x", B: "x!2 ~ x ~@4", C: "x!4",
})).gain(0.29)

// drums · congas
const congas = s("conga:13").struct("<~@15 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@39 ~@2>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~@2 x!2 ~@6 x!2 ~@4",
})).gain(0.94)

// drums · congas
const congas_2 = s("conga:18").struct("<~@15 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@39 ~@2>".pickRestart({
  A: "~@3 x", B: "x!4",
})).gain(0.94)

// drums · congas
const congas_3 = s("conga:33").struct("<~@15 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@8 ~@7 A B@38 C ~@2>".pickRestart({
  A: "~@14 x!2", B: "~@6 x!2 ~@6 x!2", C: "~@6 x!2 ~@6 x ~",
})).gain(0.94)

stack(piano, bass, brass_section, tenor_sax, kick, snare, hihat, cowbell, congas, congas_2, congas_3)