// mega man x2 - bubble crab — Misc Computer Games
// 100 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 6 "Marimba (Single Staff)" marimba (copy of ch 5 "Xylophone" xylophone)
// note: Transcription provider: pdmx. https://musescore.com/score/5977295; license: https://creativecommons.org/publicdomain/zero/1.0/
// note: Full arrangement: all 38 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(100/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · flute
const flute = note("<~@7 A B C D E F G H@2 ~@10 A B C D E F G H@2 ~@3>".pickRestart({
  A: "~@4 c#6@3 a5@3 f#5@3 e5@3", B: "d5@2 c#5@3 d5@3 e5@3 a4@3 b4@2", C: "c#5@2 [a4,b4] b4@4 d5@3 c#5@3 e5@3",
  D: "c#5 d5@7", E: "~@2 [g4,b4]@3 [f#5,a5]@3 [e5,g5]@2 [d5,f#5]@3 [c#5,e5]@3", F: "[a4,c#5] [b4,d5]@7",
  G: "~@2 [g4,b4]@3 [a4,c#5]@3 [b4,d5]@2 [a4,c#5]@3 [b4,d5]@3", H: "[[c#5,e5]@2 [d5,f#5]@17 ~@13]/2",
})).s("gm_flute").gain(0.39)

// chords · clarinet · "B♭ Clarinet"
const clarinet = note("<~@7 A B C D@2 E@2 F@2 ~@10 A B C D@2 E@2 F@2 ~@3>".pickRestart({
  A: "~@4 c#5@3 a4@3 f#4@3 e4@3", B: "d4@2 c#4@3 d4@3 e4@3 a3@3 b3@2", C: "c#4@2 [a3,b3] b3@4 d4@3 c#4@3 e4@3",
  D: "[c#4@2 d4@16 [g3,b3]@3 [f#4,a4]@3 [e4,g4]@2 [d4,f#4]@3 [c#4,e4]@3]/2", // G F#m Em D C#m
  E: "[[a3,c#4]@2 [b3,d4]@16 [g3,b3]@3 [a3,c#4]@3 [b3,d4]@2 [a3,c#4]@3 [b3,d4]@3]/2", F: "[[c#4,e4] [d4,f#4]@9 ~@6]/2",
})).s("gm_clarinet").gain(0.39)

// chords · french horn · "Horn in F"
const french_horn = note("<A@8 B@8 C@3 A@8 B@8 C@3>".pickRestart({
  A: "[[b3,d4,f#4]@6 [a#3,d4,f#4]@6 [a3,d4,f#4]@6 [g#3,d4,f#4]@7 [g3,b3,d4]@8 [f#3,a#3,c#4]@8 [g3,b3,d4]@8 [f#3,a#3,c#4]@8 [b3,d4,f#4]@7]/8", // Bm A#aug D G#m7b5 G F# G F# …
  B: "[~ [a3,c#4,e4]@8 [g3,b3,d4]@4 [a3,c#4,e4]@4 [b3,d4,f#4]@8 [g3,b3,d4]@4 [a3,c#4,e4]@4 [b3,d4,f#4]@8 [g3,b3,d4]@4 [a3,c#4,e4]@4 [b3,d4,f#4]@8 [b3,d4,f#4]@4 [b3,e4,g#4]@3]/8", // A G A Bm G A Bm G …
  C: "[~ [b3,f#4,a4]@4 [b3,e4,g#4]@4 [b3,d4,f#4]@4 [b3,e4,g#4]@4 [b3,f#4,a4]@4 [b3,e4,g#4]@3]/3", // B7 E Bm E B7 E
})).s("gm_french_horn").gain(0.25)

// bass · tuba
const bass = note("<A B C D E F G H I J K L K M H N@4 A B C D E F G H I J K L K M H N@4>".pickRestart({
  A: "b1@10 b1!2 a#1@4", B: "a#1@4 ~@2 a#1!3 a1@7", C: "~@2 a1@2 a1 g#1@8 g#1@2 g#1", D: "g#1!2 g1!14",
  E: "g1!2 f#1!13 g#1", F: "a1 b1 g1!14", G: "g1!2 f#1!8 f#2 f#1!3 f#2 f#1",
  H: "f#1!2 b1@2 b1 b1@2 b1!3 b1@2 b1 b1@2 b1", I: "b1!2 a1@2 a1 a1@2 a1!3 a1@2 a1 a1@2 a1",
  J: "a1!2 g1@2 g1 g1@2 g1!3 a1@2 a1 a1@2 a1", K: "a1!2 b1@2 b1 b1@2 b1!3 b1@2 b1 b1@2 b1",
  L: "b1!2 g1@2 g1 g1@2 g1!3 a1@2 a1 a1@2 a1", M: "b1!2 g1@2 g1 g1@2 g1!3 f#1@2 f#1 f#1@2 f#1", N: "b1!16",
})).s("gm_tuba").gain(0.35)

// chords · piano
const piano = note("<~@3 A B C D E F@3 G@2 H I J@4 ~@3 A B C D E F@3 G@2 H I J@4>".pickRestart({
  A: "~@2 [g4,b4,d5] ~@2 [g4,b4,e5] ~@2 [g4,b4,d5] ~@2 [g4,b4,d5] ~ [g4,b4,d5] [g4,b4,e5] ~", // G Em G Em
  B: "[g4,b4,d5] ~ [f#4,a#4,d5] ~@2 [f#4,a#4,c#5] ~@2 [f#4,a#4,d5] [f#4,a#4,c#5] ~@6", // G F#aug F# F#aug F#
  C: "~@2 [g4,b4,d5] ~@2 [g4,b4,e5] ~@2 [g4,b4,d5] ~@2 [g4,b4,f#5] ~ [g4,b4,f#5] [g4,b4,e5] ~", // G Em G Gmaj7 Em
  D: "[g4,b4,d5] ~ [f#4,a#4,c#5] ~@2 [f#4,a#4] ~@2 [f#4,a#4,b4] ~@2 [f#4,a#4,c#5] ~ [f#4,a#4,c#5] [f#4,a#4,d5] ~", // G F# Bmaj7 F# F#aug
  E: "[f#4,a#4,e5] ~ [b3,b4]@14", // F#7 B
  F: "[~@2 [c#4,c#5]@8 [a3,a4]@8 [b3,b4]@8 [c#4,c#5]@8 [d4,d5]@8 [b3,b4]@3 [c#4,c#5]@3]/3", // C# A B C# D B C#
  G: "[[d4,d5]@2 [b3,b4]@8 [c#4,c#5]@3 [a3,a4]@5 [b3,b4]@14]/2", H: "~ [b3,b4]@4 [c#4,c#5]@3", I: "[e4,e5] [d4,d5]@7",
  J: "[~ [b3,d4,f#4,b4,d5,f#5]@4 [b3,e4,g#4,b4,e5,g#5]@4 [b3,f#4,a4,b4,f#5,a5]@4 [b3,e4,g#4,b4,e5,g#5]@4 [b3,d4,f#4,b4,d5,f#5,b5]@4 [b3,e4,g#4,b4,e5,g#5]@4 [b3,f#4,a4,b4,f#5,a5]@4 [b3,e4,g#4,b4,e5,g#5]@3]/4", // Bm E B7 E Bm E B7 E
})).s("gm_piano").gain(0.56)

// chords · string ensemble 1 · "Violins"
const string_ensemble_1 = note("<A@8 B@8 C@3 A@8 B@8 C@3>".pickRestart({
  A: "[[b4,d5,f#5]@6 [a#4,d5,f#5]@6 [a4,d5,f#5]@6 [g#4,d5,f#5]@7 [g4,b4,d5]@8 [f#4,a#4,c#5]@8 [g4,b4,d5]@8 [f#4,a#4,c#5]@8 [b4,d5,f#5]@7]/8", // Bm A#aug D G#m7b5 G F# G F# …
  B: "[~ [a4,c#5,e5]@8 [g4,b4,d5]@4 [a4,c#5,e5]@4 [b4,d5,f#5]@8 [g4,b4,d5]@4 [a4,c#5,e5]@4 [b4,d5,f#5]@8 [g4,b4,d5]@4 [a4,c#5,e5]@4 [b4,d5,f#5]@8 [b4,d5,f#5]@4 [b4,e5,g#5]@3]/8", // A G A Bm G A Bm G …
  C: "[~ [b4,f#5,a5]@4 [b4,e5,g#5]@4 [b4,d5,f#5]@4 [b4,e5,g#5]@4 [b4,f#5,a5]@4 [b4,e5,g#5]@3]/3", // B7 E Bm E B7 E
})).s("gm_string_ensemble_1").gain(0.25)

// other · xylophone
const xylophone = note("<A B C D ~@15 A B C D ~@15>".pickRestart({
  A: "d5 b4 f#4 b4 f#4 b4 e5 f#4 b4 d5 f#4 b4 d5 a#4 f#4 a#4",
  B: "f#4 a#4 e5 f#4 a#4 d5 f#4 a#4 d5 f#4 a4 e5 f#4 a4 d5 f#4",
  C: "a4 f#5 a4 d5 f#5 g#4 b4 e5 g#4 b4 d5 g#4 b4 f#5 g#4 e5", D: "d5 b4 ~@14",
})).s("gm_xylophone").gain(0.35)

// drums · kick
const kick = s("bd").struct("<A B C D E D F G@8 H I J K A B C D E D F G@8 H I J K>".pickRestart({
  A: "x ~@2 x ~@6 x!3 ~ x ~", B: "~ x!2 ~@3 x!4 ~@6", C: "~ x!2 ~ x ~ x ~@2 x ~@5 x",
  D: "~@2 x!2 ~ x ~ x ~@3 x ~ x ~@2", E: "x!3 ~@2 x ~ x ~ x ~@5 x", F: "x!3 ~@2 x ~ x ~ x ~@3 x ~@2",
  G: "~@2 x ~ x ~@2 x ~ x!2 ~ x ~@2 x", H: "~@2 x!14", I: "x!15 ~", J: "~@2 x!5 ~ x ~ x!5 ~",
  K: "x ~ x!5 ~ x ~ x!3 ~ x!2",
})).gain(0.25)

// drums · snare
const snare = s("sd").struct("<A B C D E D F G@8 H I J K A B C D E D F G@8 H I J K>".pickRestart({
  A: "~@4 x ~@10 x", B: "~@3 x ~@12", C: "~@7 x ~@2 x ~@5", D: "x!2 ~@6 x ~@6 x", E: "~@3 x ~@4 x ~@4 x ~@2",
  F: "~@3 x ~@4 x ~@5 x!2", G: "x!2 ~@3 x ~@2 x ~@4 x ~@2", H: "x!2 ~@14", I: "~@15 x", J: "x!2 ~@5 x ~ x ~@5 x",
  K: "~ x ~@5 x ~ x ~@3 x ~@2",
})).gain(0.3)

// drums · hihat
const hihat = s("hh").struct("<A B C D E@2 F G H@7 I J@2 K A B C D E@2 F G H@7 I J@2 K>".pickRestart({
  A: "x ~@2 x!2 ~@5 x!3 ~ x ~", B: "~@2 x ~@3 x!3 ~@7", C: "~@4 x ~ x ~@2 x ~@5 x", D: "~@4 x ~@2 x ~@4 x ~@2 x",
  E: "~ x ~@2 x ~@2 x ~@4 x ~@2 x", F: "~ x ~@2 x ~@2 x ~@4 x ~@3", G: "~@2 x ~ x ~@2 x ~ x!2 ~ x ~@2 x",
  H: "~ x!2 ~ x ~@2 x ~ x!2 ~ x ~@2 x", I: "~ x!2 ~ x ~ x ~ x ~ x ~ x ~ x ~", J: "x!8", K: "x!7 ~",
})).gain(0.3)

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

// drums · crash
const crash = s("cr").struct("<A B ~ C ~ C ~@13 A B ~ C ~ C ~@13>".pickRestart({
  A: "x", B: "~@11 x ~@4", C: "~ x ~@6",
})).gain(0.4)

stack(flute, clarinet, french_horn, bass, piano, string_ensemble_1, xylophone, kick, snare, hihat, open_hat, crash)