// Feed the World — Band Aid
// 115 bpm, 4/4, key C 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 110 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(115/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, A@4 for four bars: edit a riff to change every repeat.

// bass · fretless bass · "FRETLESS"
const bass = note(`<
  ~ A B A B C D E F C D E F G H I C J H K L M N K O M N K O M N K P Q N K P Q N K P Q N K R M N K R M N K R M N K P Q N
  K S T U T V W X Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB Y Z AA AB
  AC@3
>`.pickRestart({
  A: "c2@2 ~ c3 ~@4", B: "c2 ~@3", C: "f1@5 ~ f2@2 ~@4 f1 ~@3", D: "c1@5 ~ c2@2 ~@4 c1 ~@3", E: "c2@3 c3 ~@4",
  F: "c2@7 ~@9", G: "f1@3 f2 ~@2 f1 ~", H: "g1@5 ~ g2 ~@5 g1 ~@3", I: "c2@6 c3 ~@5 c2 ~@3", J: "d2@6 d3 ~@5 d2 ~@3",
  K: "c2 ~ c2@3 ~ c2@3 ~ c2@2 ~@2 c2@2", L: "~@2 c2@3 ~ c2@3 ~ c2@4 e1 ~", M: "f1 ~ f1@3 ~ f1@3 ~ f1@2 ~@2 f1@2",
  N: "g1 ~ g1@3 ~ g1@3 ~ g1@4 g1 ~", O: "~@2 c2@3 ~ c2@3 ~ c2@4 c2 ~", P: "f1 ~ f1@3 ~ f1@3 ~ f1@4 f1 ~",
  Q: "d2 ~ d2@3 ~ d2@3 ~ d2@2 ~@2 d2@2", R: "c2 ~ c2@3 ~ c2@3 ~ c2@4 c2 ~", S: "f1 ~ f1@3 ~ f1@2 c2 ~ c2@4 c2 ~",
  T: "a1@7 e1", U: "g1!2 ~@5 e1", V: "g1!2 ~@5 e2", W: "f2@6 e2 f2", X: "g2@8 b2@7 ~",
  Y: "c3@2 c2@3 ~ c2@3 ~ c2@3 ~ e1 ~", Z: "f1 ~ f1@3 ~ a1@2 c2 ~ c2@3 ~ c2@2",
  AA: "f1 ~ f1@2 ~@2 a1@2 c2 ~ c2@3 ~ c2 ~", AB: "d2 ~ d2@3 ~ d2@2 g1 ~ g1@2 ~@2 g1@2", AC: "[c2@3 ~]/3",
})).s("gm_fretless_bass").gain(0.45)

// chords · epiano2 · "E.PIANO 2"
const epiano2 = note("<~@75 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D E@3>".pickRestart({
  A: "~@2 [e5,g5] [e4,c5], [g4,c5]@3 ~, e5 ~, ~@3 [d5,f5]@3 ~@2", B: "[f4,a4,c5] [e4,g4,c5]",
  C: "~@3 [c5,e5], a5, c5 [d5,f5], f5 e5@2 ~, ~ g5@3", D: "[f4,a4,c5]@8 ~@4 g4@3 ~, ~@8 [f4,a4,c5]@7 ~",
  E: "[~@12 c2@5 ~@7, [g2,e3,c4]@2 ~, c2@10 g3@7 ~@7, ~@11 g4@23 ~@14, ~@15 d4@19 ~@14]/3", // C
})).s("gm_epiano2").gain(0.29)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  A@2 ~ B ~@15 C@2 ~@8 D E F G D E F G D E F G H I J@2 K L M@2 K L M@2 K L N K O P Q R ~@6 S T U V S T U V S T U V S T U
  V W X@2 Y W X@2 Y W X@2 Y W X@2 Y W X@2 Y W X@2 Y Z@2 ~
>`.pickRestart({
  A: "[~@12 c3@11 ~@9]/2", B: "c2", C: "[c2@15 ~]/2", D: "f3", E: "g3", F: "[c3,c5,e5,g5]@15 ~",
  G: "f3@4 g3@4 a3@7 ~, [c5,f5,a5]", H: "[d3,f3,a3]@15 ~", I: "[d3,g3,b3]@15 ~", J: "[e5@2 f5 c6, c5]/2",
  K: "[c5,f5,a5]", L: "[d5,g5,b5]", M: "[e5,g5,c6]/2", N: "[e5,g5,c6]", O: "[d4,f4,a4]", P: "[d4,g4,b4]@15 ~", Q: "c3",
  R: "f2@8 c3@7 ~", S: "e3", T: "f3@6 g3 f3 e3@8", U: "f3 e3", V: "d3 g3", W: "[e4,c5,g5]",
  X: "[f4,c5,a5]@8 [e4,c5,g5]@7 ~", Y: "[d4,a4,f5] [g3,b4,g5]", Z: "[c4,c5,c6]/2",
})).s("gm_string_ensemble_1").gain(0.25)

// other · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note(`<
  ~@19 A@2 B C A@2 B C A@2 B C D B E C D B E C D B E C D@2 B C D@2 B C D@2 B C D B E C D F ~@6 D F@2 G D F@2 G D F@2 G D
  F@2 G D F@2 G D F@2 G D F@2 G D F@2 G D F@2 G D F@2 G ~@3
>`.pickRestart({
  A: "c2 ~ c2!3 ~ c2!3 ~ c2!3 ~ c2!2", B: "f2 ~ f2!3 ~ f2!3 ~ f2!3 ~ f2!2", C: "g2 ~ g2!3 ~ g2!3 ~ g2!3 ~ g2!2",
  D: "c3 ~ c3!3 ~ c3!3 ~ c3!3 ~ c3!2", E: "d3 ~ d3!3 ~ d3!3 ~ d3!3 ~ d3!2", F: "f2 ~ f2!3 ~ f2!2 c3 ~ c3!3 ~ c3!2",
  G: "d3 ~ d3!3 ~ d3!2 g2 ~ g2!3 ~ g2!2",
})).s("gm_electric_guitar_muted").gain(0.32)

// other · tenor sax
const tenor_sax = note(`<
  ~@4 A B C D A E F G H@2 I J K@2 L M@2 N O P Q R O S T U V W@2 X Y Z@2 X AA AB@2 AC@2 AD AE AF@3 AG AH AI@3 AJ AK AL ~
  AM AN AO ~ AP AQ AP AQ AR AN AS ~@7 AT AU AV AW AT AU AV AW AT AU AV AW AT AU AV AW AT AU AV AW AT AU AV AW AT AU AV
  AW AT AU AV AW ~@3
>`.pickRestart({
  A: "~@8 c3@2 ~ c3@2 ~ a3@2", B: "a3@3 ~@5", C: "~@6 a3 ~ a3@2 ~ g3@2 ~ g3@2", D: "g3@2 ~ a3@3 ~@10",
  E: "a3@4 ~@10 a3 ~", F: "a3@2 g3 ~ g3@2 a3 ~ a3@2 ~@2 g3@2 e3 ~", G: "g3@3 ~ a3@3 ~@9",
  H: "[~@6 g3 ~ a3@2 c4@2 ~@2 d4@6 ~@6 c4@2 ~@2 e4@2]/2", I: "~@2 d4@2 c4@6 d4 ~ a3@2 g3 ~",
  J: "c4@3 ~ c4 ~ d4@4 ~@2 a3 ~ a3@2", K: "[~ g3 f3@5 ~@3 a3@2 c4 ~ d4@6 c4 ~ d4@5 ~ c4 ~ e4@2]/2",
  L: "~@6 g3 ~ e4 ~ e4@5 ~", M: "[d4@2 c4@16 ~@6 e4@2 ~ d4@3 c4 ~]/2", N: "d4@2 c4@4 d4 ~@9, ~@2 d4 ~@13",
  O: "~@8 d4@3 ~ d4@2 c4 ~", P: "d4@2 e4 ~ e4@6 ~@6", Q: "~@8 c4@2 ~ c4@3 d4 ~", R: "c4@3 ~@9 c4 ~ b3@2",
  S: "d4@2 e4 ~ e4@8 d4 ~ e4 d4", T: "c4@4 ~@2 c4@5 ~ c4@3 ~", U: "c4@3 ~ c4@2 ~@2 c4@4 d4 ~ b3@2",
  V: "~@2 a3@2 g3@3 ~@3 c4 ~ c4@2 c4 ~", W: "[c4@3 ~ d4@2 ~@2 c4@3 ~ g3 ~ a3@5 ~@9 c4@2 c4 ~]/2",
  X: "c4@3 ~ c4 ~ c4@3 ~ d4@3 ~ b3@2", Y: "~@2 a3@2 g3@5 ~@3 c4 ~ c4 ~",
  Z: "[c4@3 ~ d4 ~ c4@5 ~ g3 ~ a3@6 ~@6 c4@3 ~ c4 ~]/2", AA: "~@2 a3@2 g3@5 ~@3 c4@3 ~",
  AB: "[c4@2 d4@2 ~@2 c4@5 ~ g3 ~ a3@6 ~@6 f4@3 ~ f4 ~]/2",
  AC: "[f4@3 ~ f4@3 ~ f4@2 f4@2 ~@2 d4@4 ~@4 e4 ~ f4@5 ~ e4 ~]/2", AD: "e4@15 ~", AE: "~@12 c4@2 c4 ~",
  AF: "[c4@3 ~ c4 ~ c4@4 c4@3 ~ b3@5 ~ a3@2 g3@5 ~ a3@2 a3@5 ~ g3 ~ g3@6 ~@4]/3", AG: "~@14 g3 ~",
  AH: "c4@2 c4@2 ~@2 c4@4 d4@3 ~ b3@2", AI: "[~@2 a3@3 ~ g3@3 ~ a3@3 ~ g3@6 ~@10 d4@4 c4@2 d4@4 c4@2 a3 ~ c4@2 c4 ~]/3",
  AJ: "a3@3 ~ a3 ~ a3@3 ~ c4@3 ~ b3@2", AK: "~@12 c4@3 ~", AL: "c4@2 d4@2 ~@2 c4@3 ~ g3@2 ~@2 a3@2",
  AM: "f4@3 ~ e4@3 ~ c4@4 g3@2 ~@2", AN: "f4@3 ~ e4@3 ~ c4@3 ~ d4@2 c4 ~", AO: "c4",
  AP: "e4@3 ~ e4@3 ~ e4@3 ~ d4@2 c4 ~", AQ: "d4@3 ~ e4@3 ~ d4@2 c4 ~ b3@3 ~", AR: "f4@3 ~ e4@3 ~ c4@3 ~ g3@3 ~",
  AS: "d4 c4@7", AT: "g4@8 c4@7 ~", AU: "f4@8 e4@5 ~@3", AV: "a4@3 ~ g4@3 ~ f4@3 ~ e4@3 ~",
  AW: "f4@3 ~ e4@3 ~ d4@3 ~ c4@3 ~",
})).s("gm_tenor_sax").gain(0.31)

// other · tubular bells · "TUBULARBEL"
const tubular_bells = note(`<
  ~ A ~ A ~@15 A ~@18 B A C D E F G ~@12 H E A ~@15 I ~ J K I ~ J K I ~ J K I ~ J K I ~ J K I ~ J K I ~ J K I ~ J K A
  ~@2
>`.pickRestart({
  A: "c5 ~@15", B: "g4 ~@3 a4 ~@3 b4 ~@3 d5 ~@3", C: "a4 ~@3 g4 ~@3 f4 ~@3 e4 ~@3", D: "d4 ~@15", E: "b4 ~@7 d5 ~@7",
  F: "e5 ~@15", G: "f5 ~@15", H: "a4 ~@7 c5 ~@7", I: "g5 ~@15", J: "a5 ~@3 g5 ~@3 f5 ~@3 e5 ~@3",
  K: "f5 ~@3 e5 ~@3 d5 ~@3 c5 ~@3",
})).s("gm_tubular_bells").gain(0.4)

// other · orchestral harp · "HARP"
const orchestral_harp = note("<~@59 A B ~@13 C D ~@2 C D ~@6 E ~@3 F ~@7 G ~@11>".pickRestart({
  A: "e5 ~@5 f5 ~ g5 ~@3 c5 ~@3", B: "a5 ~@5 g5 f5 g5 ~@3 c5 ~@3",
  C: "~@9 [f3,g3,a3] [b3,c4,d4] [e4,f4,g4] [a4,b4,c5] [d5,e5,f5] [g5,a5,b5] [c6,d6,e6]", D: "[f6,g6] ~@15",
  E: "~@7 [f3,g3] [a3,b3,c4] [d4,e4,f4] [g4,a4,b4] [c5,d5,e5] [f5,g5,a5] [b5,c6,d6] [e6,f6,g6] ~", // Fsus2 Am Dm G C F Bm Em
  F: "~@8 [f3,g3] [a3,b3,c4] [d4,e4,f4] [g4,a4,b4] [c5,d5,e5] [f5,g5,a5] [b5,c6,d6] [e6,f6,g6]", // Fsus2 Am Dm G C F Bm Em
  G: "~@5 f3 [g3,a3,b3] [c4,d4,e4] [f4,g4,a4] [b4,c5,d5] [e5,f5,g5] [a5,b5,c6] [d6,e6,f6] g6 ~@2", // G C F Bm Em Am Dm
})).s("gm_orchestral_harp").gain(0.14)

// drums · kick
const kick = s("bd").struct("<~@19 A@23 B C D A@13 B A@2 E F E F E D A@38 G H I ~@2>".pickRestart({
  A: "x!4", B: "x ~ x!6", C: "x!2", D: "x ~ x!3 ~ x ~", E: "x ~@2 x ~@3 x", F: "x!2 ~ x ~@3 x", G: "x ~@5 x!2 ~@6 x ~",
  H: "x ~@2 x ~@4", I: "x",
})).gain(0.64)

// drums · snare
const snare = s("sd").struct(`<
  ~@19 A@23 B C D A@13 B A E F@5 D A@3 G H A@2 I A@3 G H A@2 I A@3 G H A@2 I A@3 G H A@2 I A@3 G H A F@2 ~@3
>`.pickRestart({
  A: "~ x ~ x", B: "~@4 x ~ x!10", C: "~@4 x ~@7 x ~@2 x", D: "x ~@4 x ~@2", E: "~@4 x ~ x!4 ~@6", F: "~ x",
  G: "~@2 x!4 ~ x!3 ~@2 x!2 ~@2", H: "x!2 ~@2 x ~@7 x ~@3", I: "~ x!2 ~ x!5 ~@3 x!2 ~@2",
})).gain(0.58)

// drums · low tom
const low_tom = s("lt").struct("<~ A@18 ~@25 B ~@21 B ~@39 C ~@3>".pickRestart({
  A: "x!3 ~@5", B: "~@12 x ~ x!2", C: "~@3 x",
})).gain(0.45)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@19 A B@22 ~@3 A B@12 ~ B C ~@6 A B@2 ~ D B@2 E A B@2 ~ D B@2 E A B@2 ~ D B@2 E A B@2 ~ D B@2 E A B@2 ~ D B ~@5
>`.pickRestart({
  A: "~ x!7", B: "x!8", C: "x!3 ~@5", D: "~@3 x!5", E: "x",
})).gain(0.39)

// drums · mid tom
const mid_tom = s("mt").struct("<~ A@18 ~@25 B ~@15 C ~@5 B ~@7 C ~@7 C ~@7 C ~@7 C ~@11>".pickRestart({
  A: "x ~@5 x!2", B: "~@4 x ~@6 x ~ x ~@2", C: "~@7 x",
})).gain(0.45)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@42 A B C ~@13 A ~@2 D@5 C ~@3 E F ~@6 E F ~@6 E F ~@6 E F ~@6 E F ~ G H ~@3
>`.pickRestart({
  A: "x", B: "~ x!3", C: "~@3 x ~@4", D: "~ x", E: "~@3 x ~ x ~ x", F: "~ x ~@6", G: "~ x ~ x", H: "~ x!2 ~",
})).gain(0.58)

// drums · open hat · soft notes
const open_hat_soft = s("oh").struct("<~@43 A ~@26 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7>".pickRestart({
  A: "~ x ~ x ~ x ~@2", B: "x",
})).gain(0.32)

// drums · high tom
const high_tom = s("ht").struct("<~ A@18 ~@25 B ~@15 C ~@5 B ~@7 D ~@7 D ~@7 D ~@7 D ~@11>".pickRestart({
  A: "~@3 x!3 ~@2", B: "~ x!2 ~@5 x ~@7", C: "~@11 x!2 ~@3", D: "~@5 x ~@2",
})).gain(0.45)

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

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@19 [~@3 x ~@2 x ~]!88 ~@3>").gain(2.94)

// drums · shaker
const shaker = s("sh").struct("<~@19 [~ x ~@2]!88 ~@3>").gain(0.58)

stack(
  bass, epiano2, string_ensemble_1, electric_guitar_muted, tenor_sax, tubular_bells, orchestral_harp, kick, snare,
  low_tom, hihat, mid_tom, open_hat, open_hat_soft, high_tom, crash, cabasa, shaker
)