// Waiting On A Friend — The Rolling Stones
// 104 bpm, 4/4, key C major. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 2 electric guitar clean (copy of ch 1 acoustic guitar steel); ch 6 electric guitar muted (copy of ch 5 acoustic bass)
// note: Full arrangement: all 134 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(104/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 · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  A B C D C D C D C D C D C D C D E@4 F@2 G@2 H@2 I@2 E@4 F@2 G@2 H@2 I@2 E@4 F@2 J@4 C D C D C D C D C D C D C D C D C
  D C D C D C D E@4 F@2 G@2 H@2 I@2 E@4 F@2 G@2 H@2 C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D C D
  C D C D
>`.pickRestart({
  A: "~@2 [e3,g3,d4,e4]!2 [c3,e3,g3,d4,e4]!2 ~ [f3,a3,d4,f4]", B: "~ f3 [f3,a3,c4,f4]@4 [f3,a3] b2",
  C: "c3@2 [c3,e3,g3,d4,e4]!4 ~ [f3,a3,d4,f4]", D: "~ f3 [f3,a3,c4,f4]@5 b2",
  E: "[~@14 a2@4 a3@2 ~@2 a3@2 ~@2 a3@4 ~@16 c4@10 d3 e3 g3@2 g3 a3 c4@2, [a2,e3]@4 ~@2 e3@2 ~@7 g3@6 b3@3 ~@8, ~@2 [c4,e4]@2 e4@2 ~@13 g4@2 ~@11, ~@3 g4@2 c4@2 ~@11 [b3,e4]@2 e4@2 ~@10]/4", // A5 C E5
  F: "[g3@5 [g3,b3,f4] ~ [g3,b3,f4]@2 [g3,b3,f4]@3 a3 c4!2 a3]/2", // G7
  G: "[c3@2 ~@7 g3@2 [g3,c4,f4] ~ d3 e3 g3, ~@3 d4@3 d4@2 ~@8, ~@5 e4@2 c4@4 ~@5]/2", // Csus4
  H: "[g3@4 ~ [g3,b3,f4] ~ [g3,b3,f4]@2 [g3,b3,f4]@3 a3 c4!2 ~]/2", I: "[c3@2 ~ d4@2 g3@2 c4@2 g3@3 c3 g3 b2 g3]/2",
  J: "[c3@4 ~@10 c4@4 ~@2 d3 ~@11 g2@4 ~@2 [g3,b3,f4]@2 ~@2 [g3,b3,f4]@2 ~@2 [g3,b3,f4]@6 ~@4 a3@2 c4@2 c4@2 ~@2, ~@3 d4@3 d4@2 ~ [g3,c4]@2 [g3,e4]@2 g4@2 d3@2 ~@15, ~@5 e4@2 ~@3 e3@2 c3@2 g2@2 ~@16]/4", // G7 C5 C
})).s("gm_acoustic_guitar_steel").gain(0.19).pan(0.1)

// other · piano
const piano = note("<~@3 A B C D E F@2 G@2 H@2 I J ~@118>".pickRestart({
  A: "~@12 g5 a5 c6 d6", B: "c6 ~@3", C: "~@2 e6 g6 e6 d6 c6 a5, ~@4 d6 ~@3 d6 ~@7",
  D: "g5@2 g6 f6 [f6,g6] e6 [e6,g6] d6", E: "[d6,f6] c6 [c6,f6] a5 g5 a5 c6 d6",
  F: "[e4@4 e4 g4 a4 c5@3 a4!2 e5 d5 c5 a4, ~@24 d5 ~@7]/2", G: "[g4 a4 c5 d5@2 e5@2 f5@2 e5 c5 d5 a4 c5 g4 a4]/2",
  H: "[d4@2 e4@2 g4@2 a4@2 g4@2 c5@2 c5@2 e5@4 d5@2 c5@8 g4 a4 c5 d5]/2", I: "e5@3 [e5,g5]@2 [d5,f5]@2 a4, ~@6 d5 ~@9",
  J: "~ d5 ~ d5 ~ [c5,e5]@2 c5", // C
})).s("gm_piano").gain(0.48).pan(0.7)

// bass · acoustic bass
const bass = note(`<
  ~@7 A B@2 C@2 D@2 E@2 F G H I J@2 K@2 L M N@2 O P Q R S T U V W@2 X@2 Y Z AA I AB AC AD AE AF@2 AG@2 AH@4 AI@2 AJ AK
  AL@2 AM@2 AN@2 AH@2 AO@2 AP@2 AQ@2 AR AS AT@2 AU@2 AD AV AW@2 AD AX AR AS AY AZ BA BB AD BC L BD BE BF BG BH AH@2 BI@2
  BJ BK BL@2 BM BN BI@2 BO@2 BP BQ BR@2 BS BT BU BV BW BX AH@10
>`.pickRestart({
  A: "~@7 a1", B: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@2 ~ d2 ~ b1]/2", C: "[c2@2 ~@3 c2 ~ f1@2 ~@5 d2 c2]/2",
  D: "[c2@2 ~@3 c2 ~ f1@2 ~@4 a1 d2 b1]/2", E: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@2 ~ a1 a#1 b1]/2", F: "a1@4 a2@2 g2 d2",
  G: "f2!2 ~@2 d2 f2@2 f#2", H: "g2@2 ~@2 d2 g1@2 c2", I: "c2@2 ~@2 d2 e2 f2 f#2",
  J: "[g2@4 ~@4 d2@2 d2@2 ~@2 g1@4 g1 ~@3 a1@4 d2@2 g2@2 a1@2]/2", K: "[c2!2 ~@3 g1 ~ c2@3 ~@3 d2 e2 f2]/2",
  L: "g2@2 ~@3 d2 ~ g1", M: "g1@4 ~@2 g1 ~ g1 ~ d2@4 a1@2",
  N: "[c2@4 ~@6 g1@2 ~@2 c2@4 c2@2 ~@2 c2 ~ c2 ~ c2@2 ~@2 b1@2]/2", O: "a1@3 a2@2 a2 g2 d2", P: "f2@2 ~@3 f2@2 f#2",
  Q: "g2@2 ~@2 d2 d2@2 c2", R: "c2@2 ~@3 e2 f2 f#2", S: "g2@2 g2 ~ d2!2 ~ g1", T: "g1@2 ~ a1@2 d2 g2 a1",
  U: "c2@2 ~@3 g1@2 a1", V: "c2@2 ~ c2@2 d2 f2 f#2", W: "[g2@2 ~@2 d2!2 g1 g1@2 g1 ~ g1@2 d2 g2 a1]/2",
  X: "[c2!2 ~@3 g1 ~ c2@2 c2 ~ c2@2 c2 b1@2]/2", Y: "a1@3 a2@2 a2 g2 ~", Z: "f2@2 ~@2 d2 f2@2 f#2",
  AA: "g2@2 ~@2 d2 d2@2 a1", AB: "g2@2 g2 ~ d2!2 ~ e1", AC: "g1!2 ~@2 e1 g1 d2 a1", AD: "c2@2 ~@2 a1 g1@2 a1",
  AE: "c2@2 a1 c2@2 d2 f2 f#2", AF: "[g2@2 ~@3 d2 ~ g1@2 g1@2 a1@2 d2 g2 a1]/2",
  AG: "[c2@2 ~ c2 ~ c2 ~ f1@2 e1 f1@3 a1 d2 c2]/2", AH: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@3 a1 a#1 b1]/2",
  AI: "[c2!2 ~@3 c2 ~ f1@2 e1 f1@3 a1 a#1 b1]/2", AJ: "c2@2 ~@3 g2@2 f2", AK: "f2 ~@4 d2 ~ c2",
  AL: "[c2!2 ~@3 g2@2 f2@2 c2 f2@2 ~ d2!2 c2]/2", AM: "[c2@2 ~@3 g2@2 f2@2 d2 f2@3 a1 c2 a1]/2",
  AN: "[c2@2 ~ c2 d2 c2 ~ f1@2 e1 f1@3 a1 a#1 b1]/2", AO: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@3 a1 c2 b1]/2",
  AP: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@4 c2 b1]/2", AQ: "[c2@2 ~@3 c2 ~ f1@2 e1 f1 f1@2 c2!2 b1]/2",
  AR: "a1@3 a2@2 d2 g2 f#2", AS: "f2@2 ~ d2@2 f2@2 f#2", AT: "[g2@2 ~ g1 a1 d2 g2 c2@3 ~@3 c2 f2 f#2]/2",
  AU: "[g2@2 g2 ~@2 d2 ~ g1@2 ~ g1 g#1 a1 d2 g2 a1]/2", AV: "c2!2 ~ c2@2 d2 e2 f2",
  AW: "[g2@2 ~@2 d2!2 ~ g2@2 g2@3 g2!2 d2 c#2]/2", AX: "c2@2 ~ c2@2 c2 b1@2", AY: "g2@2 g2 d2!2 g1 d2 g1",
  AZ: "c2@2 ~ a1 ~ d2 e2 f2", BA: "g2@2 g2 ~@2 d2 ~ g1", BB: "g1@2 g1 g#1 a1 d2 g2 a1", BC: "c2!2 ~ c2@2 d2 f2 f#2",
  BD: "g1@2 g1 d2@2 g2 d2 a1", BE: "c2@2 ~@2 a1 g1 ~ a1", BF: "f1@2 e1 f1@2 a1 d2 c2", BG: "c2@2 ~@2 a1 c2@2 f2",
  BH: "f1 e1 f1@3 a1 d2 c2", BI: "[c2@2 ~@3 c2 ~ f1@2 e1 f1@3 a1 d2 b1]/2", BJ: "c2@2 ~@3 c2 ~ f1",
  BK: "f1 ~@4 a1 d2 b1", BL: "[c2@2 ~ a1!2 c2@2 f1@2 e1 f1@3 a1 d2 b1]/2", BM: "c2@2 ~@2 d2 g2@2 f2",
  BN: "f2!2 ~@3 f2@2 a1", BO: "[c2@2 ~@2 d2 c2 ~ f1@2 e1 f1@3 d2!2 b1]/2", BP: "c2!2 ~ c2!3 ~ f1",
  BQ: "f1@2 ~@3 a1 a#1 b1", BR: "[c2@2 ~@3 c2 g2 f2@2 d2 f2@3 d2!2 f2]/2", BS: "c2@2 ~@3 c2 g2 f2",
  BT: "d2@2 c2@2 f2@4 f2 ~@3 f2@2 f2@2", BU: "c2@4 ~@4 c2 ~ c2@2 g2@2 g2@2", BV: "g2 ~ f2@2 f2@4 ~@6 f2@2",
  BW: "c2@2 ~ c2!2 g2 ~ g2", BX: "~ f2 f2@5 f2",
})).s("gm_acoustic_bass").gain(0.29).pan(0.8)

// other · flute
const flute = note("<~@8 A B C D A B C E ~@50 A B C D A B C E ~@38 A B C D A B C E ~@14>".pickRestart({
  A: "e5 g5 ~ a5 ~ c6 ~ d6", B: "~ e6 ~ g6 ~ e6 ~ g6", C: "d6@3 ~", D: "a#5@3 a5 ~@4", E: "a#5@3 a5@2 ~@3",
})).s("gm_flute").gain(0.29)

// other · english horn
const english_horn = note(`<
  ~@16 A@2 B@2 C@3 ~ D@3 ~ E@2 F G H@3 ~ I@3 J@3 K@2 L@3 ~ M@4 N O P Q R S T U V ~@12 W@2 X Y Z AA@3 ~ AB@5 AC@2 ~ L@3 ~
  M@4 N O P Q R S T U V AD V ~@25
>`.pickRestart({
  A: "[~@2 a4!2 c5@2 ~ e4@2 a3 c4@2 ~@4]/2", B: "[~@2 d4 d4@3 e4@2 f4@4 c4@2 e4@8 ~@10]/2",
  C: "[~ d4@4 e4@2 f4@2 g4@2 a4@3 c5 g4@2 g4@3 ~@4]/3", D: "[~ d4@4 e4@2 f4@3 g4 a4@3 c5 g4@5 ~@4]/3",
  E: "[~ a4!2 b4 c5@2 e4 e4@2 a3 c4@2 ~@4]/2", F: "~ b3 d4 e4 ~ d4@2 c4", G: "e4 ~",
  H: "[~@3 b3 d4@6 d4@2 ~@2 f4@4 g4@4 a4@6 b4@2 g4@4 g4@8 ~@6]/3", I: "[~@2 d4@3 e4@2 f4@2 g4@2 a4@3 b3 c4@3 ~@6]/3",
  J: "[~@3 e5@6 e5!3 e5@2 c5 c5@2 c5@2 d4@3 ~@2]/3", K: "[~ d4!2 e4!2 c4@2 e4@3 ~@6]/2",
  L: "[~@2 d4@3 d4 ~ f4@2 g4@2 a4@3 b4 g4@2 g4@4 ~@3]/3",
  M: "[~@2 d4@3 e4@2 f4@2 g4@2 a4@3 b3 c4@3 ~@5 a4@2 a4 ~ a4@2 c4!3]/4", N: "e4 ~@3", O: "~ g4@2 a4@2 d4 f4!2",
  P: "e4@3 d4 c4@4 ~@6 f4@2", Q: "~ a4 ~ a4 ~ d4!2 c4", R: "f4@4 ~@3 f4", S: "~ g4@2 a4 ~ d4!2 c4", T: "c4@4 ~@3 a4",
  U: "~ g4@2 g4 ~ d4!2 c4", V: "c4 ~", W: "[~@3 e5@6 e5!2 d5 e5 d5@2 d5]/2", X: "d5 a4@2 c5@3 ~@2",
  Y: "~ d5!2 e5 d5@3 c5", Z: "g4 ~", AA: "[~ d4 d4@8 e4@4 f4@4 g4@4 a4@4 c5@2 ~@2 g4@4 g4@8 ~@6]/3",
  AB: "[~ d4@4 e4@2 f4@2 g4@2 a4@2 g4 g4@3 ~@4 e5@5 e5!2 d5@2 c5 e5@2 a4@2 c5@3 c5@2]/5",
  AC: "[~ d5!2 e5 c5@3 c5@2 g4@5 ~@2]/2", AD: "~@3 g4 ~ d4!2 c4",
})).s("gm_english_horn").gain(0.64).pan(0.4)

// chords · oboe
const oboe = note(`<
  ~@32 A@3 ~ B@3 ~ C@2 D@2 A@3 ~ E@4 F G H I J K L K M ~@21 N@3 ~@5 A@3 ~ E@4 F G H I J K O K P Q P ~@25
>`.pickRestart({
  A: "[~@4 [b4,d5]@6 [b4,d5]@2 ~@2 [b4,d5]@4 [c5,e5]@4 [d5,f5]@6 [d5,f5]@2 f5@2 ~@2 c5@3 d5 c5@6 ~@4, ~@15 c5@2 ~@7, ~@32 e5@5 ~@11]/3", // Bm C Dm
  B: "[~@2 [b4,d5]@3 [b4,e5]@2 [b4,f5]@2 [c5,f5]@2 [d5,f5]@3 [b4,d5] [c5,e5]@3 ~@6]/3", // Bm E5 Bdim F5 Dm Bm C
  C: "[~ [c5,g5]!3 [c5,g5]@2 [a4,e5] [a4,e5]@2 [a4,e5]@2 [a4,c5]@3 ~@2]/2", // C5 A5 Am
  D: "[~ [g4,d5]!2 [g4,e5]!2 [g4,f5]@2 [e4,e5]@2 ~@7]/2", // G5 C G7 E
  E: "[~@2 [b4,d5]@3 [b4,e5]@2 [b4,f5]@2 [c5,f5]@2 [d5,f5]@3 [b4,d5] [c5,e5]@3 ~@5 f5@2 d5 ~ f5@2 d5!2 c5]/4", // Bm E5 Bdim F5 Dm Bm C
  F: "e5 ~@3", G: "~ [c5,d5]@2 [e5,g5]@2 [d5,f5]!2 [c5,e5]", H: "[c5,e5]@3 [c5,d5] c5@4 ~@8",
  I: "~@3 [c5,f5] ~ [d5,f5]!2 [c5,e5]", J: "[c5,e5]@4 ~@3 [c5,f5]", K: "~ [d5,f5]@2 [e5,g5] ~ [d5,f5]!2 [c5,e5]",
  L: "c5@4 ~@3 [c5,f5]", M: "c5 ~", N: "[~ [d5,f5]@4 [c5,e5]@2 [d5,f5]@2 [d5,f5]@2 [c5,f5]@2 [b4,d5] [c5,e5]@3 ~@7]/3",
  O: "[e4,g4,c5]@4 ~@3 [c5,f5]", P: "[g4,c5,e5] ~", Q: "~@3 [e5,g5] ~ [d5,f5]!2 [c5,e5]",
})).s("gm_oboe").gain(0.19).pan(0.2)

// drums · kick
const kick = s("bd").struct("<~@8 A B A B A B A B C@11 D C@57 E C@48>".pickRestart({
  A: "x ~@4 x ~@2", B: "x ~@4 x ~ x", C: "x ~@2 x!3 ~ x", D: "x ~@2 x!5", E: "x ~@3 x!4",
})).gain(0.25)

// drums · snare
const snare = s("sd").struct(`<
  ~@7 A B C B C B C D E C@11 D C@22 B C B C B C@12 F C G@2 C@2 F C@7 G C@3 F C@10 B C B H C@25 H C@5 I J K
>`.pickRestart({
  A: "~@7 x", B: "~@2 x ~@4 x", C: "~ x ~ x", D: "~@2 x ~@2 x ~ x", E: "~@4 x ~@7 x!3 ~", F: "~@2 x ~ x!4",
  G: "~@2 x ~@3 x!2", H: "~@2 x ~@2 x!3", I: "~@2 x!2 ~ x!2 ~", J: "~ x!3", K: "~@4 x ~@2 x!2 ~ x ~ x ~ x ~",
})).gain(0.25)

// drums · low tom
const low_tom = s("lt").struct("<~@85 [~@6 x!2 ~@6 x!2] ~@13 [~@6 x!2 ~@2 x!2 ~@2 x ~] ~@34>").gain(0.25)

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

// drums · open hat
const open_hat = s("oh").struct("<~@3 A ~ A@2 ~@43 A ~ A ~ A ~@29 A ~@49>".pickRestart({
  A: "~@7 x",
})).gain(0.25)

// drums · crash
const crash = s("cr").struct("<~@8 A ~@7 A ~@11 A ~@21 A ~@17 A ~@5 A ~@7 A ~@3 A ~@39 A ~@7>".pickRestart({
  A: "x",
})).gain(0.25)

stack(acoustic_guitar_steel, piano, bass, flute, english_horn, oboe, kick, snare, low_tom, hihat, open_hat, crash)