// Lonely People — America
// 157 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: duplicate parts dropped: ch 2 "English Horn/Lead" english horn (copy of ch 1 "Oboe/Lead" oboe)
// note: Full arrangement: all 78 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(157/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · harmonica
const harmonica = note("<~@48 A B ~ A B ~ A C D ~@21>".pickRestart({
  A: "[c5,e5]@7 ~ [b4,d5]@7 ~", B: "[a4,c5]@15 ~", C: "[a4,c5]", D: "[d4,g4,b4]@15 ~",
})).s("gm_harmonica").gain(0.72)

// chords · acoustic guitar steel · "Acc Guitar 1"
const acoustic_guitar_steel = note(`<
  A B C@2 A B C@2 D E F G D E A H A B C@2 A B C I D E J@2 K L J H A B C@2 A B C E D E J@2 K L J@2 M@7 N J O A B C@2 A B
  C I D E J@2 D E J@2 D E P@2
>`.pickRestart({
  A: "[b3,d4,g4]@4 [b3,d4,g4]@2 [b3,d4,g4]@6 [b3,d4,g4]@3 ~", // G
  B: "[g3,b3,e4]@4 [g3,b3,e4]@2 [g3,b3,e4]@6 [g3,b3,e4]@3 ~", // Em
  C: "[b3,d4,f#4]@4 [b3,d4,f#4]@2 [b3,d4,f#4]@6 [b3,d4,f#4]@3 ~", // Bm
  D: "[c4,e4,g4]@4 [c4,e4,g4]@2 [c4,e4,g4]@6 [c4,e4,g4]@3 ~", // C
  E: "[a3,d4,f#4]@4 [a3,d4,f#4]@2 [a3,d4,f#4]@6 [a3,d4,f#4]@3 ~", // D
  F: "[b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~ [b3,d4,f#4,g4]@3 ~ [b3,d4,f#4,g4]@3 ~", // G Gmaj7
  G: "[b3,d4,e4,g4]@3 ~ [b3,d4,e4,g4]@3 ~ [g3,b3,d4,g4]@3 ~ [g3,b3,d4,g4]@3 ~", // Em7 G
  H: "[b3,d4,g4]@3 ~ [a3,d4,f#4]@3 ~ [a3,d4,f#4]@3 ~ [a3,d4,f#4]@3 ~", I: "~@4 [a3,d4,f#4]@2 [a3,d4,f#4]@9 ~",
  J: "~@4 [b3,d4,g4]@2 [b3,d4,g4]@5 ~ [b3,d4,g4]@3 ~", K: "~@4 [c4,e4,g4]@2 [c4,e4,g4]@5 ~ [c4,e4,g4]@3 ~",
  L: "~@4 [a3,d4,f#4]@2 [a3,d4,f#4]@5 ~ [a3,d4,f#4]@3 ~", M: "~@4 [g3,c4,e4]@7 ~ [g3,c4,e4]@3 ~",
  N: "~@4 [g3,c4,e4]@3 ~ [a3,d4,f#4]@3 ~ [a3,d4,f#4]@3 ~", O: "~@4 [a3,d4,f#4]@11 ~", P: "[[g3,b3,e4]@31 ~]/2",
})).s("gm_acoustic_guitar_steel").gain(0.48)

// other · acoustic guitar steel · "Acc. Guitar 2"
const acoustic_guitar_steel_2 = note("<A B C@2 A B C@2 ~@68 D@2>".pickRestart({
  A: "~@8 g4@7 ~", B: "~@8 e4@7 ~", C: "~@8 f#4@7 ~", D: "[[e4,g4,b4]@31 ~]/2",
})).s("gm_acoustic_guitar_steel").gain(0.72)

// other · acoustic guitar steel · "Acc. Guitar 3"
const acoustic_guitar_steel_3 = note(`<
  A B C D A B C E F G H I F G J K A B C D A B C L F G H I F G J K A B C D A B C L F G H I F G J M N O P N O P N Q J K A
  B C D A B C L F G H I F G H I F G R@2
>`.pickRestart({
  A: "g2@7 ~ d2@7 ~", B: "e2@7 ~ e2@7 ~", C: "b1@7 ~ f#2@7 ~", D: "b2@7 ~ b2@2 g2@2 f#2@3 ~",
  E: "e3@3 ~ d3@3 ~ b2@2 a2@2 f#2@3 ~", F: "c2@7 ~ g2@7 ~", G: "d2@7 ~ a2@7 ~", H: "g2@7 ~ f#2@7 ~", I: "e2@7 ~ d2@7 ~",
  J: "g2@7 ~ g2@7 ~", K: "g2@3 ~ d2@3 ~ e2@3 ~ f#2@3 ~", L: "d2@7 ~ d2@3 ~ c#2@3 ~", M: "g2@3 ~ g2@7 ~ g2@3 ~",
  N: "c3@7 ~ b2@7 ~", O: "a2@7 ~ e2@7 ~", P: "a2@3 ~ a2@6 g2@2 e2@3 ~", Q: "a2@7 ~ d2@7 ~", R: "[e2@31 ~]/2",
})).s("gm_acoustic_guitar_steel").gain(0.72)

// drums · kick
const kick = s("bd").struct("<~@16 x!15 ~ x!15 ~ x!29 ~>").gain(0.4)

// drums · rim
const rim = s("rim").struct("<~@16 [~ x]!15 ~@47>").gain(0.8)

// drums · snare
const snare = s("sd").struct("<~@31 [~@2 x!2 ~@4] [~ x]!15 [~@2 x!2 ~@4] [~ x]!28 ~@2>").gain(0.56)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@31 [~@3 x] ~@15 [~@3 x] ~@30>").gain(0.56)

// drums · high tom
const high_tom = s("ht").struct("<~@31 [~ x] ~@15 [~ x] ~@30>").gain(0.56)

// drums · ride bell
const ride_bell = s("rd").struct("<~@10 [x!2]!2 x ~@65>").gain(0.4)

// drums · tambourine
const tambourine = s("tb").struct("<~@8 [~ x ~@14] ~@67 [x!16] [x!2 ~@14]>").gain(0.24)

// drums · tambourine · soft notes
const tambourine_soft = s("tb").struct("<~@77 [~@2 x!6 ~@8]>").gain(0.08)

// drums · splash
const splash = s("cr").struct("<~@8 x ~@69>").gain(0.48)

stack(
  harmonica, acoustic_guitar_steel, acoustic_guitar_steel_2, acoustic_guitar_steel_3, kick, rim, snare, hihat, mid_tom,
  high_tom, ride_bell, tambourine, tambourine_soft, splash
)