// I Love Rock 'n' Roll — Joan Jett
// 94 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: bank select 127 (Roland MT-32 map) read through the MT-32 patch table: ch 8 "Rhythm assist (dbl track)" Elec Bass 1 -> electric bass finger
// note: duplicate parts dropped: ch 8 "Rhythm assist (dbl track)" electric bass finger (copy of ch 7 "Rhythm" overdriven guitar)
// note: Full arrangement: all 69 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(94/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.

// other · pan flute · "Lead assist (dlb track)"
const pan_flute = note(`<
  ~@6 A B@2 C@3 D E F G H I@4 J ~ K L M N O P Q@2 R@2 S T U V W ~@5 X Y@2 Z AA AB AC AD AE AD AF AD AE AD AG T U V AH@4
  AI AJ AI AK
>`.pickRestart({
  A: "~@11 d6 e6@2 d6@2", B: "[b5@2 g5 a5@2 ~ a5!4 g5 ~ b5@6 ~@9 d6 e6@2 d6 ~]/2",
  C: "[b5 ~ g5 a5 ~ a5 a5@2 d6 a5@2 ~ b5@6 ~@9 g5 a5@2 g5 a5@2 g5 b5@4 ~@6 e6@2 d6@2]/3", D: "b5 g5 a5@6",
  E: "~ g5!3 b5@2 b5 ~ d6@2 b5 a5@2 ~@2 a5", F: "a5!2 g5 ~ b5@3 ~ d6@4 b5@3 ~", G: "~ g5!3 b5 ~ b5 ~ d6 ~ b5 a5@3 ~ a5",
  H: "a5@2 g5@2 b5@4 d6@4 b5@3 ~",
  I: "[d6 e6@3 e6@4 f#6@3 ~ e6@2 d6 e6@2 ~@3 e6!5 ~ f#6!2 g6@2 f#6 f#6@3 ~@2 e6@4 f#6@3 ~ e6@2 d6 e6@2 ~@3 e6!4 e6@2 f#6 ~ g6 ~ f#6@2]/4",
  J: "e6@3 ~@13", K: "e6@2 d6 ~ b5@2 g5 a5@2 ~@2 g5 a5 g5@2 ~", L: "b5@3 ~@13",
  M: "e6@2 d6@2 b5@2 g5@2 a5 ~ a5!2 d6@2 a5@2", N: "b5@3 ~@12 g5", O: "a5 ~ a5!2 a5@2 g5 b5@5 ~@2 b5 ~",
  P: "e6@2 d6@2 b5@2 g5@2 a5@7 ~", Q: "[~@7 b5 b5@2 b5@2 d6@2 b5 a5@3 ~@2 a5!2 g5@2 b5@2 ~@2 d6@4]/2",
  R: "[b5@3 ~@5 b5 ~ b5@2 d6 ~ b5 a5@4 ~ a5!2 g5@2 b5@3 ~ d6@4]/2", S: "b5@3 ~ d6 e6@2 ~ e6@4 f#6@3 ~",
  T: "e6@2 d6 e6@2 ~@3 e6!5 ~ f#6!2", U: "g6@2 f#6 f#6@3 ~@2 e6@4 f#6@3 ~", V: "e6@2 d6 e6@2 ~@3 e6!4 e6@2 f#6 ~",
  W: "g6 ~ f#6@2 e6@3 ~@9", X: "~@3 g5 a5 ~ a5!2 a5@2 g5 b5@5",
  Y: "[~@2 b5 ~ e6@2 d6@2 b5@2 g5@2 a5@7 ~@8 b5 b5@2 b5@2]/2", Z: "d6@2 b5 a5@3 ~@2 a5!2 g5@2 b5@2 ~@2",
  AA: "d6@4 b5@3 ~@5 b5 ~ b5@2", AB: "d6 ~ b5 a5@4 ~ a5!2 g5@2 b5@3 ~", AC: "d6@4 b5@3 ~ d6 e6@2 ~ e6@4",
  AD: "f#6@3 ~ e6@2 d6 e6@2 ~@3 e6!4", AE: "e6 ~ f#6!2 g6@2 f#6 f#6@3 ~@2 e6@4",
  AF: "e6@2 f#6 ~ g6 ~ f#6@2 e6@2 ~@2 e6@4", AG: "e6@2 f#6 ~ g6 ~ f#6@2 e6@4 f#6@3 ~",
  AH: "[g6 ~ f#6@2 e6@4 f#6@3 ~ e6@2 d6 e6@2 ~@3 e6!5 ~ f#6!2 g6@2 f#6 f#6@3 ~@2 e6@4 f#6@3 ~ e6@2 d6 e6@2 ~@3 e6!4 e6@2 f#6 ~ g6 ~ f#6@2]/4",
  AI: "e6@4 f#6@3 ~ e6@2 d6 e6@2 ~@3", AJ: "e6!5 ~ f#6!2 g6@2 f#6 f#6@3 ~@2", AK: "e6!4 e6@2 f#6 ~ g6 ~ f#6@2 e6@2 ~@2",
})).s("gm_pan_flute").gain(0.28).pan(0.7)

// bass · electric bass finger · "Bass"
const bass = note(`<
  ~ A B A C D E D F G H I J@3 ~ K L M N O P Q R S T U V W@3 ~ X Y Z AA AB AC AD AE AD AF AG AH AI@4 ~@5 AJ AK AL AK AM Z
  AA Z AN AO N AP AQ AR AQ AS
>`.pickRestart({
  A: "e2@2 e2@2 ~@4 e2@2 e2@2 ~ g2@3", B: "a1@2 a1@2 ~@4 b1@2 b1@2 ~ g2@3", C: "a1@2 a1@2 ~@4 b1@2 ~@2 e2 ~ e2@2",
  D: "~@6 e2!2", E: "~@4 d2@2 b1@2 a1 g1@3 e1@2 e1@2", F: "~@4 d2@2 b1@2 a1 g1@2 ~ e1 ~ e1@2", G: "~@6 b1!2",
  H: "~@4 d2@2 b1@2 a1 g1@3 a1@2 a1@2", I: "~@4 b1 ~ b1@2 ~@4 e2@2 e2@2", J: "[~ a1@8 ~@3]/3", K: "~@2 b1!6",
  L: "b1@2 b1@2 e2 ~ e2@2 ~@4 e2@2 e2@2", M: "~ g2@3 a1@2 a1@2 ~@4 b1@2 b1@2", N: "~@4 e2 ~ e2@2 ~@4 e2@2 e2@2",
  O: "~ g2@3 a1@2 a1@2 ~@4 b1@2 ~@2", P: "e2 ~ e2@2 ~@12", Q: "e2@2 e2@2 ~@4 d2@2 b1 ~ a1 g1@3", R: "e1!2 ~@6",
  S: "e2@2 e2@2 ~@4 d2@2 b1@2 a1 g1@3", T: "e1 ~ e1@2 ~@12", U: "b1@2 b1@2 ~@4 d2@2 b1@2 a1 g1@3",
  V: "a1@2 a1@2 ~@4 b1 ~ b1@2 ~@4", W: "[e2!2 ~@2 a1@16 ~@4]/3", X: "~@4 b1!4", Y: "b1@2 b1@2 b1@2 b1@2 e2 ~ e2@2 ~@4",
  Z: "e2@2 e2@2 ~ g2@3 a1@2 a1@2 ~@4", AA: "b1@2 b1@2 ~@4 e2 ~ e2@2 ~@4", AB: "e2@2 e2@2 ~ g2@3 a1 ~ a1@2 ~@4",
  AC: "b1@2 ~@2 e2 ~ e2@2 ~@8", AD: "~@4 e2@2 e2@2 ~@4 d2@2 b1 ~", AE: "a1 g1@3 e1@2 e1@2 ~@8",
  AF: "a1 g1@2 ~ e1 ~ e1@2 ~@8", AG: "~@2 b1!2 ~@2 d2 b1", AH: "a1 g1@3 a1 ~ a1@2 ~@4 b1 ~ b1@2",
  AI: "[~@2 e2!2 ~@2 a1@22 ~@4]/4", AJ: "~@12 e2 ~ e2@2", AK: "~@4 e2@2 e2@2 ~ g2@3 a1 ~ a1@2",
  AL: "~@4 b1@2 b1@2 ~@4 e2 ~ e2@2", AM: "~@4 b1@2 ~@2 e2 ~ e2@2 ~@4", AN: "b1@2 ~@2 e2 ~ e2@2 ~@4 e2@2 e2@2",
  AO: "~ g2@3 a1 ~ a1@2 ~@4 b1@2 b1@2", AP: "~ g2@3 a1 ~ a1@2 ~@4 b1@2 ~@2", AQ: "e2 ~ e2@2 ~@4 e2@2 e2@2 ~ g2@3",
  AR: "a1!2 ~@2 b1!2 ~@2", AS: "a1@2 a1@2 ~@4 b1@2 ~@2 e1@3 ~",
})).s("gm_electric_bass_finger").gain(0.54)

// other · overdriven guitar
const overdriven_guitar = note("<~@39 A B C D E F@3 ~@22>".pickRestart({
  A: "~@4 e2@8 g2 ~ f#2@2", B: "e2@3 ~ [e3,g#3,d4]@10 c#4@2", C: "e4 ~ f#4 ~ g#4@4 e5 ~ g#4@4 b4 ~",
  D: "[f#4,a#4]@2 [e4,b4] c#4 [f#4,b4]@6 b3!2 c#4@2 e4 ~", E: "b4@2 e4!2 a4@2 e4@2 d#4@2 c#4!2 b3@3 ~",
  F: "[a3@3 a3 g#3@4 f#3@2 e3 c#3 e3@32 ~@4]/3",
})).s("gm_overdriven_guitar").gain(0.61).pan(0.7)

// other · overdriven guitar
const overdriven_guitar_2 = note("<~@39 A B@3 C D E@2 ~@22>".pickRestart({
  A: "~ e2",
  B: "[g2 ~ f#2@2 e2@3 ~ [e3,g#3,d4]@10 c#4@2 e4 ~ f#4 ~ g#4@4 e5 ~ g#4@4 b4 ~ [f#4,a#4]@2 [e4,b4] c#4 [f#4,b4]@6 b3!2]/3", // E7 F# E5 B5
  C: "c#4@2 e4 ~ b4@2 e4!2 a4@2 e4@2 d#4@2 c#4!2", D: "b3@3 ~ a3@3 a3 g#3@4 f#3@2 e3 c#3", E: "e3/2",
})).s("gm_overdriven_guitar").gain(0.26).pan(0)

// chords · overdriven guitar · "Rhythm"
const overdriven_guitar_3 = note(`<
  ~ A B A C D E F G H I J K@3 ~ L M N O P Q R S T S U B V@3 ~ W X Y Z Y AA AB AC AD AC AE AF AG@3 ~@6 F AH AI AH AJ Y Z
  Y AK N O P A B A AL
>`.pickRestart({
  A: "[e2,b2,e3]!2 ~@2 [e2,b2,e3]!2 ~@2", B: "[a2,e3,a3]!2 ~@2 [b2,f#3,b3]!2 ~@2",
  C: "[a2,e3,a3]!2 ~@2 [f#3,b3] [e2,e3] [e3,b3,e4]!2, ~@2 b2 ~", D: "~@6 [e3,b3,e4]!2",
  E: "~@4 d3@2 b2 ~ a2 g2@3 [e2,b2,e3]@2 [e2,b2,e3]@2", F: "~@6 [e2,b2,e3]!2",
  G: "~@4 d3@2 b2@2 a2 g2@3 [e2,b2,e3]@2 [e2,b2,e3]@2", H: "~@6 [b2,f#3,b3]!2",
  I: "~@4 d3@2 b2@2 a2 g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2", J: "~@2 [b2,f#3,b3]!2 ~@2 [e3,b3,e4]!2",
  K: "[~ [a2,e3]@8 ~@3, ~@2 a3@15 ~@7]/3", L: "~@2 [b2,f#3,b3]!6", M: "[b2,f#3,b3]!2 [e2,b2,e3]!2 ~@2 [e2,b2,e3]!2",
  N: "~@2 [a2,e3,a3]!2 ~@2 [b2,f#3,b3]!2", O: "~@2 [e2,b2,e3]!2 ~@2 [e2,b2,e3]!2",
  P: "~@2 [a2,e3,a3]!2 ~@2 [f#3,b3] [e2,e3], ~@3 b2", Q: "[e3,b3,e4]!2 ~@6",
  R: "[e3,b3,e4]@2 [e3,b3,e4]@2 ~@4 d3@2 b2 ~ a2 g2@3", S: "[e2,b2,e3]!2 ~@6",
  T: "[e2,b2,e3]@2 [e2,b2,e3]@2 ~@4 d3@2 b2@2 a2 g2@3", U: "[b2,f#3,b3]@2 [b2,f#3,b3]@2 ~@4 d3@2 b2@2 a2 g2@3",
  V: "[[e3,b3,e4]!2 ~@2 [a2,e3]@16 ~@4, ~@4 a3@15 ~@5]/3", W: "~@4 [b2,f#3,b3]!4", X: "[b2,f#3,b3]!4 [e2,b2,e3]!2 ~@2",
  Y: "[e2,b2,e3]!2 ~@2 [a2,e3,a3]!2 ~@2", Z: "[b2,f#3,b3]!2 ~@2 [e2,b2,e3]!2 ~@2",
  AA: "[f#3,b3] [e2,e3] [e3,b3,e4]!2 ~@4, b2 ~@3", AB: "~@4 [e3,b3,e4]@2 [e3,b3,e4]@2 ~@4 d3@2 b2 ~",
  AC: "a2 g2@3 [e2,b2,e3]@2 [e2,b2,e3]@2 ~@8", AD: "~@2 [e2,b2,e3]!2 ~@2 d3 b2", AE: "~@2 [b2,f#3,b3]!2 ~@2 d3 b2",
  AF: "a2 g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [b2,f#3,b3]@2 [b2,f#3,b3]@2", // A5 B5
  AG: "[~@2 [e3,b3,e4]!2 ~@2 [a2,e3]@16 ~@2, ~@2 a3@5 ~]/3", AH: "~@2 [e2,b2,e3]!2 ~@2 [a2,e3,a3]!2",
  AI: "~@2 [b2,f#3,b3]!2 ~@2 [e2,b2,e3]!2", AJ: "~@2 [f#3,b3] [e2,e3] [e2,b2,e3]!2 ~@2, ~ b2 ~@2",
  AK: "[f#3,b3] [e2,e3] [e2,b2,e3]!2 ~@2 [e2,b2,e3]!2, b2 ~@3", // B5 E E5
  AL: "[a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [f#3,b3]@2 [e2,e3]@2 [e2,b2,e3]@3 ~, ~@2 b2 ~", // A5 B5 E E5
})).s("gm_overdriven_guitar").gain(0.6).pan(0.3)

// chords · overdriven guitar
const overdriven_guitar_4 = note(`<
  ~ A B C D E F G H I J K L@3 ~ M@2 N O P Q R Q S Q T U V@3 ~ W X Y Z AA AB AC AD AE AD AF AG AH@3 ~@6 AI AJ AK AL AM Y
  Z AA AN N O P A U C AO
>`.pickRestart({
  A: "[e2,b2,e3]@2 [e2,b2,e3]@2 ~@4 [e2,b2,e3]@2 [e2,b2,e3] ~@2 g2@3", // E5
  B: "[a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [b2,f#3,b3]@2 [b2,f#3,b3]@2 ~ g2@3", // A5 B5
  C: "[e2,b2,e3]@2 [e2,b2,e3]@2 ~@4 [e2,b2,e3]@2 [e2,b2,e3]@2 ~ g2@3", // E5
  D: "[a2,e3,a3]!2 ~@2 [b2,f#3] [e2,b2] [e3,b3,e4]!2", E: "~@12 [e3,b3,e4]@2 [e3,b3,e4] ~",
  F: "~@4 d5@2 b4@2 a4 g4@3 [e3,b3,e4]@2 [e3,b3,e4]@2", G: "~@6 [e3,b3,e4]!2",
  H: "~@4 d5@2 b4 ~ a4 g4@3 [e3,b3,e4]@2 [e3,b3,e4]@2", I: "~@6 [b2,f#3,b3]!2",
  J: "~@4 d5@2 b4 ~ a4 g4@3 [a2,e3,a3]@2 [a2,e3,a3]@2", K: "~@2 [b2,f#3,b3]!2 ~@2 [e3,b3,e4]!2",
  L: "[~ [a2,e3]@8 ~@3, ~@4 a3@29 ~@15]/3", // A5
  M: "[~@4 [f#3,b3]@2 [f#3,b3]@2 [f#3,b3]@2 [f#3,b3]@2 [b2,f#3,b3]@2 [f#3,b3]@2 [f#3,b3]@2 [b2,f#3,b3]@2 [e2,b2,e3]@2 [e2,b2,e3]@2 ~@4 [e2,b2,e3]@2 [e2,b2,e3] ~, ~@2 b2@4 ~ b2@2 ~@7]/2", // B5 E5
  N: "~ g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [b2,f#3,b3]@2 [b2,f#3,b3]@2", O: "~@2 [e2,b2,e3]!2 ~@2 [e2,b2,e3]!2",
  P: "~ g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [b2,f#3]@2 [e2,b2]@2", Q: "[e3,b3,e4]!2 ~@6",
  R: "[e3,b3,e4]@2 [e3,b3,e4]@2 ~@4 d5@2 b4@2 a4 g4@3", S: "[e3,b3,e4]@2 [e3,b3,e4]@2 ~@4 d5@2 b4 ~ a4 g4@3",
  T: "[b2,f#3,b3]@2 [b2,f#3,b3]@2 ~@4 d5@2 b4 ~ a4 g4@3", U: "[a2,e3,a3]!2 ~@2 [b2,f#3,b3]!2 ~@2",
  V: "[[e3,b3,e4]!2 ~@2 [a2,e3]@16 ~@4, ~@8 a3@29 ~@11]/3", W: "~@4 [f#3,b3]!4, ~ b2",
  X: "[b2,f#3,b3] [f#3,b3]!2 [b2,f#3,b3] [e2,b2,e3]!2 ~@2, ~ b2@2 ~@5", // B5 E5
  Y: "[e2,b2,e3]@2 [e2,b2,e3] ~@2 g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4", Z: "[b2,f#3,b3]!2 ~@2 [e2,b2,e3]!2 ~@2",
  AA: "[e2,b2,e3]@2 [e2,b2,e3]@2 ~ g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4", AB: "[b2,f#3] [e2,b2] [e3,b3,e4]!2 ~@4",
  AC: "~@2 [e3,b3,e4]!2 ~@2 d5 b4", AD: "a4 g4@3 [e3,b3,e4]@2 [e3,b3,e4]@2 ~@8",
  AE: "~@4 [e3,b3,e4]@2 [e3,b3,e4]@2 ~@4 d5@2 b4 ~", AF: "~@4 [b2,f#3,b3]@2 [b2,f#3,b3]@2 ~@4 d5@2 b4 ~",
  AG: "a4 g4@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~@4 [b2,f#3,b3]@2 [b2,f#3,b3]@2", // A5 B5
  AH: "[~@2 [e3,b3,e4]!2 ~@2 [a2,e3]@16 ~@2, ~@12 a3@29 ~@7]/3", AI: "~@6 [e2,b2,e3]!2",
  AJ: "~@4 [e2,b2,e3]@2 [e2,b2,e3] ~@2 g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2", AK: "~@2 [b2,f#3,b3]!2 ~@2 [e2,b2,e3]!2",
  AL: "~@4 [e2,b2,e3]@2 [e2,b2,e3]@2 ~ g2@3 [a2,e3,a3]@2 [a2,e3,a3]@2", AM: "~@2 [b2,f#3] [e2,b2] [e2,b2,e3]!2 ~@2",
  AN: "[b2,f#3]@2 [e2,b2]@2 [e2,b2,e3]@2 [e2,b2,e3]@2 ~@4 [e2,b2,e3]@2 [e2,b2,e3] ~", // B5 E5
  AO: "[a2,e3,a3]!2 ~@2 [b2,f#3] [e2,b2] [e3,b3,e4] ~", // A5 B5 E5
})).s("gm_overdriven_guitar").gain(0.56).pan(0.9)

// drums · kick
const kick = s("bd").struct("<~ A@3 B C@11 D E C@3 A@11 F G A@3 H C@19 I A@3 H C@3 A@3 J>".pickRestart({
  A: "x!2 ~@2 x!2 ~@2", B: "x!2 ~@2 x!4", C: "~@2 x!2 ~@2 x!2", D: "~ x!3", E: "x ~ x!2 ~@2 x!2", F: "x!2 ~@2 x ~ x ~",
  G: "x ~ x ~ x!2 ~@2", H: "x!4 ~@2 x!2", I: "~@2 x!4 ~@2", J: "x!2 ~@2 x!3 ~",
})).gain(0.6)

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

// drums · clap
const clap = s("cp").struct("<~ A@3 B C@16 A@16 D C@19 E A@3 D C@3 A@4>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "x!2", D: "~ x", E: "x ~@2 x",
})).gain(0.6)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~@4 A ~ B ~ B ~@4 B ~@2 C ~@3 B ~@2 D ~@6 D E F ~@4 D ~ G ~@6 G B@2 ~@8 G ~@3 D ~@2 B ~@3 E
>`.pickRestart({
  A: "~ x ~@3 x ~@2", B: "~@7 x", C: "~@3 x ~ x ~@2", D: "~ x ~@6", E: "~@5 x ~@2", F: "~@5 x ~ x", G: "~@3 x ~@4",
})).gain(0.36)

// drums · crash
const crash = s("cr").struct("<~@17 [~ x ~@2] ~@15 [~ x] ~@35>").gain(0.36)

stack(
  pan_flute, bass, overdriven_guitar, overdriven_guitar_2, overdriven_guitar_3, overdriven_guitar_4, kick, snare, clap,
  hihat, hihat_soft, crash
)