// Angels from the Realms of Glory — Henry Smart
// 120 bpm, 4/4, key Bb major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Transcription provider: pdmx. https://musescore.com/score/1540811; license: https://creativecommons.org/publicdomain/mark/1.0/
// note: Full arrangement: all 52 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(120/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// other · trumpet · "B♭ Trumpet"
const trumpet = note(`<
  ~@4 A B C D E F G H A I J K A B C D E F G H A I J K A B C D ~@2 L M A I J K A B C D E F G H E F G H
>`.pickRestart({
  A: "f4 d4 bb4 f4", B: "d5@3 c5 bb4@2 a4@2", C: "bb4@2 a4@2 g4@2 a4 bb4", D: "a4 g4 f4@2", E: "c5@3 c5 a4@2 f4@2",
  F: "d5@3 c5 bb4@2 g4@2", G: "eb5 d5 c5 bb4", H: "bb4 a4 bb4@2", I: "d5@3 c5 bb4@2 f4@2", J: "g4!2 f4 bb4",
  K: "f4 eb4 d4@2", L: "g4@2 f4@2 eb4@2 d4 eb4", M: "f4@3 eb4 d4@4",
})).s("gm_trumpet").gain(0.3)

// bass · tuba · "Euphonium"
const bass = note(`<
  ~@2 A B C D E F G H ~ I J K L M K N O F P Q R B ~@4 S T U F ~@2 R B J K L M K N O F P Q R B P Q R B
>`.pickRestart({
  A: "eb3!2 d3 g3", B: "f3!2 bb3@2", C: "f3 d3 bb3 f3", D: "d4@3 c4 bb3@2 a3@2", E: "g3 d3 bb2 g3", F: "f3 e3 f3@2",
  G: "f3@2 f3!2", H: "bb3 eb3", I: "f3 bb3", J: "bb3", K: "bb3 f3 bb3@2", L: "eb3@2 d3 g3", M: "a3 f3 bb3@2",
  N: "bb3 f3@2 gb3", O: "g3 gb3 g3 d3", P: "f3@3 f3 f3@2 f3@2", Q: "bb3 ab3 g3 eb3", R: "c3@2 d3@2 eb3 f3 g3@2",
  S: "bb3 d3", T: "eb3@2 f3 gb3", U: "g3 f3 e3@2",
})).s("gm_tuba").gain(0.3)

stack(trumpet, bass)