// resident evil theme — Misc Soundtrack
// 95 bpm, 3/4, key Bb major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Transcription provider: pdmx. https://musescore.com/score/224486; license: https://creativecommons.org/publicdomain/zero/1.0/
// note: Full arrangement: all 54 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(95/3)

// 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.

// chords · piano
const piano = note(`<
  A B A B C D E F C G E F A B C D E F C G E F H I J K L M N O P Q R S P T U V W X Y Z AA AB AC AD AE AD AF AG AH@2 AI@2
>`.pickRestart({
  A: "g2 d3 a3 bb3 d4@2", B: "g2 d3 a3 bb3 a3 g3", C: "g2 d3 a3 bb3 [d4,gb4]@2, a4 bb4 ~",
  D: "g2 d3 a3 bb3 [gb3,a4] [g3,bb4], g4@2 ~", // Gbm Gm
  E: "~ f3 a3 bb3 [db4,bb4]@2, db4 ~@2, bb2 ~@5, ~ f4@7 ~@16, ~ db5@3 c5@4 ~@4", // Gb
  F: "bb2 f3 eb4 db4 [c4,g4] [bb3,bb4], [db4,f4,bb4] f4 ~", G: "g2 d3 a3 bb3 a4 bb4, g4@2 d4",
  H: "~ a2 e3 f3 bb3 ab3, f4 ~ [e4,ab4,db5], d2@3 e5@5 ~@16, ~ ab4@7 [a4,c5,f5]@8 ~@8, ~ db5@3 ~@8", // Dbm F
  I: "d2 a2 e3 f3 [f4,a4,e5] f5, [f4,a4,d5]@2 e4", J: "f2 c3 g3 ab3 [c4,f4,ab4,f5]@2, [ab4,c5,ab5] [g4,bb4,g5] ~",
  K: "c2 d3 eb3 g3 c4 b3, [eb4,g4,eb5] [d4,d5] [eb4,g4,c5]", L: "g2 a3 bb3 gb3 c4 b3, [bb3,d4,bb4] d5 a4",
  M: "[c4,gb4,a4]@2 c5@2 [g2,f3,bb3,d4,g4,bb4] ~, [g2,eb3,a3]@2 ~", // Gbdim Gm7 Am7b5
  N: "bb2 f3 db4 f3 db4 f3, [db4,a4] [f4,bb4] [f4,c5]", O: "bb2 gb3 [gb4,db5] [g3,a4] [db4,bb4] [g3,c5]",
  P: "[bb2,eb5] [g3,g4] db4 g3 eb4 g3, ~ db5 c5", Q: "bb2 gb3 db4 gb3 gb4 gb3, bb4 a4 c5",
  R: "bb2 f3 f4 f3 db4 f3, [db4,a4] bb4 c5", S: "bb2 gb3 [gb4,db5] [gb3,a4] [db4,bb4] [gb3,c5]",
  T: "bb1 gb3 bb3 gb3 db4 [gb3,eb5], [gb4,c5]@2 db5@3 ~", // Ebm Gbdim
  U: "~ f3 c4 f3 f4 [a3,f5], f4!2 ~, a1@3 f5@5 ~@16, ~ a4@7 ~@16, ~ c5@3 c5@6 ~@2", // Dm
  V: "ab1 f3 c4 f3 f4 [c4,g4,bb4,eb5], [ab4,c5,f5]@2 c5@3 ~, ~ f4 ~", // Cm7 Fm
  W: "~ g2 g3 eb3 eb4 [bb3,g4,bb4,eb5], g4@2 [g4,bb4]@3 ~, g1 ~@5, ~ bb4@7 ~@16, ~ eb5@3 ~@8", // Eb Gm
  X: "gb1 gb2 gb3 db3 bb3 [gb3,gb4,c5], [gb4,eb5]@2 [gb4,bb4]@3 ~", // Gbdim Ebm Gb
  Y: "f1 db3 ab3 db3 db4 [ab3,f4,db5], [f4,db5]@2 [f4,ab4]@3 ~", // Db Fm
  Z: "e1 db3 ab3 db3 db4 ab3, [e4,db5] [e4,ab4] [e4,bb4]", // Dbm E Edim
  AA: "~ gb3 b3 gb3 eb4 b3, eb4@2 ~, eb1 ~@5, ~ gb4@15 ~@8, ~ b4@7 db5@4",
  AB: "~ gb3 b3 gb3 eb4 b3, gb4@2 [ab4,b4,f5], b0 ~@5, ~ b4@15 ~@8, ~ eb5@7 ~@4", // Fdim
  AC: "[bb4,f5,g5,bb5] g5 bb5 g5 b5 bb5, eb2", AD: "~ gb5 bb5 gb5 a5 gb5, eb4, bb5 bb4@7, ~ f4@23, ~ gb4@11",
  AE: "bb5 gb5 bb5 gb5 b5 bb5, eb1", AF: "bb5 gb5 bb5 gb5 b5 bb5, eb2", AG: "bb5 gb5 bb5 gb5 a5 gb5, [eb4,f4,gb4,bb4]",
  AH: "[bb5 gb5 bb5 gb5 b5 bb5 bb5 gb5 bb5 gb5 a5 gb5, eb1]/2", AI: "bb5/2",
})).s("gm_piano").gain(0.25)

// other · string ensemble 1 · "Violins 2"
const string_ensemble_1 = note(`<
  ~@4 A B C D A B C E ~@2 A B C D A B C E F G H I J K L@2 M N O@2 M P Q R S T U V W X ~@10
>`.pickRestart({
  A: "a4 bb4 gb4", B: "g4@4 a4 bb4", C: "f4 c5 bb4", D: "f4@2 f4@2 g4 bb4", E: "db4@2 f4@2 g4 bb4", F: "ab4 c5 ab4",
  G: "a4@4 a4 f5", H: "c5 bb4 ab4", I: "g4 d4 eb4", J: "d4 d5 a4", K: "gb4 c5 g4",
  L: "[db4@2 f4@2 f4@4 db5 a4 bb4 c5]/2", M: "eb5 db5 c5", N: "bb4 a4 c5", O: "[db4@2 bb4@2 c5@4 db5 a4 bb4 c5]/2",
  P: "gb4@2 db5@3 eb5", Q: "a4@2 f4@3 f5", R: "ab4@2 f4@3 bb4", S: "bb4@2 g4@3 bb4", T: "gb4@2 gb4@3 gb4",
  U: "f4@2 f4@3 f4", V: "e4!3", W: "gb4@2 db5", X: "b4@2 b4",
})).s("gm_string_ensemble_1").gain(0.15)

stack(piano, string_ensemble_1)