// Lady Blue — Leon Russell
// 83 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 71 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(83/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 · epiano2 · "Track 1"
const epiano2 = note(`<
  A@2 B C B D B D E@2 F@2 G H I@2 J K L@2 J M F@2 G H I@2 J K L@2 N@2 O P Q R S@2 T U V@2 W@2 J X Y@2 F@2 G H I@2 J K
  L@2 J M Z@2 B D B D AA D AB
>`.pickRestart({
  A: "[~@3 [g4,d5]@4 ~]/2", B: "[e4,a4,c5]@7 ~", C: "[d4,f4,bb4]@7 ~", D: "[d4,f4,bb4]@13 ~@3",
  E: "[[e4,a4,c5]@27 ~@5]/2", F: "[[e4,a4,c5]@23 ~@9]/2", G: "[e4,g4,c5]@3 ~ [f4,a4,d5]@3 ~", H: "[c4,e4,a4]@7 ~",
  I: "[[d4,f4,a4]@9 ~ [d4,f4,a4] ~ [c4,e4,g4] ~ [bb3,d4,f4]@10 bb3@4 f4@3 ~]/2", J: "[a3,d4,e4]@7 ~ [a3,db4,e4]@6 ~@2",
  K: "[a3,d4,f4]@5 ~@3", L: "[[d4,f4,a4]@8 ~@2 [d4,f4,a4] ~ [c4,e4,g4] ~ [bb3,d4,f4]@10 bb3@4 f4@3 ~]/2",
  M: "[a3,db4,e4]@3 ~", N: "[[e4,a4,c5]@20 f4@4 a4@4 c5@3 ~]/2", O: "[g4,b4,d5]@7 ~", P: "g4@2 b4@4 d5@4 b4@4 g4 ~",
  Q: "[e4,a4,db5]@9 ~ db5@2 a4@2 e4@2", R: "a4@9 ~ db5@2 a4@2 e4 ~",
  S: "[[eb4,a4,c5]@9 ~@4 [a4,c5]@2 ~, ~@22 e4@7 ~@3]/2", T: "[d4,g4,b4]@5 b4 g4 d4", U: "g4@9 ~ b4@2 g4@2 d4 ~",
  V: "[[f4,bb4,d5]@25 ~@3 [bb4,d5]@2 ~@2, ~@13 f4@2 ~]/2", W: "[[e4,g4,c5]@25 ~ c5@2 g4@2 e4 ~]/2",
  X: "[a3,d4,f4]@9 ~ a3@2 [d4,f4]@2 ~@2", // Dm
  Y: "[[d4,f4,a4]@8 ~@2 [d4,f4,a4] ~ [c4,e4,g4] ~ [bb3,d4,f4]@9 ~ bb3@4 f4@3 ~]/2", // Dm C Bb
  Z: "[[d4,f4,a4]@9 ~ [d4,f4,a4] ~ [c4,e4,g4] ~ [d4,f4]@10 bb3@4 f4@2 ~@2]/2", AA: "[e4,a4,c5]@13 ~@3",
  AB: "[e4,a4,c5]@15 ~", // Am
})).s("gm_epiano2").gain(0.64)

// bass · electric bass finger · "Track 2"
const bass = note(`<
  ~@2 A B C D E F E G H I J K L@2 M N O@2 P Q H I J K L@2 M N R@2 H S T U V W H X Y Z AA AB AC AD AE AF AG@2 H I J K L@2
  M N O@2 P Q AH@2 AI AJ AK AL E F A
>`.pickRestart({
  A: "f2", B: "c2@7 ~ g2@3 ~ g2@2 c2@2", C: "f2@13 ~ g2@2", D: "c2@4 ~@2 g2@3 ~ g2 d2 f2@2 d2@2",
  E: "f2@6 c2@2 f2@3 ~ g2@4", F: "c2@4 ~@2 ab2@3 ~ a2@3 ~ c2@2", G: "c2@13 ~@3", H: "f2@3 c2 f2@3 c2",
  I: "f2@3 c2 f2@2 e2@2", J: "d2@4 ~@2 d2@2 a2@4 d2@3 ~", K: "a1@2 ~ a1 e2 a2 e2 a1",
  L: "[bb1@9 ~ bb1@2 a1@2 g1@10 d2@4 g2@3 ~]/2", M: "a2@8 ~@2 a2@2 ~ a2@3", N: "d2@3 ~ d2@2 c2@2",
  O: "[bb1@4 ~ bb1 a1 g1@6 ~ g1 ~]/2", P: "a1@10 a2@3 e2@3", Q: "a1@11 ~ a1@2 ~@2",
  R: "[bb1@8 ~@2 bb1@2 a1@2 g1@6 ~@2 g1@2 c2@5 ~ c2@2]/2", S: "f2@6 c2@2 f2@3 ~ f2@2 ~@2", T: "g2@3 ~ g2 d2 g1 ~",
  U: "g2@6 d2@2 g2@2 d2@2 g1@3 ~", V: "a1@6 a2 b2 a2@6 e2@2", W: "a1@3 a2@2 e2@2 a1", X: "f2@6 c2@2 f2@5 ~ f2@2",
  Y: "g2@3 d2 g2@3 d2", Z: "g2@3 d2 g2@2 g1 a1", AA: "bb1@6 f2@2 bb2 c3 bb2@4 f2@2", AB: "bb1@3 c3@2 bb2@2 bb1",
  AC: "c2@3 d3@2 c3@2 g2", AD: "c2 g2 c3 d3@2 c3@2 g2", AE: "a1@6 a2 ~ a2@2 e2@2 a1@4", AF: "d2@5 ~ d2 ~ d2@4 c2@3 ~",
  AG: "[bb1@8 ~@2 bb1@2 a1@2 g1@8 c2 ~ c2@5 ~ c2 ~]/2", AH: "[bb1@9 ~ bb1@2 a1@2 g1@7 ~ g1@2 c2@5 ~ c2 ~]/2",
  AI: "f2@6 c2@2 f2@5 ~ g2@2", AJ: "c2@5 ~@3 g2@3 ~ g2@2 c2@2", AK: "f2@3 c2 f2@3 g2",
  AL: "c2@5 ~ g2@3 ~ g2 d2 f2@2 d2@2",
})).s("gm_electric_bass_finger").gain(0.66)

// other · vibraphone · "Track 3"
const vibraphone = note(`<
  ~ A B C D E F G H ~@2 I ~ J K@2 L M N@2 O ~@2 I ~ J K@2 L M N@2 O P Q R ~@2 S T U V ~@9 I ~ J K@2 L M N@2 O ~ W@2 S X
  S X H X Y
>`.pickRestart({
  A: "f5 c5 d5 a4 c5 g4 a4 d4", B: "c4@9 ~@7", C: "bb4@5 ~ d5@4 ~@2 a5@4", D: "g5 ~", E: "a5@4 g5@4 f5@3 ~ d6@4",
  F: "c6@5 ~@3", G: "a5 g5 f5 d5", H: "c5@13 ~@3", I: "c5@2 d5@2 e5@2 f5@2 g5@2 a5@2 c6@3 ~", J: "a5@3 g5",
  K: "[f5@9 ~ f5@2 e5@2 d5@14 f5@4]/2", L: "e5", M: "f5@7 ~", N: "[bb5@9 ~ bb5@2 a5@2 ~@10 bb4@4 f5@4, ~@7 g5@9]/2",
  O: "e5@13 ~@3", P: "~ f4 a4 ~", Q: "d5@11 ~@5", R: "g4@2 b4@4 d5@4 b4@4 g4 ~", S: "c5@3 ~", T: "c5 b4@2 a4@2 c5@3",
  U: "g4@7 ~@9", V: "c5 b4 a4 g4@4 ~", W: "[f5@8 ~@2 f5@2 e5@2 d5@9 ~ bb4@4 d5@4]/2", X: "~ g4 bb4 d5", Y: "c5@7 ~",
})).s("gm_vibraphone").gain(0.29)

// chords · overdriven guitar · "Track 4"
const overdriven_guitar = note(`<
  ~@10 A B C D E F G F H E G I A B C D E F G F H E G I ~@16 A B C D E F G F H E G I J@2 ~@7
>`.pickRestart({
  A: "[f4,a4,c5]!2 ~@6 [f4,a4,b4,c5] [f4,a4,c5] ~@6", B: "[f4,a4,b4,c5] [f4,a4,c5] ~@6 [f4,a4,b4,c5] [f4,a4,c5] ~@6",
  C: "[f4,a4,b4,c5] [f4,a4,c5] ~@6 [f4,a4,d5]!2 ~@6", D: "[e4,a4,b4,c5] [e4,a4,c5] ~@6 [e4,a4,b4,c5] [e4,a4,c5] ~@6",
  E: "[d4,f4,g4,a4] [d4,f4,a4] ~@6 [d4,f4,g4,a4]!2 ~@6", F: "[d4,f4,a4]!2 ~@6 [d4,f4,g4,a4] [d4,f4,a4] ~@6",
  G: "[c4,e4,a4]!2 ~@6 [c4,e4,a4]!2 ~@6", H: "[d4,f4,g4,a4] [d4,f4,a4] ~@6 [d4,f4,g4,a4] [d4,f4,a4] ~@6",
  I: "[c4,e4,a4]!2 ~@6 [c4,e4,g4,a4] [c4,e4,a4] ~@6", J: "[d4,f4,a4]!2 ~@6 [d4,f4,a4]!2 ~@6",
})).s("gm_overdriven_guitar").gain(0.5)

// chords · electric guitar clean · "Track 5"
const electric_guitar_clean = note("<~@2 A@4 B@3 ~@25 C@2 D@2 E@2 F G H@2 I@2 J K L@2 ~@14 M@2 A@2 N@3>".pickRestart({
  A: "[~@10 f3@4 c3@5 ~@13]/2", B: "[~@10 f3@4 c3@5 ~@9 c3 ~ c3@9 ~@9]/3", C: "~@4 [b3,d4,gb4]@2 ~ [b3,d4,gb4]!2 ~@7",
  D: "~@4 [a3,db4,e4]@2 ~ [a3,db4,e4]!2 ~@7", E: "[[g3,c4,eb4]@9 ~@7]/2", F: "[g3,b3,d4]@15 ~",
  G: "[g3,b3,d4] ~ [g3,b3,d4]@12 ~@2", H: "~@4 [f4,bb4,d5]@2 ~ [f4,bb4,d5]!2 ~@7",
  I: "~@4 [e4,g4,c5]@2 ~ [e4,g4,c5]!2 ~@7", J: "~@4 [g3,d4]@4 ~@4 [g3,db4]@3 ~", K: "~@2 [a3,d4,f4]@5 ~",
  L: "[~@10 [a3,d4,f4] ~ [g3,c4,e4] ~ [f3,bb3,d4]@8 ~@10, ~@14 [g3,db4] ~@17]/2", M: "[~@5 f3@2 c3@2 ~@7]/2",
  N: "[~@10 f3@4 c3@5 ~@7 c3@2 ~ c3@16 ~@3]/3",
})).s("gm_electric_guitar_clean").gain(0.48)

// drums · kick
const kick = s("bd").struct("<~@2 A@7 B A@23 B C@15 D A@20 B>".pickRestart({
  A: "x ~@3 x!2 ~@2", B: "x", C: "~ x ~ x ~ x ~ x", D: "~@3 x ~@4",
})).gain(0.71)

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

// drums · hihat
const hihat = s("hh").struct("<A ~ B@7 C B@11 D B@7 D B@11 E B@3 D B D B D B@5 D B@3 D B@10 ~>".pickRestart({
  A: "x!3 ~", B: "x!8", C: "x!4", D: "x!7 ~", E: "x!5 ~ x ~",
})).gain(0.71)

// drums · mid tom
const mid_tom = s("mt").struct("<~@2 A@15 B A@15 C D@14 ~@2 A@11 B A@8 ~>".pickRestart({
  A: "~ x ~ x", B: "~@2 x ~@3 x!2", C: "~ x ~@2", D: "~@3 x",
})).gain(0.71)

// drums · open hat
const open_hat = s("oh").struct("<~@9 A ~@11 B ~@7 B ~@11 A ~@3 B ~ B ~@7 B ~@3 B ~@11>".pickRestart({
  A: "~@5 x ~ x", B: "~@7 x",
})).gain(0.71)

stack(epiano2, bass, vibraphone, overdriven_guitar, electric_guitar_clean, kick, snare, hihat, mid_tom, open_hat)