// I'm A Loser — The Beatles
// 167 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: Full arrangement: all 120 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): Lead Gtr Muted.
setcpm(167/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 · rock organ · "Harmony Organ 3"
const rock_organ = note("<A@2 B@3 ~@17 C@7 ~@17 C@7 ~@33 C@7 ~@27>".pickRestart({
  A: "[~@11 g5@17 ~ f#5@3]/2", B: "[~@14 g5@17 f#5@4 ~@13]/3",
  C: "[~@8 g5@3 g5@4 g5@16 f#5@5 ~@11 g5@5 g5@4 g5@3 g5@4 f#5@5 f#5@3 f#5 ~@7 g5@16 g5@5 ~@12]/7",
})).s("gm_rock_organ").gain(0.72).pan(0.6)

// chords · harmonica
const harmonica = note("<~@55 A@4 B@2 C@2 ~@32 A@4 B@2 C@2 ~@17>".pickRestart({
  A: "[~@3 [b4,d5]@5 [b4,d5]@7 [d5,f5]@9 [d5,f5]@3 [d5,f5]@4 [c5,e5]@9 [g4,c5]@3 [g4,c5]@4 [b4,d5]@5 [b4,d5]@7 [b4,d5] ~@4]/4", // Bm Dm C C5 Bm
  B: "[~@3 [b4,d5]@5 [b4,d5]@3 [b4,d5]@4 [d5,f5]@9 [d5,f5]@3 [d5,f5]@5]/2", C: "[[g4,c5]@8 g4@3 e4@4 d4@5 d4@4 ~@8]/2",
})).s("gm_harmonica").gain(0.4).pan(0.3)

// bass · fretless bass · "Fretless E Bass"
const bass = note(`<
  ~@7 A B C D A E F G A B C H A B C I J K J K L M N O A B C D A E F G A B C H A B C I J K J K L M N O P Q R G S T F I J
  K J K L M N U A B C D A E F G A B C H A B C I J K J K L M N O P Q R G S T F I J K J K L M N U J K J K L M N U ~
>`.pickRestart({
  A: "g2@7 ~ d2@4 g2@4", B: "d2@7 ~ a1@4 d2@4", C: "f2@7 ~ c2@4 f2@4", D: "g2@7 ~ d2@4 f#2@4",
  E: "d2@7 ~ a2@2 ~ b2 d3@4", F: "f2@7 ~ c2@4 f2@2 ~ g2", G: "g2@6 ~ g2 d2@4 f#2@4", H: "g2@7 ~ d2@4 d2@4",
  I: "g2@7 ~ d2@7 ~", J: "a1 b1 c2 c#2", K: "d2 c2 b1 a1", L: "g2 f#2 e2 d2", M: "e2 d2 c2 b1", N: "a1 b1 c2 a1",
  O: "f2@4 e2@4 d2@7 ~", P: "g2!2 d2!2", Q: "d2!2 a1 d2", R: "f2@4 f2@4 c2@4 f2@2 ~ g2", S: "g2@6 ~ g2 d2@4 g2@4",
  T: "d2@7 ~ f#2@2 ~ a2 d3@4", U: "f2 e2 d2!2",
})).s("gm_fretless_bass").gain(0.45).pan(0.6)

// chords · electric guitar muted · "Lead Gtr Muted"
const electric_guitar_muted = note(`<
  ~@7 A ~@2 B ~@2 A C B ~ D E ~@2 F@2 ~@8 A ~@2 B ~@2 A C B ~ D E ~@2 F@2 ~@9 G H I@2 ~@2 J ~ K ~ L M N ~ O A ~@2 B ~@2
  A C B ~ D E ~@2 F@2 ~@9 G H I@2 ~@2 J ~ K ~ L M N ~ O ~ K ~ L M N ~ O ~
>`.pickRestart({
  A: "~@11 d4@5", B: "~ d4@3", C: "~@4 d4@4 ~@3 d4 d4@3 d4", D: "~@15 b3", E: "~@8 a#3@3 ~@5", F: "[~@15 d4@17]/2",
  G: "~@7 [a3,d4]@9", H: "~@7 [c4,g4]@9", I: "[~@7 a3 ~@7 d4@17]/2", J: "~@4 f#2@3 ~@5 g#2@3 ~",
  K: "b4@7 f#4@4 b4@4 e4", L: "b4@7 f#4@4 b4@4 g3", M: "~@4 a#4@7 a#4@5", N: "~@7 [d4,e4]@4 d4 ~@4",
  O: "~@7 [f#4,a4]@5 ~@4", // F#m
})).s("gm_electric_guitar_muted").gain(0.3).pan(1)

// chords · acoustic guitar nylon · "Rythm Gtr Nylon Gtr2"
const acoustic_guitar_nylon = note(`<
  A@5 B C D E F D@2 E F D@2 E F D@2 E F D G E G E D H G I D E F D@2 E F D@2 E F D@2 E F D G E G E D H G I D E F D@2 E F
  D G E G E D H G I D E F D@2 E F D@2 E F D@2 E F D G E G E D H G I D E F D@2 E F D G E G E D H G I G E G E D H G I ~
>`.pickRestart({
  A: "[~@13 e4@16 ~ [d4,f#4]@16 ~ [c4,e4]@16 ~ [d4,f#4]@16, ~@11 a2@17 ~ [a2,d3,a3]@17 [a2,e3,a3]@17 [a2,d3,a3]@17, ~@12 [e3,a3,c4]@17 ~@51]/5", // D C D D5 A5 D5 Am
  B: "[e3,a3,c4,e4]@4 [e3,a3,c4,e4]@4 [e3,a3,c4,e4]@3 [a3,c4,e4] [e3,a3,c4,e4]@4, a2!2", // Am
  C: "[a3,c4,e4]@4 [a3,c4,e4]@4 [a3,d4,f#4]@3 [d4,f#4] [a3,d4,f#4]@4, f3 d3", // Am D
  D: "[g3,b3,g4]@4 [g3,b3,g4]@4 [g3,b3,g4]@3 [g3,b3,g4] [g3,b3,g4]@3 [g3,b3,g4], [g2,b2,d3]!2", // G
  E: "[a3,d4,f#4]@4 [a3,d4,f#4]@4 [a3,d4,f#4]@3 [a3,d4,f#4] [a3,d4,f#4]@3 [a3,d4,f#4], [a2,d3]!2", // D D5
  F: "[a3,c4,g4]@4 [a3,c4,g4]@4 [a3,c4,g4]@3 [a3,c4,g4] [a3,c4,g4]@3 [a3,c4,g4], f3!2", // Am7
  G: "[a3,c4,e4]@4 [a3,c4,e4]@4 [a3,c4,e4]@3 [a3,c4,e4] [a3,c4,e4]@3 [a3,c4,e4], [a2,e3]!2", // Am A5
  H: "[g3,b3,e4]@4 [g3,b3,e4]@4 [g3,b3,e4]@3 [g3,b3,e4] [g3,b3,e4]@3 [g3,b3,e4], [e2,b2,e3]!2", // Em E5
  I: "[a3,c4,f4]@4 [a3,c4,f4]@4 [a3,d4,f#4]@3 [a3,d4,f#4] [a3,d4,f#4]@3 [a3,d4,f#4], f3 [a2,d3]", // F D D5
})).s("gm_acoustic_guitar_nylon").gain(0.3).pan(0.1)

// drums · kick
const kick = s("bd").struct(`<
  ~@6 A B@13 C D@2 B@2 D@2 B@3 E B@15 E B@15 F B@11 F B@3 F B@3 E B@5 D B@5 D B@7 F B@16 ~
>`.pickRestart({
  A: "~@3 x", B: "x!2", C: "x ~@7 x ~@6 x", D: "x ~@7 x ~@2 x ~@4", E: "x ~@7 x ~@2 x ~@3 x", F: "x ~ x!2",
})).gain(0.45)

// drums · snare
const snare = s("sd").struct(`<
  ~@7 A@11 B A@2 C A@20 C A@11 D A@7 E A@11 E A@3 E A@2 E A@12 F A@7 E A@16 ~
>`.pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@2 x ~@4 x ~@2 x", C: "~@4 x ~@7 x ~@2 x", D: "~@4 x ~@6 x!3 ~ x", E: "~@4 x ~@6 x ~@3 x",
  F: "~@4 x ~@7 x!2 ~ x",
})).gain(0.4)

// drums · hihat
const hihat = s("hh").struct("<~@7 A B C D C@8 B C@3 ~@8 A B C@9 E C@4 ~@24 A C@2 B C@3 F C@7 B ~@33>".pickRestart({
  A: "~@4 x ~@2 x!2 ~@2 x!2 ~@2 x", B: "x ~@2 x!2 ~@2 x!2 ~@2 x!3 ~ x", C: "x ~@2 x!2 ~@2 x!2 ~@2 x!2 ~@2 x",
  D: "x ~@2 x!3 ~@2 x ~@2 x!3 ~ x", E: "x ~@2 x!2 ~@2 x!2 ~@2 x!3 ~@2", F: "x ~@2 x!2 ~@2 x!2 ~@2 x!2 ~@3",
})).gain(0.35)

// drums · open hat
const open_hat = s("oh").struct("<~@10 A ~@2 B@2 ~@23 B ~@3 B ~@35 B ~@41>".pickRestart({
  A: "~@7 x ~@8", B: "~@15 x",
})).gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct("<~@6 [~@11 x!2 ~@2 x] ~@113>").gain(0.35)

// drums · crash
const crash = s("cr").struct(`<
  ~@7 A ~@23 A ~@15 A ~@7 A ~@7 A ~@5 A ~ A ~@15 A ~@7 A ~@7 A ~ A ~@3 A ~ A ~@5 A ~@2
>`.pickRestart({
  A: "x",
})).gain(0.4)

// drums · ride
const ride = s("rd").struct(`<
  ~@23 A B A C A C A@2 ~@16 D A C@2 A B A C E C A F A C A@2 E B A F A B E A ~@16 E C B A C F A@2 E C A B A C A@2 E F E A
  C@2 E C E A B C A C G A ~
>`.pickRestart({
  A: "x!4", B: "x ~@3 x ~@3 x ~@3 x ~@2 x", C: "x ~@3 x ~@2 x!2 ~@3 x ~@3", D: "~@4 x ~@2 x!2 ~@3 x ~@3", E: "~ x!3",
  F: "x ~@3 x ~@2 x!2 ~@3 x ~@2 x", G: "~@4 x ~@3 x ~@3 x ~@2 x",
})).gain(0.4)

stack(
  rock_organ, harmonica, bass, electric_guitar_muted, acoustic_guitar_nylon, kick, snare, hihat, open_hat, mid_tom,
  crash, ride
)