// Es ist nichts Gesundes an meinem Leibe BWV 25 — J.S. Bach
// 76 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Transcription provider: pdmx. https://musescore.com/score/5075222; license: https://creativecommons.org/publicdomain/zero/1.0/
// note: Full arrangement: all 17 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(76/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("<A B C D A B C D E F G H I J K L M>".pickRestart({
  A: "c5 d5 e5 d5", B: "c5 b4 a4 g4", C: "c5@4 d5@4 e5@4 d5@2 e5 f5", D: "e5@4 d5@3 c5 c5@8", E: "e5 f5 g5 f5",
  F: "e5 d5 e5@2", G: "g5!2 a5 g5", H: "f5 e5 d5@2", I: "e5@2 g5@2 f5@2 e5 d5", J: "c5 d5 e5@2", K: "c5@2 e5 g5",
  L: "f5 e5 d5 c5", M: "d5 c5",
})).s("gm_trumpet").gain(0.3)

// other · french horn · "Horn in F"
const french_horn = note("<A B C D A B C D E F G H I J K L M>".pickRestart({
  A: "e4 b3 c4 d4", B: "e4 f#4 g4@2 g4 f#4 b3@2", C: "c4@2 f4@2 g4 c4 d4@2", D: "d4 c4!2 b3 e4@4",
  E: "c4@2 c4@2 c4@2 c4 d4", F: "e4 a3!2 b3 c#4@4", G: "c4 d4 e4@2 f4 e4 d4@2", H: "c4!2 b3@2",
  I: "c4 d4 e4@2 f4@2 g4 g3", J: "a3 e4 d4 c4 b3@4", K: "a3@2 a#3 e3", L: "f3@2 g3 a3 b3@2 c4@2", M: "c4 b3 e4@2",
})).s("gm_french_horn").gain(0.3)

// other · trombone
const trombone = note("<A B C D A B C D E F G H I J K L M>".pickRestart({
  A: "c3 g3 c4 b3", B: "a3 g3 d3 g3", C: "e3 d3 c3 b2", D: "c3 g2 c3@2", E: "c4 a3 e3 f3", F: "c#3 d3 a2@2",
  G: "e3 c3 f3 g3", H: "a3 b3 c4@2 g3@4", I: "c4 c3 d3 e3", J: "f3 f#3 g3 g#3", K: "a3@2 g3 c3",
  L: "d3@2 e3 f3 g3 f3 e3 c3", M: "g2 c3",
})).s("gm_trombone").gain(0.3)

stack(trumpet, french_horn, trombone)