// Enola Gay — Orchestral Manoeuvres in the Dark
// 140 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: ch 2 "intro string" named as a string part, played on string ensemble 1 (its lead 3 calliope patch is not one)
// note: Full arrangement: all 114 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 · [...]/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 · string ensemble 1 · "intro string"
const string_ensemble_1 = note("<A@2 B@2 C D E@2 ~@106>".pickRestart({
  A: "[b4@4 c5@2 b4@12 b4@4 c5@2 d5@2 c5@2 b4@3 ~]/2", B: "[b4@4 e4 ~ e4@14 b4@4 a4@4 g4@4]/2", C: "c5@2 b4 g4@5",
  D: "~ g4@2 a4 b4 a4 g4@2", E: "[a4@4 b4@2 a4@23 ~@3]/2",
})).s("gm_string_ensemble_1").gain(0.26)

// other · string ensemble 2 · "intro string"
const string_ensemble_2 = note(`<
  A@2 B@2 C D E@2 F@2 G@2 H I J K L@2 G@2 M H N@2 F@2 G@2 H I J K F@2 G@2 H I J K ~@8 F@2 G@2 H I J K ~@24 F@2 G@2 H I J
  K L@2 G@2 M H N@2 ~@18
>`.pickRestart({
  A: "[b4@4 c5@2 b4@12 b4@4 c5@2 d5@2 c5@2 b4@3 ~]/2", B: "[b4@4 e4 ~ e4@14 b4@4 a4@4 g4@4]/2", C: "c5@2 b4 g4@5",
  D: "~ g4@2 a4 b4 a4 g4@2", E: "[a4@4 b4@2 a4@23 ~@3]/2", F: "g4/2", G: "e4/2", H: "a4 g4", I: "a4", J: "b4@3 a4@5",
  K: "b4@3 a4@2 b4@3", L: "[a4@5 g4@27]/2", M: "a4@3 g4@5", N: "[f#4@12 g4@2 a4@15 ~@3]/2",
})).s("gm_string_ensemble_2").gain(0.25)

// bass · synth bass 1 · "basline"
const bass = note(`<
  ~@8 A B C D E F G H A B C D E F G H A B C D E F G H A B C D E F G H A B C D E F G H ~@8 A B C D E F G H A B C D E F G
  H A B C D E F G H A B C D E F G H I B C J E F G H I B C J E F G K I B C J E F G H@3
>`.pickRestart({
  A: "g2 ~@3 g2 ~@3 g2 ~@3 g2 ~@3", B: "e2 ~ g2 ~@3 g2 ~ e2 ~ g2 ~ g2 ~ g2 ~", C: "d2 ~@3 e2 ~ d2 ~ e2 ~@3 d2 ~@3",
  D: "e2 ~ e2 ~@3 e2 ~@3 e2 ~ e2 g2 e2 ~", E: "g2 ~@3 g2 ~@3 g2 ~ g2 ~@3 a2 ~", F: "~@2 g2 ~@3 g2 ~@3 g2 ~ g2 ~ g2 ~",
  G: "a2 ~@3 a2 ~@3 a2 ~ g2 ~@3 a2 ~", H: "~@2 a2 ~ g2 ~ a2 ~ g2 ~ f#2 a2 g2@2 ~@2",
  I: "g2 ~@3 g2 ~@3 g2 ~ e2 ~ g2 ~@3", J: "e2 ~ e2 ~@3 e2 ~ d2 ~ e2 ~ e2 g2 e2 ~",
  K: "~@2 a2 ~ g2 ~ a2 ~ g2 ~ f#2 a2 g2@2 f#2 ~",
})).s("gm_synth_bass_1").gain(0.28)

// other · synth brass 1 · "solo brass"
const synth_brass_1 = note(`<
  ~@16 A B C D E F G H A B C D E F G H ~@16 A B C D E F G H A B C D E F G H ~@16 A B C D E F G H ~@8 A B C D E F G H
  ~@10
>`.pickRestart({
  A: "g4 ~ g4 ~ b4 ~ c5 ~ d5 ~ c5 ~ b4 ~ g4 ~", B: "~@2 g4 ~ b4 ~ c5 ~ d5 ~ c5 ~ b4 ~@3",
  C: "e4 ~ e4 ~ g4 ~ a4 ~ b4 ~ a4 ~ g4 ~ e4 ~", D: "~@2 e4 ~ b4@3 ~ a4@3 ~ g4@2 ~@2",
  E: "c4 ~ c4 ~ e4 ~ f4 ~ g4 ~ f4 ~ e4 ~ c4 ~", F: "~@2 c4 ~ e4 ~ f4 ~ g4 ~ f4 ~ e4@3 ~",
  G: "d4 ~ d4 ~ f#4 ~ g4 ~ a4 ~ g4 ~ f#4 ~ d4@2", H: "~@2 d4 ~ a4@3 ~ g4@3 ~ f#4@4",
})).s("gm_synth_brass_1").gain(0.39)

// chords · piano
const piano = note(`<
  ~@8 A B C D E F G H ~@8 A B C D E F G H ~@8 A B C D E F G H A B C D E F G H A B C D E F G H A B C D E F G H ~@42
>`.pickRestart({
  A: "[g4,b4] ~@3 [g4,b4] ~ [g4,b4] ~@3 [g4,b4] ~@3 [g4,b4] ~", // G
  B: "[a4,c5] ~ [g4,b4] ~@3 [g4,b4] ~@3 [g4,b4] ~ [g4,b4] ~ [g4,b4] ~", // Am G
  C: "[e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [g4,b4]@4", // Em G
  D: "e4 ~ [e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4]@2 [g4,b4] ~ [g4,b4] ~", // Em G
  E: "[a4,c5] ~@3 [a4,c5] ~@3 [a4,c5] ~@3 [a4,c5] ~@3", F: "[a4,c5] ~@3 g4 ~ [a4,c5] ~@3 [a4,c5] ~@3 [a4,c5] ~",
  G: "[b4,d5] ~ [a4,c5] ~@3 [a4,c5] ~@3 [a4,c5] ~ [g4,b4] ~ [a4,c5] ~", // Bm Am G Am
  H: "~@2 [a4,c5]!2 ~@2 [a4,c5]!2 ~@2 [a4,c5]!3 ~ [a4,c5] ~", // Am
})).s("gm_piano").gain(0.27)

// drums · kick
const kick = s("bd").struct("<~@8 [x!4]!75 ~@5 [x!4]!26>").gain(0.57)

// drums · snare
const snare = s("sd").struct("<~@15 A B ~@22 A B ~@6 A B ~@24 A B ~@12 A B ~@25>".pickRestart({
  A: "x ~ x ~ x ~ x ~ x ~ x!6", B: "x",
})).gain(0.36)

// drums · pedal hat
const pedal_hat = s("hh").struct("<~@8 [x!2 ~ x!3 ~ x!3 ~ x!3 ~ x]!106>").gain(0.36)

// drums · open hat
const open_hat = s("oh").struct("<~@8 [~ x ~ x ~ x ~ x]!106>").gain(0.36)

// drums · ride
const ride = s("rd").struct("<~@16 A ~@23 A ~@7 A ~@25 A ~@13 A ~@25>".pickRestart({
  A: "x",
})).gain(0.36)

// drums · china
const china = s("cr").struct("<~@16 A ~@23 A ~@7 A ~@25 A ~@13 A ~@25>".pickRestart({
  A: "x",
})).gain(0.36)

stack(string_ensemble_1, string_ensemble_2, bass, synth_brass_1, piano, kick, snare, pedal_hat, open_hat, ride, china)