// Prosthetic Head — Green Day
// 140 bpm, 4/4, key Ab major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 3 "guitar" distortion guitar (copy of ch 1 "guitar" overdriven guitar)
// note: Full arrangement: all 124 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
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: edit a riff to change every repeat.

// chords · overdriven guitar · "guitar"
const overdriven_guitar = note(`<
  ~@20 A B C B C B C B@2 D E D E D E D E ~@15 A B C B C B C B@2 D E D E D E D E D E D E D E D F G H I J G H I J G H I J
  G H I J K@2 ~@11 L D E D E D E D E D E D E D E D M N
>`.pickRestart({
  A: "~@12 [gb3,db4] [f3,c4] [eb3,e3,bb3,b3] [c3,db3,d3,g3,ab3,a3]", // Gb5 F5 Emaj7
  B: "[gb3,b3]@2 [gb3,b3]!2 [gb3,b3]@2 [gb3,b3]!2 [gb3,b3]@2 [gb3,b3]!2 [gb3,b3]@2 [gb3,b3]!2, b2!4", // B5
  C: "[gb3,b3]@2 [gb3,b3]!2 [gb3,b3]@2 [gb3,b3]!2 [gb3,b3]@2 [gb3,b3]!2 [e3,b3,e4]@4, b2!3 ~", // B5 E5
  D: "[e3,b3,e4]!3 [b2,gb3,b3]@2 [b2,gb3,b3]@2 [a2,e3,a3]", E: "[d3,a3,d4]!3 [a2,e3,a3]@2 [a2,e3,a3]@2 [e2,b2,e3]",
  F: "[d3,a3,d4]@2 [d3,a3,d4]@2 [d3,a3,d4]@2 [a2,e3,a3]@4 ~@2 [gb3,db4] [f3,c4] [eb3,e3,bb3,b3] [c3,db3,d3,g3,ab3,a3], ~@5 [a2,e3,a3]@2 ~", // D5 A5 Gb5 F5 Emaj7 A5
  G: "[b2,gb3,b3]@3 [eb3,bb3,eb4] [e3,b3,e4]@3 [ab2,eb3,ab3]", // B5 Eb5 E5 Ab5
  H: "[a2,e3,a3]@3 [ab2,eb3,ab3] [gb2,db3,gb3]@3 [a2,e3,a3]", // A5 Ab5 Gb5 A5
  I: "[b2,gb3,b3]@3 [eb3,bb3,eb4] [a2,e3,a3]@3 [db3,ab3,db4]", // B5 Eb5 A5 Db5
  J: "[d3,a3,d4]@2 [d3,a3,d4] [db3,ab3,db4] [a2,e3,a3]!3 [bb2,f3,bb3]", K: "[b2,gb3,b3]!8",
  L: "[e4,ab4,b4,e5] [eb4,g4,bb4,eb5] [db4,d4,f4,gb4,ab4,a4,db5,d5] [c4,e4,g4,c5] [b3,eb4,gb4,b4] [bb3,d4,f4,bb4] [a3,db4,e4,a4] [g3,ab3,b3,c4,d4,eb4,g4,ab4] [gb3,bb3,db4,gb4] [f3,a3,c4,f4] [e3,ab3,b3,e4] [eb3,g3,bb3,eb4] [db3,d3,f3,gb3,ab3,a3,db4,d4] [c3,e3,g3,c4] [b2,eb3,gb3,b3] [bb2,d3,f3,bb3]", // E Eb Dmaj7 C B Bb A Abmaj7 …
  M: "[d3,a3,d4]!3 [a2,e3,a3]@2 [a2,e3,a3]@3", // D5 A5
  N: "[e3,b3,e4]@2 [db3,d3,eb3,ab3,a3,bb3] [e2,f2,gb2,g2,ab2,a2,bb2,b2,c3,f3,gb3,g3] ~@12", // E5
})).s("gm_overdriven_guitar").gain(0.42).pan(0.3)

// chords · electric guitar clean · "guitar"
const electric_guitar_clean = note(`<
  A@2 B C D C B C B C B C B C B C B C B C B ~@16 C B C B C B C B C B C B C B C B ~@42 C B C B C B C B C B C B ~@17
>`.pickRestart({
  A: "[~@15 [e3,b3,e4]@2 ~ [e3,b3,e4]@2 [e3,b3,e4] ~ [b2,gb3,b3]@4 [b2,gb3,b3]@2 ~@2 [a2,e3,a3]@2, ~@7 [b2,gb3,b3]]/2", // E5 B5 A5 B5
  B: "[d3,a3,d4]@2 [d3,a3,d4]@2 [d3,a3,d4] ~ [a2,e3,a3]@4 [a2,e3,a3]@2 e3@2 [e2,b2,e3]@2, ~@3 [a2,a3]", // D5 A5 E5 A
  C: "[e3,b3,e4]@2 [e3,b3,e4]@2 [e3,b3,e4] ~ [b2,gb3,b3]@4 [b2,gb3,b3]@2 ~@2 [a2,e3,a3]@2, ~@3 [b2,gb3,b3]", // E5 B5 A5 B5
  D: "[d3,a3,d4]", // D5
})).s("gm_electric_guitar_clean").gain(0.72)

// bass · electric bass pick · "bass"
const bass = note(`<
  ~@5 A B A B A B A B A B A B A B A C D E D E D E D E F G F G F G F G A B A B A B A B A B A B A B A C D E D E D E D E F
  G F G F G F G F G F G F G F G H I J K H I J K H I J K H I J K L@2 ~@12 F G F G F G F G F G F G F G F G ~
>`.pickRestart({
  A: "e2!2 ~ b1@2 b1!2 a1", B: "d2!2 ~ a1@2 a1!2 e1", C: "d2@2 d2@2 ~@2 a1@4 a1@2 gb2 f2 [eb2,e2] [c2,db2,d2]",
  D: "b1!4", E: "b1!3 e2", F: "e2!3 b1@2 b1@2 b1", G: "d2!3 a1@2 a1@2 a1", H: "b1@3 eb2 e2@3 ab1",
  I: "a1@3 ab1 gb1@3 a1", J: "b1@3 eb2 a1@3 db2", K: "d2@2 d2 db2 a1!3 bb1", L: "b1!8",
})).s("gm_electric_bass_pick").gain(0.72)

// drums · kick
const kick = s("bd").struct("<~@4 A B@16 C@7 D B@24 C@7 D B@16 E@18 ~@11 C B@7 F B@7 G H>".pickRestart({
  A: "~@6 x!2", B: "x!4 ~ x!2 ~", C: "x!4", D: "x ~@3 x ~@3 x ~ x!6", E: "x!8", F: "x ~ x ~ x ~ x ~@3 x!6",
  G: "x!4 ~@2 x!4 ~@2 x ~@3", H: "x",
})).gain(0.61)

// drums · rim
const rim = s("rim").struct("<~@4 [~ x!2 ~] ~@119>").gain(0.61)

// drums · snare
const snare = s("sd").struct("<~@4 A B@16 C@7 D B@24 C@7 D B@16 E@17 F ~@11 G B@7 H B@7 I J>".pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "x ~ x!3 ~ x!3 ~ x!3 ~ x!2", D: "x ~ x!3 ~ x!10", E: "x!4", F: "x ~ x!6", G: "x!16",
  H: "~@4 x ~@5 x!6", I: "x!2 ~@4 x!2 ~@4 x ~@3", J: "x",
})).gain(0.61)

// drums · hihat
const hihat = s("hh").struct("<~@4 [~ x!2 ~] [x!8]!16 ~@16 [x!8]!16 ~@71>").gain(0.61)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@12 A B@8 C D C D C D C@2 B@8 ~@7 A B@8 C D C D C D C@2 B@16 E@16 B@2 ~@12 B@16 F
>`.pickRestart({
  A: "~@3 x ~ x!3", B: "x!8", C: "x!2", D: "x ~ x!2", E: "x!4", F: "x",
})).gain(0.61)

// drums · crash
const crash = s("cr").struct("<~@21 A B A C A B A D E@8 ~@16 A B A C A B A D E@16 F@17 G ~@12 E@15 H A>".pickRestart({
  A: "x", B: "x ~@2 x", C: "~@2 x!2", D: "x!2 ~@2", E: "x ~@2 x ~@4", F: "x!4", G: "x ~ x ~ x!4", H: "x ~@2 x ~@2 x ~",
})).gain(0.61)

stack(overdriven_guitar, electric_guitar_clean, bass, kick, rim, snare, hihat, open_hat, crash)