// Headlong — Queen
// 144 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 9 "Bass" synth bass 2 (copy of ch 8 "Bass -doubled" electric bass pick)
// note: Full arrangement: all 164 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): Rhythm 1 -doubled.
setcpm(144/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.

// bass · piano · D
const bass = note(`<
  [~@2 [d1,d2]@2 [d1,d2]!4]
  [[d1,d2]@2 [d1,d2]!6]!3
  [[d1,d2]@2 [d1,d2]@2 [d1,d2]@2 [d1,d2]!2]!2
  [[d1,d2]@2 [d1,d2]!6]!5
  [[d1,d2]@2 [d1,d2]@2 [d1,d2]@2 [d1,d2]!2]!2
  [[d1,d2]@2 [d1,d2]!6]!9
  ~@142
>`).s("gm_piano").gain(0.36).pan(0.4)

// chords · overdriven guitar · "Rhythm Guitar 1"
const overdriven_guitar = note(`<
  ~ A B@2 C@8 D ~@5 E@2 ~@2 F G H@2 I@2 J K L ~ M N O@3 ~ P Q R S P T R U ~@5 V W X Y@2 G Z G AA AB AC AB AD AE AF@2 ~@5
  AG AH@2 AI AJ AK@2 AL AM AN AO AP AO AQ V W X AR AS AT AU AV M AW AX@3 AY AZ BA BB@3 BC@2 BD ~@5 P Q R S P T R BE@3
  BF@2 BG BH BI ~@2 BJ BK BJ BK BJ BK BL BM AF@2 BN@2 ~@6 BO BP BO BQ BO BQ BO BR BS BT BU@3 BV@3
>`.pickRestart({
  A: "~@7 [e3,b3]", B: "[[f3,c4]@3 [g3,d4]]/2", C: "[~@3 d4@13, [d3,a3] ~@3]/8", D: "~@3 a3",
  E: "[~ d4@3, [d3,a3] ~]/2", F: "[d3,a3]@2 [d3,a3] [c3,g3]@4 [d3,a3]", G: "[d3,a3]",
  H: "[[d3,a3]@2 [d3,a3]@13 [d3,a3]]/2", I: "[[g3,d4] [d3,a3,d4,f#4]@7]/2", J: "[c3,g3]", K: "[g2,d3]",
  L: "[d3,a3]@3 ~@5", M: "[f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4] [e3,b3] [f3,c4] [d3,a3]",
  N: "[e3,b3] [f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4] [e3,b3] [f3,c4]", // E5 F5 G5 E5 F5 G5 E5 F5
  O: "[[g3,d4] [e3,b3] [f3,c4] [g3,d4]@11 [f3,c4] [d3,a3]@3 ~@6]/3", P: "[d3,a3] ~ [d3,a3] ~ [d3,a3]!2 ~ [d3,a3]",
  Q: "~@2 [d3,a3] ~ [d3,a3]!2 ~@2", R: "[d3,a3] ~ [d3,a3] ~ [d3,a3]!2 ~ [b2,g3]",
  S: "~@2 [b2,a3] ~ [b2,a3] [c3,a3] ~@2", T: "a2 c3 [d3,a3] ~ [d3,a3]!2 ~@2", U: "~@2 [b2,g3] ~ [b2,g3]!2 ~@2",
  V: "[g2,d3]!8", W: "[f#2,c#3,f#3]!8", X: "[a3,e4]!8", Y: "[[g3,d4]@3 [f3,c4]@3 [d3,a3]@10]/2",
  Z: "[d2,d3]@2 [d2,d3]@2 [d2,d3]!2 [d2,d3]@2", AA: "f3 d3 f3 d3 f3 d3!3", AB: "[g3,d4] [d3,a3]@3",
  AC: "[g3,d4]@2 [g3,d4]@2 [f3,c4] [g3,d4] [d3,a3]@2", AD: "[f3,c4]", AE: "[g3,d4]", AF: "[d3,a3]/2",
  AG: "[d3,a3]!7 [g3,d4]", // D5 G5
  AH: "[[d3,a3]@2 [d3,a3]@2 [d3,a3] [d3,a3]@2 [d3,a3]@3 [d3,a3]@2 [d3,a3] [d3,a3]@2 [d3,a3]]/2", // D5
  AI: "[c3,g3]!2 [c3,g3]@2 [c3,g3]!4", AJ: "[b2,g3]!2 [b2,g3]@2 [b2,g3] b2 c3 [d3,a3], ~@5 g3@2 ~",
  AK: "[d3,a3]@2 [d3,a3]@2 [d3,a3]!2 ~ [d3,a3]", AL: "[c3,g3]@2 [c3,g3]!4 ~ [c3,g3]",
  AM: "[b2,g3]@2 [b2,g3]!4 ~ [b2,g3]", AN: "[a2,e3,a3,c#4]",
  AO: "[a2,f#3,a3,d4]@2 [a2,f#3,a3,d4]@2 [a2,e3,a3,c#4] [a2,f#3,a3,d4] ~ [a2,f#3,a3,d4]", // D A D
  AP: "[a2,e3,a3,c#4]@2 [a2,e3,a3,c#4]@2 [a2,e3,a3,c#4]@3 [a2,e3,a3,c#4]", AQ: "[a2,e3,a3,c#4]!2 [a2,e3,a3,c#4]@2",
  AR: "[d3,a3]@2 [d3,a3]@5 [f3,c4]", AS: "[g3,d4] [f3,c4]@2 [d3,a3] [f3,c4]!2 [d3,a3]!2",
  AT: "[g3,d4]@2 [d3,a3]@5 [e3,b3]", AU: "[f3,c4] [d3,a3] [e3,b3] [f3,c4]!2 [d3,a3]!3",
  AV: "~@2 [g3,d4]@2 [d3,a3]@3 [e3,b3]", AW: "[f3,c4] [g3,d4] [d3,a3] [f3,c4] [g3,d4] [d3,a3] [f3,c4] [g3,d4]",
  AX: "[[d3,a3] [f3,c4] [g3,d4] [d3,a3] [g3,d4] [f3,c4] [d3,a3] [d3,a3]@3 [d3,a3]@13 [g3,d4]]/3", // D5 F5 G5 D5 G5 F5 D5 G5
  AY: "[f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4]!2 [f3,c4] [g3,d4]", // F5 G5 E5 F5 G5 F5 G5
  AZ: "[g3,d4] [f3,c4] [g3,d4]!2 [f3,c4] [g3,d4]!2 [f3,c4]", BA: "[g3,d4]!2 [f3,c4] [g3,d4]!2 [f3,c4] [g3,d4]!2",
  BB: "[[f3,c4] [g3,d4]!2 [f3,c4] [g3,d4] [f3,c4] [d3,a3] [d3,a3]@17]/3", BC: "c3/2", BD: "~ d3",
  BE: "[~@2 [b2,g3] ~ [b2,g3]!2 [a2,e3,a3,c4] [a2,e3,a3,c4]@5 [a2,e3,a3,c4] [a2,e3,a3,c4]@2 [g2,d3,g3,b3]@9]/3", // Em Am G
  BF: "[[a2,e3,a3,c4]@2 [a2,e3,a3,c4]@2 [a2,e3,a3,c4]!2 ~ [g2,d3,g3,b3]@9]/2", // Am G
  BG: "[a2,e3,a3,c4]@2 [a2,e3,a3,c4]@2 [a2,e3,a3,c4]!2 ~ [g2,d3,g3,b3]", BH: "[g2,d3,g3,b3]", BI: "[g2,d3,g3,b3] ~@7",
  BJ: "[g3,d4]@2 [d3,a3]@5 [f3,c4]", BK: "[g3,d4] [d3,a3] [f3,c4] [d3,a3] [f3,c4] [d3,a3]!3", BL: "[f3,c4] ~@3",
  BM: "[g3,d4] e3", BN: "[[g3,d4]@5 [g3,d4]@2 [f3,c4]@6 [g3,d4] [f3,c4]@2]/2", BO: "[d3,a3] [c3,g3]@3",
  BP: "[a2,e3]@2 [g2,d3]@2 [f2,c3]!4", BQ: "~ [a3,e4] [g3,d4] [f3,c4] [g3,d4] [f3,c4] [d3,a3]!2",
  BR: "[d3,a3] [e3,b3] [f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4] [e3,b3]", // D5 E5 F5 G5 E5 F5 G5 E5
  BS: "[f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4] [e3,b3] [f3,c4] [g3,d4]", // F5 G5 E5 F5 G5 E5 F5 G5
  BT: "[f3,c4] [g3,d4]!2 [f3,c4] [g3,d4]!2 [f3,c4] [g3,d4]", // F5 G5 F5 G5 F5 G5
  BU: "[[g3,d4]@2 [f3,c4]@2 [g3,d4]@2 [g3,d4]@2 [g3,d4]@2 [f3,c4]@2 [d3,a3]@2 [d3,a3]@6 [d3,a3]@21 ~@7]/3", // G5 F5 G5 F5 D5
  BV: "[~@5 d3@6 ~@5]/3",
})).s("gm_overdriven_guitar").gain(0.3).pan(0.9)

// chords · overdriven guitar · "Rhythm Guitar 2"
const overdriven_guitar_2 = note(`<
  ~@13 A@4 B ~@2 A@2 ~@8 C D ~@4 E A ~@29 A@5 ~@36 A@5 ~@15 F G ~@12 A@6 ~@16
>`.pickRestart({
  A: "[d3,a3]!8", B: "[d3,a3]!3 [e3,b3] [f3,c4]@2 [g3,d4]@2", C: "~@3 [d3,a3]!5", D: "[d3,a3]!7 ~", E: "~@2 [d3,a3]!6",
  F: "[f#2,c#3,f#3]!8", G: "[a2,e3]!8",
})).s("gm_overdriven_guitar").gain(0.3).pan(0.9)

// chords · overdriven guitar · "Lead Guitar 2"
const overdriven_guitar_3 = note("<~@20 A ~@24 B@3 C D E ~@3 F@2 ~@28 G H ~@78>".pickRestart({
  A: "~ d6@2 d6!2 ~ a5@2",
  B: "[~@6 [a2,e3,a3,c4] [a2,e3,a3,c4]@6 [a2,e3,a3,c4]@2 [a2,f#3,a3,d4]@3 [a2,f#3,a3,d4] ~@2 [a2,e3,a3,c4] [a2,f#3,a3,d4]!2]/3", // Am D Am D
  C: "[a2,e3,a3,c4]@2 [a2,e3,a3,c4]@2 [a2,e3,a3,c4] [a2,e3,a3,c4]@2 [a2,f#3,a3,d4]", // Am D
  D: "[a2,f#3,a3,d4]@6 a3@2 c#4 b3 a3@2 f#3@2 e3@2", E: "[a2,e3,a3,c4]@2 [a2,e3,a3,c4]!4 ~@2", F: "[~@3 d4@13]/2",
  G: "~@7 f#4", H: "e4",
})).s("gm_overdriven_guitar").gain(0.36).pan(0.1)

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

// chords · acoustic guitar steel · "Rhythm 2 -doubled"
const acoustic_guitar_steel = note(`<
  ~@13 A@4 B ~@2 A@2 ~@8 C D ~@4 E A ~@29 A@5 ~@36 A@5 ~@15 F G ~@12 A@6 ~@16
>`.pickRestart({
  A: "[d2,a2]!8", B: "[d2,a2]!3 [e2,b2] [f2,c3]@2 [g2,d3]@2", C: "~@3 [d2,a2]!5", D: "[d2,a2]!7 ~", E: "~@2 [d2,a2]!6",
  F: "[f#1,c#2,f#2]!8", G: "[a1,e2]!8",
})).s("gm_acoustic_guitar_steel").gain(0.24).pan(0.2)

// drums · kick
const kick = s("bd").struct(`<
  A@12 B C@7 A B C@32 A@2 C@9 A@3 B C@3 D C@15 D C@14 A@10 C E C@3 F C@8 G A@2 C@6 A@2 C@20 H I ~@2 J ~
>`.pickRestart({
  A: "x!4", B: "x!3 ~", C: "x!2", D: "x!8", E: "x ~@3 x!2 ~ x", F: "x ~@3 x ~@2 x", G: "x", H: "x ~@2 x ~ x!3",
  I: "~ x ~@2", J: "~@3 x ~@12",
})).gain(0.4)

// drums · snare
const snare = s("sd").struct(`<
  ~@12 A B@7 ~ A B@31 C ~@2 B@9 ~@3 A B@3 D B@15 D B@13 E ~@8 F G B@14 ~ H I B@6 ~@2 B@6 ~ B@6 J B@6 K ~@3 L ~
>`.pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "~@2 x ~@2 x!2 ~", D: "~@2 x!6", E: "~@2 x ~@2 x!3", F: "~@13 x!3",
  G: "x ~@2 x ~ x!3 ~@8", H: "x!2 ~ x ~ x!3 ~ x ~ x!5", I: "x!2 ~@14", J: "~ x!6 ~", K: "~ x!2 ~", L: "~@3 x ~@12",
})).gain(0.48)

// drums · pedal hat
const pedal_hat = s("hh").struct(`<
  A@6 ~@7 B C@8 D E@30 F ~@2 E@10 G@3 ~@4 E@8 ~@8 E@4 D E@9 H G@9 E@14 ~@3 E@6 H@2 E@4 ~@2 G ~ G@6 E@6 I ~@5
>`.pickRestart({
  A: "x!2", B: "~ x!3", C: "x!4", D: "~@5 x!3 ~ x!3 ~ x!3", E: "~ x!3 ~ x!3 ~ x!3 ~ x!3", F: "~ x!3 ~ x!3 ~ x!7",
  G: "x!16", H: "~ x!15", I: "~ x!3 ~ x!3 ~ x!3 ~ x ~@2",
})).gain(0.32)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@13 A ~@8 B C B@15 C@6 D C@4 B C B D ~@2 C@2 B C B C@4 B ~@3 B@3 ~ B C@5 B C B C B C B C B ~ B C B C B C B C@7 ~@10 B
  C@3 B@5 C@5 A ~@2 B C B C B C A@2 C@4 B C ~ B ~@6 C@7 ~@5
>`.pickRestart({
  A: "x", B: "~ x!3", C: "x!4", D: "x!3 ~",
})).gain(0.32)

// drums · mid tom
const mid_tom = s("mt").struct("<~@112 [~@12 x!4] ~@16 [~@12 x!4] ~@32 [~@3 x ~@12] ~>").gain(0.56)

// drums · high tom
const high_tom = s("ht").struct("<~@112 [~@8 x!4 ~@4] ~@16 [~@2 x!10 ~@4] ~@32 [~ x ~@6] ~>").gain(0.56)

// drums · crash
const crash = s("cr").struct(`<
  ~@22 A ~ A@15 ~@6 B ~@4 A ~ A ~@5 A ~ A ~@4 A ~@3 A@5 ~@5 A ~ A ~ A ~ A ~@3 A ~ A ~ A ~ A ~@7 A ~@9 A ~@3 A@5 ~@8 A ~
  A ~ A ~@7 A ~@2 A ~@12 C D ~@4
>`.pickRestart({
  A: "x", B: "~@3 x", C: "~@15 x", D: "~ x ~@2",
})).gain(0.4)

stack(
  bass, overdriven_guitar, overdriven_guitar_2, overdriven_guitar_3, bass_2, acoustic_guitar_steel, kick, snare,
  pedal_hat, open_hat, mid_tom, high_tom, crash
)