// More and More — Captain Hollywood Project
// 126 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: bank select 127 (Roland MT-32 map) read through the MT-32 patch table: ch 4 Bottleblow -> blown bottle
// note: duplicate parts dropped: ch 13 cello (copy of ch 2 lead 2 sawtooth)
// note: Full arrangement: all 130 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(126/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 · synth strings 2
const synth_strings_2 = note(`<
  ~@4 A B A B A B A B A B A B C ~@31 D B D E D B D E D B D E D B D E D B D B ~@24 D B D E D B D E D B D E D B D E D B D
  E D B D E D B D E D B D E F G F E H@2
>`.pickRestart({
  A: "[g3,a3,c4,e4]", B: "[f3,a3,c4] [g3,b3,d4]", C: "[g3,a3,c4,e4]@15 ~", D: "[a3,c4,e4]",
  E: "[f3,a3,c4,e4] [g3,b3,d4]", F: "[c4,e4,a4]", G: "[a3,c4,f4] [b3,d4,g4]", H: "[[a2,a3,c4,e4,a4]@29 ~@3]/2",
})).s("gm_synth_strings_2").gain(0.17)

// other · blown bottle
const blown_bottle = note("<~@24 A@8 ~@8 A@8 ~@8 A@12 ~@16 A@8 ~@8 A@8 ~@22>".pickRestart({
  A: "d5 ~ d5!2 ~ d5 ~ d5!5 ~ d5 ~@2",
})).s("gm_blown_bottle").gain(0.09).pan(0.7)

// other · lead 8 bass lead
const lead_8_bass_lead = note("<~@68 [a4 c5 d5 a4 c5 d5 a4 c5 d5 a4 c5 d5 a4 c5 a4 e5]!4 ~@58>")
  .s("gm_lead_8_bass_lead").gain(0.08).pan(0.9)

// other · lead 2 sawtooth
const lead_2_sawtooth = note(`<
  A B C B A B C B A B C B A B C B A B C B A B C B A B C B A B C B ~@16 A B C B A B C B A B C B A B C B A B C B ~@4 A B C
  B ~@16 A B C B A B C B A B C B A B C B A B C B A B C B A B C B A B C B A B C B ~@2
>`.pickRestart({
  A: "~@4 e4 ~@3 c4 a3 ~@3 d4 ~@2", B: "a3 d4 ~@2 c4 ~@3 c4 g3 ~@3 b3 ~@2", C: "g3 b3 ~@2 e4 ~@3 c4 a3 ~@3 d4 ~@2",
})).s("gm_lead_2_sawtooth").gain(0.11).pan(0.1)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@32 A B A B A B A B A B A B A B A B ~@20 A B A B A B A B A B A B A B A B A B A B A B A B ~@16 A B A B A B A B A B A B
  A B A B ~@6
>`.pickRestart({
  A: "[a4,c5,e5]", B: "[f4,a4,c5] [g4,b4,d5]",
})).s("gm_electric_guitar_clean").gain(0.06)

// chords · clarinet
const clarinet = note(`<
  ~@32 A B C B A B C B A B C B A B C B ~@24 A B C B A B C B A B C B A B C B A B C B ~@16 A B C B A B C B A D C D A D C D
  ~@6
>`.pickRestart({
  A: "a4 ~ [e5,a5] ~ a4 [c5,e5,a5]@2 ~ [c5,e5,a5] ~@2 a4@2 [c5,e5,a5] ~@2, ~@2 c5@2 ~@3 a4@2 ~ [c5,e5,a5]@2 ~@4", // A5 Am
  B: "f4@2 [c5,f5,a5]@2 ~ [c5,f5,a5] ~ f4 g4@2 [d5,g5,b5]!2 ~ [d5,g5,b5] ~ [d5,g5,b5]", // F G
  C: "a4 ~ [e5,a5] ~ a4 [c5,e5,a5]@2 ~ [c5,e5,a5] ~@2 a4@2 [c5,e5,a5] ~ [c5,e5,a5], ~@2 c5@2 ~@3 a4@2 ~ [c5,e5,a5]@2 ~@4", // A5 Am
  D: "f4@2 [c5,f5,a5]@2 ~ [c5,f5,a5] ~ f4 [c5,f5,a5] ~ [d5,g5,b5]!2 ~ [d5,g5,b5] ~ [d5,g5,b5], ~@4 g4 ~@3", // F G
})).s("gm_clarinet").gain(0.13).pan(0.3)

// other · epiano1
const epiano1 = note(`<
  ~@8 A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A
  B A B A B A B C D C B A B C B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A D C D A D E D E D E D C B E D
  ~@6
>`.pickRestart({
  A: "a2@2 ~@2 a2@2 ~ a2@2 ~ a2@2 ~ a2@2 ~", B: "f2@2 ~@2 f2@2 ~ g2 ~@2 g2@2 ~ g2 e2 g2",
  C: "a2@2 ~@2 a2 ~@2 a2@2 ~ a2@2 ~ a2@2 ~", D: "f2 ~@3 f2@2 ~ g2 ~@2 g2@2 ~ g2 e2 g2",
  E: "a2 ~@3 a2 ~@2 a2@2 ~ a2@2 ~ a2@2 ~",
})).s("gm_epiano1").gain(0.42)

// drums · kick
const kick = s("bd").struct("<~@16 [x!4]!100 ~@14>").gain(0.35)

// drums · snare
const snare = s("sd").struct("<~@24 [~ x ~ x]!40 ~@4 [~ x ~ x]!40 ~@22>").gain(0.4)

// drums · clap
const clap = s("cp").struct(`<
  ~@24 A@26 B C A@2 B C A@2 B C A@2 B C ~@4 A@26 B C A@2 B C A@2 B C A@2 B C ~@22
>`.pickRestart({
  A: "~ x ~ x", B: "~@2 x ~@3 x!2", C: "~@4 x ~@5 x ~@2 x ~@2",
})).gain(0.35)

// drums · hihat
const hihat = s("hh").struct("<~@16 [x!2 ~ x!3 ~ x!3 ~ x!3 ~ x]!100 ~@14>").gain(0.25)

// drums · open hat
const open_hat = s("oh").struct("<~@16 [~ x ~ x ~ x ~ x]!100 ~@14>").gain(0.3)

// drums · tambourine
const tambourine = s("tb").struct("<~@24 [x!16]!40 ~@4 [x!16]!40 ~@22>").gain(0.15)

// drums · congas
const congas = s("conga:13").struct("<~@24 [x ~@2 x ~@6 x ~@5]!40 ~@4 [x ~@2 x ~@6 x ~@5]!56 ~@6>").gain(0.95)

// drums · congas
const congas_2 = s("conga:18").struct("<~@24 [~@3 x ~@2 x ~]!40 ~@4 [~@3 x ~@2 x ~]!56 ~@6>").gain(0.95)

// drums · congas
const congas_3 = s("conga:33").struct("<~@24 [~@14 x!2]!40 ~@4 [~@14 x!2]!56 ~@6>").gain(0.95)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@20 [~ x ~ x ~ x ~ x]!4 [x!8]!84 [~ x ~ x ~ x ~ x]!8 ~@14>").gain(0.5)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct("<~@24 [~ x ~ x ~ x ~ x ~ x ~ x ~ x ~ x]!84 ~@22>").gain(0.25)

stack(
  synth_strings_2, blown_bottle, lead_8_bass_lead, lead_2_sawtooth, electric_guitar_clean, clarinet, epiano1, kick,
  snare, clap, hihat, open_hat, tambourine, congas, congas_2, congas_3, cabasa, cabasa_soft
)