// Hello, I Love You, Won't You Tell Me Your Name? — The Doors
// 120 bpm, 4/4, key D# major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 68 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/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 · acoustic bass · "ACOU BASS"
const bass = note("<~ A B C D A B C D A B C D E@8 A B C D A B C D E@8 F ~ G@28 H>".pickRestart({
  A: "a1 ~ a1 ~ e2 ~ e2 ~ g1 ~ g1 ~ d2 ~ d2 ~", B: "a1@2 e2@4 d2@4 b1 c2 b1@2 c2@2",
  C: "a1 ~ a1@2 e2 ~ e2 ~ g1 ~ g1 ~ d2 ~ d2 ~", D: "a1@2 e2@3 ~ d2@4 b1 c2 b1@2 c2@2", E: "a1@2 c2 e2 g1@2 b1 d2",
  F: "a1 ~@7", G: "bb1@2 db2 f2 ab1@2 c2 eb2", H: "bb1 ~ bb1 ~ f2 ~ f2 ~ ab1 ~ ab1 ~ eb2 ~ eb2 ~",
})).s("gm_acoustic_bass").gain(0.8)

// chords · epiano2 · "E.PIANO 2"
const epiano2 = note(`<
  ~ A B A C A B A C A B A C D E F G H I J K A B A C A B A C D E F G H I J K L M N O P Q R S T U N O P V R S T U N O P Q
  R S T U N O P Q W
>`.pickRestart({
  A: "a3 ~ a3 ~ [db4,e4,a4] ~ [db4,e4,a4] ~ g3 ~ g3 ~ [b3,d4,g4] ~ [b3,d4,g4] ~", // A G
  B: "a3 ~ e4@3 ~ d4@3 ~ b3 c4 b3 a3 g3 ~", C: "a3 ~ e4@3 ~ d4@4 b3 c4 b3 a3 g3@2",
  D: "[a2,a3,db4,e4]@4 [a3,db4,e4]@2 g2 ~ [g3,b3,d4]@2 g2 ~ [g3,b3,d4]@2 g2 ~", // A G
  E: "[a3,db4,e4] ~ [a3,db4,e4]@2 a2 ~ [g3,b3,d4]@3 ~ [g3,b3,d4]@2 g2 ~ [g3,b3,d4] ~", // A G
  F: "[a2,a3,db4,e4]@3 ~ [a3,db4,e4]@2 g2 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 g2 ~ [g3,b3,db4,d4] ~", // A G
  G: "[a2,a3,db4,e4] ~ [a3,db4,e4]@2 g2 ~ [g3,b3,d4]@2 g2 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 g2 ~", // A G
  H: "[a3,db4,e4]@3 ~ [a3,db4,e4]@2 a2 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 g2 ~ [g3,b3,d4] ~", // A G
  I: "[a2,a3,db4,e4] ~ [a3,db4,e4]@2 ~@2 [g2,g3,b3,d4]@2 ~@2 [g3,b3,d4]@2 ~@2 [g2,g3,b3,d4] ~, ~@2 a2 ~@7 g2 ~@5", // A G
  J: "[a3,db4,e4]@3 ~ [a3,db4,e4]@2 g2 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 g2 ~ [g3,b3,d4] ~, a2 ~@15", // A G
  K: "[a2,a3,db4,e4] ~ [a2,a3,db4,e4] ~@3 [g3,b3,d4]@4 g2 ~ [g3,b3,d4] ~ [g3,b3,d4] ~", // A G
  L: "[a3,db4,e4]@2 ~@10 [b3,c4] ~ [e2,f2] [g2,a2], ~@5 [c6,d6,e6]@4 [a4,b4] [f4,g4] [d4,e4]@2 ~@3, ~@6 [g5,a5,b5]@7 ~@3, ~@7 [e5,f5]@6 ~@3, ~@8 [c5,d5]@5 ~@3", // A Cmaj7 Fmaj7 Gsus2 C Asus2 Fsus2 Dsus2 …
  M: "~@13 b6 ~@2, b2@4 [b3,c4] [d4,e4]@2 [b4,c5,d5] [e5,f5,g5] [a5,b5] [c6,d6,e6] [f6,g6] a6@2 ~@2, ~ [c3,d3]@14 ~, ~@2 [e3,f3]@13 ~, ~@3 [g3,a3]@3 [f4,g4,a4]@9 ~", // Cmaj7 Dsus2 Bm Em Asus2 C Fsus2 Csus2 …
  N: "[bb2,bb3,d4,f4]@4 [bb3,d4,f4]@2 ab2 ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4]@2 ab2 ~", // Bb Ab
  O: "[bb3,d4,f4] ~ [bb3,d4,f4]@2 bb2 ~ [ab3,c4,eb4]@3 ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4] ~", // Bb Ab
  P: "[bb2,bb3,d4,f4]@3 ~ [bb3,d4,f4]@2 ab2 ~ [ab3,c4,eb4] ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,d4,eb4] ~", // Bb Ab
  Q: "[bb2,bb3,d4,f4] ~ [bb3,d4,f4]@2 ab2 ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4] ~ [ab3,c4,eb4]@2 ab2 ~", // Bb Ab
  R: "[bb3,d4,f4]@3 ~ [bb3,d4,f4]@2 bb2 ~ [ab3,c4,eb4] ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4] ~", // Bb Ab
  S: "[bb2,bb3,d4,f4] ~ [bb3,d4,f4]@2 ~@2 [ab2,ab3,c4,eb4]@2 ~@2 [ab3,c4,eb4]@2 ~@2 [ab2,ab3,c4,eb4] ~, ~@2 bb2 ~@7 ab2 ~@5", // Bb Ab
  T: "[bb3,d4,f4]@3 ~ [bb3,d4,f4]@2 ab2 ~ [ab3,c4,eb4] ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4] ~, bb2 ~@15", // Bb Ab
  U: "[bb2,bb3,d4,f4] ~ [bb2,bb3,d4,f4] ~@3 [ab3,c4,eb4]@4 ab2 ~ [ab3,c4,eb4] ~ [ab3,c4,eb4] ~", // Bb Ab
  V: "[bb2,bb3,d4,f4] ~ [bb3,d4,f4]@2 ab2 ~ [ab3,c4,eb4]@2 ab2 ~ [ab3,c4,eb4] ~ [c4,eb4]@2 ab2 ~, ~@12 ab3 ~@3", // Bb Ab Cm
  W: "bb2 ~ bb2 ~ [d4,f4,bb4] ~ [d4,f4,bb4] ~ ab2 ~ ab2 ~ [c4,eb4,ab4] ~ [c4,eb4,ab4] ~", // Bb Ab
})).s("gm_epiano2").gain(0.54)

// chords · rock organ · "ORGAN 3"
const rock_organ = note("<~@37 A@2 ~@29>".pickRestart({
  A: "[~@4 [e5,a5,db6]@7 ~ [db4,e4,a4]@12 [f5,bb5,d6]@8]/2", // A Bb
})).s("gm_rock_organ").gain(0.72)

// chords · distortion guitar · "+FEEDBCKGT" · Bb5 Ab5
const distortion_guitar = note("<~@47 [[bb2,f3,bb3]@7 ~ [ab2,eb3,ab3]@7 ~]!20 ~>").s("gm_distortion_guitar").gain(0.42)

// drums · kick
const kick = s("bd").struct("<~ A B A B A B A B A B A B C@8 A B A B A B A B C@8 D ~ C@28 E>".pickRestart({
  A: "x ~@2 x!3 ~@2", B: "~ x ~ x ~ x ~ x", C: "x ~ x ~ x!2 ~ x", D: "x", E: "x ~@2 x!5",
})).gain(0.74)

// drums · snare
const snare = s("sd").struct("<A B C B C B C B C B C B C D@8 B C B C B C B C D@8 E C D@27 F G>".pickRestart({
  A: "~@3 x", B: "~@3 x ~@2 x ~", C: "~@14 x!2", D: "x!4", E: "x", F: "x ~@9 x!6", G: "~@2 x!2 ~@2 x!2",
})).gain(0.74)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<A B C B C B C B C B C B C ~@8 B C B C B C B C ~@9 C ~@27 D E>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~ x ~@2", C: "~@12 x!2 ~@2", D: "~@4 x!6 ~@6", E: "~ x ~@3 x ~@2",
})).gain(0.22)

// drums · low tom
const low_tom = s("lt").struct("<[~@7 x] ~@66 [~@6 x!2]>").gain(0.74)

// drums · hihat
const hihat = s("hh").struct("<~ [x!4]!36 [x!2 ~ x] [~ x ~ x] [x!4]!29>").gain(0.74)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~ A B A B A B A B A B A B A@9 B A B A B A B A@8 ~@2 A@29>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~@4",
})).gain(0.22)

// drums · mid tom
const mid_tom = s("mt").struct("<~@2 A ~ A ~ A ~ A ~ A ~ A ~@9 A ~ A ~ A ~ A ~@38 B>".pickRestart({
  A: "~ x!2 ~", B: "~@5 x ~@2",
})).gain(0.74)

// drums · open hat
const open_hat = s("oh").struct("<~@2 A ~ A ~ A ~ A ~ A ~ A ~@9 A ~ A ~ A ~ A ~@39>".pickRestart({
  A: "~@5 x ~ x",
})).gain(0.74)

// drums · high tom
const high_tom = s("ht").struct("<~@2 A ~ A ~ A ~ A ~ A ~ A ~@9 A ~ A ~ A ~ A ~@39>".pickRestart({
  A: "~ x ~@6",
})).gain(0.74)

// drums · crash
const crash = s("cr").struct("<~@47 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A>".pickRestart({
  A: "x",
})).gain(0.74)

// drums · ride
const ride = s("rd").struct(`<
  ~ A ~ A ~ A ~ A ~ A ~ A ~ B C B C B C B C A ~ A ~ A ~ A ~ B C B C B C B C A ~ B C B C B C B C B C B C B C B C B C B C
  B C B C B C B C A
>`.pickRestart({
  A: "x", B: "x!8", C: "x!4 ~ x!3",
})).gain(0.74)

stack(
  bass, epiano2, rock_organ, distortion_guitar, kick, snare, snare_soft, low_tom, hihat, hihat_soft, mid_tom, open_hat,
  high_tom, crash, ride
)