// I Can't Get No (Satisfaction) — The Rolling Stones
// 140 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 127 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): Fuzz Git.
setcpm(140/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, A@4 for four bars: edit a riff to change every repeat.

// chords · piano
const piano = note(`<
  A ~@3 B C B D B D E F G F H@2 I@2 J K L M N D O D B D B D B D P D Q D R D S ~ P T Q U ~ F H@2 V@2 W@2 X Y Z@2 B D AA D
  P U P C B D P AB P U AC D AD ~ P D P U ~ F H@2 V@2 W@2 P AE AF AG B D B D AH U P D P D B U AH D AH D AI ~ AJ D N D AK
  D AL D AJ D B D AM AN AO AP AQ AR ~
>`.pickRestart({
  A: "c#-1", B: "[e3,g#3,b3,e4] ~ [e3,g#3,e4]@5 ~, ~ b3@2 ~", C: "[d3,f#3,a3,d4]@11 ~ [d3,f#3,a3,d4]@3 ~",
  D: "[d3,f#3,a3,d4]@13 ~@3", E: "[e3,g#3,b3,e4]@11 ~@5", F: "~@5 e3 b3 c#4", G: "e3",
  H: "[e3@21 ~@5 e3@2 b3@2 c#4@2]/2", I: "[e3@12 ~@2 b3 c#4, ~@13 e3@2 ~]/2", J: "e3@7 ~",
  K: "b2@7 ~, a3@3 ~, f#3@7 ~@9, d#3@5 ~@11", L: "[e3,b3,e4]@14 a3 ~, g#3@9 ~@7", M: "[a3,c#4,e4]@7 ~, a2@3 ~",
  N: "[g#3,b3,e4] ~@3 [e3,g#3,e4]@10 ~@2, e3 ~ b3@4 ~@2", O: "[g#3,b3,e4] ~@3 [e3,g#3,e4]@11 ~, e3@2 ~@2 b3@9 ~@3",
  P: "[e3,g#3,b3,e4]@7 ~", Q: "[e3,g#3,b3,e4]@2 ~@2 [e3,g#3,e4]@11 ~, ~ b3@2 ~", R: "[e2,e3] ~ [e2,e3]@5 ~",
  S: "[e2,e3,b3,e4]@5 ~@11", T: "[d3,d4], [f#3,a3]@3 ~", U: "[d3,f#3,d4]@7 ~, a3@3 ~", V: "[e3@12 ~ e3 b3 c#4]/2",
  W: "[e3@3 ~]/2", X: "[g#3,b3,e4]@13 ~@3, e3", Y: "[f#3,b3,d#4]@15 ~",
  Z: "[[b3,e4]@13 ~@3 [a2,a3,c#4,e4]@13 ~@3, e3@29 ~@3, g#3@11 ~@21]/2", // E5 A
  AA: "[e3,g#3,b3,e4]@2 ~@2 [e3,g#3,b3,e4]@9 ~@3", AB: "[d3,f#3,d4]@15 ~, a3@13 ~@3", AC: "[e3,g#3,e4]@15 ~, b3@13 ~@3",
  AD: "[e3,g#3,b3,e4] ~@7", AE: "[a3,b3,d#4]@7 ~", AF: "[g#3,b3,e4]@7 ~, e3 ~@7", AG: "[a3,c#4,e4]@13 ~@3",
  AH: "[e3,g#3,b3,e4]@13 ~@3", AI: "[e3,g#3,b3,e4]@5 ~@11", AJ: "[e3,g#3,e4]@7 ~, b3@3 ~",
  AK: "[e3,g#3,e4] ~@3 [e3,g#3,b3,e4]@9 ~@3, b3 ~@7", AL: "[e3,g#3,b3,e4] ~@3 [e3,g#3,e4]@11 ~, ~ b3@2 ~",
  AM: "[e3,e4]@13 ~@3, [g#3,b3]@11 ~@5", AN: "[g3,b3,d4]@13 ~@3", AO: "[a3,c#4,e4]@3 ~",
  AP: "[c3,g3,c4,e4]@7 ~ [d3,f#3,a3,d4]@5 ~@3", AQ: "[e2,e3,g#3] ~ [e2,e3,g#3,b3,e4]@5 ~, [b3,e4] ~@15",
  AR: "[e2,e3,b3,e4]@3 ~@13", // E5
})).s("gm_piano").gain(0.32).pan(0.6)

// chords · rock organ · "Orgel"
const rock_organ = note(`<
  ~@2 A B A C A B D B E@8 F@4 D B D B D B D B D B D B D B D G ~@2 D B D B E@8 H@4 I B D B A B D B D B J B D K D C ~@2 D
  B L@2 M@8 N@6 O P Q B A B D B D B D B D B ~@2 D B D R D B S@2 D T D B U@2 V@2 W@2 ~
>`.pickRestart({
  A: "[g#4,b4]@7 ~, e5", B: "[f#4,a4]@7 ~, d5", C: "[f#4,a4,d5]@13 ~@3", D: "[g#4,e5], b4@7 ~",
  E: "[[g#4,b4] c#5 [g#4,b4] c#5, e5@127 ~, ~@16 a4@15 ~@17 a4@15 ~]/8", // G#m
  F: "[e5@16 d#5@16 g#4@14 ~@2 [a4,c#5]@15 ~, b4@3 ~, g#4@7 ~ f#4@7 ~ e5@15 ~]/4", G: "[f#4,a4,d5]",
  H: "[g#4@15 ~ d#5@16 g#4@15 ~ [a4,c#5]@15 ~, b4@3 ~, ~@8 f#4@7 ~ e5@16]/4", I: "[g#4,b4]@13 ~@3, e5",
  J: "[g#4,b4]@7 ~, e5, c5 ~@15", K: "~ a4@14 ~, [f#4,d5]@15 ~",
  L: "[[g#4,e5]@15 ~ [f#4,a4]@13 ~@3, b4@14 ~ d5@14 ~@3]/2", // C#m F#m
  M: "[b4@16 [a4,c#5]@15 ~ [g#4,b4]@16 c#5@16, e5, g#4@15 ~@33 a4@15 ~]/8", // A G#m
  N: "[g#4@15 ~ d#5@16 g#4@13 ~@3 [a4,c#5]@15 ~ b4@15 ~ d5@16, b4@48 ~@16 g#4@14 ~ f#5@17, ~@8 a4@7 ~ e5@24 a4@7 ~]/6", // A
  O: "[g#4,b4,e5]", P: "[f#4,a4,d5]@15 ~, g#4 ~@15", Q: "[b4,e5], g#4@7 ~", R: "[f#4,a4,d5]@15 ~",
  S: "[[g#4,e5]@15 ~ [f#4,a4]@13 ~@3, b4@14 ~ d5@16 ~]/2", T: "[f#4,d5]@15 ~, a4@13 ~@3",
  U: "[[g#4,e5] d5, b4, ~@8 g4@7 ~]/2", V: "[[a4,c#5]@15 ~ c5@8 [f#4,a4]@6 ~@2, e5@25 ~@7, ~@8 g4@3 ~ d5@4]/2",
  W: "[[g#4,b4,e5] ~ [g#4,b4,e5]@7 ~@7]/2", // E
})).s("gm_rock_organ").gain(0.22)

// chords · electric guitar clean · "E-Guitar"
const electric_guitar_clean = note(`<
  ~@2 A@2 B@4 C@2 D@2 E@2 D@2 E@2 D F G E H@4 I@2 H@10 J ~ H@2 K@2 D@2 E@2 D@2 E@2 D F G E H@16 J ~ L@2 K@2 D@2 E M N D
  E@2 D F G E H@2 O@2 P@2 H@2 I@2 H@6 Q ~ R@2 H@10 S@2 T@2 U@2 ~
>`.pickRestart({
  A: "[[e3,a3,b3] ~@3 [e3,b3]@5 ~ [e3,b3] ~ [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@3 ~ [c#3,c#4]@4]/2", // Esus4 E5 C# D C#
  B: "[[e3,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3] ~ [c#3,c#4]@2 [d3,d4]@7 ~ [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // E5 C# D C#
  C: "[[e3,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3] ~ [c#3,c#4]@2 [d3,d4]@7 ~ [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@2 ~@2]/2", // E5 C# D C#
  D: "[e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~", // E5
  E: "[a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~", // A5
  F: "[b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~ [b3,f#4] ~", // B5
  G: "[e4,b4] ~ [e4,b4] ~ [e4,b4] ~ [e4,b4] ~ [e4,b4] ~ [e4,b4] ~ [e4,b4] ~ [e4,b4] ~", // E5
  H: "[[e3,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // E5 C# D C#
  I: "[[e3,b3]@2 ~@2 [e3,b3]@4 ~@2 [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // E5 C# D C#
  J: "[e3,b3] ~@15", // E5
  K: "[[e3,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@4 c#4@4, ~@28 c#3 ~@3]/2", // E5 C# D
  L: "[[e3,b3] ~@3 [e3,b3]@5 ~ [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // E5 C# D C#
  M: "[a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,e4] ~ [a3,f#4]@2 [a3,g4]@2", // A5 D A7
  N: "e3 ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~", // E5
  O: "[[b2,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@6 ~@2 [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // B E5 C# D C#
  P: "[[e3,b3] ~@3 [e3,b3]@4 ~@2 [e3,b3]@2 [c#3,c#4]@2 [d3,d4]@7 ~ [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // E5 C# D C#
  Q: "[e3,b3]@2 ~@2 [e3,b3]@5 ~@7", // E5
  R: "[[e3,b3] ~@3 e3@6 b3@2 [c#3,c#4]@2 [d3,d4]@7 ~ [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4, ~@4 b3@5 ~@23]/2", // E5 C# D C#
  S: "[[b2,b3] ~@3 [b2,b3]@5 ~ [b2,b3]@2 [c#3,c#4]@2 [d3,d4]@7 ~ [d3,d4] ~ [d3,d4]@4 [c#3,c#4]@4]/2", // B C# D C#
  T: "[[e3,e4] ~@3 [e3,e4]@5 ~ [e3,e4]@2 [f#3,f#4]@2 [g3,g4]@6 ~@2 [g3,g4] ~ [g3,g4]@4 [f#3,f#4]@4]/2", // E F# G F#
  U: "[[e3,e4] ~@3 [e3,e4]@15 ~@13]/2", // E
})).s("gm_electric_guitar_clean").gain(0.28)

// other · vibraphone · "Bells"
const vibraphone = note("<~@11 A B C D A B C D ~@26 A B C D A B C D ~@26 A B C D A B ~@42>".pickRestart({
  A: "~@10 b4 ~ c#5 ~ b4 ~", B: "e4 ~@15", C: "~@10 e4 ~ f#4 ~ e4 ~", D: "b3 ~@15",
})).s("gm_vibraphone").gain(0.16).pan(0.4)

// chords · pizzicato strings · "Pizzicat"
const pizzicato_strings = note(`<
  ~@4 A B A B A B ~ C D C E@2 D ~@21 A B A B A B ~ C D C D C D ~@21 A B A B A B ~ C D C D C D ~@21 A B A B A B A B A B A
  B A B A F G H I J ~
>`.pickRestart({
  A: "~@4 [e4,g#4,b4,e5] ~@5 [e4,g#4,b4,e5] ~@5", B: "[d4,f#4,a4,d5] ~@5 [d4,f#4,a4,d5] ~@9", C: "~@10 e4 ~ b4 ~ c#5 ~",
  D: "e4 ~@15", E: "[e4@27 ~ b4 ~ c#5 ~]/2", F: "~@4 [g4,b4,d5,g5] ~@5 [g4,b4,d5,g5] ~@5",
  G: "~@4 [e4,a4,c#5,e5] ~@5 [e4,a4,c#5,e5] ~@5", H: "~@4 [g4,c5,e5] ~@7 [a4,d5,f#5] ~@3",
  I: "[e4,g#4,b4,e5] ~@3 [e4,g#4,b4,e5] ~@11", J: "[e4,g#4,b4,e5] ~@15",
})).s("gm_pizzicato_strings").gain(0.22)

// bass · electric bass finger · "Bass"
const bass = note(`<
  ~@3 A B C B C B D E F G H E F G I J K L G B M B D N D O D B P Q D F D R S T U N D B P E F G V E F G W X K Y Z B S Q P
  B P Q P Q P F P Q D B P AA U N P F P E F G AB E F G AC AD K F AC O P O AE Q P F P AF P Q D B P B P AG U B P O AH B P Q
  P O P B P E AI G AJ AK AL ~
>`.pickRestart({
  A: "~@4 d2 c#2 b1 a1", B: "e1 ~ e1 ~ e1 b1 c#2 a1", C: "d2@2 ~@2 d2@3 ~ d2@2 c#2@2 b1@2 a1@2",
  D: "d2 ~ d2 ~ d2 c#2 b1 f#1", E: "e1 ~ e1 ~ e1 ~ e1 ~", F: "e1 ~ e1 ~ e1 b1 c#2 f#1", G: "a1 ~ a1 ~ a1 ~ a1 ~",
  H: "a1 ~ a1 ~ a1 b1 c#2 f#1", I: "a1 ~ a1 ~ a1 b1 c#2 ~", J: "e1 ~@3 e1@2 ~@2 e1@2 g#1@2 a1@4",
  K: "b1@2 ~@2 b1@2 ~@2 b1@2 ~@2 b1@3 ~", L: "e2 ~ e2 ~ e2 c#2 b1 g#1", M: "d2@2 ~@2 d2 ~@3 d2@2 c#2@2 b1@2 a1@2",
  N: "e1 ~ e1 ~ e1 b1 c#2@2", O: "e1 ~ e1 ~ e1 ~ b1 c#2", P: "d2 ~ d2 ~ d2 c#2 b1 d1", Q: "e1 ~ e1 ~ e1 ~ e1 c#2",
  R: "e1@2 e1 ~ e1 b1 c#2@2", S: "d2@3 ~ d2@2 ~@2 d2@2 c#2@2 b1@4", T: "e1 ~@7", U: "~@5 d1@2 d#1",
  V: "a1 ~ a1 ~ a1 b1 c#2 d1", W: "a1 ~@3 a1@2 ~@2 a1@2 b1@2 c#2@2 d1@2", X: "e1 ~ e1 ~ e1 g#1@2 a1",
  Y: "e2 ~ e2 ~ e2 c#2 b1 f#1", Z: "a1@2 ~@2 a1@2 ~@2 a1@2 ~@2 a1 ~ a1@2", AA: "e1@5 ~@11",
  AB: "a1 ~ a1 ~ a1 b1 c#2 d2", AC: "a1 ~ a1 ~ a1 b1 c#2 e2", AD: "e1 ~ e1 ~ e1 ~ e1 g#1",
  AE: "d2 ~ d2@2 e2 d2 c#2 d#1", AF: "e1 ~ e1 ~ e1 b1 c#2 b1", AG: "e1 ~ e1 ~@5", AH: "d2 ~ d2 ~ d2 ~ d2 c#2",
  AI: "g1@2 ~@2 g1@2 ~@2 g1@2 ~@2 g1@3 ~", AJ: "c2@3 ~ c2@3 ~ d2@2 ~@2 d2@3 ~", AK: "e1 ~ e1 ~ e1 b1 c#2 d2",
  AL: "e1@5 ~@3",
})).s("gm_electric_bass_finger").gain(0.36).pan(0.6)

// drums · kick
const kick = s("bd").struct("<~@4 [x!4]!121 x ~>").gain(0.39)

// drums · hihat
const hihat = s("hh").struct("<~ [x!3 ~] ~@2 [x!8]!121 x ~>").gain(0.35)

// drums · crash
const crash = s("cr").struct(`<
  ~@4 A ~@5 A ~@11 A ~@15 A ~ A ~@3 A ~@11 A ~@15 A ~ A ~@3 A ~@11 A ~@3 A ~@11 A ~ A ~@11 A ~@3 B A ~
>`.pickRestart({
  A: "x", B: "x!2 ~@2",
})).gain(0.39)

// drums · tambourine
const tambourine = s("tb").struct("<~@4 A@11 B A@26 B A@6 B A@72 B A@2 ~@2>".pickRestart({
  A: "~@4 x!3 ~", B: "~@4 x!2 ~@2",
})).gain(0.39)

// drums · cowbell
const cowbell = s("cb").struct("<~@4 [x!3 ~] [x!4]!120 x ~>").gain(0.39)

// drums · lt
const lt = s("lt").struct("<~@3 A B@35 C B@3 C B@28 D C B@33 E B@16 F G ~>".pickRestart({
  A: "~@5 x!3", B: "x!4", C: "x ~ x ~ x!4", D: "x!3 ~ x ~ x ~", E: "x!3 ~ x!4", F: "x ~ x ~ x ~ x!2", G: "x",
})).gain(0.39)

stack(
  piano, rock_organ, electric_guitar_clean, vibraphone, pizzicato_strings, bass, kick, hihat, crash, tambourine,
  cowbell, lt
)