// 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: 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 J K L M N O P M Q O P M Q O P M R S P M R S P M R S P M T O P M T O P M T O P M R S P
  M U V W V X Y Z AA AB AC AD AA AB AC AD AA AB AC AD AA AB AC AD AA AB AC AD AA AB AC AD AA AB AC AD AA AB AC AD AA AB
  AC AD AA AB AC AD AE@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: "f1@5 ~ f2 ~@5 f1 ~@3",
  K: "d2@6 d3 ~@5 d2 ~@3", L: "g1@6 g2 ~@5 g1@2 ~@2", M: "c2 ~ c2@3 ~ c2@3 ~ c2@2 ~@2 c2@2",
  N: "~@2 c2@3 ~ c2@3 ~ c2@4 e1 ~", O: "f1 ~ f1@3 ~ f1@3 ~ f1@2 ~@2 f1@2", P: "g1 ~ g1@3 ~ g1@3 ~ g1@4 g1 ~",
  Q: "~@2 c2@3 ~ c2@3 ~ c2@4 c2 ~", R: "f1 ~ f1@3 ~ f1@3 ~ f1@4 f1 ~", S: "d2 ~ d2@3 ~ d2@3 ~ d2@2 ~@2 d2@2",
  T: "c2 ~ c2@3 ~ c2@3 ~ c2@4 c2 ~", U: "f1 ~ f1@3 ~ f1@2 c2 ~ c2@4 c2 ~", V: "a1@7 e1", W: "g1!2 ~@5 e1",
  X: "g1!2 ~@5 e2", Y: "f2@6 e2 f2", Z: "g2@8 b2@7 ~", AA: "c3@2 c2@3 ~ c2@3 ~ c2@3 ~ e1 ~",
  AB: "f1 ~ f1@3 ~ a1@2 c2 ~ c2@3 ~ c2@2", AC: "f1 ~ f1@2 ~@2 a1@2 c2 ~ c2@3 ~ c2 ~",
  AD: "d2 ~ d2@3 ~ d2@2 g1 ~ g1@2 ~@2 g1@2", AE: "[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 Y Z W X Y Z W X Y Z W X Y Z W X Y Z W X Y Z AA@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: "[f4,c5,a5] [e4,c5,g5]", Z: "[d4,a4,f5] [g3,b4,g5]", AA: "[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 E F G H I@2 J K L@2 M N@2 O P Q R S P T U V W X@2 Y Z AA@2 Y AB AC@2 AD@2 AE AF AG@3 AH AI AJ@3 AK AL AM ~
  AN AO AP ~ AQ AR AQ AS AT AO AU ~@7 AV AW AX AY AV AW AX AY AV AW AX AY AV AW AX AY AV AW AX AY AV AW AX AY AV AW AX
  AY AV AW AX AY ~@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: "~@8 c3@3 c3@2 ~ a3@2", F: "a3@4 ~@10 a3 ~", G: "a3@2 g3 ~ g3@2 a3 ~ a3@2 ~@2 g3@2 e3 ~", H: "g3@3 ~ a3@3 ~@9",
  I: "[~@6 g3 ~ a3@2 c4@2 ~@2 d4@6 ~@6 c4@2 ~@2 e4@2]/2", J: "~@2 d4@2 c4@6 d4 ~ a3@2 g3 ~",
  K: "c4@3 ~ c4 ~ d4@4 ~@2 a3 ~ a3@2", L: "[~ g3 f3@5 ~@3 a3@2 c4 ~ d4@6 c4 ~ d4@5 ~ c4 ~ e4@2]/2",
  M: "~@6 g3 ~ e4 ~ e4@5 ~", N: "[d4@2 c4@16 ~@6 e4@2 ~ d4@3 c4 ~]/2", O: "d4@2 c4@4 d4 ~@9, ~@2 d4 ~@13",
  P: "~@8 d4@3 ~ d4@2 c4 ~", Q: "d4@2 e4 ~ e4@6 ~@6", R: "~@8 c4@2 ~ c4@3 d4 ~", S: "c4@3 ~@9 c4 ~ b3@2",
  T: "d4@2 e4 ~ e4@8 d4 ~ e4 d4", U: "c4@4 ~@2 c4@5 ~ c4@3 ~", V: "c4@3 ~ c4@2 ~@2 c4@4 d4 ~ b3@2",
  W: "~@2 a3@2 g3@3 ~@3 c4 ~ c4@2 c4 ~", X: "[c4@3 ~ d4@2 ~@2 c4@3 ~ g3 ~ a3@5 ~@9 c4@2 c4 ~]/2",
  Y: "c4@3 ~ c4 ~ c4@3 ~ d4@3 ~ b3@2", Z: "~@2 a3@2 g3@5 ~@3 c4 ~ c4 ~",
  AA: "[c4@3 ~ d4 ~ c4@5 ~ g3 ~ a3@6 ~@6 c4@3 ~ c4 ~]/2", AB: "~@2 a3@2 g3@5 ~@3 c4@3 ~",
  AC: "[c4@2 d4@2 ~@2 c4@5 ~ g3 ~ a3@6 ~@6 f4@3 ~ f4 ~]/2",
  AD: "[f4@3 ~ f4@3 ~ f4@2 f4@2 ~@2 d4@4 ~@4 e4 ~ f4@5 ~ e4 ~]/2", AE: "e4@15 ~", AF: "~@12 c4@2 c4 ~",
  AG: "[c4@3 ~ c4 ~ c4@4 c4@3 ~ b3@5 ~ a3@2 g3@5 ~ a3@2 a3@5 ~ g3 ~ g3@6 ~@4]/3", AH: "~@14 g3 ~",
  AI: "c4@2 c4@2 ~@2 c4@4 d4@3 ~ b3@2", AJ: "[~@2 a3@3 ~ g3@3 ~ a3@3 ~ g3@6 ~@10 d4@4 c4@2 d4@4 c4@2 a3 ~ c4@2 c4 ~]/3",
  AK: "a3@3 ~ a3 ~ a3@3 ~ c4@3 ~ b3@2", AL: "~@12 c4@3 ~", AM: "c4@2 d4@2 ~@2 c4@3 ~ g3@2 ~@2 a3@2",
  AN: "f4@3 ~ e4@3 ~ c4@4 g3@2 ~@2", AO: "f4@3 ~ e4@3 ~ c4@3 ~ d4@2 c4 ~", AP: "c4",
  AQ: "e4@3 ~ e4@3 ~ e4@3 ~ d4@2 c4 ~", AR: "d4@3 ~ e4@3 ~ d4@2 c4 ~ b3@3 ~", AS: "d4@3 ~ e4@3 ~ d4@2 c4 ~ b3@2 ~@2",
  AT: "f4@3 ~ e4@3 ~ c4@3 ~ g3@3 ~", AU: "d4 c4@7", AV: "g4@8 c4@7 ~", AW: "f4@8 e4@5 ~@3",
  AX: "a4@3 ~ g4@3 ~ f4@3 ~ e4@3 ~", AY: "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
)